服务器是UTF8编码的返回 := 请求返回("http://nidefuwuqi.com/UTF8文本.txt")

; Chr(0xFEFF) = ZWNBSP不可见字符
清理第一个ZWNBSP不可见字符 := LTrim(服务器是UTF8编码的返回, Chr(0xFEFF))
Return


请求返回(URL, Request1="") {
  Local
  Try {
    Httpwhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
    if Request1=
      Httpwhr.Open("GET", URL, true), Httpwhr.Send()
     else
      Httpwhr.Open("POST", URL), Httpwhr.Send(Request1)
    Httpwhr.WaitForResponse()
    return Httpwhr.ResponseText
  }
}

 

声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。