Q&A
例えば .\Subfolder\untitled.vbs という開き方をしたらカレントディレクトリに無いので開けないかもしれません。
いつもお世話になっております。
早速ですが、VBScriptについて1点質問が御座います。
adodb.stream の LoadFromFileで、相対パスを指定する事は可能でしょうか。
以下のように記述すると、VBScriptと同じフォルダにファイルがあってもファイルにアクセスできません。
Set objStream = CreateObject("adodb.stream")
objStream.Type = 2
objStream.Charset = "UTF-8"
objStream.Open
objStream.LoadFromFile("news1.txt")
result = objStream.ReadText()
objStream.Close()
どなたか、お分かりになる方がいらっしゃいましたら、ご教示頂けると幸いです。
以上です、よろしくお願い致します。
回答3件
0
VBScriptと同じフォルダにファイルがあってもファイルにアクセスできません。
カレントディレクトリが違うのでは？
VBScript
1Set Shell=CreateObject("WScript.Shell") 2WScript.Echo WShell.CurrentDirectory
で、カレントディレクトリを確認してみて下さい。
相対パスは、スクリプトのあるディレクトリからの相対じゃなくて、カレントディレクトリからの相対です。
投稿2018/03/14 07:24
編集2018/03/14 07:47
総合スコア86281
0
ベストアンサー
私の環境では問題なく実行できましたけど。
コマンドプロンプトからもエクスプローラーからもOKでした。
resultを出力していないから、参照できていないと勘違いしているとかないでしょうか。
本当に参照できていないときは、
ファイルを開けませんでした。
と出力されるはずです。
最終行に
Wscript.echo result
を追加して確認してみてください。
投稿2018/03/14 05:33
総合スコア17000
そりゃそうですね。
質問は相対パスを指定したいとのことなので、
もしZuishinさんのような実行をしているなら、
objStream.LoadFromFile("Subfolder\news1.txt")
と書いてくれればよいだけです。
そうですね。
ただ vbs は path の通ったディレクトリに置くとディレクトリを指定せずに起動できますし、ほかのバッチや vbs から呼び出されていることも想定に入れました。
しかし result を出力していないから実行が確認できず勘違いしているという可能性は確かにありますので確認はしなければならないでしょうね。
Zuishin 様、ttyp03 様
ご回答頂き、誠にありがとうございます。
コマンドプロンプトから作業したところ、動作致しました。申し訳ございません。
エディターにVBSEDITというツールを使用していたのですが、その設定がわるい為か、VBSEDIT上でファイルが開けないエラーが発生しておりました。
http://www.vbsedit.com/
次回からは、コマンドプロンプトで確認してから投稿致します。
呼び出すアプリのせいではなく関連ファイルがカレントディレクトリにあると決めつけているスクリプトのせいです。
このコメントにも書きましたがスクリプトがカレントディレクトリにあるとは限りません。
0
絶対パスで指定すればいいんじゃないですか？
WSHでスクリプトファイル自身が存在するフォルダパスを取得する
投稿2018/03/14 05:05
総合スコア28673
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2018/03/14 07:27
2018/03/14 09:01
2018/03/14 09:04 編集
2018/03/14 12:23
2018/03/15 01:42