С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 21:24 |
на яваскрипте еть такая конструкция:
Код: | <script>eval(String.fromCharCode(100,111,99,117,109,101,110,116,46,119,114,105,116,101,40,39,104,101,108,108,111,39,41,59));</script> |
это мы перевели тескт скрипта
Код: | document.write('hello'); |
в ASCII и читаем его
Вопрос:
Как то же самое сделать на VBscript?
С меня рейтинг
|
|
|
|
С нами с 19.05.04
Сообщения: 358
Рейтинг: 324
|
Добавлено: 02/09/05 в 22:10 |
Что-то типа того...
Код: |
arr = array(.................)
Function toString(payloadArray)
For Each arrayElement In payloadArray
toString = toString & Chr(arrayElement)
Next
End Function
Eval(toString(arr))
|
Только кавычки должны быть двойными, не забудь ;)
|
|
Делаем спецсофт для PPC, AntiSpyware и не только :) ICQ 2001-4567-3
Gay Top Traffic
|
3
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 22:31 |
что-то ошибку выдает.
не затруднит примерчик выложить рабочий?
и еще вопрос:
как это все уместит в одну строку, типа:
<a href=vbscript:blablabla>go</a>
|
|
|
|
С нами с 19.05.04
Сообщения: 358
Рейтинг: 324
|
Добавлено: 02/09/05 в 22:43 |
А так?
Код: |
<html>
<body>
<script language=vbs>
arr = array(100,111,99,117,109,101,110,116,46,119,114,105,116,101,40,34,104,101,108,108,111,34,41)
Function toString(payloadArray)
For Each arrayElement In payloadArray
toString = toString & Chr(arrayElement)
Next
End Function
Function sayHello()
Eval(toString(arr))
End Function
</script>
<a href=vbscript:sayHello>click me</a>
</body>
</html>
|
|
|
Делаем спецсофт для PPC, AntiSpyware и не только :) ICQ 2001-4567-3
Gay Top Traffic
|
5
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 22:52 |
так работает.
а VBscript можно в одну строку писать с какими-то разделителями, как JS?
|
|
|
|
С нами с 05.10.04
Сообщения: 478
Рейтинг: 207
|
Добавлено: 02/09/05 в 23:00 |
Через двоеточие можно.
|
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 23:25 |
А еще вопрос.
Упростить можно конструкцию как-то?
Уж больно наворочено, по сравнению с JS
|
|
|
|
С нами с 05.10.04
Сообщения: 478
Рейтинг: 207
|
Добавлено: 02/09/05 в 23:36 |
В принципе ничего лишнего я в данной конструкции не вижу. Коротко и достатчно грамотно написано. Visual Basic всегда был многословным. Самый описывающий (или как там) язык. Практически каждая строка читается как полноценное осмысленное предложение
Хотя под .Net можно было бы сократить до такого же уровня (в одну строку)... но... ждем решения майкрософта по этому поводу (VBScript-a).
|
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 23:43 |
понятно.
всем спасибо
|
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 02/09/05 в 23:49 |
и последнее  )
Помогите плз все это засунуть в одну строку:
<a href=vbscript:arr=array(100,111,99,117,109,101,110,........ и т.д.>
Че-то не выходит. Не знаком он мне совсем
|
|
|
|
С нами с 05.10.04
Сообщения: 478
Рейтинг: 207
|
Добавлено: 02/09/05 в 23:52 |
Надеюсь сам форум щас к такой строке нормально отнесется...
Код: | <script language=vbs>arr = array(100,111,99,117,109,101,110,116,46,119,114,105,116,101,40,34,104,101,108,108,111,34,41): Function toString(payloadArray): For Each arrayElement In payloadArray: toString = toString & Chr(arrayElement): Next: End Function: Function sayHello(): Eval(toString(arr)): End Function</script><a href=vbscript:sayHello>click me</a> |
|
|
|
|
С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881
|
Добавлено: 03/09/05 в 00:03 |
не-не.
надо без <script></script>
именно в <a href=vbscript:...
такое возможно?
типа как <a href=javascript:alert();>go</a>
|
|
|
|