作っているもの
VBSでコピーするプログラムを書いています
該当コード
VBscript
1Dim strFilePath 2Dim strDir 3 4'コピーするファイルのパス 5strFilePath = "path" 6'コピー先のパス 7strDir = "C:\回復フォルダぁ" 8 9'ファイルシステムオブジェクト作成 10Set objFS = CreateObject("Scripting.FileSystemObject") 11 12'ファイルコピー 13objFS.CopyFile strFilePath, strDir, True 14'2 15Dim strFilePath 16Dim strDir 17 18'コピーするファイルのパス 19strFilePath = "path" '個人情報のためpath記入 20'コピー先のパス 21strDir = "C:\回復フォルダぁ" 22 23'ファイルシステムオブジェクト作成 24Set objFS = CreateObject("Scripting.FileSystemObject") 25 26'ファイルコピー 27objFS.CopyFile strFilePath, strDir, True 28 29'3 30Dim strFilePath 31Dim strDir 32 33'コピーするファイルのパス 34strFilePath = "path" 35'コピー先のパス 36strDir = "C:\回復フォルダぁ" 37 38'ファイルシステムオブジェクト作成 39Set objFS = CreateObject("Scripting.FileSystemObject") 40 41'ファイルコピー 42objFS.CopyFile strFilePath, strDir, True 43 44'4 45Dim strFilePath 46Dim strDir 47 48'コピーするファイルのパス 49strFilePath = "path" 50'コピー先のパス 51strDir = "C:\回復フォルダぁ" 52 53'ファイルシステムオブジェクト作成 54Set objFS = CreateObject("Scripting.FileSystemObject") 55 56'ファイルコピー 57objFS.CopyFile strFilePath, strDir, True 58 59'3 60Dim strFilePath 61Dim strDir 62 63'コピーするファイルのパス 64strFilePath = "path" 65'コピー先のパス 66strDir = "C:\回復フォルダぁ" 67 68'ファイルシステムオブジェクト作成 69Set objFS = CreateObject("Scripting.FileSystemObject") 70 71'ファイルコピー 72objFS.CopyFile strFilePath, strDir, True 73 74'5 75Dim strFilePath 76Dim strDir 77 78'コピーするファイルのパス 79strFilePath = "path" 80'コピー先のパス 81strDir = "C:\回復フォルダぁ" 82 83'ファイルシステムオブジェクト作成 84Set objFS = CreateObject("Scripting.FileSystemObject") 85 86'ファイルコピー 87objFS.CopyFile strFilePath, strDir, True
エラーメッセージー
error
1行: 7 2文字:27 3エラー: 終了していない文字列の定数です。 4コード: 800A0409
まず文字: 27が存在しません
マジでわからん
エラーが出ないコードを教えてぇぇ
回答1件
あなたの回答
tips
プレビュー