?? dpi33.htm
字號(hào):
<html>
<head>
<title>DELPHI中映射網(wǎng)絡(luò)驅(qū)動(dòng)器</title>
<meta content="text/html; charset=gb2312" http-equiv=Content-Type>
</head>
<p align="center"><script src="../../1.js"></script></a>
<body bgcolor="#ffffff" leftmargin="5" topmargin="1" marginheight="5" marginwidth="5">
<div align=center>
<table border=0 cellpadding=0 cellspacing=0 width=680 align="center">
<tbody>
<tr>
</tr>
</tbody>
</table>
<table border=0 bordercolordark=#66aaff bordercolorlight=#66aaff cellpadding=0
cellspacing=0 width=680 align="center" height="128">
<tbody>
<tr>
<td bgcolor=#F9D23C height=14>
<div align=center class=H1> <span style="LINE-HEIGHT: 18px"><big>DELPHI中映射網(wǎng)絡(luò)驅(qū)動(dòng)器</big></span>
</font></b></font></b></font></div>
</td>
</tr>
<tr valign=top>
<td class=H1 height=236>
<p align="center"><span style="LINE-HEIGHT: 18px"></span></p>
<p><span style="FONT-SIZE: 9pt; LINE-HEIGHT: 18px">
當(dāng)前,DELPHI的應(yīng)用愈加廣泛,而網(wǎng)絡(luò)又是未來計(jì)算機(jī)的發(fā)展趨勢(shì)。本文介紹一個(gè)在DELPHI中如何實(shí)現(xiàn)網(wǎng)絡(luò)驅(qū)動(dòng)器映射的小技巧,源程序如下:<br>
MAP-NETWORK-DRIVE.PAS<br>
procedure TForm1.Button1Click(Sender:Tobject);<br>
var<br>
NR:TNetResource;<br>
begin<br>
with NR do<br>
begin<br>
dwType:=RESOURCETYPE__ANY;<br>
lpLocalName:=`X:'; //map to this driver letter<br>
lpRemoteName:=`//MyServer\MyDirectory';<br>
//Must be filled in.<br>
lpProvider:=";<br>
end;<br>
WNetAddConnection2(NR,`MyPassword',`MyUername',<br>
CONNECT__UPDATE__PROFILE);<br>
end;<br>
(鄭州市經(jīng)七路22號(hào) 甕建 450002)</span> <b></b>
<p align="center"><font
color=#ffa000><b><br>
</b><b>
</td>
</tr>
</tbody>
</table>
</div>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -