Autor
|
Tema: Apis sustituir msinet.ocx (Leído 3,740 veces)
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
Hola de nuevo Alguien sabe donde puedo encontrar el modulo para sustituir el msinet.ocx mediante apis.
Gracias Salu2
|
|
|
En línea
|
|
|
|
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
Este post ya le abia visto pero como ponia WININET.DLL no le ice caso.
Podeis explicarme como se usa please ?
Gracias
Salu2
|
|
|
En línea
|
|
|
|
Manibal_man
Desconectado
Mensajes: 528
|
Depende que quieras hacer... Tenes que declarar la funcion que te interesa y despues llamarla, si no sabes como usarla selecciona su nombre, pegalo en el google y ahi te vas a enterar rapido. Si no llegas a entender algo de esto, te recomiendo que leas este post: http://foro.elhacker.net/index.php/topic,78189.0.htmlSaludos
|
|
|
En línea
|
:: I was born ready motha fucka ::
|
|
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
y no ay ningun modulo como el SocketMaster de las apis de winsock para sustituir a msinet.ocx? Lo que quiero acer es conectarme a un ftp y subir unas fotos. Hay otra manera?
Salu2
|
|
|
En línea
|
|
|
|
Manibal_man
Desconectado
Mensajes: 528
|
y no ay ningun modulo como el SocketMaster de las apis de winsock para sustituir a msinet.ocx? Lo que quiero acer es conectarme a un ftp y subir unas fotos. Hay otra manera?
Salu2
Las funciones son FtpCommand y FtpPutFile pero..., no pensas buscar nada x vos mismo?, te doy un consejo... si no sos capaz de poner en el google una palabra y ver cuales son sus argumentos no intentes hacer cosas mas complicadas que eso... En cuanto a algo como el modulo para sustituir al winsock, no estoy de acuerdo con ese tipo de cosas, la mayoria de la gente se la pasa usandolo y no tiene la menor idea como funciona... lo hacen solo "para no tener que pasar el archivito" asi pueden hacer su troyano... bah... Saludos Saludos
|
|
|
En línea
|
:: I was born ready motha fucka ::
|
|
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
muchas gracias, ya encomte lo k buscaba, solo taba pidiendo una orientacion Salu2
|
|
|
En línea
|
|
|
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
Weno, voy a publicar aqui el codigo que uso para subir archivos a un ftp: 'ftp Private Declare Function InternetConnect Lib "wininet.dll" Alias "InternetConnectA" (ByVal hInternetSession As Long, ByVal sServerName As String, ByVal nServerPort As Integer, ByVal sUserName As String, ByVal sPassword As String, ByVal lService As Long, ByVal lFlags As Long, ByVal lContext As Long) As Long Private Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long Private Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" (ByVal hConnect As Long, ByVal lpszLocalFile As String, ByVal lpszNewRemoteFile As String, ByVal dwFlags As Long, ByVal dwContext As Long) As Boolean Private Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer Private Declare Function FtpSetCurrentDirectory Lib "wininet.dll" Alias "FtpSetCurrentDirectoryA" (ByVal hFtpSession As Long, ByVal lpszDirectory As String) As Boolean Const INTERNET_OPEN_TYPE_PRECONFIG = 0 Const INTERNET_DEFAULT_FTP_PORT = 21 Const INTERNET_SERVICE_FTP = 1 Const PassiveConnection As Boolean = True Const INTERNET_FLAG_PASSIVE = &H8000000 Const FTP_TRANSFER_TYPE_UNKNOWN = &H0
Dim hConnection, hOpen, Num As Long
hOpen = InternetOpen("lalala", INTERNET_OPEN_TYPE_PRECONFIG, vbNullString, vbNullString, 0) DoEvents hConnection = InternetConnect(hOpen, tu ftp, INTERNET_DEFAULT_FTP_PORT, el user, el pass, INTERNET_SERVICE_FTP, IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0) DoEvents FtpSetCurrentDirectory hConnection, "\"'Directorio del ftp
FtpPutFile hConnection, nombre_local(C:\a.jpg), nombre_subido(lalala.jpg), FTP_TRANSFER_TYPE_UNKNOWN, 0
InternetCloseHandle hConnection InternetCloseHandle hOpen
Disfrutarlo y lo siento si e sido un vago. Salu2
|
|
|
En línea
|
|
|
|
Xpeed
Desconectado
Mensajes: 472
Res Publica Non Dominetur
|
pero porque no usar ese ocx??? luego no todos los wins la traen consigo???
un saludo.
|
|
|
En línea
|
|
|
|
programatrix
|
Creo que los controles .ocx se instalan con el vb y no vienen por defecto con el windows
|
|
|
En línea
|
|
|
|
|
|