Chiusura Finestra Esplora risorse

Article View: free.it.visual-basic

Article #2637

Back to free.it.visual-basic Previous Next

#2637

From: Alan1
Date: Mon, 31 Mar 2003 19:24

23 lines
1954 bytes

Salve a tutto il Ng.
Ho costruito questa routine che apre la finestra Trova di windows, ma non
vorrei far vedere l'apertura della finestra Esplora Risorse, o semplicemente
chiuderla una volta che si � aperta la finestra Trova.
Mi date una mano per favore?   Grazie a tutti
------------------------------------------------------
Private Sub Cmd_SendkeyF3_Click()
  Dim i As Double
  Call Shell("explorer.exe", vbNormalFocus) 'Se non attiviamo Esplorer non
si pu� accedere al Trova
  For i = 1 To 10000000: Next i             'Linea di ritardo altrimenti non
agisce Sendkeys
  SendKeys "{F3}"
  'SendKeys "%{F4}", True   ' Con ALT+F4 volevo uscire da Explora invece
esco da Trova
  'SendKeys "%{F4}", True   ' Con il secondo invio ALT+F4  esco da Explora
ma prima sono gi� uscito dal Trova
  'Andrebbe dato il focus a esplora R. prima di uscire con alt F4 , ma non
so come fare

End Sub
-------------------------------------------------------
Alan1

Technical Details

Message-ID: <tB0ia.37696$Jg1.870649@news1.tin.it>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-09!supernews.com!news.maxwell.syr.edu!nntp.infostrada.it!newsfeeder.edisontel.com!news-out.tin.it!news-in.tin.it!news1.tin.it.POSTED!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ITALIAN,ASCII
X-Google-Thread: f94ee,298cd539ab21119f,start
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2003-03-31 11:24:10 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-06!sn-xit-09!supernews.com!news.maxwell.syr.edu!nntp.infostrada.it!newsfeeder.edisontel.com!news-out.tin.it!news-in.tin.it!news1.tin.it.POSTED!not-for-mail
From: "Alan1" <renainn@tin.it>
Newsgroups: free.it.visual-basic
Subject: Chiusura Finestra Esplora risorse
Lines: 25
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <tB0ia.37696$Jg1.870649@news1.tin.it>
Date: Mon, 31 Mar 2003 19:24:09 GMT
NNTP-Posting-Host: 80.182.212.26
X-Complaints-To: newsmaster@tin.it
X-Trace: news1.tin.it 1049138649 80.182.212.26 (Mon, 31 Mar 2003 21:24:09 MET DST)
NNTP-Posting-Date: Mon, 31 Mar 2003 21:24:09 MET DST
Organization: TIN