普通的確實不能用，樓主的代理也可以。只有第二個不能用。我送壹個能用的。代碼如下:private const internet _ option _ proxy = 38 private const internet _ open _ type _ proxy = 3 private type internet _ proxy _ infodwaccesstype as long lpszpro。xy As String lpszProxyBypass As String End Type Private Declare Function internetsetoption Lib " wininet . dll " _ Alias " InternetSetOptionA " _(ByVal hint ernet As Long，_ ByVal dwoption As Long，_ ByRef lpbuffer As Any，_ ByVal dwbufferlength As Long)As Long Function set PROXY()Dim options As INTERNET _ PROXY _ INFO options . dwaccesstype = INTERNET _ OPEN _ Type _ PROXY options . lpsz PROXY = " SOCKS = " & amp；Combo1。text ' 127 . 0 . 0 . 1:9050 options . lpszproxybypass = " " INTERNET setoption 0，INTERNET_OPTION_PROXY，options，LenB(options)End Function Private Sub command 1 _ Click()set PROXY webbrowser 1。導航文本1。文本結束Sub
上一篇:盜版加密鎖怎麽激活下一篇:html愛心代碼怎麽加音樂