いつもお世話になっています。
最近になって、VB6のDir関数を実行するとき、実行時エラー52が発生します。
既存のプログラムに、メール送信機能を追加しました。
このとき、BASP21をインストールしました。
これ以外のプログラムのインストールはWindowsUpdate以外はかかっていません。
皆さん、このような現象は体験されていますでしょうか?
解決策をご存知の方、ご教授願います。
BASP21が悪いのかと思い、アンインストールしましたが、現象は再現します。
VB6の再インストールをしましたが、再現します。
以上よろしくお願いします。
No.3ベストアンサー
- 回答日時:
私も先週末、全く同じ内容 = Dir 関数で 52 エラーが、立て続けに
2 件出て、焦りまくった者です。
自分のところの場合、Dir 関数をフォルダ or ファイルの存在チェックに
用いていたのですが…
引数にネットワーク越しのパス = \\+コンピュータ名 or IP アドレスから
始まる文字列を指定すると、場合によって、エラーになりました。
通常、Dir 関数は、引数で渡したフォルダ or ファイルが存在しないと
空白を戻しますが…
引数に、ネットワーク越しの共有フォルダ or ファイルを指定すると
アクセス可能な状態である場合は良いのですが、そうではない場合、
52 エラーになるようです。
また、ローカルのパスでも、パスとして無効な文字列だと、これまた
場合によって、52 エラーになる場合があります。(ただ、ならない場合も
あるんですよね~)
C:: ⇒ 52 エラー
C\\ ⇒ 正常(空白を戻す)
FileSystemObject の FileExists、FolderExists メソッドだと、
上記のようなことはないので、現在、置き換え中です。
nobupapa さんの状況には当てはまらないかもしれませんが、
一例まで。(-_-)b
こんにちは
回答ありがとうございます。
同じロジックを、別のPC(同一ハブの隣のPC)で試したところ、エラーが出ませんでした。
Masu-Chinさんの指摘された、ネットワーク越しが引っかかりますね
ケーブル変えてみようかな?
やはり、PC固有の問題でしょうか?
もう一度、VBをインストールしてみようかと考えています。
ちょっと、先になりますが。
結果がでたら、報告します。
No.2
- 回答日時:
はじめまして
コードを拝見しましたがc_sINIPATHはディレクトリではないでしょうか?
その有無を見るのなら
If Dir(App.Path & "\c_sINIPATH, vbDirectory) = "" Then
というようにすればいいと思います、
Dir関数の初期値は0:通常ファイルなので、
ファイルの有無を見るのであれば、ファイル名まで記述してください。
はじめまして
回答ありがとうございます。
じつは、別件、至急案件があり、まだANo.2さんの処理を試していません。
結果が出次第、ご報告させてもらいます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- ノートパソコン Windows 10 動作改善方法 6 2023/04/26 22:30
- その他(悩み相談・人生相談) Windows10のブルースクリーンからの復旧について 2 2022/12/31 20:42
- Windows 10 数年前からWindows10 の Update ができないです。なぜですか? 7 2022/11/09 06:03
- FX・外国為替取引 MQL5にて謎のエラーが発生!だれか対処を教えてください! 1 2023/03/25 15:59
- システム 古いWEBシステム。もう追加プログラムは作れない? それともできる? 6 2022/06/08 13:41
- Windows 10 Windows 11の累積更新プログラム KB5016629 がインストール出来ない。 2 2022/08/16 12:23
- Evernote Evernote(エバーノート)の文字化け 1 2022/04/05 19:30
- Windows 10 SONYの音楽ソフト「x-アプリ」について 3 2023/01/29 19:09
- その他(Microsoft Office) Offece Home&Business2016をアンインストールする方 1 2022/04/08 23:23
- Windows 10 パソコンが立ち上がりません 6 2022/10/06 00:30
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
お助けください!VBAのファイル名エラーについて
Visual Basic(VBA)
-
昨日まで動いていたエクセルのマクロが急に動かなくなりました
Excel(エクセル)
-
EXCEL VBAのDir関数について
Excel(エクセル)
-
-
4
ファイルの有無を確認した際のエラーについて
Visual Basic(VBA)
-
5
On ErrorでエラーNoが0
Visual Basic(VBA)
-
6
VB6にてネットワーク上にある共有フォルダを・・・
Visual Basic(VBA)
-
7
Form_Load と Form_Activate のタイミング
Visual Basic(VBA)
-
8
VB6のAttribute VB_Nameの意味について
Visual Basic(VBA)
-
9
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
10
実行時エラー52
Excel(エクセル)
-
11
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
12
VB6.0でのバイナリデータの扱いについて
Visual Basic(VBA)
-
13
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
14
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
15
配列を関数に渡す方法
Visual Basic(VBA)
-
16
VBAでCSVファイルが使用中かどうかの確認
Visual Basic(VBA)
-
17
VB.NET getとsetの概念がわかりません。
Visual Basic(VBA)
-
18
エクセルVBA 「On Error GoTo 0」について
Excel(エクセル)
-
19
コマンドプロンプトの「%1」と「%~1」の違いがわからない
その他(プログラミング・Web制作)
-
20
アウトルックが起動しているかどうかを取得するには?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBでファイルが開かれているか...
-
アクセスのクエリでコンパイル...
-
ファイルクローズ(fclose)でエ...
-
batファイルでレジストリキーの...
-
エクセル VBA dll 読み込...
-
Access2010 コンパイルエラー...
-
エクセルマクロでエラーの原因...
-
Returnに対するGoSubがありません
-
NAS上のファイルの使用中が解除...
-
PowerShellを使って関連付けら...
-
FORTRANの実行エラーについて
-
EXCELのVBAでWORDが開いてある...
-
fcloseで発生するエラーについて。
-
Excel2013 VBAでAccess2013に接...
-
PCにmicroSDカードを(USBで)差...
-
ファイルをクローズしたい
-
DisplayAlertsブロパティで ”実...
-
VBから参照できないCのDLLを使...
-
VB実行時エラー75:「パス名が...
-
fgets関数のEOFの扱い方について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBでファイルが開かれているか...
-
batファイルでレジストリキーの...
-
Returnに対するGoSubがありません
-
VBから参照できないCのDLLを使...
-
「パス名が無効です」の発生原因
-
access テキストボックスの値取得
-
PowerShellを使って関連付けら...
-
アクセスのクエリでコンパイル...
-
freadでデータがない場合の読込...
-
gccを行ってもexeファイルが生...
-
【COBOL】read文でエラー
-
ファイルクローズ(fclose)でエ...
-
VB6 Dir関数で52エラー発生
-
ACCESS VBAでのインポート
-
NAS上のファイルの使用中が解除...
-
FTPの送信結果を検知したい
-
エクセルマクロでエラーの原因...
-
Access2013にてドラッグ&ドロ...
-
EXCELのVBAでWORDが開いてある...
-
fcloseで発生するエラーについて。
おすすめ情報