🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #1771

Re: Sendkeys

#1771
From: Cerberus1981
Date: Sat, 14 Feb 2004 11:51
23 lines
1828 bytes
"Roberto" <baco74@libero.it> ha scritto nel messaggio
news:NnbXb.310618$_P.10670935@news4.tin.it...
> Ciao, un problema banalissimo (credo)
> in una finestra dos,come faccio ad inviare dlle sequenze tasti senza che
ne
> apra 100 alla volta?
in che senza?
cmq  se ho capito potresti provare cos�:

Private sub Scrivi ()
dim a as long
dim applicazione as string
dim CoseDaScrivere as string
applicazione=""'scrivi qui il percorso che vuoi aprire
cosedadire=""'scrivi qui quello che vuoi scrivere, puoi crearee un array per
scrivere pi� cose contemporaneamente
a=shell (applicazione,1)'apri
app.activate=a'riferimento
AppActivate a    'Lo attivi (gli dai il focus)
SendKeys cosedascrivere, True   'qui puoi inserire un ciclo for next per
inserire pi� di un sendkeys
SendKeys "%{F4}", True   ' Premo Alt+F4 per chiudere.
End Sub
Technical Details
Message-ID: <6ZnXb.234736$VW.9466488@news3.tin.it>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!irazu.switch.ch!switch.ch!newsfeed.nextoneserver.com!news-out.tin.it!news-in.tin.it!news3.tin.it.POSTED!not-for-mail
References: <NnbXb.310618$_P.10670935@news4.tin.it>

Show Full Headers
Complete Article Headers
X-Google-Language: ITALIAN,ASCII
X-Google-Thread: f94ee,fc0d0977f8d05536
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2004-02-14 03:51:30 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!irazu.switch.ch!switch.ch!newsfeed.nextoneserver.com!news-out.tin.it!news-in.tin.it!news3.tin.it.POSTED!not-for-mail
From: "Cerberus1981" <cerberus1981@tin.it>
Newsgroups: free.it.visual-basic
References: <NnbXb.310618$_P.10670935@news4.tin.it>
Subject: Re: Sendkeys
Lines: 25
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
Message-ID: <6ZnXb.234736$VW.9466488@news3.tin.it>
Date: Sat, 14 Feb 2004 11:51:30 GMT
NNTP-Posting-Host: 82.49.193.223
X-Complaints-To: newsmaster@tin.it
X-Trace: news3.tin.it 1076759490 82.49.193.223 (Sat, 14 Feb 2004 12:51:30 MET)
NNTP-Posting-Date: Sat, 14 Feb 2004 12:51:30 MET
Organization: TIN