陣列範圍錯誤 - 經典ASP

Question

我是Classic ASP的初學者。需要分割由多個用逗號分隔的電子郵件形成的字符串，以及使用稍後將生成的其他代碼插入（通過電子郵件發送）到表中的結果。每個記錄應該有一個電子郵件地址。 問題是我卡在一個數組範圍錯誤。該消息是：

Microsoft VBScript運行錯誤 '800a0009'

下標超出範圍： 'WrdArray'

/NameOfFile.asp，第3行

任何暗示將高度讚賞。

Dim WrdArray() 
Dim txtToSplit 
WrdArray() = Split(txtToSplit,",") 
For i = LBound(WrdArray) To UBound(WrdArray) 
    strg = WrdArray(i) 
    'CODE TO INSERT THE VALUE OF strg IN A RECORD OF THE TABLE 
Next 

Answer 1

你並不需要在這裏一個動態數組，只是刪除()聲明一個標準的變量，這將成爲一個變量數組時Split()被調用。當你需要使用ReDim命令增加數組的大小在運行時

Dim WrdArray 
Dim txtToSplit 
WrdArray = Split(txtToSplit,",") 
For i = LBound(WrdArray) To UBound(WrdArray) 
    strg = WrdArray(i) 
    'CODE TO INSERT THE VALUE OF strg IN A RECORD OF THE TABLE 
Next 

動態數組聲明被使用。在這種情況下，Split()將始終返回固定數量的結果，因此不需要使用動態數組，除非您打算稍後添加更多項目。