映射网络盘。
摘要:
procedureTForm1.btn1Click(Sender:TObject);varnetStore:TNetResource;beginnetStore.dwType:=RESOURCETYPE_ANY;netStore.lpLocalName:='Z:';netStore.lpRemoteName:='\\10.1.14.144\人力';netStore.lpProvider:='';WNetAddConnection2(netStore,PChar('gdpr'),PChar('administrator 阅读全文
posted @ 2011-09-05 15:20 jxgxy 阅读(316) 评论(0) 推荐(0) 编辑