Реклама на сайте Advertise with us

VBscript. Нид хелп!

Расширенный поиск по форуму
 
Новая тема Новая тема   
Автор
Поиск в теме:



С нами с 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?

С меня рейтинг icon_smile.gif

0
 



С нами с 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>

0
 



С нами с 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?

0
 



С нами с 05.10.04
Сообщения: 478
Рейтинг: 207

Ссылка на сообщениеДобавлено: 02/09/05 в 23:00       Ответить с цитатойцитата 

Через двоеточие можно.

2
 



С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881

Ссылка на сообщениеДобавлено: 02/09/05 в 23:25       Ответить с цитатойцитата 

А еще вопрос.
Упростить можно конструкцию как-то?
Уж больно наворочено, по сравнению с JS

0
 



С нами с 05.10.04
Сообщения: 478
Рейтинг: 207

Ссылка на сообщениеДобавлено: 02/09/05 в 23:36       Ответить с цитатойцитата 

В принципе ничего лишнего я в данной конструкции не вижу. Коротко и достатчно грамотно написано. Visual Basic всегда был многословным. Самый описывающий (или как там) язык. Практически каждая строка читается как полноценное осмысленное предложение icon_smile.gif

Хотя под .Net можно было бы сократить до такого же уровня (в одну строку)... но... ждем решения майкрософта по этому поводу (VBScript-a).

2
 



С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881

Ссылка на сообщениеДобавлено: 02/09/05 в 23:43       Ответить с цитатойцитата 

понятно.
всем спасибо

0
 



С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881

Ссылка на сообщениеДобавлено: 02/09/05 в 23:49       Ответить с цитатойцитата 

и последнее icon_smile.gif)

Помогите плз все это засунуть в одну строку:

<a href=vbscript:arr=array(100,111,99,117,109,101,110,........ и т.д.>

Че-то не выходит. Не знаком он мне совсем

0
 



С нами с 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>

0
 



С нами с 18.05.00
Сообщения: 4988
Рейтинг: 881

Ссылка на сообщениеДобавлено: 03/09/05 в 00:03       Ответить с цитатойцитата 

не-не.
надо без <script></script>

именно в <a href=vbscript:...

такое возможно?
типа как <a href=javascript:alert();>go</a>

0
 
Новая тема Новая тема   

Текстовая реклама в форме ответа
Заголовок и до четырех строчек текста
Длина текста до 350 символов
Купить рекламу в этом месте!


Перейти:  



Спонсор раздела Стань спонсором этого раздела!

Реклама на сайте Advertise with us

Опросы

Рецепт новогоднего блюда 2022



Обсудите на форуме обсудить (11)
все опросы »