[es] - Scripting u W98?

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
199.171.112.*

+6 Profil

^{20.06.2002. u 19:00 - pre 266 meseci}

Nego, može li VBScript da poziva WinAPI funkcije? Čini mi se da može, ali nisam siguran. Ako može, koristite funkcije

InternetDial i InternetHangup

koje su u Wininet.dll-u uz IE 4.0 ili noviji.

IOCC

Odgovor na temu

random
Vladimir Vrzić
Beograd

Član broj: 85
Poruke: 3866
194.106.163.*

Sajt: www.last.fm/user/vrza

+4 Profil

Re: Scripting u W98?

^{20.06.2002. u 19:05 - pre 266 meseci}

Citat:

ventura:
Ja mislim da bi mozda moglo nesto tipa "copy com4: ATZ" ... to ne radi, ali verujem da ima neka fora...

Verovatno si hteo da kažeš

echo ATZ > com4:

Ipak čvrsto verujem da će sve što će ova komanda učiniti dok si konektovan biti da ti ispiše poruku "Access is denied".

P.S. copy je komanda za pravljenje kopija fajlova.

int rand(void);

Those who do not understand Unix are condemned to reinvent it, poorly.

Upali lampicu — koristi Jabber!

Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu

Profil

Re: Scripting u W98?

^{20.06.2002. u 19:16 - pre 266 meseci}

random je u pravu, ovo sa 'echo ATZ > com4' ne vrsi posao. Ne javlja nikavu gresku, ali konekcija je i dalje tu.

fire, walk with me

Odgovor na temu

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
..g-c5300-2.dialup.nethere.net

+6 Profil

Re: Scripting u W98?

^{21.06.2002. u 05:56 - pre 266 meseci}

@#@#!!! Ne mogu da se pozivaju API funkcije direktno iz WSH-a. Jedino možda pomoću rundll32. Ipak je WSH jako ograničen...

IOCC

Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu

Profil

Re: Scripting u W98?

^{21.06.2002. u 06:58 - pre 266 meseci}

Jeste DT, ajde daj neku ideju kako preko rundll32 da se odradi, bas me zainteresovala ova problematika.

pozdrav

fire, walk with me

Odgovor na temu

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
199.171.112.*

+6 Profil

Re: Scripting u W98?

^{21.06.2002. u 17:45 - pre 266 meseci}

Ne može ni preko rundll32. Ovaj program može da startuje samo funkcije oblika:

Code:

void CALLBACK EntryPoint(HWND hwnd, HINSTANCE hinst, LPSTR lpszCmdLine, int nCmdShow);

Jedino da napravim jedno programče u C-u koje bi to radilo, ali tako nešto već postoji.

Nego, jc denton, možeš da koristiš SendKey i u WSH-u, samo kako misliš da ga iskoristiš?

IOCC

Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu

Profil

Re: Scripting u W98?

^{21.06.2002. u 19:00 - pre 266 meseci}

@&*%&*^#@# bash ! E, jesu ga ogranicili.
A za sendkeys ideja je sledeca. Sa onim sto sam rekao pokrenes konekciju, pa opet isto to da izadje pomocni dijalog na kome usput ima i Disconnect dugme.
E onda je prosto, ako imamo SendKeys kao u VB-u, jer dovoljno je 'poslati' ALT+C i gotovo, diskonektovani smo.
Neznam samo kako ide sintaksa za taj SendKeys iz WSH-a ?

pozdrav

fire, walk with me

Odgovor na temu

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
199.171.112.*

+6 Profil

Re: Scripting u W98?

^{21.06.2002. u 19:06 - pre 266 meseci}

Evo ti ga primer i detaljno objašnjenje:

http://www.winguides.com/scripting/reference.php?id=149

IOCC

Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu

Profil

Re: Scripting u W98?

^{21.06.2002. u 19:10 - pre 266 meseci}

Zoboravih, za C programce nije nophodno, kao sto si i rekao, ima vec dosta gotovih progrmcica. Ja mislim da bi tu zavrsio pos'o i jedan ActiveX DLL koji su bas namenjeni za extend VBScript-a (opet zakrpe @#@^%$%#@#@!)
Slazes se?

fire, walk with me

Odgovor na temu

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
199.171.112.*

+6 Profil

Re: Scripting u W98?

^{21.06.2002. u 19:25 - pre 266 meseci}

Naravno. Samo taj ActiveX bi mora da bude urađen ili u VB-u, i tada na mašini moraš da imaš VB runtime, ili u C++u (ATL), što nije baš sasvim prosto, a treba i da se registruje - ne sviđa mi se ideja. Lakše je startovati specijalizovano programče za diskonekciju veze.

Možda je bolje probati preko SendKey - mada je i to hack.

Nego, u Win NT/2000/XP postoji i drugi način da se to odradi - uz pomoć programa rasdial.exe ili rasphone.exe

http://www.visualautomation.com/comprod/secure6/dialup_t.htm

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q125393

Ne znam zašto toga nema u Win 9x :(

[Ovu poruku je menjao Dragi Tata dana 21.06.2002 u 10:27 AM GMT]

IOCC

Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu

Profil

Re: Scripting u W98?

^{21.06.2002. u 19:26 - pre 266 meseci}

Citat:

Dragi Tata:
... Nego, jc denton, možeš da koristiš SendKey i u WSH-u, samo kako misliš da ga iskoristiš?

Hmm..., vidis ja sam ovo prvo i pogledao u MSDN-u od VS-a 6.0, ali tamo imam samo sledece metode za WshShell objekt :
citiram iz MSDN-a :
'The following table describes the methods associated with the WshShell object.

Method Description
CreateShortcut Creates a WshShortcut object and returns it.
ExpandEnvironmentStrings Expands a PROCESS environment variable and returns the result string.
Popup Displays a message box window containing a specified message.
RegDelete Deletes a specified key or value from the registry.
RegRead Returns a specified key or value from the registry.
RegWrite Sets a specified key or value in the registry.
Run Creates a new process that executes a specified command with a specified window style. '

E, izgleda da metod SendKeys nije naveden, pa zato nisam znao da postoji.

Ali ... EVO resenja, i radi super - isprobano :

Set WSHShell = CreateObject("Wscript.Shell")
reply = WSHShell.Run("rundll rnaui.dll,RnaDial posta",,True)
WshShell.SendKeys "%c"

Ovo sto sam napisao bi trebalo da bude script za Disconnect.

Nemanja, svaka cast !

[Ovu poruku je menjao jc denton dana 21.06.2002 u 07:33 PM GMT]

fire, walk with me

Odgovor na temu

Dragi Tata
Malo ispod Kanade

Član broj: 1958
Poruke: 3906
199.171.112.*

+6 Profil

Re: Scripting u W98?

^{21.06.2002. u 19:30 - pre 266 meseci}

Bravo, majstore!

Ipak me čudi da je potrebno toliko zezanja za tako osnovnu stvar. Nije ni čudo što administratori više vole *nix-e...

IOCC

Odgovor na temu