<% option explicit Response.Buffer = true if session("company_id") <> "" then dim conn dim ssql dim rs %> <% ssql = "select * from tbl_partner where partner_id = '" & Request.QueryString("partner_id") & "'" set rs = server.CreateObject("adodb.recordset") rs.Open ssql,conn,3,3 %>

EDIT PARTNER
PARTNER NAME :
PARTNER WEB URL :
PARTNER EMAIL :
CURRENT PARTNER LOGO :	<% if len(rs("partner_logo")) > 0 then %> <% = rs("partner_logo") %> <% end if %>
UPLOAD NEW PARTNER LOGO :
&partner_logo=<% = rs("partner_logo") %>','_self')" />

<% rs.Close conn.Close set rs = nothing set conn = nothing else Response.Redirect "../../index.asp" end if %>