请问大家
请问大家一个问题 我搞了一个网站 为什么页面 第一次打开 就是无法显示 一定要刷新一下才显示出来但是有时候一打开又可以 真是怪
我在说清楚点 就是打开首页后会显示 点连接的地方 show.asp 这个地方 就不显示了 就一定要刷新才会显示出来
首页连接是：<table width="100%" height="194" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top"><br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="33%" height="115" align="center" valign="top">
<table width="98%" height="77" border="0" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2"><a href="show.asp?id=<%=rs("id")%>"><img src=subimage.asp?id=<%=rs("id")%>&pic=big border="0"></a></td>
</tr>
<tr valign="top">
<td height="30" colspan="2"><b><%=rs("subsname")%></b></td>
</tr>
<tr>
<td colspan="2"><%=replace(rs("content"),chr(13),"<br>")%></td>
</tr>
<tr>
<td width="44%" height="30" valign="bottom"><font color="#FF0000">
<%=rs(4)%></font> <%=rs("subsunit")%></td>
<td width="50%" align="center" valign="bottom"><a href="check.asp?id=<%=rs("id")%>"><img src="image/bu.gif" width="12" height="12" border="0">立即订购</a></td>
</tr>
</table></td>
连接到 show.asp 的页面
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%response.Buffer=true%>
<!--#include file="conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/check.asp"-->
<!--#include file="top.asp"-->
<%
dim SQLin
id=request("id")
SQLin=insql(id,1,0)
if SQLin="true" then
Response.redirect"error.asp?msg=data_error_false2"
end if%>
<%
y=session("dllevel")
if y="" or y="0" then
ak="iftj"
else
ak="jiage"&y
end if
sql="select top 1 ealin_subs.id as id,ealin_subs.meo as meo,ealin_subs.subsnum as subsnum,ealin_subs.subsname as subsname,ealin_subs.content1 as content1,ealin_ as cname,ealin_subs.price as price,ealin_subs.subsunit as subsunit,ealin_subs."&ak&" as jiage,class.info as info from ealin_subs,class where ealin_subs.id="&id&" and ealin_ order by ealin_subs.id"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
if rs.bof or rs.eof then
Response.redirect"index.asp"
end if
id=rs("id")
cname=rs("cname")
subsname=rs("subsname")
price=rs("price")
jiage=rs("jiage")
subsnum=rs("subsnum")
meo=rs("meo")
subsunit=rs("subsunit")
info=rs("info")
info=replace(info,chr(13),"<br>")
info=replace(info,chr(32)," ")
temp=rs("content1")
if temp<>"" then
content = replace(rs("content1"),chr(13),"<br>")
else
content="<font color=red>还没说商品的详细说明，请咨询管理员！</font>"
end if
rs.close
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%>--<%=subsname%></title>
<link href="data/main.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.td1 {
border-top-width: 1px;
border-bottom-width: 1px;
border-top-style: solid;
border-bottom-style: solid;
border-top-color: #cccccc;
border-bottom-color: #cccccc;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>
<body background="image/background.gif" leftmargin="0" topmargin="0">
<!--#include file="ad.asp"-->
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="border">
<table width="766" height="364" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="200" height="364" align="center" valign="top" class="border3">
<table width="95%" height="364" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="355" align="center" valign="top" ><!--#include file="userlogin.asp"--><!--#include file="kefu.asp"--></td>
</tr>
</table></td>
<td align="center" valign="top" class="border2"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" align="center" background="image/sub_bg.gif">
<% =cname%>
</td>
</tr>
<tr>
<td height="50" valign="top" class="tdborder">
<% =info%>
</td>
</tr>
</table>
<br><br>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="22%" height="120" align="center" valign="middle" class="td1"><a href="show.asp?id=<%=id%>"><img src=subimage.asp?id=<%=id%>&pic=small border="0"></a></td>
<td width="78%" valign="top" class="td1">
<TABLE cellSpacing=0 cellPadding=5 width="100%"
align=right border=0>
<TBODY>
<TR bgColor=#f5f5f5>
<TD height=18><B>编?号：</B><% =subsnum %></TD>
<TD height=18><b>服务商：</b><% =webname %></TD>
</TR>
<TR bgColor=#FFFFFF>
<TD height=18 colspan="2"><B>名?称：</B><%=subsname%></TD>
</TR>
<TR bgColor=#f5f5f5>
<TD width="49%" height=18><B>市场价：</B><FONT color=#FF0000><%=price%></FONT> <%=subsunit%></TD>
<TD width="51%" height=18><B><%if session("ealin_dllevel")<>"" then%><%=session("ealin_dllevel")%><%else%>会员<%end if%>价：</B><%if session("ealin_uid")<>"" then %><FONT color=#FF0000><%=jiage%></FONT> <%=subsunit%><%else%><FONT color=#FF0000>登录查询 </FONT><%end if%></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
</table>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" colspan="2"> </td>
</tr>
<tr>
<td height="32" colspan="2" valign="top"><%=content %></td>
</tr>
<tr>
<td width="38%" height="25" align="center"><a href="check.asp?id=<%=id%>"><img src="image/buy.gif" width="79" height="21" border="0"></a></td>
<form name="form3" method="post" action="">
<td width="62%" align="center">查看
<select name="id" size="1" onChange="MM_jumpMenu('parent',this,0)">
<option value="" selected><%=cname%>其他商品</option>
<%
sql="select id,subsname from ealin_subs where cname='"&cname&"' and subsnum<>'"&subsnum&"'"
rs.open sql,conn,1,1
while not rs.eof
%>
<option value="show.asp?id=<%=rs("id")%>"><%=rs("subsname")%></option>
<%
rs.movenext
wend
rs.Close()
set rs=nothing
%>
</select>
</td></form>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<!--#include file="end.asp"-->
[[it] 本帖最后由 小小可爱 于 2008-7-29 23:02 编辑 [/it]]
