看看shell 调用 net use z: \\server1\cdrom也可以呀~~
解决方案 »
- 在局域网中,如果一个客户端更新了服务器上数据库表m中的记录后,其它客户端如何及时知道表m被更改了?服务器能自动及时发出通知信息让客户端知道吗?
- 如何获取图片信息?(主要为是否为彩色)
- 从网页代码中收集一些信息,如姓名,回答文本,时间字符串等,大家一般都采取哪些方法。我的方法觉得有些太笨:查找上述字符串两端的网页
- 如何利用vba将word中的图片另存为外部文件?
- 请问程序中使用了datareport报表,怎么打包?(在线等,急!)
- 这个问题老是搞不定,请教!!!
- 在vb里怎样生成excel的按条件分组,谢谢
- 急!!!迷茫ing!!!
- VB 想说爱你不容易!!!!!!!! 大家进来谈谈
- 请告诉我如何可以不用ms*vb*.dll动态库即可运行VB程序?
- ADO连接字符串问题。
- ★★★★★急需急需,请大家帮忙★★★★★★
{
// TODO: Add your control notification handler code here
char netpath[MAX_PATH];
//输入的网络路径 m_NetpathEdit.GetWindowText(netpath, sizeof(netpath));
char drv[MAX_PATH];
//本地的驱动器盘符 m_DriveEdit.GetWindowText(drv, sizeof(drv));
NETRESOURCE netres; netres.dwScope=RESOURCE_GLOBALNET;
netres.dwType=RESOURCETYPE_ANY;
netres.dwDisplayType=RESOURCEDISPLAYTYPE_GENERIC;
netres.dwUsage=RESOURCEUSAGE_CONNECTABLE;
netres.lpLocalName=drv; netres.lpRemoteName=netpath;
netres.lpComment=NULL; netres.lpProvider=NULL;
DWORD rslt=WNetAddConnection2(&netres, NULL, NULL, 0);
CString str;
str.Format("WNetAddConnection2() return code=%d", rslt);
MessageBox(str);
}
取消网络驱动器的映射
void CMountDlg::OnUnmountButton()
{
// TODO: Add your control notification handler code here
char drv[MAX_PATH];
//本地的驱动器盘符
m_DriveEdit.GetWindowText(drv, sizeof(drv));
DWORD rslt=WNetCancelConnection2(drv, 0, FALSE);
CString str;
str.Format("WNetCancelConnection2() return code=%d", rslt);
MessageBox(str);
//显示信息成功与否 return code =0 成功 否则 建立失败
}
Private Declare Function WNetCancelConnection Lib "mpr.dll" Alias "WNetCancelConnectionA" (ByVal lpszName As String, ByVal bForce As Long) As Long
Const WN_SUCCESS = 0
Const WN_NET_ERROR = 2
Const WN_BAD_PASSWORD = 6
Function AddConnection(MyShareName As String, MyPWD As String, UseLetter As String) As Integer
On Local Error GoTo AddConnection_Err
AddConnection = WNetAddConnection(MyShareName, MyPWD, UseLetter)
AddConnection_End:
Exit Function
AddConnection_Err:
AddConnection = Err
MsgBox Error$
Resume AddConnection_End
End Function
Function CancelConnection(DriveLetter As String, Force As Integer) As Integer
On Local Error GoTo CancelConnection_Err
CancelConnection = WNetCancelConnection(DriveLetter, Force)
CancelConnection_End:
Exit Function
CancelConnection_Err:
CancelConnection = Err
MsgBox Error$
Resume CancelConnection_End
End Function添加一个网络驱动器:
variable = AddConnection(<SharePath>, <Password>, <DriveLetter>)
删除一个网络驱动器:
varible = CancelConnection(<SharePath, <Force>)