vbscript - 如何向页面发送隐藏请求？

Question

是否有可能使计算机进入网站www.example.com/something.php?something=something，而该用户没有看到它？

我打算让用户启动程序，VBS脚本到上面列出的网站，并传递信息，稍后，我将自己运行。

Answer 1

您需要一个 HTTP POST 请求。在 VBScript 中，你会这样做：

url = "http://www.example.com/something.php&something=something"
url = Split(url, "&", 2)

Set req = CreateObject("Msxml2.XMLHttp.6.0")
req.open "POST", url(0), False
req.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
req.send url(1)

您可能需要对url(1)传递给send方法的参数字符串 ( ) 进行编码，如下所示：

Function Encode(ByVal str)
  Set re = New RegExp
  re.Pattern = "[^a-zA-Z0-9_.~-]"

  enc = ""
  For i = 1 To Len(str)
    c = Mid(str, i, 1)
    If re.Test(c) Then c = "%" & Right("0" & Hex(Asc(c)), 2)
    enc = enc & c
  Next

  Encode = enc
End Function

Answer 2

我认为你的意思是你想使用 POST 而不是 GET。不确定 VBS 是如何使用的，但是如果您将表单发布到 something.php 中，您可以使用超级全局 $_POST 变量来提取表单变量，而用户不会看到地址中的变量。