Support Forums

(08-14-2011, 08:13 AM)Fragma Wrote: [ -> ]What errors are you getting? The code I gave you might not work 100% it was just an example.

Edited the post above you.
Take a look it might be easier for you to see what is wrong now.

Remove the " after combobox2.Text

(08-14-2011, 08:18 AM)Fragma Wrote: [ -> ]

Code:

Dim myDatabuffer As Byte() = myWebClient.DownloadData("http://www.xe.com/ucc/convert/?Amount=" & amount.text & "&From=" & combobox1.text & "&to=" & combobox2.Text ")

Remove the " after combobox2.Text

Now I only have one error left.
The error is in this code:

It'll be because of "right". Not sure if this will work but try:

(08-14-2011, 08:23 AM)Fragma Wrote: [ -> ]It'll be because of "right". Not sure if this will work but try:

Code:

"<td align="""right""">", "</td>", 0

Damn, it still doesn't work.

By the way I've just read this in the pages source:
WARNING: Automated extraction of rates is prohibited under the Terms of Use.

Not sure why they wouldn't allow it, but it might be worth contacting them just in case?

I'll have a look into that bit of code anyway, give me a few minutes.

(08-14-2011, 08:36 AM)Fragma Wrote: [ -> ]By the way I've just read this in the pages source:
WARNING: Automated extraction of rates is prohibited under the Terms of Use.

Not sure why they wouldn't allow it, but it might be worth contacting them just in case?

I'll have a look into that bit of code anyway, give me a few minutes.

Well it's mostly for learning purpose.
So I can study the code and get a understanding of it, and hopefully see it working.

Seems to work OK.

(08-14-2011, 08:49 AM)Fragma Wrote: [ -> ]

Code:

Dim CON As String = GetBetween(download, _
       "46%"" align=""left"">", "&nbsp", 0)

Seems to work OK.

Thanks a lot mate.
It works fine now

No problem, glad I could help.