<% action=request.QueryString("id") select case action case 1: img="18.jpg" case 8: img="19.jpg" case 9: img="20.jpg" case 10: img="26.jpg" case 2: img="24.jpg" case 11: img="28.jpg" end select%>
 
<%if request("action1")="tw" then if request("ynjd_content")="" then response.write("") else sql="insert into ynjd(ynjd_name,ynjd_tel,ynjd_content,ynjd_sex) values('"&request.Form("ynjd_name")&"','"&request.Form("ynjd_tel")&"','"&request.Form("ynjd_content")&"','"&request.Form("ynjd_sex")&"')" conn.execute(sql) response.write("") end if end if %>
欢迎光临扬中市宏维工具有限公司,如有任何疑问,可以直接在线提问,我们将为你提供满意的解答!
姓名:
性别:
联系方式:  
内容
<% sql="select * from ynjd order by ynjd_id desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 page=request.QueryString("page") if IsNumeric(page) then page=cint(page) if page<1 then page=1 else page=1 end if everypage=2 rs.pagesize=everypage if rs.bof and rs.eof then response.Write("no messgae now") else page_count=rs.pagecount rs.AbsolutePage=page end if %> <% do while not rs.eof and j <%if rs("ynjd_hf")<>"" then%> <%end if%>
<%if session("sex")=1 then %> <%else%> <%end if%>
<%=rs("ynjd_name")%>
在线留言内容:
留言时间:<%=rs("ynjd_date")%>
<%=rs("ynjd_content")%>
滔华回复
<%=rs("ynjd_hf")%>
<% j=j+1 rs.movenext loop %>
记录 <%=page%> 到 <%=page_count%>    <% if page=1 then Response.Write"<< 前一页" else Response.Write"<< 前一页" end if for j=page-4 to page-1 if j>0 then%> <%=j%> <%end if next for j=page to page+4 if j<=page_count then if j=page then%> [<%=j%>] <%else%> <%=j%> <%end if end if next if page 下一页>> <%else%> 下一页>> <%end if%>