英文留言代码

英文留言代码 篇一:留言板代码 package to; import java.io.IOException; import java.io.PrintWriter; import java.sql.DriverManager; import java.sql.ResultSet; import java.sql.SQLException; import javax.servlet.ServletException; import javax.servlet.http.HttpServlet; import javax.servlet.http.HttpServletRequest; import javax.servlet.http.HttpServletResponse; import com.mysql.jdbc.Connection; import com.mysql.jdbc.Statement; public class gh extends HttpServlet { String name; String message; static int count =0; //记数 static String Message = ;//保存留言 public void doPost(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException { response.setContentType(text/html); response.setCharacterEncoding(GB2312); PrintWriter out = response.getWriter(); String getMsg = Message; //获取之前的留言 //获取用户名 name = new String(request.getParameter(name).getBytes(ISO8859_1),GB2312); //获取留言 String message = new String(request.getParameter(message).getBytes(ISO8859_1),GB231 2); count++; //计数器自增 try { Connection con; Statement stmt; ResultSet rs; //加载驱动程序，下面的代码为加载MySQL驱动程序 Class.forName(com.mysql.jdbc.Driver); //注册MySQL驱动程序 DriverManager.registerDriver(new com.mysql.jdbc.Driver()); //用适当的驱动程序连接到数据库 String dbUrl = jdbc:mysql://192.168.1.123:3306/LY1?useUnicode=true&characterEncoding=GB2312&charset=gb2312; String dbUser=dbuser; String dbPwd=1234; //建立数据库连接 con = (Connection) java.sql.DriverManager.getConnection(dbUrl,dbUser,dbPwd); //创建一个JDBC声明 stmt = (Statement) con.createStatement(); //增加新记录 stmt.executeUpdate(INSERT INTO pt1 (id,name,description) VALUES (\' + count + \',\' + name + \',\' + message + \')); //查询记录 rs = stmt.executeQuery(SELECT id,name,description from pt1); //输出查询结果 out.println(table border=1 width=400); while (rs.next()) { String col1 = rs.getString(1); //String col2 = new String(rs.getString(2).getBytes(GB2312),ISO8859_1);String col2 = rs.getString(2); String col3 = rs.getString(3); //String col3 = new String(rs.getString(3).getBytes(GB2312),ISO8859_1); //打印所显示的数据 Message = &qu ot;第+col1+楼:br/姓名:+col2+br/留言: +col3+br/br/;out.print(Message); //打印留言 out.println(trtd+col1+/tdtd+col2+/tdtd+col3+/tdtd/td/tr/br); } //关闭数据库连结 rs.close(); stmt.close(); con.close(); } //捕获错误信息 catch (Exception e) {out.println(e.getMessage());} Message = 第+count+楼:br/姓名:+name+br/留言:+message+br/br/; /*if(count1){ //留言加载 Message = p第+count+楼:br/姓名:+name+br/留言:+message+br/br//p + getMsg; out.print(Message); //打印留言 } else{ out.print(Message); //打印留言 }*/ out.print(a href='/999/89/MyJsp89.jsp'返回留言/a); } } 篇二:留言板 此网站需要，建立5个asp文件 一个数据库(access)命名最好为guest 下面是代码 Add 页 % option explicit Response.Buffer=True dim db set db=server.createobject(ADODB.CONNECTION) db.open DRIVER={Microsoft Access Driver (*.mdb)};DBQ= & server.mappath (guest.mdb) Dim title,body,lyname,email title=SERVER.HTMLEncode(Request.Form(title)) body=SERVER.HTMLEncode(Request.Form(body) ) lyname=SERVER.HTMLEncode(Request.Form(name)) email=Request.Form(email) Dim Sql,sValues Sql = Insert Into ly(name sValues = Values(' & lyname & ' Sql = Sql & ,title sValues = sValues & ,' & title & ' If body Then Sql = Sql & ,body sValues = sValues & ,' & body & ' End If If email Then Sql = Sql & ,email sValues = sValues & ,' & email & ' End If Sql = Sql & ,submit_date sValues = sValues & ,# & date & # Sql = Sql & ) & sValues & ) db.Execute(Sql) db.Close Response.Redirect index.asp % Delete 页 % option explicit Response.Buffer=True dim db set db=server.createobject(ADODB.CONNECTION) db.open DRIVER={Microsoft Access Driver (*.mdb)};DBQ= server.mappath(guest.mdb) Dim guest_id,Sql guest_id=request.QueryString(guest_id) Sql = delete from ly where guest_id=&guest_id db.Execute(Sql) db.Close Response.Redirect index.asp % Login 页 %response.buffer=true dim db set db=server.createobject(ADODB.CONNECTION) db.open DRIVER={Microsoft Access Driver (*.mdb)};DBQ= server.mappath(guest.mdb) function sqlstr(data) sqlstr='&replace(data,','')&' end function % html head title注册登录系统/title script language=JAVASCRIPT !-- function check_Null(){ if (document.form1.username.value==){ alert(用户名不能为空!); return false; } if (document.form1.password.value==){ alert(密码不能为空!); return false; } return true; } // -- /script meta http-equiv=Content-Type content=text/html; charset=gb2312/head body bgcolor=#FFFFCC br div align=centerh3font color=#AB0000用户登录/font/h3 注意:您还没有登录，请先登录，新用户需先注册 & & /div FORM name=form1 onSubmit=javascript:return check_Null(); action= method=post TABLE width=66% border=0 cellpadding=4 cellspacing=1 bgcolor=#999999 TR bgcolor=#FFFFFF TD width=40% height=25 align=right用户名/TD TD width=60%INPUT size=15 name=username type=text FONT color=#990000* /FONT/TD /TR TR bgcolor=#FFFFFF TD height=25 align=right密&nbsp&nbsp码/TD TDINPUT type=password size=15 name=password FONT color=#990000* /FONT/TD /TR TR bgcolor=#FFFFFF TD height=25 align=rightinput type=submit value= 确 定 name=submit /TD TDinput type=button value= 注 册 name=loginbutton onClick=window.open('register.asp','_self')/TD /TR /table /FORM br % if request(username) then sql=select * FROM users Where username= sql=sql&sqlstr(request(username))&And password= sql=sql&sqlstr(request(password)) Set rs=db.Execute(sql) If Not rs.Bof And Not rs.Eof Then session(username)=rs(username) response.redirect index.asp Else response.write 对不起，用户名或密码有误，请重新登录 End If end if % /body /html Register 页 %response.buffer=true% % dim db set db=server.createobject(ADODB.CONNECTION) db.open DRIVER={Microsoft Access Driver (*.mdb)};DBQ= & server.mappath(guest.mdb) % html head title注册/title SCRIPT language=JAVASCRIPT !-- function check_Null(){ if (document.form1.username.value==){ alert(用户名不能为空!); return false; } if (document.form1.password.value==){ alert(密码不能为空!); return false; } if (document.form1.password.value!=document.form1.password2.val ue){ alert(密码和密码确认必须一致!); return false; } if (document.form1.realname.value==){ alert(姓名不能为空!); return false; } return true; } // -- /SCRIPT /head body bgcolor=#F1F1F1 br table width=607 border=0 align=center cellpadding=0 cellspacing=0 tr td width=605 align=center bgcolor=#FFFFFF ph1font color=#AB0000 用户注册/font/h1 p所有带FONT color=#990000 * /FONT号的项目必须填写 /p FORM name=form1 onsubmit=javascript: return check_Null(); action= method=post TABLE width=66% border=0 cellpadding=4 cellspacing=1 bgcolor=#999999 TR bgcolor=#FFFFFF TD width=21% height=25用户名/TD TD width=79%INPUT size=15 name=username type=text 20位)/TD FONT color=#990000* /FONT(大于或等于5位，小于 /TRTR bgcolor=#FFFFFF TD height=25密 码/TD TDINPUT type=password size=15 name=password FONT color=#990000* /FONT/TD/TRTR bgcolor=#FFFFFF TD height=25确认密码/TD TDINPUT type=password size=15 name=password2 FONT color=#990000*/FONT/TD/TR TR bgcolor=#FFFFFF TD width=88 height=28真实姓名/TDTD width=393INPUT size=15 name=realname type=text FONT color=#990000 * /FONT /TD /tr TR bgcolor=#FFFFFF TD width=88 height=28性别/TDTD input type=radio name=sex value=男 checked 男input type=radio name=sex value=女 女 /TD /tr TR bgcolor=#FFFFFF TD 电子信 箱 /TDTD INPUT type=text size=40 name=email/TD /tr 篇三:网上留言板系统实现 实践训练6:网上留言板系统实现 目的: 通过VS调用SQL SERVER数据，创建网上留言板系统，进行代 码编写，从而掌握网上留言板系统的设计。 使用仪器:上网计算机、VS2005 、SQL SERVER2005 实验步骤: 一、SQL SERVER下新建数据库: create database MsgBoard use MsgBoard create table post ( postid int identity(1,1) primary key not null, name varchar(200) not null, subject varchar(200) not null, message varchar(200) not null, date datetime not null, ip varchar(20) ) create table users ( userid int identity(1,1) primary key not null, name varchar(200) not null, pwd varchar(200) not null ) insert into users (name,pwd )values('1','1') insert into users (name,pwd )values('a','a') insert into users (name,pwd )values('admin','admin') insert into users (name,pwd )values('张三 ','z3') insert into users (name,pwd )values('李四 ','l4') 二、在VS中新建网站 新建一个连接类DB.cs: using System.Data.SqlClient; public class DB { public DB() { } public static SqlConnection connectionDB() { return new SqlConnection(server=WWD;database=MsgBoard;uid=sa;pwd=6336); } public static bool judge(string userName,string userPwd) { SqlConnection conn = DB.connectionDB(); conn.Open(); SqlCommand cmd = new SqlCommand(select count(*) from users where name=' +userName+ ' and pwd=' +userPwd+ ', conn); int count = Convert.ToInt32(cmd.ExecuteScalar()); conn.Close(); if (count 0 ) { return true; } else { return false; } } } 在首页Default.aspx中插入对象TextBox和标签等控件 设置DataList的数据源，并编辑模板，在Items模板中插入3*3html格，分别插入标签并绑定数据库 字段; 添加新项Message.aspx: Message.aspx.cs: using System.Data.SqlClient; public partial class Default2 : System.Web.UI.Page { protected void Page_Load(object sender, EventArgs e) { } protected void btnNext1_Click(object sender, EventArgs e) { if (this.rBtnAgree.Checked) { this.Panel1.Visible = false; this.Panel2.Visible = true; } } protected void btnNext2_Click(object sender, EventArgs e) { if (this.IsValid) { this.Panel2.Visible = false; this.Panel3.Visible = true; } } protected void btnOK_Click(object sender, EventArgs e) { string strName = this.txtUserName.Text.ToString(); string strSubject = Server.HtmlEncode(this.tbSubject.Text.ToString()); string strMsg = Server.HtmlEncode(this.tbMsg.Text.ToString()); string strIP = Request.UserHostAddress.ToString(); string strDate = System.DateTime.Now.ToString(); //插入数据库 SqlConnection con = DB.connectionDB(); con.Open(); SqlCommand cmd = new SqlCommand(); cmd .CommandText=insert into post(name,subject,message,[date],ip)values('+strName+','+strSubject+','+strMsg+','+strDate+','+strIP+');; cmd .Connection=con ; cmd.ExecuteNonQuery(); con.Close(); Response.Redirect(default.aspx); } protected void CustomValidator1_ServerValidate1(object source, ServerValidateEventArgs args) { string userName = this.txtUserName.Text.ToString(); string userPwd = this.txtUserPwd.Text.ToString(); if (DB.judge(userName, userPwd)) { args.IsValid = true ; } else { args.IsValid = false ; } } } 三、思考:该系统还有哪些可以完善的地方, 四、写实验报告: (按实验步骤记录自己实验内容和过程，并写出实验小结/体会)