premetto che sono un ignorantone.... e che è la seconda volta che prendo in mano visual basic
oggi ho visto che tramite shell è possibile lanciare comandi di MSdos
quindi:
Shell ("defrag")
Shell ("fdisk")
ecc, ecc
mi sono bloccato quando ho cercato di fare il comando per cambiare il nome ad un file...
come devo fare???
suppongo che devo fare 2 textbox (una dove scrivere il nome attuale e una per il nome futuro), e specificare qualcosa tramite Dim
qualcuno mi può aiutare?
quando piove e tira vento alle ***** stai attento
SI, ma nel forum adattoqualcuno mi può aiutare?
Visual Basic e Visual Basic.NET
...Terrible warlords, good warlords, and an english song
'COPIA file1.txt in file2.txt
FileCopy App.Path & "\file1.txt", App.Path & "\file2.txt"
'RINOMINA file2.txt in prova.txt
Name App.Path & "\file2.txt" As App.Path & "\prova.txt"
'ELIMINA prova.txt
Kill App.Path & "\prova.txt"
codice:+---------------------------------------------+ | se non riocordo male :stordita: | | con Shell(), lanci soltanto file ESEGUIBILI | +---------------------------------------------+
...Terrible warlords, good warlords, and an english song
mi servirebbe il code per la shell così lo applico pure agli altri comandi
alla fine devo dire solo che il comando della shell deve caricare un secondo 2 variabili no???
qualcun' altro mi può aiutare??
devo dare il valore di variabile al contenuto digitato in dei boxtext da un tente... come faccio???
inizio a penare che anche un esempio di una calcolatrice mi possa aiutare (sempre per il fatto del boxtext)
quando piove e tira vento alle ***** stai attento
TextBox alias boxtext
dove text1 conterrà il percorso (patch) del file origine (da copiare)
tipo C:\Programmi\Mio_File.txt
FileCopy Text1.Text, Text2.Text
calcolatrice:....
'all'evento ON_CLICK() di un command_button inserisci codesto code
dim var1 as integer
dim var2 as integer
var1 = text1.text
var2 = text2.text
'SOMMA
text3.text = var1 + var2
...Terrible warlords, good warlords, and an english song
Private Sub Command3_Click()
Dim var1 As String
Dim var2 As String
var1 = Text1.Text
var2 = Text2.Text
Shell ("rename var1 var2")
non si può fare qialcosa del genere???
magri sbaglio solo la sintassi:quipy:
quando piove e tira vento alle ***** stai attento
name var1,var2
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
ho provato con il comando
Shell ("net send var1,var2")
ma nulla
quando piove e tira vento alle ***** stai attento
no forse non è chiaro con la shell si lanciano eseguibili non comandi dos per i comandi dos ti devi creare un tread un pipe e reindirizzare il risultato dove lo vuoi vedereOriginariamente inviato da pinguinland
ho provato con il comando
Shell ("net send var1,var2")
ma nulla
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
si come no....no forse non è chiaro con la shell si lanciano eseguibili non comandi dos per i comandi dos ti devi creare un tread un pipe e reindirizzare il risultato dove lo vuoi vedere
grande genio, ho risolto
sbaglaivo la sintassi...
dovevo scrivere questo...
Shell ("rename " & Text1.Text & " " & Text1.Text)
funziona con tutti i comandi fin ora provati
pensare che mi stavi facendo veramente sbattere le testa nel muro
quando piove e tira vento alle ***** stai attento
Permessi di invio
Rispondi quotando