亚洲在线久爱草,狠狠天天香蕉网,天天搞日日干久草,伊人亚洲日本欧美

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

Microsoft VBScript 運行時錯誤 錯誤 '800a000d'?

Microsoft VBScript 運行時錯誤 錯誤 '800a000d'?

jeck貓 2022-04-03 09:09:47
Microsoft VBScript 運行時錯誤 錯誤 '800a000d'類型不匹配: 'Ubound'/Company_View.asp,行 259<TABLE class=fontblack cellSpacing=2 cellPadding=0 width="100%" border=0><TBODY><%For i = 0 To Ubound(arrRs , 2)%><TR><TD colSpan=2 height=4></TD></TR><TR><TD align=middle width="12%" height=22><IMG height=8 src="images/jt1.gif" width=10></TD><TD width="88%"> <%If arrRs(7 , i) < TodayDate ThenResponse.Write(arrRs(4 , i) & " (已過期)")ElseIf arrRs(21 , i) = "1" ThenResponse.Write(arrRs(4 , i) & " (停止招聘)")ElseResponse.Write("<a href=""Company_Job.asp?JobId="& arrRs(0 , i) &""" class=""admin_b"">"& arrRs(4 , i) &"</a>")End If%></TD></TR><%Next%></TBODY></TABLE>
查看完整描述

2 回答

?
呼啦一陣風

TA貢獻1802條經驗 獲得超6個贊

應該是UBound的參數不正確,UBound的作用對象應該是一個數組,用法如下:
該示例使用 UBound 函數,確定數組的指定維的最大可用下標。

Dim Upper
Dim MyArray(1 To 10, 5 To 15, 10 To 20) '聲明數組變量。
Dim AnyArray(10)
Upper = UBound(MyArray, 1) '返回 10
Upper = UBound(MyArray, 3) '返回 20
Upper = UBound(AnyArray) '返回 10

查看完整回答
反對 回復 2022-04-07
?
達令說

TA貢獻1821條經驗 獲得超6個贊

ubound函數的參數只能是數組,顯然,你的變量id并不是一個數組.
你可以試試將
id=request("id")
改為
id=split(request("id"),
",")

查看完整回答
反對 回復 2022-04-07
  • 2 回答
  • 0 關注
  • 554 瀏覽
慕課專欄
更多

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯系客服咨詢優惠詳情

幫助反饋 APP下載

慕課網APP
您的移動學習伙伴

公眾號

掃描二維碼
關注慕課網微信公眾號