意见留言表单代码（简单网页留言板代码）

本篇文章给大家谈谈意见留言表单代码，以及简单网页留言板代码对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、网页留言板的代码
• 2、网页留言板代码
• 3、解释分析PHP留言板代码 急！好的 详细的加高分！
• 4、web编程 留言板代码实现留言板输入和查看…

网页留言板的代码

meta http-equiv="Content-Type" content="text/html;charset=gb2312"

%@ Language=VBScript %

!--#INCLUDE FILE="config.asp" --

!--#INCLUDE FILE="guest_lib.asp" --%

dim ASPBook

dim StrSQL

if not isempty(request("page")) then

Mypage=cint(Request("page"))

else

Mypage=1

end if

set ASPBook = Server.CreateObject("ADODB.Recordset")

StrSQL = "Select * from guest order by ID desc"

ASPBook.open StrSQL,conn,1,1

ASPBook.pagesize=Mypagesize

maxpages=cint(ASPBook.pagecount)

totalsize=cint(Mypagesize)

ASPBook.absolutepage=Mypage

GuestTotal=ASPBook.RecordCount

if cint(Mypage) 1 then

if cint(Mypage) maxpages then

MESSAGE("li没有你所想去的页数！/li")

Response.End

end if

end if

HEADER "显示留言"

MyMenu

%

html

head

title[ 客户留言系统 ]/title

meta http-equiv="Content-Type" content="text/html; charset=gb2312"

link rel="stylesheet" href="css/colorbird.css"

style

