PDA

View Full Version : codice vbs


trittico69
10-11-2015, 09:02
salve sto creando un codice vbs ma mi sono fermato a un certo punto..

DIM OS
set oS = WScript.CreateObject("WScript.Shell")
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run("""C:\Documents and Settings\Utente\desktop\collegamento a risorse del computer")
WScript.Sleep 5000
oS.SendKeys "{TAB}"
oS.SendKeys ("ftp://10.1.23.244/ufficio_servizi.exe")
oS.SendKeys "{enter}"
WScript.Sleep 5000
oS.SendKeys "{TAB}"
oS.SendKeys "{TAB}"
oS.SendKeys "{TAB}"
oS.SendKeys "{enter}"
WScript.Sleep 8000
oS.SendKeys "{TAB}"
oS.SendKeys "{TAB}"
oS.SendKeys "{TAB}"
oS.SendKeys "{TAB}"

a questo punto esce una finestra “salva in” e io dovrei salvare in C:ufficio servizi
oppure questo

DIM OS
set oS = WScript.CreateObject("WScript.Shell")
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run("""C:\Documents and Settings\Utente\desktop\collegamento a risorse del computer")
WScript.Sleep 5000
oS.SendKeys "{TAB}"
oS.SendKeys ("ftp://10.1.23.244/")
oS.SendKeys "{enter}"

e a questo punto
dovrei ciccare con il tasto destro su un file che si chiama ufficio_servizi.exe e scegliere “copia nella cartella” e sostituendo il file esistente

grazie

x_Master_x
10-11-2015, 10:44
Che sono tutti quei SendKey? :stordita:
Usa Wget (http://wget.addictivecode.org/FrequentlyAskedQuestions?action=show&redirect=Faq#download) per salvare il file, questo è un esempio:
WGET -o "C:\Destinazione\1KB.zip" "ftp://speedtest.tele2.net/1KB.zip"

trittico69
10-11-2015, 13:07
scusami master ma non sono in grado di fare quello che mi hai consigliato

x_Master_x
10-11-2015, 13:58
Cosa non sai fare? Usare VBS per avviare Wget?
Scarica Wget ( Windows Binaries, il primo link, 32 bit o 64 bit in base al tuo OS ) apri CMD e incolla:

"C:\Percoso\wget.exe" -o "C:\Destinazione\ufficio_servizi.exe" "ftp://10.1.23.244/ufficio_servizi.exe"


Sostituisci "C:\Percoso\wget.exe" con il tuo e "C:\Destinazione\ufficio_servizi.exe" con il percorso dove vuoi salvare il file. Una volta che mi confermi che la procedura è avvenuta con successo ( e non vedo perchè non dovrebbe funzionare, a meno che non sbagli a scrivere i percorsi ) mi dici qual'è il problema.

trittico69
12-11-2015, 09:09
sono sul pc da lavoro non posso istallare programmi

x_Master_x
12-11-2015, 09:35
Wget non si installa e non richiede diritti amminstrativi ma potresti avere altre restrizioni, se fosse così chiedi all'amministratore di permettere l'utilizzo del programma.

trittico69
12-11-2015, 11:37
puoi dirmi dove posso scaricarlo?
quello che ho trovato io si istalla.

x_Master_x
12-11-2015, 12:45
wget-1.16.3-win32.zip, wget.exe (https://eternallybored.org/misc/wget/wget-1.16.3-win32.zip)
wget-1.16.3-win64.zip, wget64.exe (https://eternallybored.org/misc/wget/wget-1.16.3-win64.zip)

trittico69
12-11-2015, 12:54
quando lo faccio partire il file esce una finestra nera per una frazione di secondo e poi sparisce

x_Master_x
12-11-2015, 13:32
Ovvio, è una CLI. Vorrei evitare di ripetere le stesse cose, vedi post #4 c'è scritto come utilizzarlo cioè da CMD ( o Batch, VBS o quello che ti pare )