コモンダイアログを開いた時にデフォルトでどの端末でもMy Documentsを指定したいです。
My Documentsのパスを取得する方法が知りたいです。
宜しくお願いします。

A 回答 (2件)

API関数で取得出来ます



参考URL:http://www.vbvbvb.com/jp/gtips/1001/gSHGetFolder …
    • good
    • 0
この回答へのお礼

ありがとうございました。Win95だとDLLが必要なのですね。

お礼日時:2001/09/07 11:23

win2Kならば "%USERPROFILE%\My Documents\"で


NT4.0ならば "%USERPROFILE%\Personal\"で
取得できたと思うんですが。。。。
Win9x系はごめんなさい解りません。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aと関連する良く見られている質問

QMy Documentsのパスを変更したい

 My Documentsのパスは、標準で
「C:\Documents and Settings\Administrator\My Documents」
になっているのですが、VB.netを使ってプログラムから変更する方法を教えてください。

よろしくお願いいたします。

Aベストアンサー

自信はありません

マイドキュメントのパスは
http://homepage2.nifty.com/winfaq/c/custom.html#34
によるとレジストリに書かれているので、VB.NETからレジストリを操作すればいいと思う。
http://dobon.net/vb/dotnet/system/registrykey.html

Qコモンダイアログで最後に開いたフォルダを開きたい

コモンダイアログで最後に開いたフォルダを開く方法はありますか?
MSAU_OfficeGetFileName というアクセスライブラリでイニシャルフォルダ
を長さゼロの文字列を指定したところマイドキュメントが開きました・・・

ご存知の方、教えてくださいませ。

Aベストアンサー

開いたフォルダのパスを上書き保存するように設定(勿論コードでね)
しておき 必要時呼び出せば良いでしょう。
難しく考えないこと。

QVBScriptで「My Documents」フォルダの絶対パスを取得する方法

VBScriptで現在ログイン中のユーザの
「My Documents」フォルダの絶対パスを
取得する方法をご存知でしたらご教授下さい。

よろしくお願いします。

Aベストアンサー

Set wshShell = WScript.Createobject("WScript.shell")
Set sf = wshShell.SpecialFolders
WScript.Echo sf("MyDocuments") '絶対パス

Qコモンダイアログを使用してファイル保存する場合の拡張子の指定について(初心者)

こんばんは
VB初心者です。

コモンダイアログを使用してファイルを保存する場合に"ファイル名+拡張子"を入力しないと拡張子なしのファイルで保存されてしまいます。自動的に任意の拡張子を付与することは出来るのでしょうか?

よろしくお願いします。

Aベストアンサー

コモンダイアログのプロパティにFilterというのがあったはずです。
これはファイルオープン・ファイルセーブで基本拡張子を設定するものです。

例えば「テキストファイル(*.txt)」を基本拡張子とする場合、
書き方は「テキストファイル(*.txt)|*.txt」となります。
又、「テキストファイル(*.txt)」と「CSVファイル(*.csv)」の用に複数使いたい場合は、
「テキストファイル(*.txt)|*.txt|CSVファイル(*.csv)|*.CSV」となります。

このプロパティを設定しておけば、任意の拡張子を設定できるはずです。
因みに、「ファイル」等のカタカナは半角でも構いません。

QIEのDocumentの取得について

よろしくお願いいたします。
環境 Windows10 VB.net:Visual Basic 2010 Express で作成

次のコードのようにDocumentを取得した場合に要素数の確認で
タグで取得した場合はエラーにならず、allで取得した場合はエラーになる
原因って何かわかりますでしょうか?

Dim IE As Object = CreateObject("InternetExplorer.Application")
IE.Navigate "URL"
Do Until IE.Busy = False And IE.ReadyState And IE.Document.ReadyState = "compleate"
Loop

MsgBox(IE.Document.Title) ←問題なし
MsgBox(IE.Document.getElementsByTagName("a").Length) ←問題なし
MsgBox(IE.Document.all.Length) ←エラー

どなたかご教授くださいませ。

よろしくお願いいたします。
環境 Windows10 VB.net:Visual Basic 2010 Express で作成

次のコードのようにDocumentを取得した場合に要素数の確認で
タグで取得した場合はエラーにならず、allで取得した場合はエラーになる
原因って何かわかりますでしょうか?

Dim IE As Object = CreateObject("InternetExplorer.Application")
IE.Navigate "URL"
Do Until IE.Busy = False And IE.ReadyState And IE.Document.ReadyState = "compleate"
Loop

MsgBox(IE.Document.Title) ←問題なし
MsgBox(I...続きを読む

Aベストアンサー

getElementsByTagName("*").Length
などでいけませんか?


人気Q&Aランキング

おすすめ情報