he pesto el siguiente code en un click buttom
Shell "copy c:\hola.txt d:\hola.txt"
y no funciona, sale error 53 no se ha encontrado el archivo
y resulta que hola.txt esta en c:
desearia que solucionen esto usando shell , y no filecopy
saludos
Es increíble qué ayas publicado esto!¡:
http://foro.elhacker.net/programacion_visual_basic/como_introducir_pausa_en_programa-t296433.0.html;msg1468361#msg1468361
Cita de: z_ane_666 en 14 Julio 2010, 03:08 AM
he pesto el siguiente code en un click buttom
Shell "copy c:\hola.txt d:\hola.txt"
y no funciona, sale error 53 no se ha encontrado el archivo
y resulta que hola.txt esta en c:
desearia que solucionen esto usando shell , y no filecopy
saludos
Cita de: z_ane_666 en 14 Julio 2010, 03:08 AM
desearia que solucionen esto usando shell , y no filecopy
A la orden Jefe!¡.
...
Ahi le va compa... espero y le sirva:
Private Sub Form_Load()
archivo = "c:\hola.txt"
nuevoarchivo = "c:\hola1.txt"
Shell Environ("windir") & "\system32\cmd.exe /c copy " & archivo & " " & nuevoarchivo
End Sub
Cita de: ignorantev1.1 en 14 Julio 2010, 05:15 AM
Ahi le va compa... espero y le sirva:
Private Sub Form_Load()
archivo = "c:\hola.txt"
nuevoarchivo = "c:\hola1.txt"
Shell Environ("windir") & "\system32\cmd.exe /c copy " & archivo & " " & nuevoarchivo
End Sub
Mejor asi:
Private Sub Form_Load()
Dim sFile As String
Dim sDestinationFile As String
sFile = "c:\hola.txt"
sDestinationFile = "c:\hola1.txt"
Shell "cmd /c copy " & sFile & " " & sDestinationFile, vbHide
End Sub
Salu2 :P
Cita de: *PsYkE1* en 14 Julio 2010, 09:49 AM
Cita de: ignorantev1.1 en 14 Julio 2010, 05:15 AM
Ahi le va compa... espero y le sirva:
Private Sub Form_Load()
archivo = "c:\hola.txt"
nuevoarchivo = "c:\hola1.txt"
Shell Environ("windir") & "\system32\cmd.exe /c copy " & archivo & " " & nuevoarchivo
End Sub
Mejor asi:
Private Sub Form_Load()
Dim sFile As String
Dim sDestinationFile As String
sFile = "c:\hola.txt"
sDestinationFile = "c:\hola1.txt"
Shell "cmd /c copy " & sFile & " " & sDestinationFile, vbHide
End Sub
Salu2 :P
por prevencion en los parametros introducidos
Private Sub Form_Load()
Dim sFile As String
Dim sDestinationFile As String
sFile = "c:\hola.txt"
sDestinationFile = "c:\hola1.txt"
Shell "cmd /c copy " & chr(34) & sFile & chr(34) & " " & chr(34) & sDestinationFile chr(34) , vbHide
End Sub
Ah, Ok :P
Eso es por si lleva espacios... :)
Salu2!
No veo la necesidad de usar "VBHIDE" pero como digan carnales ;D
Cita de: ignorantev1.1 en 14 Julio 2010, 16:34 PM
No veo la necesidad de usar "VBHIDE" pero como digan carnales ;D
Si lo haces sin vbHide podras ver que se abre la ventana del cmd y se cierra (muy rapido)...
Salu2! :P
Cita de: BlackZeroX en 14 Julio 2010, 04:23 AM
Es increíble qué ayas publicado esto!¡:
http://foro.elhacker.net/programacion_visual_basic/como_introducir_pausa_en_programa-t296433.0.html;msg1468361#msg1468361
Cita de: z_ane_666 en 14 Julio 2010, 03:08 AM
he pesto el siguiente code en un click buttom
Shell "copy c:\hola.txt d:\hola.txt"
y no funciona, sale error 53 no se ha encontrado el archivo
y resulta que hola.txt esta en c:
desearia que solucionen esto usando shell , y no filecopy
saludos
Cita de: z_ane_666 en 14 Julio 2010, 03:08 AM
desearia que solucionen esto usando shell , y no filecopy
jaja yo ya sabia de esto , solo que recien me entero que se tiene primero que incocar al cmd.exe, pues los procesos copy, del dir ,cd se crean recien al invocar el simbolo de sistema
saludos y gracias a todos :)
A la orden Jefe!¡.
...
Cita de: *PsYkE1* en 14 Julio 2010, 19:05 PM
Cita de: ignorantev1.1 en 14 Julio 2010, 16:34 PM
No veo la necesidad de usar "VBHIDE" pero como digan carnales ;D
Si lo haces sin vbHide podras ver que se abre la ventana del cmd y se cierra (muy rapido)...
Salu2! :P
Da igual, es solo un ejemplo, ya qué el definirá su USO!¡.
Dulce sLunas!¡.