Wrox Home  
Search P2P Archive for: Go

  Return to Index  

asp_web_howto thread: Graphic in Scrolling List


Message #1 by "John Howe" <johnhowe@c...> on Thu, 28 Nov 2002 09:54:56
I have a list which is produced as shown below.

<SELECT NAME="Vehicle" SIZE="10">
' Loop through recordset object, displaying each record.
<%
 Do While Not rsVehicles.EOF
 %>
  <OPTION VALUE =   "<%= rsVehicles("ID")%>" >  <%=PadLeftString(rsVehicles
("year"),"0",4) & "&nbsp; " & PadLeftString(rsVehicles
("vehiclemake")," ",12) & "&nbsp; " & PadLeftString(rsVehicles
("model")," ",10) & "&nbsp;" & PadLeftString(FormatNumber(rsVehicles
("Price"),0)," ",8) & "&nbsp; " & "Euros" & "&nbsp; " & rsVehicles
("hasPicture")%>
<%
  rsVehicles.MoveNext  
Loop

%>

I want to be able to show a thumbnail of a camera on each line where 
haspicture is true. The graphic is in ../images/camera.gif 
I have tried various options but normally only achieve the display of a 
opening quotes. Has anybody got a solution.

Thanks

John
Message #2 by "TomMallard" <mallard@s...> on Thu, 28 Nov 2002 07:50:26 -0800
 Do While Not rsVehicles.EOF

strOption = "<OPTION VALUE=""" & rsVehicles("ID") & """>" &
PadLeftString(rsVehicles
("year"),"0",4) & "&nbsp;" & PadLeftString(rsVehicles("vehiclemake")," ",12)
& "&nbsp;" & PadLeftString(rsVehicles("model")," ",10) & "&nbsp;" &
PadLeftString(FormatNumber(rsVehicles("Price"),0)," ",8) & "&nbsp;" &
"Euros" & "&nbsp;"

if rsVehicles("hasPicture") = true then strOption = strOption & "<img
src-""../images/camera.gif"">" & vbcrlf
Response.Write(strOption)
strOption = empty
  rsVehicles.MoveNext
Loop

hth,
tom mallard
seattle

-----Original Message-----
From: John Howe [mailto:johnhowe@c...]
Sent: Thursday, November 28, 2002 9:55 AM
To: ASP Web HowTo
Subject: [asp_web_howto] Graphic in Scrolling List


I have a list which is produced as shown below.

<SELECT NAME="Vehicle" SIZE="10">
' Loop through recordset object, displaying each record.
<%
 Do While Not rsVehicles.EOF
 %>
  <OPTION VALUE =   "<%= rsVehicles("ID")%>" >  <%=PadLeftString(rsVehicles
("year"),"0",4) & "&nbsp; " & PadLeftString(rsVehicles
("vehiclemake")," ",12) & "&nbsp; " & PadLeftString(rsVehicles
("model")," ",10) & "&nbsp;" & PadLeftString(FormatNumber(rsVehicles
("Price"),0)," ",8) & "&nbsp; " & "Euros" & "&nbsp; " & rsVehicles
("hasPicture")%>
<%
  rsVehicles.MoveNext
Loop

%>

I want to be able to show a thumbnail of a camera on each line where
haspicture is true. The graphic is in ../images/camera.gif
I have tried various options but normally only achieve the display of a
opening quotes. Has anybody got a solution.

Thanks

John


Message #3 by "Joe Ingle" <joe@k...> on Thu, 28 Nov 2002 16:09:03 -0000
Correct me if I'm wrong, but you can't put an image in a select list, 
even using css attributes.

Joe

-----Original Message-----
From: TomMallard [mailto:mallard@s...]
Sent: Thursday, November 28, 2002 3:50 PM
To: ASP Web HowTo
Subject: [asp_web_howto] RE: Graphic in Scrolling List


 Do While Not rsVehicles.EOF

strOption =3D "<OPTION VALUE=3D""" & rsVehicles("ID") & """>" &
PadLeftString(rsVehicles
("year"),"0",4) & "&nbsp;" & PadLeftString(rsVehicles("vehiclemake")," 
",12)
& "&nbsp;" & PadLeftString(rsVehicles("model")," ",10) & "&nbsp;" &
PadLeftString(FormatNumber(rsVehicles("Price"),0)," ",8) & "&nbsp;" &
"Euros" & "&nbsp;"

if rsVehicles("hasPicture") =3D true then strOption =3D strOption & 
"<img
src-""../images/camera.gif"">" & vbcrlf
Response.Write(strOption)
strOption =3D empty
  rsVehicles.MoveNext
Loop

hth,
tom mallard
seattle

-----Original Message-----
From: John Howe [mailto:johnhowe@c...]
Sent: Thursday, November 28, 2002 9:55 AM
To: ASP Web HowTo
Subject: [asp_web_howto] Graphic in Scrolling List


I have a list which is produced as shown below.

<SELECT NAME=3D"Vehicle" SIZE=3D"10">
' Loop through recordset object, displaying each record.
<%
 Do While Not rsVehicles.EOF
 %>
  <OPTION VALUE =3D   "<%=3D rsVehicles("ID")%>" >  
<%=3DPadLeftString(rsVehicles
("year"),"0",4) & "&nbsp; " & PadLeftString(rsVehicles
("vehiclemake")," ",12) & "&nbsp; " & PadLeftString(rsVehicles
("model")," ",10) & "&nbsp;" & PadLeftString(FormatNumber(rsVehicles
("Price"),0)," ",8) & "&nbsp; " & "Euros" & "&nbsp; " & rsVehicles
("hasPicture")%>
<%
  rsVehicles.MoveNext
Loop

%>

I want to be able to show a thumbnail of a camera on each line where
haspicture is true. The graphic is in ../images/camera.gif
I have tried various options but normally only achieve the display of a
opening quotes. Has anybody got a solution.

Thanks

John




  Return to Index