-1

DataTable から名前を取得して汎用フォルダーを作成しました。

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
strdata = Datatable.Value("Column name", "Sheet")
fso.CreateFolder "C:\Documents and Settings\schoudar\Desktop\" & strdata

これまでは成功しましたが、このフォルダーにファイルを保存したいのですが、保存しないとフォルダー名が変わります。反復の。CaptureBitmapだから私はファイルで試しました:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\ & strdata\filename.bmp"

しかし、うまくいかないので、助けてください。

4

1 に答える 1

4

どのようなエラーが発生していますか?

推測ですが、引用符と文字列の追加を修正します。

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\" & strdata & "\filename.bmp"
于 2008-12-22T13:28:58.067 に答える