LiveWire Network Peer Answers Peer Support Teen Forums Tech Forums College Forums 419 users online 221652 members 493 active today Advertise Here Sign In
TeenCollegeTechPhotos | Quizzes | LiveSecret | Memberlist | Dictionary | News | FAQ
Member Spotlight
Booty n Tits
I haven't filled out my profile...
Days Active: 19
You have 1 new message.
Emergency Help
Until you sign up you can't do much. Yes, it's free.

Sign Up Now
Membername:
Password:
Already have an account?
Invite Friends
Active Members
Groups
Contests
Moderators
4 online / 13 MPM
Fresh Topics
  LiveWire / Technical Forums / Programming & Application Development / Viewing Topic

VB6 - URL as Image box location
Replies: 2Last Post June 2, 2006 6:48am by masterfultemptation
Welcome to LiveWire!
We're Stronger Together.
Join the Community
Single page for this topic Email Print Favorite
( masterfultemptation )


Visionary

Patron
Reply
Okay so I a URL of an image...but when I set the image box's location to the URL, it says type mismatch.
This is the code now:

ArtistImage.Picture = "http://home.cogeco.ca/~nickj/new.gif"

Is there a way to get the image from that URL into the image box without using a Winsock control to download it?


5:08 pm on June 1, 2006 | Joined: May 2006 | Days Active: 383
Join to learn more about masterfultemptation Ontario, Canada | Straight Male | Posts: 4,550 | Points: 9,031
LiveWire Humor
telomere13


Dairy Product Addict

Patron
Tech Support Leader
Reply
I don't know of a way offhand using an image box, but perhaps you can cheat by using a webbrowser control and directing it to that URL.

-------
http://www.golivewire.com/forums/peer-yatapys-support-a.html

6:31 pm on June 1, 2006 | Joined: April 2005 | Days Active: 1,293
Join to learn more about telomere13 Wisconsin, United States | Label Free Male | Posts: 5,422 | Points: 31,312
( masterfultemptation )


Visionary

Patron
Reply
yeah, i was thinking about that...but i dont want the scroll boxes and am too lazy to find a way to get rid of them.  actually, i tried this and it seems to work:

Code:

Dim Array1() As Byte, FileNumber As Long, TempFile As String
TempFile = App.Path & "temp.jpg"
Array1() = Inet1.OpenURL(ImageURL, icByteArray)
FileNumber = FreeFile
Open PicFile For Binary Access Write As #FileNumber
Put #FileNumber, , Array1()
Close #FileNumber
imgArtist.Picture = LoadPicture(PicFile)
Kill PicFile


6:48 am on June 2, 2006 | Joined: May 2006 | Days Active: 383
Join to learn more about masterfultemptation Ontario, Canada | Straight Male | Posts: 4,550 | Points: 9,031
Single page for this topic Email Print Favorite

Quick Reply

You are signed in as our guest.

Looking for something else?
 

  LiveWire / Technical Forums / Programming & Application Development / Viewing Topic