Question

我在重定向脚本上遇到VB编译错误。我将重定向脚本放在服务器的根目录下。

<%
If InStr(Request.ServerVariables("oldDomain"),"www") = 0 Then
    Response.Status="301 Moved Permanently"
    Response.AddHeader "Location","http://www."
        & Request.ServerVariables("HTTP_HOST")
        & Request.ServerVariables("REQUEST_URI")
    Response.End
     Response.Redirect("newDomain") 
End if
%>

这就是我得到的错误

Microsoft VBScript compilation error '800a0400'
Expected statement
/default.asp, line 5
& Request.ServerVariables("HTTP_HOST")
^

我对VB不太熟悉。任何帮助都非常感激。

由于

Answer 1

VBScript中的行继续由_。

完成

样品：

Dim aTests : aTests = Array(_
    Array("5-foo, 10 bar", 15) _
  , Array("11 baz", 11) _
  , Array("bad,string", 0) _
  , Array("hello,123,100,   100   ,xxx", 323) _
  , Array("whatever1junk2inbetween10000orafter", 10003) _
)

在我的重定向脚本上获取VB脚本错误

1 个答案: