[ű]
=ļ
[ȼ]
=F6
ֹͣ=F11
ͣ=F10
[]
Sub main()
Set PNet = CreateObject("Net.clsNet") 'PNet
'ļ
nReturn = PNet.DownloadFile("http://www.ajwawa.cn/download/setup.rar","c:\setup.rar")
If nReturn Then MsgBox "ļسɹ!"
End Sub
[]
