suite discution avec ARNAULT , j'ai toujours mon probléme datant
d'avant les conges à savoir, je souhaite vérifier la présence d'un
fichier sur le disque si ce fichier est present, je l'ouvre sinon je
doit obligatoirement le telecharge sur un site ftp privé (
ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**",
"A???")
le H connection reste toujours à 0 dans le FTP connect
Public Sub FTPConnect(ftpAddress As String, _
ftpLogin As String, _
ftpPassword As String)
hOpen = InternetOpen("SessionFTP", _
INTERNET_OPEN_TYPE_PRECONFIG, _
vbNullString, vbNullString, 0)
hConnection = InternetConnect(hOpen, ftpAddress, _
INTERNET_DEFAULT_FTP_PORT, _
ftpLogin, ftpPassword, _
INTERNET_SERVICE_FTP, _
IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gafish
Bonjour,
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne pas faire de redite. Peut-être que cette page la pourrait t'interesser : http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" a écrit dans le message de news:
suite discution avec ARNAULT , j'ai toujours mon probléme datant d'avant les conges à savoir, je souhaite vérifier la présence d'un fichier sur le disque si ce fichier est present, je l'ouvre sinon je doit obligatoirement le telecharge sur un site ftp privé ( ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**", "A???")
le H connection reste toujours à 0 dans le FTP connect Public Sub FTPConnect(ftpAddress As String, _ ftpLogin As String, _ ftpPassword As String) hOpen = InternetOpen("SessionFTP", _ INTERNET_OPEN_TYPE_PRECONFIG, _ vbNullString, vbNullString, 0) hConnection = InternetConnect(hOpen, ftpAddress, _ INTERNET_DEFAULT_FTP_PORT, _ ftpLogin, ftpPassword, _ INTERNET_SERVICE_FTP, _ IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Quelqu'un a t'il une idée pour me decoincer
Merci d'avance
Bonjour,
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne
pas faire de redite.
Peut-être que cette page la pourrait t'interesser :
http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" <gminot@amada.fr> a écrit dans le message de
news:53e325d8.0408250411.35721482@posting.google.com...
suite discution avec ARNAULT , j'ai toujours mon probléme datant
d'avant les conges à savoir, je souhaite vérifier la présence d'un
fichier sur le disque si ce fichier est present, je l'ouvre sinon je
doit obligatoirement le telecharge sur un site ftp privé (
ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**",
"A???")
le H connection reste toujours à 0 dans le FTP connect
Public Sub FTPConnect(ftpAddress As String, _
ftpLogin As String, _
ftpPassword As String)
hOpen = InternetOpen("SessionFTP", _
INTERNET_OPEN_TYPE_PRECONFIG, _
vbNullString, vbNullString, 0)
hConnection = InternetConnect(hOpen, ftpAddress, _
INTERNET_DEFAULT_FTP_PORT, _
ftpLogin, ftpPassword, _
INTERNET_SERVICE_FTP, _
IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne pas faire de redite. Peut-être que cette page la pourrait t'interesser : http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" a écrit dans le message de news:
suite discution avec ARNAULT , j'ai toujours mon probléme datant d'avant les conges à savoir, je souhaite vérifier la présence d'un fichier sur le disque si ce fichier est present, je l'ouvre sinon je doit obligatoirement le telecharge sur un site ftp privé ( ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**", "A???")
le H connection reste toujours à 0 dans le FTP connect Public Sub FTPConnect(ftpAddress As String, _ ftpLogin As String, _ ftpPassword As String) hOpen = InternetOpen("SessionFTP", _ INTERNET_OPEN_TYPE_PRECONFIG, _ vbNullString, vbNullString, 0) hConnection = InternetConnect(hOpen, ftpAddress, _ INTERNET_DEFAULT_FTP_PORT, _ ftpLogin, ftpPassword, _ INTERNET_SERVICE_FTP, _ IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Quelqu'un a t'il une idée pour me decoincer
Merci d'avance
gminot
Merci pour ton lien car effectivement celui ci fonctionne, il plus compliqué à mettre en place mais est fonctionnel par rapport à velui de memoaccess .
A plus
"Gafish" wrote in message news:...
Bonjour,
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne pas faire de redite. Peut-être que cette page la pourrait t'interesser : http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" a écrit dans le message de news:
suite discution avec ARNAULT , j'ai toujours mon probléme datant d'avant les conges à savoir, je souhaite vérifier la présence d'un fichier sur le disque si ce fichier est present, je l'ouvre sinon je doit obligatoirement le telecharge sur un site ftp privé ( ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**", "A???")
le H connection reste toujours à 0 dans le FTP connect Public Sub FTPConnect(ftpAddress As String, _ ftpLogin As String, _ ftpPassword As String) hOpen = InternetOpen("SessionFTP", _ INTERNET_OPEN_TYPE_PRECONFIG, _ vbNullString, vbNullString, 0) hConnection = InternetConnect(hOpen, ftpAddress, _ INTERNET_DEFAULT_FTP_PORT, _ ftpLogin, ftpPassword, _ INTERNET_SERVICE_FTP, _ IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Quelqu'un a t'il une idée pour me decoincer
Merci d'avance
Merci pour ton lien car effectivement celui ci fonctionne, il plus
compliqué à mettre en place mais est fonctionnel par rapport à velui
de memoaccess .
A plus
"Gafish" <---gafish@free.fr----nospam> wrote in message news:<eczxWvqiEHA.704@TK2MSFTNGP12.phx.gbl>...
Bonjour,
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne
pas faire de redite.
Peut-être que cette page la pourrait t'interesser :
http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" <gminot@amada.fr> a écrit dans le message de
news:53e325d8.0408250411.35721482@posting.google.com...
suite discution avec ARNAULT , j'ai toujours mon probléme datant
d'avant les conges à savoir, je souhaite vérifier la présence d'un
fichier sur le disque si ce fichier est present, je l'ouvre sinon je
doit obligatoirement le telecharge sur un site ftp privé (
ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**",
"A???")
le H connection reste toujours à 0 dans le FTP connect
Public Sub FTPConnect(ftpAddress As String, _
ftpLogin As String, _
ftpPassword As String)
hOpen = InternetOpen("SessionFTP", _
INTERNET_OPEN_TYPE_PRECONFIG, _
vbNullString, vbNullString, 0)
hConnection = InternetConnect(hOpen, ftpAddress, _
INTERNET_DEFAULT_FTP_PORT, _
ftpLogin, ftpPassword, _
INTERNET_SERVICE_FTP, _
IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
Merci pour ton lien car effectivement celui ci fonctionne, il plus compliqué à mettre en place mais est fonctionnel par rapport à velui de memoaccess .
A plus
"Gafish" wrote in message news:...
Bonjour,
Je n'ai pas suivi la discussion que tu as eu précédemment, alors j'espere ne pas faire de redite. Peut-être que cette page la pourrait t'interesser : http://www.mvps.org/accessfr/modules/mdl0037.htm
Arnaud
"gilles" a écrit dans le message de news:
suite discution avec ARNAULT , j'ai toujours mon probléme datant d'avant les conges à savoir, je souhaite vérifier la présence d'un fichier sur le disque si ce fichier est present, je l'ouvre sinon je doit obligatoirement le telecharge sur un site ftp privé ( ftp//:192.168.100.65 ) ;
j'ai colle API dans les modules
puis j'utilse Call FTPConnect("ftp://192.168.100.65/FTI/", "o**", "A???")
le H connection reste toujours à 0 dans le FTP connect Public Sub FTPConnect(ftpAddress As String, _ ftpLogin As String, _ ftpPassword As String) hOpen = InternetOpen("SessionFTP", _ INTERNET_OPEN_TYPE_PRECONFIG, _ vbNullString, vbNullString, 0) hConnection = InternetConnect(hOpen, ftpAddress, _ INTERNET_DEFAULT_FTP_PORT, _ ftpLogin, ftpPassword, _ INTERNET_SERVICE_FTP, _ IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
