谁有简单的ASP购物网站留言板代码？
你要这个代码需要数据库的,下面是主页面的代码,需要全部的代码,加我Q,我传给你!想要购物类留言板,那是没有你想象的那么简单!(这里是第一部分) ASP简易留言板--ASP simple postboard v1.21 A:link,A:active,A:visited{TEXT-DECORATION:none ;Color:#3C2F1D} A:hover{TEXT-DECORATION: underline;Color:#4455aa} BODY{ FONT-SIZE: 12px; COLOR: #000000; FONT-FAMILY: 宋体; background-color: #ECF5FF; background-image: url(); } font{line-height : normal ;} td { table-layout:fixed; word-break :break-all; font-family:"宋体"; font-size: 12px; line-height: 15px; } th { background-color: #877C59; COLOR: #F4F2EC; font-size: 12px; font-weight:bold; } .style1 {color: #FFFFFF} function high(x2){ obj=x2 highlighting=setInterval("highlightit(obj)",80) } function highlightit(x){ if (x.filters.alpha.opacity elseif document.pencil.name.value="" then alert("Please write your name!") exit sub elseif len(document.pencil.content.value)>200 then alert("留言内容长度不能超过２００字符!") exit sub elseif document.pencil.title.value="" then alert("Please write title!") exit sub else document.pencil.submit end if end sub --> 30 then x0=30 elseif x00 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 curpagepgcount then curpage=pgcount end if if not rs.eof=true and not rs.bof=true then rs.absolutepage=curpage '设置当前页数 end if %> 还没有任何留言There are not any messages !
") response.write("") response.write(""&rs("id")&"楼") IF rs("shield").value=true then '检查shield是否为TRUE以判断此记录是否已被屏蔽 response.write("标题： 不显示 ") ELSE '否则正常显示标题 if lenB(rs("title").value)>abs(lt)*2 then response.write("标题： "&mid(rs("title").value,1,abs(lt))&"... ") else response.write("标题： "&rs("title").value&" ") end if END IF '检查SHIELD完毕 response.write("") response.write("") response.write("") IF rs("shield").value=true then '检查shield是否为TRUE以判断此记录是否已被屏蔽 response.write("【作者】不显示【发表时间】"&rs("date").value&"") '如果是则不显示留言 response.write("【留言内容】
此留言已被管理员屏蔽！
") ELSE '否则正常显示 if len(rs("name").value)【作者】"&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 session("postboard_admin")=true then '最近的更新方向为管理员管理,及根限设定 response.write("管理操作|回复留言 | 删除留言 | ") if rs("shield").value=true then response.write("解除屏蔽") else response.write("屏蔽留言") end if END IF response.write("") response.write("") i=i+1 rs.movenext Wend END IF %>
asp + js 如何过滤留言
function ys(s) {if(checkstr(s)>250) {alert("Too many words,Please appropriate reduction !") event.returnValue=false } } function checkstr(str) {num=str.length var arr=str.match(/[^\x00-\x80]/ig) if(arr!=null)num+=arr.length return num } 这段JS不能控制 回车 不知道能不能给分 呵呵
