Salve a tutti vorrei far eseguire ad un programma un'operazione con il cmd io ho provato a fare così:
Dim x as string
x = ("cmd.exe" & "copy/b" & txtpathimg.Text & txtpathfile.Text & txtpathimgfile.Text)
shell(x)
Ma qunado lo eseguo mi dice errore impossibile trovare il file
vi prego potete aiutarmi
Credo che tu debba mettere tutto il percorso, ma in definitiva mi sembra inutile perchè già Shell richiama automaticamente cmd. Quindi dovrebbe bastare usare solo "copy ..."
Scusa ma se io faccio come mi dici te cioè metto:
Dim x as string
x = ("copy/b " & "I:.jpg" & " + " & "I:\prova.rar" & "I:\prova.jpg"
Shell(x)
Mi esce sempre l'errore di prima cioè Impossibile trovare il file...
Ecco qualche riga buttata giu' senza tante ottimizzazioni ...
Dim fsout As FileStream
Dim fsin As FileStream
Dim bw As BinaryWriter
Dim br As BinaryReader
fsout = New FileStream("I:\prova.jpg", FileMode.Create)
bw = New BinaryWriter(fsout)
fsin = New FileStream("I:.jpg", FileMode.Open, FileAccess.Read)
br = New BinaryReader(fsin)
bw.Write(br.ReadBytes(fsin.Length))
br.Close()
fsin.Close()
fsin = New FileStream("I:\prova.rar", FileMode.Open, FileAccess.Read)
br = New BinaryReader(fsin)
bw.Write(br.ReadBytes(fsin.Length))
br.Close()
fsin.Close()
bw.Close()
fsout.Close()