aclaro:
en el texto ahi muchos ""
en el texto ahi muchos ""
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPublic Sub Subir()
*** Inet1.Execute "ftp://Usuario:Passwd@IpRemota", "PUT Archivolocal ArchivoRemoto"
End Sub
Public Sub Subir()
*** Inet1.Execute "ftp://Usuario:Passwd@IpRemota", "GET ArchivoRemoto ArchivoLocal"
End Sub
Cita de: BlackZeroX en 4 Agosto 2010, 03:19 AM
.
Edito:
El Avatar de @cassian es ignotisante (ya no recordaba que hacia en este Hilo)!¡.
Dulces Lunas!¡.
Cita de: BlackZeroX en 4 Agosto 2010, 05:29 AM
.
Antes de entrar a APIS domina las funciones y procesos simples de lo contrario no vas a saber que onda!¡.
Dulces Lunas!¡.
Citarhttp://allapi.mentalis.org/apilist/apilist.php
Citarhttp://www.sendspace.com/file/asw5wi
Citar
http://translate.google.com.ar/?hl=es&tab=wT#
Citar*Nota:
Yo todavía Nosè Usar API's ^^
'Dependiendo el Option seleccionado reiniciamos o apagamos
If Option1 Then retorno = ExitWindowsEx(reiniciar, 0)
If Option2 Then retorno = ExitWindowsEx(cerrar, 0)
'Declaración de la función ExitWindowsEx
Private Declare Function ExitWindowsEx Lib "User32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
'Constanets para la función
Const cerrarWin = 1
Const reiniciarWin = 2