<%
	            shjiaid=request.QueryString("id")
                set rsl=server.CreateObject("adodb.recordset")
				rsl.open "select * from shop_shjialink where shjiaid="&shjiaid,conn,1,1
				if rsl.eof and rsl.bof then
				response.write("")
				else
				%>
				<%do while not rsl.eof%>
				<%if rsl("logourl")<>"" then%><a href="<%=rsl("url")%>"><img src=<%=rsl("logourl")%> width="88" height="33" border=0></a><%else%><a href="<%=rsl("url")%>"><strong><%=rsl("linkname")%></strong></a><%end if%>
				<%   
				rsl.movenext
				loop
				rsl.close
				set rsl=nothing
				end if
				%>