產品展示 | Products
 
           公司簡介 | About Us
當前位置:首頁→ 在線留言

 
 
<% IF (output=true and session("postboard_admin")=true) or not output=true THEN if x0=empty or not isNUMERIC(x0) then x0=0 elseif x0>30 then x0=30 elseif x0<-30 then x0=-30 end if if x0<>0 then rs.open "select * from message order by id "&list(x0),conn,1 maxX=1 maxY=abs(x0) elseif x0=0 then response.write(licence) response.end end if rs.pagesize=maxX*maxY '設置和計算每頁的記錄數,即每頁共多少圖片 dim everypagesize,rscount,curpage,pgcount '每頁記錄數,總記錄數,當前頁數,總頁數 everypagesize=rs.pagesize rscount=rs.recordcount pgcount=rs.pagecount if request.form("page")=empty or not isNumeric(request.form("page")) then if isNumeric(request.querystring("page")) then curpage=cint(request.querystring("page")) else curpage=1 end if else curpage=cint(request.form("page")) end if if curpage=empty or curpage<1 then curpage=1 elseif curpage>pgcount then curpage=pgcount end if if not rs.eof=true and not rs.bof=true then rs.absolutepage=curpage '設置當前頁數 end if %>

<% IF rs.eof=true and rs.bof=true THEN %>
 

還沒有任何留言
There are not any messages !

<% ELSE i=1 While not rs.eof and i<=maxY response.write("") response.write("") response.write("") IF rs("shield").value=true then '檢查shield是否為TRUE以判斷此記錄是否已被屏蔽 response.write("") ELSE '否則正常顯示標題 if lenB(rs("title").value)>abs(lt)*2 then response.write("") else response.write("") end if END IF '檢查SHIELD完畢 response.write("") response.write("") response.write("") IF session("postboard_admin")=true then '最近的更新方向為管理員管理,及根限設定 response.write("") else response.write("屏蔽留言") end if END IF response.write("
"&rs("id")&"樓
標題: 不顯示
&rs(
&rs(
") IF rs("shield").value=true then '檢查shield是否為TRUE以判斷此記錄是否已被屏蔽 response.write("
【作者】不顯示【發表時間】"&rs("date").value&"
") '如果是則不顯示留言 response.write("
【留言內容】

  此留言已被管理員屏蔽!

") ELSE '否則正常顯示 if len(rs("name").value)<=25 then response.write("
【作者】"&rs("name").value&"【發表時間】"&rs("date").value&"
") else response.write("
【作者】"&mid(rs("name").value,1,25)&"...【發表時間】"&rs("date").value&"
") end if response.write("
【留言內容】

  "&rs("content").value&"

") END IF '檢查SHIELD完畢 IF rs("reply")<>empty THEN' 查看有沒有管理員回復,有則顯示回復 response.write("
-------------------------
【管理員回復】

  "&rs("reply").value&"

") END IF response.write("
管理操作|回復留言 | 刪除留言 | ") if rs("shield").value=true then response.write("解除屏蔽
") response.write("
") i=i+1 rs.movenext Wend END IF %> <% response.write("") if curpage>1 then response.write(""&chr(13)&""&chr(13)&""&chr(13)&"") else response.write("  "&chr(13)&"") end if response.write(""&chr(13)&"") END IF %>

上一頁  ") else response.write("
") end if IF curpage<10 THEN '如果當前頁少于10 If pgcount>10 Then '又如果總頁數大于10 for k=1 to 10 '則顯示可連頁數為1到10 if k<>curpage then response.write("["&k&"] ") else response.write("["&k&"] ") end if next '<當前頁少于10且總頁數大于10>情況處理完畢 Else '否則,即總頁數小于等于10 for k=1 to pgcount '則顯示可連頁數為1到總頁數 if k<>curpage then response.write("["&k&"] ") else response.write("["&k&"] ") end if next '<當前頁少于10且總頁數小于等于10>情況處理完畢 End if '<如果當前頁數少于10>的情況處理完畢 ELSEIF curpage>=10 then '如果當前頁數大于等于10 If curpage+5curpage then response.write("["&k&"] ") else response.write("["&k&"] ") end if next Elseif curpage+5>=pgcount then '但如果當前頁加5后大于等于總頁數 for k=curpage-5 to pgcount '則顯示可連頁為當前頁減5到總頁 if k<>curpage then response.write("["&k&"] ") else response.write("["&k&"] ") end if next End if '<當前頁大于等于10>情況處理完畢 END IF if curpage下一頁

"&pgcount&"頁 當前第"&curpage&"頁  
| page | 首頁 | 未頁 | ") IF latest=true THEN if x0<0 then response.write("最新留言 | ") elseif x0>0 then response.write("最新留言 | ") end if END IF response.write("
發表留言  

  標題 title:

   *
  姓名 name:    value="管理員"<%end if%> name="name" type="text" id="name" style="BORDER-RIGHT: #D7E8FF 1px solid; BORDER-TOP: #D7E8FF 1px solid; BORDER-LEFT: #D7E8FF 1px solid; BORDER-BOTTOM: #D7E8FF 1px solid; BACKGROUND-COLOR: #F7FAFF" onMouseOver="this.style.backgroundColor='#ffffff'" onMouseOut="this.style.backgroundColor='#F7FAFF'" title="This value is your IP Address if value is empty" maxlength="40"> <% if writename=true then%> * <%end if%>
  電郵 E-mail:   
    留言內容
content of message
   *
 
<% if session("postboard_admin")=true then response.write("  |  注銷管理員登陸  |  進入管理中心") end if %>

   
 

地址:浙江省嵊州市領帶工業園區園四路11號
傳真:0575-3349555   網絡實名:漢邦紡機

版權所有©2009-2010:紹興市漢邦紡織機械有限公司
copyright© : Shaoxing Hanbang Textile Machinery co.Ltd.
国产美腿白丝袜在线播放