![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
お世話になります。度々質問させていただいてますmmc820です。
現在、あるプログラムを作成しているのですが、VB上からEXEを起動させるのですが、この時にEXEのパス名を取得したいのです。
いろいろ調べてみましたが、なにぶん初心者で理解し切れません。
できるだけ簡単な方法があればと思い、質問させていただきました。
相対パスで指定できれば良いのですが、その方法すらわかりません。
どうか皆様のお知恵をお借りできないでしょうか?
開発環境はWindows2000、VB6.0です。宜しくお願いします。
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_04.png?e8efa67)
No.1ベストアンサー
- 回答日時:
参考URLのところの「Download」で
「プログラミングソース(VB)」
というところがあり
そこの「VisualBasic API サンプル集」というのがあります
それにいろいろとサンプルが入っています
まず、解凍したら「API.exe」を実行して
「システム」の「1.各種情報を取得する」
というやつがあります
それを選択して「実行」というボタンをおし
「カレントプロセスのカレントディレクトリを取得する」
というやつです
それで、このサンプルを見たいときは「実行」というボタンではなく
「ソースを表示」というボタンを押します
すると、その実行したやつのサンプルを見ることができますよ♪
参考URL:http://homepage1.nifty.com/MADIA/
すばらしい!!イメージ通りです!!
ありがとうございます。これを参考にしてやってみます。
今夜はぐっすり眠れそうです ¥(^O^)♪
有難うございました!!今後とも宜しくお願いします。
No.2
- 回答日時:
SearchTreeForFile APIを使用して。
Cドライブにあるtest.exeのパスを取得
Option Explicit
Private Declare Function SearchTreeForFile Lib "imagehlp.dll" _
(ByVal RootPath As String, ByVal InputPathName As String, _
ByVal OutputPathBuffer As String) As Long
Private Function fFilePath(ByVal RootFolder As String, _
ByVal FileName As String) As String
Dim Ret As Long
Dim strBuffer As String
strBuffer = String$(256, Chr$(0))
Ret = SearchTreeForFile("c:\", "test.exe", strBuffer)
If Ret Then
fFilePath = Left$(strBuffer, InStr(strBuffer, vbNullChar) - 1)
Else
fFilePath = "File Not Found"
End If
End Function
これではどうでしょうか。
ご回答有難うございます。
この方法(APIですか?)は知りませんでした。ほんと勉強不足ですね。(^_^;)
一行ずつ勉強して参考にさせていただきます。
また、質問する機会があるかと思いますが、その折はまたお力添え下さいませ。
有難うございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Inkscape プリントマークでエラー
-
keygen.exeが実行されない
-
私本管理プラスをダウンロード...
-
パソコンに表示されるAOSBOXfor...
-
indowsで、管理者で実行したソ...
-
簡易ガンマ設定ツールの代替
-
windows10のアプリと機能にyout...
-
Beckyのアドレス帳を上下に移動...
-
vbsでデバッグしながらコードを...
-
子画面を読んだ後親画面のRecor...
-
VB.net webアプリケーション 戻...
-
InstallShieldウィザードでのエ...
-
決められた時間間隔で処理を繰...
-
ユーザー毎にProgram Files
-
検索ボタンなどに使う虫眼鏡の...
-
ドコモのスマホにスカイプがイ...
-
oppo reno 7A
-
※この質問は電話で寄せられた質...
-
avast完全削除の方法
-
マクロで業務の流れを説明する...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
フリーソフトをうまくダウンロ...
-
パソコンに表示されるAOSBOXfor...
-
【InstallShield Wizard】 イ...
-
Windows10(64bt)でWindow8以前...
-
ノーツ エージェントの実行が...
-
インターネットオフライン環境...
-
xアプリを起動すると再試行とキ...
-
d3dx9_40.dllが見つからなかっ...
-
DOS/V 日本語環境構築
-
簡易ガンマ設定ツールの代替
-
管理者権限で実行するフリーソ...
-
keygen.exeが実行されない
-
[python]スクリプトから起動で...
-
Pov‐Rayがインストールでき...
-
RUNASA
-
Ngraph-gtkで出力出来ません。
-
フリーDVDデコーダ「GPL MPEG-2...
-
Inkscape プリントマークでエラー
-
WindowsUpdateでウイルスセキュ...
-
2passエンコードされた動画の確認
おすすめ情報