投稿日 | : 2006/03/13(Mon) 17:46 |
投稿者 | : あやめ |
URL | : |
タイトル | : Re^2: ネットワークパスワード |
お世話になります。
教えていただいて
色々やりましたがうまくいきません。
下記がそのときの定義とプログラムです。
’’’’’’’’’’’’’’’’’’’’’’’’
Option Explicit
Public Declare Function WNetAddConnection2 _
Lib "mpr.dll" Alias "WNetAddConnection2A" _
(lpNetResource As NETRESOURCE, _
ByVal lpPassword As String, ByVal lpUserName As String, _
ByVal dwFlags As Long) As Long
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
’構造体定義
Public Type NETRESOURCE
lpLocalName As String
lpRemoteName As String
lpProvider As String
dwType As String
End Type
’’’’’’’’’’’’’’
Private Sub linknet_Click()
Dim dwFlags as Long
Dim lpNetResource as NETRESOURCE
With lpNetResource
.dwType = ”” '(1)
.lpLocalName = "" '(2)
.lpRemoteName = "\\Bxx-soumu2" '(3)
.lpProvider = "" '(4)
.dwFlags = CONNECT_UPDATE_PROFILE
end With
lRet = WNetAddConnection2(lpNetResource, "income", "administrator", dwFla
gs)
End Sub
’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’’
同一 LAN WARKGROUP の PC "\\Bxx-soumu2" に User "Administrator"
で パスワード "income" で ログインしたいのですが、
(1)の dwTypeに入れる値がわりません。
(CONNECT_UPDATE_PROFILEはデバック時 EMPTYでした。)
(2)(3)(4)は上記でいいと思うのですが?
すみません、ヒントお願いします。