Name of the image

Snitz™ Forums 2000
https://forum.snitz.com/forumTopic/Posts/70211?pagenum=1
05 November 2025, 01:57

Topic


top
Name of the image
17 May 2012, 05:30



Thanks in advance
I want to write the code name of the uploaded image when shown in this figure
Code:
<CENTER> 
<TABLE BORDER=1 WIDTH=506 Background="https://encrypted-tbn3.google.com/images?q=tbn:ANd9GcRXTgCb70pk-RNIRvAG3VBhbHxrIzj8lJQGwfy6aGqvG96IUuqE" height="419"> <TR><TD ALIGN=CENTER>
<h1 align="right"> <h1 align="right"> <h1 align="right"> <p align="right"> </p>
<p align="right"> </p>
<p align="right"> </p>
<h1 align="right">
<FONT COLOR="white" FACE="DecoType Naskh" SIZE="5"> Name image</FONT> </center> </marquee></TD></TR></TABLE></center>


Add a line to write the image name upload.html
Add a column name of the image inside the Database
Text to show the image with the code name

I need help

 

Replies ...


Carefree
17 May 2012, 19:00


Which mod does this belong to? Don't recall any upload program which used an "upload.html" file.
If you change that code to asp and response.write format, you could start with something like this. I'm assuming the image name you want displayed is the background image? If so, that name is probably in a field in the database already. So you'd change the (CONDITIONS) to say something like this ENCODED_IMAGE = '" & trim(Request.Form("imagecode")) & "'

Code:

<%
strSql = "SELECT IMAGE_NAME, ENCODED_IMAGE FROM [TABLE] WHERE (CONDITIONS)"
Set rsImage=my_Conn.Execute(strSql)
If not rsImage.EOF Then
strImageName = rsImage("IMAGE_NAME")
strEncodedImage = rsImage("ENCODED_IMAGE")
rsImage.Close
End If
Set rsImage = Nothing
Response.Write "<table align=""center"" border=""1"" width=""506px;"" background=""https://encrypted-tbn3.google.com/images?q=tbn:" & strEncodedImage & """ height=""419"">" & vbNewLine & _
" <tr valign=""middle"">" & vbNewLine & _
" <td align=""center"">" & vbNewLine & _
" <h1><br /><br /><br /><br /><br /><br /><br /></h1>" & vbNewLine & _
" <font color=""white"" face=""decotype naskh"" size=""5"">" & vbNewLine & _
" "<marquee onmouseover=""this.stop();"" onmouseout=""this.start();""><a href=""" & strImageURL & """ & strImageName & ">" & strImageName & "</a>" & vbNewLine & _
" </marquee>" & vbNewLine & _
" </font>" & vbNewLine & _
" </td>" & vbNewLine & _
" </tr>" & vbNewLine & _
"</table>" & vbNewLine
%>
© 2000-2021 Snitz™ Communications