• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:ディストリビューションウィザードを使って配布するプログラムが読み込むDataFileの場所について)

ディストリビューションウィザードを使って配布するプログラムが読み込むDataFileの場所について

kinkinkinの回答

  • ベストアンサー
  • kinkinkin
  • ベストアンサー率100% (1/1)
回答No.1

あまりうまく表現する自身がありません。すみません。 ディストリビューションウィザードの機能で、 セットアップするファイルの位置(address.txt)を 決めることができます。 但し、c:\xxx\ と決められず、 (インストールフォルダ)\address\address.txt や (windowsディレクトリ)\address\address.txt と指定できます。 また、このファイルを扱うexeファイルのソースの中でも open app.path & "\address\address.txt"(VBなら) など自分自身が起動されたフォルダを知ることが できるので、この2つで何とかならないですか?

sunwen
質問者

お礼

ありがとうございました。 open app.path & "\address\address.txt"(VBなら) これで成功です。 ディストリビューションウィザードの機能 これも選択できることを知りませんでした。 以後、チャレンジしてみます。

関連するQ&A

  • 表示プログラムについて

    テキストの中の”あいうえお”のような文章を表示させるプログラムを作りたいんですが Private Sub Command1_Click() Open "c:\mydata\test.txt" For Input As #1 End Sub Private Sub Command2_Click() Close #1 End Sub では表示されませんでした。何がおかしいかとかどうすればいいか教えてください。お願いします。

  • プログラムについて

     前に「あいうえお」のような一行を表示させるプログラムについてお聞きしたんですけど、今度は一行目に「あいうえお」二行目に「かきくけこ」三行目に「1234567890」四行目に「abcd」のように一度に四行、またはそれ以上を表示させたいんです。 それで次のようにプログラムを作ったんですが最後の行のabcdが表示されるだけでした。 Private Sub Command1_Click() Dim strWork As String Open "c:\mydata\test.txt" For Input As #1 Do While Not EOF(1) Line Input #1, strWork Loop Close #1 MsgBox strWork End Sub 全部表示させるにはどうすればいいかお願いします。

  • バイナリで配布されているプログラムをインストールする際、ディストリビューションとか関係ないんですか?

    すみません。PC-UNIX初心者です。 今、FreeBSDとSolaris10とDebianとFedoraCoreが入っているんですが、とりあえず、プログラム開発環境を作りたいと思いまして、ApacheとPHPとMySQLをインストールしようとおもいました。 書籍の解説&CDには、tar.gz形式のファイルが入っていますが、どのディストリビューションでもこれらのバイナリファイルはインストール可能なんでしょうか?ディストリビューション特有のパッケージ(RPMなど)があることは、知っているんですが、よくサイトで配布されているtar.gz形式とかのバイナリファイルまたはソースファイルは、どのディストリビューションでもインストール可能なようにできているんでしょうか? そもそもLinuxとFreeBSDとかは構造および開発経緯が違う?から、一緒のファイル(この場合だとhogehoge.tar.gz)でインストールを行えるとは思いもよりませんでした。これは、カーネルが同じだからできるという解釈でいいんでしょうか?それともFreeBSDとLinuxではカーネルは違うんでしょうか? PC-UNIXはディストリビューション間で互換性を保とうとカーネルを同じにしているんでしょうか? 詳しい方、よろしくお願いします。

  • VBでオープンしたファイルの制御をCのプログラムに渡す方法

    VBでファイルのオープンをしてそのファイルの制御を Cのプログラムに渡す方法ってありますか? やりたいことを具体的にいうと ファイルのオープン、クローズはVBでやって、 ループの中の変数の値を、Cのプログラムに渡して Cのプログラムの中で印字するって処理をやりたいのです。 Cのプログラムをコールする際の引数で VBで開いたファイルハンドル、出力したい変数の値を 渡してやれば良いのかなと思ったのですが、うまくいかないようです。 なにか方法があれば教えてください。 宜しくお願い致します。 Dim i as Integer Open "\test.txt" For Output As #1 for i=0 to 10 call Cのプログラム(#1、i) next i close #1

  • 指定列を抜き出す

    V1 , V2 , V3 , V4 , V5 , V6 5.9, 3.9, 0.7, 3.9, 5.8, 5.1 4.1, 6.4, 3.8, 3.3, 5.8, 9.3 3.1, 2.3, 1.8, 2.7, 3.6, 5.6 6.8, 4.2, 2.1, 3.3, 4.9, 5.1 2.3, 0.3, -1.7, -2.1, -1.7, 1.10 8.0, 4.7, 3.7, 6.9, 6.2, 5.5 さらに続く 上記のようなテキストデータがファイルAに入っており これからV1,V3,V5のデータだけを抽出し、 ファイルBに格納するプログラムを作成中なのですが、 データの読み込みと書き込みの部分は作成したのですが、 どのようにすれば抽出できますでしょうか? ソフトはVB6です。よろしくお願いします 'ファイル読み込み Open "C:\A.txt" For Input As #1 FlLen = LOF(1) txt = Input(FlLen, #1) Close #1 'ファイル書き込み Open "C:\B.txt" For Output As #1 Print #1, txt Close #1

  • ディストリビューションウィザードの使用方法について

    VB6で作成したアプリケーションの配布を考えています。Visual Studio6.0のディストリビューションウィザードを使用して配布用データを作成するのですが、こちらの期待した結果が得られません。 例えば、C:\Projectの下でVBのプロジェクトを作成し、XXX.exeの実行ファイルを作ります。この時、このディレクトリの下にsub1,sub2等のディレクトリをつくりその中に、XXX.exeが使用するDB及びファイルを格納しています。アプリケーションの配布時には、sub1,sub2以下のディレクトリもまとめて配布したいのですが、 実際に配布用データを使用してインストールを行うと、 XXX.exe及び必要なdllのみがインストールされるだけです。インストールされたディレクトリが、c:\proguram files\Projectだとすると、この下にsub1,sub2を作り、もとのsub1,sub2下のファイルをそのままセットしたいのですが、その方法が判りません。どなたかご存じのかたおりましたら教えて下さい。

  • テキストファイルを一行づつとる方法

    テキストファイルを一行だけとる方法は以下のとおりかと思いますが、最後の列まで一行づつとる場合はどうすればいいのでしょうか?教えて頂ければ幸いです。 Open "c:\data.txt" For Input As #1 Line Input #1, str Close #1

  • VBEで#1の意味は?

    VBEで、 Open "mafile.txt" for input as #1 とあるとき、#1は何を意味しているのですか?

  • VBAで、指定したファイルを読み込めません。

    ファイルを読み込むマクロを作ったのですが、「ファイルが見つかりません」というメッセージが出てしまいます。 Open "C:\Documents and Settings\Owner\デスクトップ\textfile.txt" For Input As #1 どこか、 間違ってがっているのでしょうか。

  • エクセルから外部テキストの置換をしたいです

    お時間があるかた、どうぞご教授下さい>< ================================ Dim FT As String Open "C:\1.txt" For Input As #1 Open "C:\2.txt" For Output As #2 Do While Not EOF(1) Line Input #1, FT FT = Replace(FT, ">", "\n") Print #2, FT Loop Close #1 Close #2 ================================ というマクロをエクセルで書いたのですが、テキスト上では>が\nに変換されているだけです。 テキストのほうで、ある文字(今回は>)を『改行』するにはどうしたらいいのでしょうか? エクセルのマクロから出来るようにしたいのです。 よろしくお願い致します。