主题：传递参数中文到php页面的问题

方法一：system.web.dll

 

 

 

方法二：用js对象

 

Dim str As String = "锤子科技"
Dim ScriptControl As Object, data  As Object, JscriptCode As String
JscriptCode = "function toUrl() {return encodeURI('" & str & "')}"
ScriptControl = CreateObject("MSScriptControl.ScriptControl")
With ScriptControl
    .Language = "Javascript"
    .Timeout = -1
    .AddCode(JscriptCode)
    str = .Run("toUrl")
End With

 

Dim proc As new Process
proc.File = "http://qichacha.com/search?key=" & str & "&index=0"
proc.Start

 

 检查你的php网页代码，肯定编写得有问题。

 肯定，有问题，返回的json数据都不一样，正常的是0，不正常的是-1

 

认认真真去看你php的代码，肯定有对浏览器的判断。

 去看php代码

看10楼，问写php代码的人。

 去问写php代码的人，问为什么errcode返回-1