2015-07-09 5 views
3

Я работаю с очень странной версией VB ... он не хочет, чтобы я рассказывал, что это такое, он хочет понять это самостоятельно.VBScript в классическом ASP

В C# я могу легко скопировать массив ... не так много в этом VB.

Я хотел бы создать жесткий кодированный массив при вызове функции ... но я не уверен в синтаксисе. Невозможно найти эту версию VB. Это не позволяет вам объявлять типы. Кто-нибудь здесь знает, как это сделать? Если да, то спасибо!

 FUNCTION HasInput(filters()) 
      HasInput = False 
      FOR EACH table IN filters 
       FOR EACH key IN Request.Form 
        IF LEFT(key, LEN(table)) = table AND Request.Form(key) <> "" THEN 
         HasInput = TRUE 
        END IF 
       NEXT 
      NEXT 

     END FUNCTION 

IF HasInput({"ih", "hdms"}) THEN 
+1

'RETURN TRUE' указывает, что код ** не ** (подразумевается как) VBScript. Если ответ @ Bond работает, вместо этого используйте 'HasInput = True' (присвоение имени функции). –

ответ

2

Используйте Array() функцию:

If HasInput(Array("ih", "hdms")) Then 

И Получать массив:

Function HasInput(filters) 

(хотя вы все еще можете использовать filters(), если это делает его более ясным, что вы пропусканием массив)

+0

Спасибо, чувак! Также я только что узнал, что RETURN - нет. HasInput = True/False - это то, к чему я его изменил. Цените помощь. – GaidenFocus

Смежные вопросы