URLDownLoadToFile下载文件函数Code如下:Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Private Sub Command1_Click()Dim URL As StringDim RetValue As LongURL=""MP3的地址RetValue=URLDownLoadToFile(0,URL,CreateObject("Wscript.Shell").SpecialFolders("desktop") & "\objmp3.mp3",0,0)Do RetValue=0DoEventsLoopMsgBox "mp3 DownLoaded"End Sub第二方案,用VBS的一些概念,下面我给别人做的实例,参考一下吧:http://z.baidu.com/question/158157430.html有没有搞错..方法倒是有,我知道的是两种.第一种比较简单。 我只写主要过程在控件栏里面找到windows Midea player控件然后在url里面添加对象地址。这样程序会一边下载一遍播放,如果不希望播放那么把wmp里面的声音关掉即可。然后找到你的浏览器临时目录,把文件复制过去即可。需要用API来确定系统用户名,当然这个比较简单。第二种那就复杂了,我不会~~~我只是知道有这个而已,太复杂了把me.windowsmediaplayer1.url = "d:\kugou\dj 疯狂青蛙.mp3" 改成: me.windowsmediaplayer1.url = app.path & "dj 疯狂青蛙.mp3"