Potrebna pomoc. Downloader - Za ozbiljnije poznavaoce VB

Potrebna pomoc. Downloader - Za ozbiljnije poznavaoce VB

offline
  • Pridružio: 14 Feb 2008
  • Poruke: 12340

Caos, naleteo sam na kod koji mi puno treba. U pitanju je kod za download sa nekog sajta. Ali imam problem 'ocu da korisnik upise putanju gde ce da sacuva fajl. Evo koda :

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 Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean Dim lngRetVal As Long lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0) If lngRetVal = 0 Then DownloadFile = True End Function DownloadFile "http://www.nesto.com/fajl.zip", "c:\programzip"

Probao sam da dodam ineger i textbox ali nece :

Dim mesto as String mesto = text1.text DownloadFile "http://www.nesto.com/fajl.zip", mesto

Ali nece uopste da prihvati taj kod. Logicno je da prihvati. Verovatno neka mala sitnica. Kod je vrlo vazan pa vas molim ako neko moze da pomogne... Hvala



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 05 Mar 2007
  • Poruke: 81

Koliko vidim, srz funkcije je ova funkcija:
URLDownloadToFile(0, URL, LocalFilename, 0, 0)
Probaj samo nju da pokrenes da vidis da li ce raditi. Ako radi, ostalo mozes i sam da napravis/nije ti mnogo bitno.



offline
  • Srđan Tot
  • Am I evil? I am man, yes I am.
  • Pridružio: 12 Jul 2005
  • Poruke: 2483
  • Gde živiš: Ljubljana

Kad bi nam rekao koju gresku dobijes, mozda bi ti neko pomogao Smile
Da li si probao sa zagradama?

Dim mesto as String mesto = text1.text DownloadFile("http://www.nesto.com/fajl.zip", mesto)

offline
  • Pridružio: 14 Feb 2008
  • Poruke: 12340

@Srki
Ma ne covece kad napisem ovo:

DownloadFile "xxx", "C:\" 'onda radi

A sa strigom pojavi gresku fajl mismatch. Treba da radi sa stringom logicno je da radi.

Ko je trenutno na forumu
 

Ukupno su 581 korisnika na forumu :: 9 registrovanih, 3 sakrivenih i 569 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: amstel, Despot1, djo97, djordje92sm, ivan979, Klecaviks, Miskohd, Snorks, vasa.93