j'utilise la fonction suivante pour télécharger des fichiers depuis le net :
'---
Private Declare Function URLDownloadToFile Lib "urlmon" Alias
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal
szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As
Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ...
Public Function DownloadFile(URL As String, LocalFilename As String) As
Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename,
BINDF_GETNEWESTVERSION, 0&)
If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des
accélérateurs de téléchargement, etc, est paramétré pour prendre en charge
les extensions de fichiers que je veux télécharger, il se lance lors du
téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je l'ai
prévu (dans le répertoire de mon exe) ...
y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou
autre chose ?) ou bien est ce impossible ?
sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur
pour télécharger ces fichiers ?
merci
--
Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm
j'utilise la fonction suivante pour télécharger des fichiers depuis le net :
'--- Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ... Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename, BINDF_GETNEWESTVERSION, 0&) If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des accélérateurs de téléchargement, etc, est paramétré pour prendre en charge les extensions de fichiers que je veux télécharger, il se lance lors du téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je l'ai prévu (dans le répertoire de mon exe) ... y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou autre chose ?) ou bien est ce impossible ? sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur pour télécharger ces fichiers ?
merci
Salut,
Sinon tu télécharges le fichier avec winsock & HTTP, je dois avoir un code
faisant ca qui traine si tu veux.
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
scraper wrote:
Bonjour à tous !
j'utilise la fonction suivante pour télécharger des fichiers depuis
le net :
'---
Private Declare Function URLDownloadToFile Lib "urlmon" Alias
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String,
ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As
Long) As Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ...
Public Function DownloadFile(URL As String, LocalFilename As String)
As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename,
BINDF_GETNEWESTVERSION, 0&)
If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des
accélérateurs de téléchargement, etc, est paramétré pour prendre en
charge les extensions de fichiers que je veux télécharger, il se
lance lors du téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où
je l'ai prévu (dans le répertoire de mon exe) ...
y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API,
ou autre chose ?) ou bien est ce impossible ?
sinon, comment puis je intercepter l'emplacement choisi par
l'utilisateur pour télécharger ces fichiers ?
j'utilise la fonction suivante pour télécharger des fichiers depuis le net :
'--- Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ... Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename, BINDF_GETNEWESTVERSION, 0&) If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des accélérateurs de téléchargement, etc, est paramétré pour prendre en charge les extensions de fichiers que je veux télécharger, il se lance lors du téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je l'ai prévu (dans le répertoire de mon exe) ... y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou autre chose ?) ou bien est ce impossible ? sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur pour télécharger ces fichiers ?
merci
scraper
Bonjour ng (dans news:ermqQPu$) tu nous disais :
Salut,
Sinon tu télécharges le fichier avec winsock & HTTP, je dois avoir un code faisant ca qui traine si tu veux.
hello !
si tu as un début d'exemple, je veux bien :-)
en passant par ce contrôle winsocks, ça évite les problèmes que j'exposais ?
Sinon tu télécharges le fichier avec winsock & HTTP, je dois avoir un code faisant ca qui traine si tu veux.
hello !
si tu as un début d'exemple, je veux bien :-)
en passant par ce contrôle winsocks, ça évite les problèmes que j'exposais ?
merci en tout cas ! :-)
> en passant par ce contrôle winsocks, ça évite les problèmes que
j'exposais ?
oui évidemment puisque tu gères le téléchargement toi même.
pour l'exemple je vais voir où il est et je te l'envoi.
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
scraper wrote:
Bonjour ng
(dans news:ermqQPu$EHA.2568@TK2MSFTNGP11.phx.gbl)
tu nous disais :
Salut,
Sinon tu télécharges le fichier avec winsock & HTTP, je dois avoir un
code faisant ca qui traine si tu veux.
hello !
si tu as un début d'exemple, je veux bien :-)
en passant par ce contrôle winsocks, ça évite les problèmes que
j'exposais ?
Je ne comprends pas tes questions : "DownloadToFile", en quoi que tu parles là ??? Forum "FR" ici :o) --------
"scraper" a écrit dans le message de news: O5JzYKu$
Bonjour à tous !
j'utilise la fonction suivante pour télécharger des fichiers depuis le net :
'--- Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ... Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename, BINDF_GETNEWESTVERSION, 0&) If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des accélérateurs de téléchargement, etc, est paramétré pour prendre en charge les extensions de fichiers que je veux télécharger, il se lance lors du téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je l'ai prévu (dans le répertoire de mon exe) ... y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou autre chose ?) ou bien est ce impossible ? sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur pour télécharger ces fichiers ?
Je ne comprends pas tes questions : "DownloadToFile", en quoi que tu
parles là ???
Forum "FR" ici :o)
--------
"scraper" <scraper@pasdespam.fr> a écrit dans le message de news:
O5JzYKu$EHA.3700@tk2msftngp13.phx.gbl...
Bonjour à tous !
j'utilise la fonction suivante pour télécharger des fichiers depuis le net
:
'---
Private Declare Function URLDownloadToFile Lib "urlmon" Alias
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal
szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As
Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ...
Public Function DownloadFile(URL As String, LocalFilename As String) As
Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename,
BINDF_GETNEWESTVERSION, 0&)
If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des
accélérateurs de téléchargement, etc, est paramétré pour prendre en charge
les extensions de fichiers que je veux télécharger, il se lance lors du
téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je
l'ai
prévu (dans le répertoire de mon exe) ...
y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou
autre chose ?) ou bien est ce impossible ?
sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur
pour télécharger ces fichiers ?
merci
--
Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm
Je ne comprends pas tes questions : "DownloadToFile", en quoi que tu parles là ??? Forum "FR" ici :o) --------
"scraper" a écrit dans le message de news: O5JzYKu$
Bonjour à tous !
j'utilise la fonction suivante pour télécharger des fichiers depuis le net :
'--- Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Const BINDF_GETNEWESTVERSION As Long = &H10
'Télécharger des Fichiers ... Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0&, URL, LocalFilename, BINDF_GETNEWESTVERSION, 0&) If lngRetVal = 0 Then DownloadFile = True
End Function
'----
ce qui fonctionne pas trop mal, ma foi ! :-)
seul hic : je viens de m'apercevoir que, si un programme tel que des accélérateurs de téléchargement, etc, est paramétré pour prendre en charge les extensions de fichiers que je veux télécharger, il se lance lors du téléchargement ...
or ça me gêne, car j'ai besoin de mettre ces fichiers exactement où je l'ai prévu (dans le répertoire de mon exe) ... y a t il un moyen d'éviter cela ? (par l'utilisation d'une autre API, ou autre chose ?) ou bien est ce impossible ? sinon, comment puis je intercepter l'emplacement choisi par l'utilisateur pour télécharger ces fichiers ?
Bonjour LE TROLL (dans news:uhQMbSx$) tu nous disais :
Ah Scra-peur !!!
ah TROp-nuLL (on continue à s'écorcher les pseudos, ou tu me lâches ;-)
Je ne comprends pas tes questions : "DownloadToFile", en quoi que tu parles là ??? Forum "FR" ici :o)
c'est ça ... alors seulement pour toi (que les autres m'excusent ;-) vois le nouveau titre du post .... et cherche l'API correspondante ! :-( (tu me posteras le *lien* en français, SVP, que ça puisse m'aider ;-)
j'arrêterai là : ce soir, c 'est pas le jour ...
NB : un *chat* est un *chat* et si c'est les anglais qui ont inventé la fonction qui le caractérise sous Windows, alors, ça s'appellera "a cat" :-) (avec ou sans toi, j'en ai peur ...
Bonjour LE TROLL
(dans news:uhQMbSx$EHA.2104@TK2MSFTNGP14.phx.gbl)
tu nous disais :
Ah Scra-peur !!!
ah TROp-nuLL (on continue à s'écorcher les pseudos, ou tu me lâches ;-)
Je ne comprends pas tes questions : "DownloadToFile", en quoi que
tu parles là ???
Forum "FR" ici :o)
c'est ça ... alors seulement pour toi (que les autres m'excusent ;-)
vois le nouveau titre du post .... et cherche l'API correspondante ! :-(
(tu me posteras le *lien* en français, SVP, que ça puisse m'aider ;-)
j'arrêterai là : ce soir, c 'est pas le jour ...
NB : un *chat* est un *chat* et si c'est les anglais qui ont inventé la
fonction qui le caractérise sous Windows, alors, ça s'appellera "a cat" :-)
(avec ou sans toi, j'en ai peur ...
--
Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm
Bonjour LE TROLL (dans news:uhQMbSx$) tu nous disais :
Ah Scra-peur !!!
ah TROp-nuLL (on continue à s'écorcher les pseudos, ou tu me lâches ;-)
Je ne comprends pas tes questions : "DownloadToFile", en quoi que tu parles là ??? Forum "FR" ici :o)
c'est ça ... alors seulement pour toi (que les autres m'excusent ;-) vois le nouveau titre du post .... et cherche l'API correspondante ! :-( (tu me posteras le *lien* en français, SVP, que ça puisse m'aider ;-)
j'arrêterai là : ce soir, c 'est pas le jour ...
NB : un *chat* est un *chat* et si c'est les anglais qui ont inventé la fonction qui le caractérise sous Windows, alors, ça s'appellera "a cat" :-) (avec ou sans toi, j'en ai peur ...