|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Kulik 2:4635/99.99 16 Oct 2002 18:03:53 To : Vlad Subject : WSH perlScript --------------------------------------------------------------------------------
Среда Октябрь 16 2002 Vlad писАл(а) к Alexander Kulik:
AK>> куда PerlScript выводить данный из print ? ругается он на них
V> Что именно говорит, когда ругается? Если выводишь в HTML, то нужно
V> писать $window->document->write("Hello, World!"), если просто нужно
V> сообщение, то $WScript->Echo("Hello World!"). Или так еще можно:
V> -------hello.wsf-------------------------------
V> <Job Id="WshShell">
V> <script language=PerlScript>
V> $WshShell = $WScript->CreateObject("WScript.Shell");
V> $WshShell->Run("notepad", 5);
V> $WshShell->AppActivate("Untitled - Notepad");
V> my $message = "Hello from PerlScript!";
V> for($i=0; $i < length($message); $i++) {
V> $char = substr($message, $i, 1);
V> $WScript->Sleep(100);
V> $WshShell->SendKeys($char);
V> }
V> </script>
V> </job>
V> -------------------------------------------------
А если нет например объекта WScript, ну не WSH это например! Как тогда получить
$WScript?
--- http://volph.appua.com, volph@ugb.cherkassy.ua, volph@appua.com
* Origin: Вот так вот... (2:4635/99.99)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/35413dad800d.html, оценка из 5, голосов 10
|