
いつもお世話になっています。
MediaPlayer(Ver.6.4)を使ったアプリで
PC-Aから、PC-Bの共有フォルダにあるファイルを再生したいのですが、
(ファイル名はテキストボックスに
[file:\\vserver\tv\031001-21.mpg]と入力します。)
PC-AとPC-Bのユーザ名・パスワードが違うため(?)に、エラーになってしました。
色々調べて WNetAddConnection*()を使用するという所までたどり着き、
~2()と~3()を実装したのですが、どちらも487のエラーが返ってきます。
Errで見ると、「424 オブジェクトが必要です」となっています。
↓にコードを抜粋しました。何か足りなかったり、間違っている個所があれば教えてください。
よろしくお願いします!
-----------------
With udtNetResource
.dwScope = RESOURCE_GLOBALNET
.dwType = RESOURCETYPE_ANY 'DISK
.dwDisplayType = RESOURCEDISPLAYTYPE_SHARE
.dwUsage = RESOURCEUSAGE_CONNECTABLE
.lpLocalName = "\\\\vserver\\tv" & vbNullString
.lpRemoteName = vbNullString '"C:"
End With
strUserName = "Admin" & vbNullString
strPassWord = "pass" & vbNullString
lngRetCode = _WNetAddConnection3(0, udtNetResource, strPassWord, strUserName, _
CONNECT_UPDATE_PROFILE Or CONNECT_INTERACTIVE)
lngRetCode = WNetAddConnection2(udtNetResource, strPassWord, strUserName, CONNECT_UPDATE_PROFILE)
-----------
ちなみに↓のサイトを参考にしました。
http://guille.costasol.net/ejemplos/net_connecti …
http://www.microsoft.com/japan/msdn/library/defa … の該当ページ
http://www.galliver.co.jp/writing/vbm_tokushu/ap …
No.2ベストアンサー
- 回答日時:
あと、VBなんだから\を重ねる必要なし
.lpRemoteName = "\\vserver\tv" & vbNullString
http://www.vbvbvb.com/jp/gtips/0851/gWNetAddConn …
参考URL:http://www.vbvbvb.com/jp/gtips/0851/gWNetAddConn …
重ね重ねありがとうございます。(↓のは補足にしちゃったみたい。ゴメンナサイ)
\ 重ねなくて良いんでしたっけ、、、。
参考URLもあわせて見てみます。ありがとうございます。
No.1
- 回答日時:
この回答への補足
...ですよね。失礼しました。
修正して試してみましたら、まだエラーが出ました。値は変わってきたのですが。
OSはWin2kです。
参考URLありがとうございました。早速見てみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでFormat がうまく使えない
-
Debug Assertion Failed?
-
ASPでoo4o接続ができません。
-
シェルスクリプトの実行エラー...
-
VBAで印刷するとエラーになって...
-
バッチ処理について
-
ホームページビルダーの”全体の...
-
実行時エラー'1004': アプリケ...
-
PCが故障しました。。。【Inpag...
-
EXCELを開くとエラーがでます。
-
Web.Config 構成ファイルのエラー
-
Excel ファイルに保存すると実...
-
図形のクリアで実行時の1004エ...
-
エクセルのエラーについて
-
bcpadがうまく実行できないので...
-
頻繁にPCが再起動します
-
ExcelVBAでODBCドライバを使っ...
-
aspxが動作しない
-
vbaでファイルを開くパス名に変...
-
Linux Tripwireのデータベース...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAでFormat がうまく使えない
-
Web.Config 構成ファイルのエラー
-
不明なソフトウェア例外(0xe06...
-
シェルスクリプトの実行エラー...
-
Debug Assertion Failed?
-
NET USE コマンドでエ...
-
Excel ファイルに保存すると実...
-
図形のクリアで実行時の1004エ...
-
ACCESS VBAのOpenForm書き方
-
VBAで印刷するとエラーになって...
-
POV-Ray についての質問です!
-
ホームページビルダーの”全体の...
-
FFFTPで更新中にエラー
-
bcpadがうまく実行できないので...
-
実行時エラー'1004': アプリケ...
-
なぜかブルースクリーンに…
-
FileSystemObjectのオーバーフロー
-
ダウンロードしたのはCDに焼...
-
Eclipseでのエラー検出の機能に...
-
cvRectangleの使用時に以下のエ...
おすすめ情報