タイトル : サーバーへ接続確立の方法 投稿日 : 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の参照設定をどうしたらよいのかも分かりません。 是非ご助言をお願い致します!!! |