BODY {SCROLLBAR-FACE-COLOR: #D4D0C8; SCROLLBAR-HIGHLIGHT-COLOR: #999999; SCROLLBAR-SHADOW-COLOR: #999999; SCROLLBAR-3DLIGHT-COLOR: #FFFFFF; SCROLLBAR-ARROW-COLOR: #000000; SCROLLBAR-TRACK-COLOR: #E3E3E3; SCROLLBAR-DARKSHADOW-COLOR: #666666; }

/style

/head

body bgcolor="#FFFFFF" topmargin="0" leftmargin="0"

p align="center"a href="gb_sign.asp"

img border="0" src="IMAGES/sign.gif" alt="签写留言"/a/p

tdp align="center"font color="#000000"bfont face="Arial" size="1"Total of

font color="#ff0000"%=GuestTotal%/font messages, /font/b/font

font face="Arial"font size="1" color="#ff0000"%=MyPageSize%/fontfont size="1"

messages per page, You are on page/font/font/fontfont color="#FF0000"font size="1" face="Arial"%=cint(Mypage)%/font

%=Greeting%... font color="#000000"%PageLink%/font/p

/font

div align="right"/div/td

div align="center"

center

table width="590" border="0" cellspacing="0" cellpadding="0"

tr

td height="50"a href="gb_sign.asp"img src="IMAGES/shop.gif" alt="签写留言" width="89" height="25" border="0"/a/td

/tr

/table

table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#6699CC" width="590" height="197"

tr

td align="center" height="197"

table width="590" border="0" cellspacing="0" cellpadding="4" style="border-collapse: collapse" height="35" bgcolor="#F7F7F7"

tr

/tr

tr

/tr

/table

table cellspacing="1" border="1" width="592" height="23" style="border-collapse: collapse" cellpadding="0" bgcolor="#C6C3C6" bordercolorlight="#FFFFFF" bordercolordark="#000000" background="table.gif"

tr

td align="right" width="130" height="23"

p align="left"b

font color="#FFFFFF"留言者 :/font/b/p

/td

td align="right" width="445" height="23"

p align="left"b

font color="#FFFFFF"留言内容 :/font/b/p

/td

/tr

/table

table width="590" border="0" cellspacing="0" cellpadding="0"

%

If ASPBook.Eof or ASPBook.Bof then

Response.Write "TR"

Response.Write "TD bgcolor=" Color1 " align=center colspan=6FONT STYLE=font-size:9pt对不起，目前还没有任何留言，如要留言，请按“我要留言”图片！/FONT/TD"

else

i = 0

total = 0

do until ASPBook.Eof or total = totalsize

if i = 0 then

CColor = Color1

else

CColor = Color2

end if

%

tr bgcolor="%=CColor%"

td

table width="590" border="1" cellspacing="8" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111"

tr

/tr

/table

table width="590" border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" height="1"

tr

td width="137" rowspan="3" height="1" valign="top"

table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber2" height="96"

tr

td width="100%" align="center" height="12"b%=ASPBook("名字")%/b/td

/tr

tr

td width="100%" align="center" height="54"%if ASPBook("性别") = "boy" then%

br

img src="images/boy.gif" alt="英俊潇洒的 %=ASPBook("名字")% 先生" align="middle" border="0"

%elseif ASPBook("性别") = "girl" then%

img src="images/girl.gif" alt="美丽又温柔的 %=ASPBook("名字")% 小姐" align="middle" border="0"

br

%end if%/td

/tr

tr

td width="100%" align="center" height="28"Form: %=ASPBook("来自")% /td

/tr

/table

/td

td width="234" height="1"font size="1"

font color="#000000" class="littel"

img src="./icons/em%=ASPBook("表情")%.gif" border="0" align="ABSCENTER"/fontfont color="#0000FF" class="littel"On:

%=ASPBook("留言日期")%/font/fontfont size="1" color="#0000FF"

/font/td

td width="212" height="1"%if ASPBook("邮件")"" then%

a href="mailto:%=ASPBook("邮件")%"

img src="images/email.gif" ALIGN="absmiddle" border="0" width="15" height="16"/a

%end if% %if ASPBook("主页")"" and ASPBook("主页")"http://" then%

a href="%=ASPBook("主页")%" Target="_blank"

img src="images/home.gif" ALIGN="absmiddle" border="0"/a

%end if% %if ASPBook("ICQ")"" then%

img src="images/icq.gif" alt="ICQ：%=ASPBook("ICQ")%" align="absmiddle" border="0" width="15" height="16"

%if ASPBook("OICQ")"" then% %end if%

a href=";%=ASPBook("OICQ")%" target="_blank"

img src="images/oicq.gif" alt="OICQ：%=ASPBook("OICQ")%" align="absmiddle" border="0" width="16" height="16"/a

%end if%

img src="images/ip.gif" alt="%=ASPBook("IP")%" align="absmiddle" border="0" width="13" height="16"

img src="images/system.gif" alt="%=ASPBook("系统")%" align="absmiddle" border="0" width="15" height="16"/td

/tr

tr

td width="450" height="14" colspan="2" valign="top"%=ASPBook("留言")% /td

/tr

tr

%if ASPBook("Reply")"" then%td width="450" height="17" colspan="2" valign="top"

font color="#FF0000"Reply :b /b/font

font color="#0000FF" class="littel" size="1"(%=ASPBook("Reply_Date")%)/fontbr

img src="./icons/em%=ASPBook("Reply_Icon")%.gif" border="0" align="ABSCENTER"%=ASPBook("Reply")%/font/td

%end if%/tr

/table

table width="590" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111"

tr

td width="137" rowspan="2" /td

td width="450"/td

/tr

tr

td width="450" /td

/tr

/table

table width="590" height="24" border="0" cellpadding="0" cellspacing="1" bordercolor="#DCE8F3" bordercolorlight="#FFFFFF" bgcolor="#DCE8F3" style="border-collapse: collapse"

tr

td align="right" width="131" height="20"

p align="left" /p

/td

td align="right" width="448" height="20"

a href="gb_reply.asp?page=%=mypage%Number=%=ASPBook("ID")%"

img src="images/quote.gif" alt="回复该留言" align="absmiddle" border="0" width="16" height="16"/a

a href="gb_delete.asp?page=%=mypage%Number=%=ASPBook("ID")%"

img src="images/recycle.gif" alt="删除该留言" align="absmiddle" border="0" width="16" height="16"/a/td

/tr

/table

/td

/tr

%

ASPBook.MoveNext

i = i + 1

if i = 2 then i = 0

total = total + 1

loop

% %END IF%

/table

%COPYRIGHT%

table border="0" cellpadding="2" cellspacing="0" width="590" height="1" bgcolor="#F7F7F7" style="border-collapse: collapse" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF"

tr

td width="131" height="1"

p align="center"/p

/td

td align="right" width="448" height="1"font color="#000000"%PageLink%

/font /td

/tr

/table

/td

/tr

/table

/center

/div

div align="center"

center

table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="592" id="AutoNumber1"

tr

td width="100%"

p align="center"a href="gb_sign.asp" /abr

/p

/td

/tr

/table

/center

/div

/body

/html

%

function PageLink

PageShowSize = 10

Scriptname=Request.Servervariables("script_name")

PageNextSize=int((MyPage-1)/PageShowSize)+1

Pagetpage=int((GuestTotal-1)/MyPageSize)+1

if Maxpages 1 then

if PageNextSize 1 then

PagePrev=PageShowSize*(PageNextSize-1)

Response.write "a href='" Scriptname "?page=" PagePrev "'[]/a-"

end if

if Mypage-1 0 then

Prev_Page = MyPage - 1

Response.write "a href='" Scriptname "?page=" Prev_Page "'[]/a "

end if

if maxpages=PageNextSize*PageShowSize then

PageSizeShow = PageShowSize

else

PageSizeShow = Maxpages-PageShowSize*(PageNextSize-1)

end if

for PageCounterSize=1 to PageSizeShow

PageLink = (PageCounterSize+PageNextSize*10)-10

if PageLink cint(Mypage) then

Response.write "a href='" Scriptname "?page=" PageLink "'[" PageLink "]/a "

else

Response.Write PageLink " "

end if

next

if Mypage+1 =Pagetpage then

Next_Page = MyPage + 1

Response.write "a href='" Scriptname "?page=" Next_Page "'[]/a"

end if

if maxpages PageShowSize*PageNextSize then

PageNext = PageShowSize * PageNextSize + 1

Response.write "-a href='" Scriptname "?page=" PageNext "'[]/a"

end if

else

Response.write "[1]"

end if

END function

set ASPBook=nothing

conn.Close

set conn = nothing

%

网页留言板代码

link href="../../css/user.css" rel="stylesheet" type="text/css"

script language="JavaScript" src="../../js/common.js"/script

script language="JavaScript" src="../../js/ubbcode.js"/script

script language="JavaScript"

function formCheck()

{

if (document.theform.nickname.value == "")

{

alert("请填写名字。");

document.theform.nickname.focus();

return false;

}

if (document.theform.content.value == "")

{

alert("请填写留言内容。");

document.theform.content.focus();

return false;

}

theform.Submit.disabled=true;

return true;

}

function showimage()

{

document.images.faceimg.src=face_image[parseInt(document.theform.face.options[document.theform.face.selectedIndex].value)];

}

body background=""

center

IFRAME marginHeight=0 marginWidth=0 noResize scrolling=no frameBorder=0 src=";bgcolor=ffffff" width=468 height=60

/IFRAME

/center

p /p

form name="theform" onsubmit="return formCheck();" method="post" action="get_post.asp"

TABLE width=550 border=0 align="center" cellPadding=0 cellSpacing=0

table width="550" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#ebebeb"

tr

td class="pt9"

p*名字:

input name="nickname" type="text" size="15" maxlength="12" class="inputbox1"

br

Email:

input name="email" type="text" size="15" maxlength="45" class="inputbox1"

主页地址:

input name="hp_url" type="text" value="http://" size="22" maxlength="125" class="inputbox1"

/p

/td

tr

td width="409" class="pt9" !--因为图片连接的原因，本文件只适合include在script/dirname下的文件 --

img onClick=bold() src="../../images/icon_editor_bold.gif" width="23" height="22" alt="粗体" border="0"img onClick=italicize() src="../../images/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0"img onClick=underline() src="../../images/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0"

img onClick=center() src="../../images/icon_editor_center.gif" width="23" height="22" alt="居中" border="0"img onClick=hyperlink() src="../../images/icon_editor_url.gif" width="23" height="22" alt="超级连接" border="0"img onClick=email() src="../../images/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0"img onClick=image() src="../../images/icon_editor_image.gif" width="23" height="22" alt="图片" border="0"img onClick=flash() src="../../images/icon_swf.gif" width="23" height="22" alt="Flash图片" border="0"img onClick=showcode() src="../../images/icon_editor_code.gif" width="23" height="22" alt="编号" border="0"img onClick=quote() src="../../images/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0"img onClick=list() src="../../images/icon_editor_list.gif" width="23" height="22" alt="目录" border="0"

br

tr

td

table width="100%" border="0" cellpadding="0" cellspacing="0" class="pt9"

tr

td width="40" valign="top"*留言:/td

tdtextarea name="content" cols="50" rows="6" id="content"/textarea/td

/tr

/table

p align="center"

input name="replyer" type="hidden" value=""

input name="reply_content_id" type="hidden" value=""

input name="userid" type="hidden" value="79444"

input type="submit" name="Submit" value="确认留言" class="button1"

input type="reset" name="Reset" value="取消重写" class="button1"

/p/td

/tr

/table

p /p

/form

table width="550" border="0" align="center" cellpadding="2" cellspacing="1"

tr

td width="88" valign="top"

img src=""

/td

td width="417"TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 class="pt9"

TBODY

TR

TD width=43 colSpan=2 height=29 rowSpan=2IMG height=29

src="../../images/1_r2_c2.gif" width=43 border=0/TD

TD background=../../images/1_r2_c4.gif height=10/TD

TD width=37 colSpan=2 height=29 rowSpan=2IMG height=29

src="../../images/1_r2_c6.gif" width=37 border=0/TD

/TR

TR

TD height=19 TABLE cellSpacing=0 cellPadding=0 width="100%" border=0

TBODY

TR

TD class="pt9" font class="filtertxt"dsfsd/font /TD

TD width="168" align=right class="pt9" /TD

/TR

/TBODY

/TABLE/TD

/TR

TR

TD width=10 background=../../images/1_r4_c2.gif/TD

TD width=27/TD

TD width="100%" height=50 img src="../../images/blank.gif" width="5" height="5"

br fdsfsdbdfssdfsdf/b br img src="../../images/blank.gif" width="5" height="5" /TD

TD width=22/TD

TD width=15 background=../../images/1_r4_c2.gif/TD

/TR

TR

TD background=../../images/1_r4_c2.gif/TD

TD/TD

TD height=1hr width="100%" size="1" noshade/TD

TD/TD

TD background=../../images/1_r4_c2.gif/TD

/TR

TR

TD width=43 colSpan=2 height=26 rowSpan=2 IMG height=26 src="../../images/1_r6_c2.gif" width=43 border=0/TD

TD align=right height=17

img src="../../images/no_home.gif" align="absmiddle" img src="../../images/no_email.gif" align="absmiddle"   FONT color=#336600[2006-7-17 21:24:00]/FONT /TD

TD width=43 colSpan=2 height=26 rowSpan=2IMG height=26

src="../../images/1_r6_c6.gif" width=37 border=0/TD

/TR

TR

TD background=../../images/1_r2_c4.gif

height=9/TD

/TR

/TBODY

/TABLE/td

/tr

/table

BR

form

table width="516" border="0" cellspacing="0" cellpadding="0" align="center"

tr

td

table width=100% border=0 cellspacing=1 cellpadding=2 class=pt9trtd height=13img src=../../images/turnpage2_1.gif align=absmiddle border=0 img src=../../images/turnpage2_2.gif align=absmiddle border=0 b1/b | img src=../../images/turnpage2_3.gif align=absmiddle border=0 img src=../../images/turnpage2_4.gif align=absmiddle border=0/tdtd class=pt9 width=140 align=right共font color=red1/font页第input type=text name=JumpPage maxlength=3 size=3页input type=button value=转页 onClick="location.href='/script/user/list.asp?userid=79444page=' + this.form.JumpPage.value;"/td/tr/table

/td

/tr

/table

/form

解释分析PHP留言板代码 急！好的 详细的加高分！

呼呼，给你几乎每一句都注释了

form action="#" method="post"

enctype="multipart/form-data"

nameinput name=name sexinput name=sex ageinput name=age QQinput name=qq

label for="file"Filename:/label

input type="file" name="file" id="file" /

br /

input type="submit" name="submit" value="Submit" /

/form

!--以上为留言板的留言表单--

?php

$host="localhost";

$user="root";

$password="";

$db="testdb";

$con=@mysql_connect($host,$user,$password); //不报错创建与mysql数据库服务器的连接

if(!mysql_select_db($db)){ //选择服务器数据库

echo "没有相应数据库，正在给你创键"; //如果数据库不存在

mysql_query("CREATE DATABASE `testdb` DEFAULT CHARACTER SET gb2312 COLLATE gb2312_chinese_ci;"); //创建一个名为textdb的数据库，使用gb2312字符集

mysql_query("CREATE TABLE `testdb`.`book` ( //一下为在textdb下创建book数据表

`name` VARCHAR( 20 ) NOT NULL , //表列name，为20字符以内的非空字符串

`sex` VARCHAR( 3 ) NOT NULL , //表列sex，为3字符以内的非空字符串

`age` INT( 3 ) NOT NULL , //表列age，为3位以内的整数

`time` VARCHAR( 20 ) NOT NULL , //表列time，为20字符以内的非空字符串

`qq` VARCHAR( 15 ) NOT NULL , //表列qq，为15字符以内的非空字符串

`url` VARCHAR( 30 ) NOT NULL , //表列url,为30字符以内的非空字符串

PRIMARY KEY ( `name` ) //创建关键索引name

) ENGINE = MYISAM;"); //使用MYISAM数据库系统

echo "成功创建！";

}

if(!file_exists("up")) //如果up文件夹不存在

{

mkdir("up",0777); //创建文件夹up，为全体可读写执行

@chmod("up",0777); //不报错改变文件夹up为全体可读写执行

}

$name=split("\.",$_FILES["file"]["name"]); //用“.”分割上传的文件名字，返回一个数组

$counter=count($name)-1; //给$counter赋值$name数组的个数减一

$pre=$name[count($name)-1]; //给$pre赋值$name数组的最后一位（也就是文件扩展名，不含“.”）

$dastr=date("YmdHis"); //给$dastr赋值当前时间（格式为：年月日时分秒）

if (file_exists("up/" . $_FILES["file"]["name"])) //如果up文件夹中有与上传的文件重名的文件

{

echo $_FILES["file"]["name"] . " already exists. "; //输出文件已存在

}

else //否则

{

move_uploaded_file($_FILES["file"]["tmp_name"],

"up/" . $dastr.'.'.$pre); //将上传的文件从临时缓存移动到up文件夹当中并改名为“日期.扩展名”

}

$name=$_POST['name']; //给$name赋值为表单中name输入框的内容

$age=$_POST['age']; //给$age赋值为表单中age输入框的内容

$sex=$_POST['sex']; //给$sex赋值为表单中sex输入框的内容

$qq=$_POST['qq']; //给$qq赋值为表单中qq输入框的内容

$url="up/" . $dastr.'.'.$pre; //给$url赋值为上传文件的地址

$time=date("Y-m-d H:i:s"); //给$time赋值为当前时间（格式：年-月-日 时：分：秒）

mysql_query("set names gb2312"); //设置字符集，解决中文乱码问题

mysql_select_db($db); //选择数据库

$exec="insert into book (name,age,sex,qq,time,url) values ('$name','$age','$sex','$qq','$time','$url')";

//给$exec赋值向book表中添加数据的命令字符串

if($name!=''){ //如果$name不是空

$result=mysql_query($exec); //执行$exec的命令

}

$sql="select * from book"; //给$sql赋值选取book当中的所有列和行的命令的字符串

$result=mysql_query($sql); //执行$sql语句，返回结果

while($rs=mysql_fetch_object($result)) //遍历所有结果（循环直到所有$result当中的结果都以输出）

{

echo "div class=resultulli用户名:".$rs-name."/li\n"; //一下为输出留言内容

echo "li年领:".$rs-age."/li\n";

echo "li年领:".$rs-sex."/li\n";

echo "liQQ:".$rs-qq."/li\n";

echo "li头像: img src=".$rs-url." //li\n";

echo "li留言时间:".$rs-time."/li/ul/div\n";

}

mysql_close(); //关闭与数据服务间的连接

?

web编程 留言板代码实现留言板输入和查看…

其实这个挺简单的，代码如下留言板输入代码，在form表单中插入： textarea name="liuyan" rows="4" cols="60" /textarea查看留言的代码：//下面方法trans的作用是将string中的回车符号换位br 下面有两种方法%!string trans(String str){str=str.replace("\n", "br");return str;}%或者%!StringBuffer trans(StringBuffer str){for(int i=0;istr.length();i++){if(str.substring(i,i+1).equal("\n")){str.delete(i,i+1);str.insert(i,"br");}}return str;}% String str=request.getParameter("liuyan");//获取form表单提交的留言 str=trans(str);// 调用第一个方法 StringBuffer str=new StringBuffer(str); str=trans(str);//调用第二种方法 out.println(" 你的留言是br"+str); 以上代码就可以实现留言板输入和查看啦 希望能解决你的问题啊

意见留言表单代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于简单网页留言板代码、意见留言表单代码的信息别忘了在本站进行查找喔。