投稿日 | : 2006/03/14(Tue) 09:08 |
投稿者 | : あやめ |
URL | : |
タイトル | : Re^4: ネットワークパスワード |
お世話になります。ご指導いただき恐縮です。
1)
Type NETRESOURCE
dwScope As Long
dwType As Long
dwDisplayType As Long
dwUsage As Long
lpLocalName As String
lpRemoteName As String
lpComment As String
lpProvider As String
End Type
2)
With lpNetResource
.dwScope = 1
.dwType = RESOURCETYPE_ANY
.dwDisplayType = RESOURCEDISPLAYTYPE_GROUP
.dwUsage = RESOURCEUSAGE_ALL
.lpLocalName = ""
.lpRemoteName = "\\Bm02-seikan2"
.lpComment = RESOURCE_CONNECTED
.lpProvider = ""
End With
dwFlags = CONNECT_UPDATE_PROFILE
上記にのように修正して 戻り値 NO_ERROR です。
ログインできました。 ありがとうございます。