Newsgroup: it.comp.aiuto
Titolo: Esiste un programma che esegue funzioni di un altro programma ???

Spiego meglio :
Cerco un programma che all' avvio di windows esegua in automatico le
funzioni di un altro programma come ad esempio "play" e "riduci a icona".
Sapreste consigliarmi qualche nome ???
Grazie.
Ciao.

 ha scritto nel messaggio
news:z64r8.51022$pT1.1...@news1.tin.it...

Windows (non è un programma ma dovrebbe andare bene lo stesso...;)
metti il programma che desidei far partire in esecuzione automatica (avvio o
start ->programmi -Esecuz...)
ci fai un click destro -> proprietà e gli metti in Esegui: ridotto ad icona.
ciao

 funzioni di un altro programma come ad esempio "play" e "riduci a
icona".
Fasotuttomi.vbs
'Inizio
set WshShell = CreateObject("WScript.Shell")
WshShell.run"Programma da lanciare"
WScript.Sleep 500
WshShell.SendKeys"Comandi keyboard"
'Fine
I comandi possono essere ad esempio "%fo"
Che sarebbe ALT+F+O in molti programmi sarebbe
File apri
Questo sotto lancia il media player e suona, ingrandisce, iconizza...
Copiare incollare da 'Inizio a 'Fine e salvare come WMP.vbs
( guarda che il percorso del media player coincida col tuo,
deve essere la 6.4 italiana)
'Inizio
set WshShell = CreateObject("WScript.Shell")
WshShell.run"C:\PROGRA~1\LETTOR~1\MPLAYER2.EXE"
WScript.Sleep 500
WshShell.SendKeys"%fa"
WScript.Sleep 200
WshShell.SendKeys"C:\WINDOWS\MEDIA\The Microsoft Sound.wav"
WScript.Sleep 100
WshShell.SendKeys"{ENTER}"
WScript.Sleep 10000
WshShell.SendKeys"% n"
WScript.Sleep 3000
WshShell.SendKeys"% i"
'Fine
PS:
WshShell.SendKeys"C:\WINDOWS\MEDIA\The Microsoft Sound.wav"
Deve stare tutto su 1 riga
Se hai intuito e ti interessa
http://download.microsoft.com/download/winscript56/Install/5.6/W982KMe
XP/EN-US/scrdoc56en.exe
CLR SCRIPT
http://www.clrsoftware.com/clrscript/
AutoItX
http://www.hiddensoft.com/AutoIt/
--
Fosco

 Fosco
------------------------
a questo punto vorrei sapere una cosa...
è possibile mettere 2 programmi in Esecuzione Automatica... affinchè si
lanci prima
l'uno e poi l'altro ???
mi spiego meglio... uno di questi 2 deve essere lanciato prima... e poi
l'altro...
Ciao e grazie...

 affinchè si lanci prima l'uno e poi l'altro ???
Piazzi direttamente il DoubleCouple.vbs in
C:\WINDOWS\Menu Avvio\Programmi\Esecuzione automatica
DoubleCouple.vbs
'Inizio
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 10000 ' tempo latenza mmsec
WshShell.run"notepad"
WScript.Sleep 3000
WshShell.run"Wordpad"
'Fine
Notepad e wordpad vanno bene cosi, di solito pero bisogna
inserire ilnomecompletoconpercorsodelfile.
Per esempio per Outlook Express
WshShell.run"C:\PROGRA~1\OUTLOO~1\MSIMN.EXE"
--
Fosco

 ha scritto nel messaggio
news:JSwr8.128426$1S3.4...@twister1.libero.it...

---------------
Ok... Fosco... lunedi provo... dato che mi serve per il lavoro...
cmq... devo metterlo su un pc dove è installato W2000 Prof...
controindicazioni...??
il Vbs.. deve prima lanciare un programma di stampante in linea..
e poi un programma in rete...
Ciao...

 e poi un programma in rete...
Non occorre che tu quoti ogni volta il mio intero messaggio
ogni volta che mi rispondi, io lo so quello che ho scritto
e' una ripetizione inutile che occupa spazio inutile.
Il problema che il 2000 non l'ho mai provato ( ci sono le famose
restrizioni che potrebbero anche influire negativamente.)
Prova2000.vbs
'Inizio
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 40000 ' Aspetta l'avvio del W2k (40 sec)
WshShell.run"PERCORSO STAMPANTE"
WScript.Sleep 20000' aspetta apertura stampante in mmsec
WshShell.run"PERCORSO PROG RETE"
'Fine
Gli WScript.Sleep sono tempi d'attesa in millisecondi
se vedi che i processi non riescono ad teminare aumentali.
Se per esempio Win 2000 ci mette parecchio tempo per
avviarsi ed entrare in piena funzionalita' aumenta gli
WScript.Sleep 40000  anche a 60000  o 120000 ( o piu)
Idem per lo sleep 20000 che apetta la completa apertura
della stampante.
Altrimenti una apertura della rete mentre la stampante e' ancora
non completamente aperta e "ferma" potrebbe influenzare
negativamente la seconda chiamata ( rete)
Insomma i tempi d'attesa sono il fulcro cruciale che devi
adattare tu attraverso tentativi successivi.
Se vai al primo indirizzo che ho scritto nel precedente post
ci sono descritti sistemi piu' sofisticati al posto dello sleep
per esempio il True False
O il WinWaitActivate
Questo qui sotto e' un esempio che se Notepad e' attivo viene
richiamato un MESSAGGIO e se nessuna istanza notepad e' attiva viene
richiamato Wordpad
'Inizio
set WshShell = CreateObject("WScript.Shell")
if bWinPresent = WshShell.AppActivate("- Blocco note") =False Then
  MsgBox "ATTIVO"
End if
WScript.Sleep 500
if bWinPresent = WshShell.AppActivate("- Blocco note") =True Then
WshShell.run"Wordpad"
WScript.Sleep 500
End if
set WshShell =Nothing
'Fine
PS:
Questi due devono stare tutti su una riga
if bWinPresent = WshShell.AppActivate("- Blocco note") =False Then
if bWinPresent = WshShell.AppActivate("- Blocco note") =True Then
--
Fosco

 "SuperPippo®"
------
Ok... lunedi provo se funziona..
grazie e ciao..buona domenica..
--
SuperPippo®   [;o))