我无法将下面编写的 VB 脚本代码翻译成 php 代码,所以请帮助我通过翻译给定的 VB 代码来提供 php 代码。
VBScript 示例:
Dim HttpObj
Dim sURL
Dim sPage
Dim strResult
sURL = "http://example.com"
Set HTTPObj = New MSXML2.XMLHTTP
HTTPObj.open "get", sURL, False
HTTPObj.Send
sPage = HTTPObj.responseText