| View previous topic :: View next topic |
| Author |
Message |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
Posted: Tue May 06, 2008 7:39 am Post subject: some questions about VB6 |
|
|
1. how do i download something from a link?
2. how do i make him search a textfile for some words/letters?
3. what do i use for a part i dont know/ i dont care about
example:
i want him to search for every url begining with "www." and ending with ".gif"
_________________
|
|
| Back to top |
|
 |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
Posted: Tue May 06, 2008 8:00 am Post subject: |
|
|
| mas8rx8 wrote: | Google anyone? anyone? www.google.com
1) UrlDownloadFileA? |
and you think i havent tried google?....
not helpfull
_________________
|
|
| Back to top |
|
 |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
Posted: Tue May 06, 2008 8:52 am Post subject: |
|
|
| mas8rx8 wrote: | Google search string "Howto download a file in VB6"
1st link,
| Code: | 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
URLDownloadToFile 0, "http://www.microsoft.com/ms.htm", "c:\ms.htm", 0, 0) |
|
lol and now tell me how it works
lets see...
i make variables...
3 long, 2 string and convert them all to one long? why?
_________________
Last edited by 92Garfield on Tue May 06, 2008 8:59 am; edited 1 time in total |
|
| Back to top |
|
 |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
Posted: Tue May 06, 2008 9:01 am Post subject: |
|
|
| mas8rx8 wrote: | You should really learn the basics of VB6, declarations: 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
then you call
URLDownloadToFile 0, "http://www.microsoft.com/ms.htm", "c:\ms.htm", 0, 0)
to download something to somewhere.
I am totally serious, go learn the basics of VB6 |
i make variables...
3 long, 2 string and convert them all to one long? why?
then in the end i do ")" why? there is no "(" and why the much "0"s?
and the begining will cause an error wait i post screen
wait a sec im translating...
| Quote: | Error while compiling:
After End Sub, End function or end properity may only be (/stand) a comment |
_________________
Last edited by 92Garfield on Tue May 06, 2008 9:05 am; edited 1 time in total |
|
| Back to top |
|
 |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
Posted: Tue May 06, 2008 9:08 am Post subject: |
|
|
| mas8rx8 wrote: | Give a picture of full screen, not only the msgbox.
Also, why are you ignoring my comment: "Go learn the basics of VB6" |
as long as you cant explain the code by urself you shouldnt say such things
the error is clear...
i cant put
"private declare function" just below "private sub ..."
"Go learn the basics of VB6"
_________________
|
|
| Back to top |
|
 |
92Garfield I'm a spammer
Reputation: 57
Joined: 20 Dec 2007 Posts: 5871 Location: Banana Republic Germany
|
|
| Back to top |
|
 |
atom0s Moderator
Reputation: 205
Joined: 25 Jan 2006 Posts: 8585 Location: 127.0.0.1
|
|
| Back to top |
|
 |
|