留言代码html可回复（html 留言）

本篇文章给大家谈谈留言代码html可回复，以及html 留言对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、怎么用html做一个显示留言板的框 留言成功马上显示 和留言板一样
• 2、求 静态网页的 留言板 html代码 谢谢
• 3、网页留言板的代码
• 4、我想在一个页面上用HTML代码添加一个小小留言板，能够告诉我怎么做么？？
• 5、QQ空间留言代码

怎么用html做一个显示留言板的框 留言成功马上显示 和留言板一样

用ajax做，如果留言成功了，在回调处理函数，加上html代码就可以实现了

求 静态网页的 留言板 html代码 谢谢

给你一个简单的

留言板简洁版本

功能：

1、不需要注册就可发表留言。

2、管理员修改密码，回复留言，删除留言。

Index.asp页面内包含所有功能操作。

Fun.asp页面包含数据库链接和函数。

由于页面按照百分比，所以可以把Index.asp的代码嵌套您的网站内任何页面之中。

管理员用户名和密码：admin

文件压缩之后44K。

网页留言板的代码

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

%

我想在一个页面上用HTML代码添加一个小小留言板，能够告诉我怎么做么？？

HTML 代码留言板 一个超简陋的留言版 免费留言板 //评论内容不能保存 因为涉及到数据库

script

function Ok_OnClick(event)

{

if(document.getElementsByName("textName")[0].value == ""){

alert("请输入内容");

return;

}//getElementById

var table;

var tableList = document.getElementsByTagName("TABLE");

for(var i = 0 ; i tableList.length ; i++) {

if(tableList[i].name == "tableName") {

table = tableList[i]

break;

}

}

var value = document.getElementsByName("textName")[0].value;

var index = table.rows.length;

table.insertRow(index);

table.rows(index).insertCell(0);

table.rows(index).cells(0).innerText = value;

document.getElementsByName("textName")[0].value = "";

}

/script

HTML

HEAD

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

TITLE留言版/TITLE

STYLE

td{width:20%;height:20px;border-bottom:1px solid black;border-right:1px solid black;cursor:default;}

div{font-size:13px;}

th{height:20px;font-size:12px;font-weight:normal;border-bottom:2px solid black;background-color:#CCCCCC}

table{border:1px solid black;font-size:13px;}

/STYLE

/HEAD

BODY oncontextmenu="return false;""

TABLE name="tableName" width="70%" align="center" cellpadding="0" cellspacing="0"

TR

TH colspan="4" style=""留言版/TH

/TR

TR

TD呵呵，一个超简陋的留言版 ^_^/TD

/TR

/TABLE

BR

div align="center"

textarea rows="2" name="textName" id="textId" cols="20"

style="width: 70%; clip: rect(0pt, 47pt, 18pt, 0pt); font-family: 宋体; font-size: 10pt; font-weight: normal; font-style: normal;text-align: left; vertical-align: middle; text-indent: 0; color: #000000; background-attachment: fixed; background-color: #EEEEEE; border: 1px solid #0xf8f8f8"

/textarea

/div

BR

div align="center"

input type="button" value="提交" onclick="return Ok_OnClick(window.event);"

style="align:center ; width:60 ; height: 21; clip: rect(0pt, 47pt, 18pt, 0pt); font-family: 宋体; font-size: 10pt; font-weight: normal; font-style: normal; cursor: hand; text-align: center; vertical-align: middle; text-indent: 0; color: #000000; background-attachment: fixed; background-color: #d8d8d8; border: 1px solid #59b4f7"

!--position: absolute; left: 342; top: 184; --

/div

/BODY

/HTML

QQ空间留言代码

[quote=引自：▕ˊ夨惢钕孓][M][/M]

[ffg,#FFFFFF,#FFFFFF][ft=,5,]

_╱↗嵔~：

罘ノ亻爱ノ亻莪,

言青↗氵衮゛╱

↘

-゛↘，イ莪゛╱↘算ィ+

'ム▃﹖

[/quote]

[/ft]

[/ft]

[/ft]

[quote=引自：][M][/M]

[M][ffg,#FFFFFF,#FFFFFF][ft=,5,]

↘╱为亻┽ノ厶洤

せ堺ㄖ勺秂蔸

/\騕ィ莪﹍↘

╱↘ィ我

阝余

ㄋ↘

氵冗

黑犬↙╲╲↗

╱╱↘辶不

乘刂

丅↘イ+

╱↘嚒

╱↘[/quote]

[/ft][/ft][/ft]

[R][ft=,5,]

[ffg,#FFFFFF,#FFFFFF]ˋ吢

賥

ㄋ＂,，、

墲力甾嗳

[ft=,5,][ft=#330099,,]

｛{sorry.

︺￣￣/↓゛

---┈┈‐-┈------┈┈‐-┈

[ft=,,楷体_GB2312][ft=#ffffff,,]莪[/ft]的心已经[ft=#ffffff,,]千创百孔暸.[/ft]

[ft=#ffffff,,]请[/ft]你⒏要再来[ft=#ffffff,,]伤害莪.[/ft]

[ft=#ffffff,,]谢谢[/ft]你给[ft=#ffffff,,]莪[/ft]的爱.,!,}°

__﹎

-----︻︻

[R][ft=#ffffff,,]蒽

:

[/ft]

｛‘其实我[ft=#ffffff,,]懂`!.[/ft]

[ft=#ffffff,,]偶[/ft]卟4.伱[ft=#ffffff,,]惢爱[/ft]的籹秂[ft=#ffffff,,]?

[fts=4][quote=引自：峩_╱╳↘它][M][/M][/ft]

[M][fts=5][ftc=#222222]峩：

[ftc=#444444]如果[ftc=#55555]峩们[ftc=#666666]没冇[ftc=#222222][过去][ftc=#444444]会b.

[ftc=#55555]现在[ftc=#666666]幸福゛，

它：

[ftc=#222222]如果[ftc=#444444]峩们[ftc=#55555]没玩[ftc=#666666]劲舞[ftc=#222222]会b.

[ftc=#444444]现在[ftc=#55555]幸福[ftc=#666666]的哆；

[fts=5][ftc=#555555]╲↘

[ftc=#FFFFFF]亻昜

革力

[ftc=#555555]亻我.亻尓

[ftc=#FFFFFF]氵慲

亻足

[ftc=#555555]革力╱↙

[ft=,6,][ft=,,Wingdings]?[/ft][/ft]

[R]

￣↗~\[ftc=#FFFFFF]｛o恩〕[/ft]：ン⊿

ィ我

[ftc=#FFFFFF]哭　[/ft]ㄋ

.。╱

[/quote]

关于留言代码html可回复和html 留言的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。