经典ASP：插入数组并获得类型不匹配

Question

我正在尝试将int插入一个数组，将字符串插入另一个数组。 由于某种原因，无论如何尝试，我都无法插入int或字符串。 这是代码

dim siteList,siteNameList, strQuery
Set oConn = Server.CreateObject("ADODB.Connection") 
set oRs = Server.CreateObject("ADODB.Recordset")
oConn.Open strConnQuery
strQuery = "Select zSiteID as id, zSiteNm as Name from vSite"
set ors = oConn.Execute(strQuery)
z=0
Do While Not oRs.EOF
   sID=oRs("id")
   sName=oRs("Name")
   if InStr(oRs("Name"),"'")>0 then
       sOut = replace(strorigFileName,"'"  ,"")
       siteList(z)=sID
       siteNameList(z)=sOut
   else
       siteList(z)=sID(this is where the error occurs first)
       siteNameList(z)=sName

   end if
   z=z+1
   oRs.MoveNext
Loop
oConn.Close

我曾尝试将其转换为其他事物，但这根本没有帮助。 我不知道出什么问题了，所以将不胜感激任何信息！

Answer 1

这是一个类似问题的答案 ，描述了为什么发生这种情况。

您想要检查返回集中的记录数，并在知道所需大小后对数组进行ReDim或初始化。

Answer 2

在经典ASP中，您需要声明数组的大小：

dim siteList(5)