Asp-Classic

VBScript 函式可以返回字典嗎?

  • January 13, 2012

我有一個要使用函式修改的表單數據字典。

function queryCleanForm(myDictForm)

   dim arrayKeys
   arrayKeys = myDictForm.keys

   for i=0 to myDictForm.count-1
       myDictForm(arrayKeys(i)) = replace(myDictForm(arrayKeys(i)), "'", "''")
       response.write myDictForm(arrayKeys(i))
   next

   queryCleanForm = myDictForm
end function

問題是線路queryCleanForm = myDictForm錯誤

Wrong number of arguments or invalid property assignment 

有沒有辦法在 VBScript 中做到這一點?

試試這個:

SET queryCleanForm = myDictForm

對於對象,您需要使用 SET 來告訴 VBScript 它是您分配的對象引用而不是值類型。

是的,您需要使用 SET 命令:

設置 queryCleanForm = myDictForm

引用自:https://stackoverflow.com/questions/4038058