2013-10-01から1ヶ月間の記事一覧

JavaMail

import java.util.Properties import java.security.Security import javax.mail.URLName import javax.mail.Session import javax.mail.Store import javax.mail.Folder import javax.mail.search.FlagTerm import javax.mail.Flags import javax.mail.Mess…

PowerPointのスライドに対し、索引を作成する(1)改

VBA

コマンドラインから実行できるようにした。 ' > cscript PPT2Text.vbs powerpoint-filename Option Explicit ' ファイル名を実行時パラメータから取得する Dim pptFilename pptFilename = WScript.Arguments.Item(0) Dim oApp Set oApp = CreateObject("Powe…

PPTファイルの索引データを作成する

https://github.com/kencoba/PPT2IndexPowerPointファイルの索引データ(キーワードとページ番号リストの対)を 出力するプログラムを作成した。PPT2Index.bat PowerPointファイル テキストデータ抽出ファイル 索引用キーワードファイルとして実行する。「テキ…

PowerPointのスライドに対し、索引を作成する(2)

import scala.xml.XML import scala.xml.Elem import scala.io.Source // 索引を付けるPPTファイルから抽出したxml // <Slides> // <Slide> // <SlideNumber value=""> // <SlideBody></SlideBody> // </Slide> // </Slides> val f = new java.io.File("d:\\tmp\\text.pptx.x…

PowerPointのスライドに対し、索引を作成する(1)

VBA

PPTファイルのスライドの内容を、ノート部分も含めてすべてテキストファイルに出力する Option Explicit Sub Extract() Dim myFilePath As String ' 書き出しファイルを指定する myFilePath = CreateObject("WScript.Shell").SpecialFolders("Desktop") & _ …