tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルサーバーへ接続確立の方法
記事No12807
投稿日: 2008/07/18(Fri) 19:06
投稿者どら
ご助言お願いします!!

環境)
PC01:WinXP VB6(SP6)
SEVER:WindowsServer2003 

※PC01をサーバにユーザー登録し、DataWorkにアクセスして読み書きできる
 グループに登録しています。
※DataWorkはサーバー上にあり、共有設定(アクセス許可等)も済んでいます。
※ユーザーからアクセスする時に空のパスワードを許可させるため、
 ローカルポリシーのセキュリティオプション、
 「アカウント:ローカルアカウントの空のパスワードの使用を
  コンソールログオンのみに制限する」を無効にしました。 

処理内容)
PC01上のWorkにあるFile.mdbをSERVER上のDataWorkにコピーするという処理を
VBの下記のソースにて実行しようとしています。

-------------------------------------------------
PathFrom = "C:\Work\File.mdb"
PathTo = "\\999.999.999.999\\DataWork\File.mdb"
''「999.999.999.999」はサーバのIPアドレス

FileCopy PathFrom, PathTo
-------------------------------------------------

そのままではエラーとなりますが、エクスプローラからIPアドレス(\\999.999.999.999)で
サーバーを検索し、PC01のユーザー名を入れてログオンした後は、コピーが成功します。
こうなるとユーザー名による接続が確立していないがために、
起きているエラーだと予想してはいるのですが、
VBのソースからどのようにユーザー名を宣言して、
どのようにわたしてやればいいのか分かりません。
自分なりに色々検索してみて、「WNetAddConnection2・3」という関数を
使用するという答えも見たのですが、どのように使用したらよいのか、
またはVBの参照設定をどうしたらよいのかも分かりません。
是非ご助言をお願い致します!!!

[ツリー表示へ]
タイトルRe: サーバーへ接続確立の方法
記事No12809
投稿日: 2008/07/20(Sun) 02:27
投稿者Starfish
試していませんが、これはどうでしょうか?

http://support.microsoft.com/kb/256847/en-us

関数の説明はこちらにあります

http://msdn.microsoft.com/ja-jp/library/cc447084.aspx

[ツリー表示へ]
タイトルRe^2: サーバーへ接続確立の方法
記事No12816
投稿日: 2008/07/21(Mon) 18:15
投稿者どら
御助言感謝致します!

ご紹介頂いたページの和訳ページにある、
サンプルソースにてテストを行いましたが、
このドライブを割り当てる方法でうまくいきそうです。
本当に有難うございました。
http://support.microsoft.com/kb/256847/en-us
↓和訳ページ
http://support.microsoft.com/kb/256847/ja

[ツリー表示へ]