＜C,VB,Access,Excel ここはどこ？私は誰？＞
目次
1.はじめの挨拶
2.Excel VBA ここはどこ？私は誰？
3.Access VBA ここはどこ？私は誰？
4.VB ここはどこ？私は誰？
5.C ここはどこ？私は誰？
6.おわりの挨拶
----------------------------------------------------------------------------
/*
* １.こんにちは
*/
こんにちは。
今回は、
タイトル、
C,VB,Access,Excel ここはどこ？私は誰？ ---> 記憶喪失？
あなたは、どこから来たの？どこのダレ？ ---> 職務質問？
です。
えっ何？？？いつも、タイトル変でわからないよ。
そんなんだと、読まないで、ゴミ箱に入れられちゃうよ。。。。
改めまして、今回は、自分が起動した場所と自分の名前を調べる方法です。
C,VB,Access,Excelによって、違うので、４パターン書きました。
実行できるサンプルを
hosoku/020/index.html
に置いておくので、あわせてみてください。
Excel,Access,VB,Cの順番に解説します。
枠外解説・グチ --- 最近、職務質問、されてない
いきなり、関係無い話ですが、
最近、帰りが早いので、警察官に職務質問されてない。
６・７年前、夜中に帰ったときは、たまに質問されてたっけ、、、
また、早朝出勤時に、警察官に「いま、帰りですか」とＡＭ４時頃に聞かれ、
「いまから出勤です」
なんて、いったら、
「どこに？行くんだ、会社のガギは？」
と連続に質問され、
その時、自転車の前カギがたまたま付いてなく、盗難自転車扱いされたり、、
なんて、こと、ありました。
最近は、仕事でハマってないのと、警察官が熱心じゃないのかなぁ？
まぁ、いいことなんだけど、チョット思い出したので。
警察官殿に、
自販機荒しや変造500円なんとかしろ、、
と言いたい酒屋の次男坊でした。
/*
* ２.Excel VBA ここはどこ？私は誰？
*/
Ｅｘｃｅｌファイルが、
どこから起動したか（どこに保管されているか）
知りたい時、ありませんか？
えっ、無い。。。さようなら。
じゃなくて、相対パスとかで、
処理したいとき、知っていると便利だと思うので、説明します。
＊各処理言語によって、微妙にちがう、、、VBAで一緒にならないの？かなぁ
-----
Sub Record1()
MsgBox "Application.Path = " & Application.Path
MsgBox "Application.Name = " & Application.Name
MsgBox "ActiveWorkbook.Path = " & ActiveWorkbook.Path
MsgBox "ActiveWorkbook.Name = " & ActiveWorkbook.Name
End Sub
-----
を実行してみてください。
Application.Pathかな？と思ったのですが、
これは、Ｅｘｃｅｌ本体のインストールされているパスで、
目的のほうは、
ActiveWorkbook.Pathです。
う〜ん。。。
/*
* ３．Access VBA ここはどこ？私は誰？
*/
次に、Access MDBの位置です。
-----
Private Sub B_RUN_Click()
Dim dbsA As Database
Set dbsA = CurrentDb
MsgBox "name = " & dbsA.Name
MsgBox "Ver = " & dbsA.Version
Set dbsA = Nothing
End Sub
-----
よく、わからなかったので、
CurrentDbを開いて、.Nameを見てます。
＊ここの.Nameってパス付きなんだよね、、、逆に.Pathがなかったような？
う〜ん、、、私の調べ方が悪い？
/*
* ４．VB ここはどこ？私は誰？
*/
次にＶＢです（私の環境ＶＢ５です、、、）
----
Private Sub Command1_Click()
MsgBox "App.Path = " & App.Path
MsgBox "App.EXEName = " & App.EXEName
End Sub
----
あれ、Ａｐｐなの、、こんどは。。。
で、.EXENameですか、、、
まぁ、気にしない、気にしない、、、
/*
* ５．C ここはどこ？私は誰？
*/
最後に、Ｃです（Ｍｓ−ＤＯＳコンソール）
-----
#include
int main(int argc, char *argv[])
{
printf("argv[0] = %s\n", argv[0]);
}
-----
まだ、講座でやってませんが、Ｍａｉｎ関数の引数の、
argvの0番目に、位置が入っていると思います。
Ｃは、違っても、気にならないのですが、
Excel,Access,VB と微妙に違ったので、なぜ？と思いました。
/*
* ６.おわりの挨拶
*/
次は、デルファイ、、、では、、と行きたいとこですが、
私、まだ、デルファイやってないので、、、、、
前回の文字コードと今回の起動位置？を使用して、
次回ぐらいに、ファイル処理とは、、とカッコつけて、発行したいと考えてます。
今回も軽めにサヨナラです。
お時間のある人は、サンプルダウンロードして、研究してください。
では、また。 三流ＰＧのＫｅｎ３でした。
PS.なんか、２０回もメルマガ発行したけど、進んでないし、
あまり、タメになってないような気がします。
５回に１回ぐらいはタメになるマルマガめざして、がんばりますかねぇ。
ここまで、読んでいただきどうもです。ここから下は、三流君のホームページの紹介・案内です
目的の情報が見つかったか？少々心配しつつ、、、
項目別に本音？それとも建て前？的な記事をまとめました。
|
気になったジャンル↓を選択してください。 |
Blogとリンク:[三流君の作業日記]/ [愚痴(Bookmark)]/ [広告Blog(Bookmark)]