个人网页设计实训论文.doc

商务程序设计基础实训一、 实训的意义锻炼动手能力，运用自己所学专业知识，拥有制作一个动态网站的能力。这次实训，让我获得在传统的学校教育得不到的新技术，并且积累动手做网站的经验。将自己放到开发环境中，通过老师讲授知识，全面提高自己的职业素质。培养开发经验、加强团队合作意识、提高沟通协作的能力，提高具有撰写项目文档的能力，为在以后的工作中有更好的发展空间打下坚实的基础。最终达到自己满意就业、企业满意用人的目的。二、 实训内容实训内容：根据要求用ASP.NET和SQL SERVER2000建一个个人网站，其中主要包括六个部分：登录.aspx，注册.aspx，注册成功.aspx，首页.aspx，简历.aspx，相册.aspx。1、 网页设计首先制作基本的网页，其中包括各种类型的控件以及其属性的设置。接下来美化界面，设置字体，插入网页背景等。最后，编写代码，实现与SQL SERVER2000的连接。这样，一个简单的动态网站就建立好了。下面就开始运行所建网站：首先，先进入到“登录.aspx”界面：输入自己的用户名和密码，点击“确定”按钮；点击后，进入个人网站的“首页”：假若用户名不在数据库中，则会提示“你的用户名或密码错误！请重新登录！”：此时，你可以点击“注册新账号”，进入“申请注册”页面；填入用户名及密码，注意密码和确认密码必须相同，单击“确定”按钮，若用户名在数据库中已存在，则会提示“用户名已经存在，请重新注册！”：若用户名在数据库中不存在，则会进入“注册成功”页面；在注册成功页面，填写个人信息，点击“提交”按钮，会将注册信息写进数据库，同时跳到“登录”页面。在“首页”中点击“简历”可进入“简历”界面：点击“相册”可进入“相册”界面：点击“上一张”和“下一张”按钮可显示不同的图片。点击“浏览”选择图片，点击“上传”可将选择的图片上传到/images文件夹中，同时将图片在下方显示出来。这样一个新建的网站就可以顺利的进行了。2、数据库设计在sqlserver2000中创建“用户”数据库，该数据库中包含两张表，分别是“user1”表和“个人信息”表。其中：user1表结构：列名说明数据类型约束类型Usr用户名Char(10)主键passwd密码Char(16)可为空个人信息表结构：列名说明数据类型约束类型Usr用户名Char(10)主键，外键，参照表是user1aihao爱好Char(30)可为空wangzhan喜欢的网站Char(10)不能为空pingjia个人评价Char(50)可为空3、代码设计登录网页中的，单击“登录”按钮执行的代码：Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim conn As New OleDbConnection Dim comm As New OleDbCommand Dim sql As String conn.ConnectionString = Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=用户;Data Source=B508051 conn.Open() sql = select * from user1 where usr= & TextBox1.Text & & and passwd= & TextBox2.Text & comm.Connection = conn comm.CommandText = sql Dim dr As OleDbDataReader = comm.ExecuteReader() If dr.Read Then Server.Transfer(/个人网页.aspx?user= & TextBox1.Text) Else Response.Write(你的用户名或密码错误！请重新登录！) End If conn.Close()End Sub“注册成功”网页中点击“提交”按钮，执行的代码：Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim aihao As String = For i As Integer = 0 To CheckBoxList1.Items.Count - 1 If CheckBoxList1.Items(i).Selected Then aihao &= CheckBoxList1.Items(i).Text & , End If If aihao.Length 0 Then aihao = aihao.Substring(0, aihao.Length - 1) End If Next Dim conn As New OleDbConnection Dim comm As New OleDbCommand Dim sql As String conn.ConnectionString = Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=用户;Data Source=B508051 conn.Open() sql = insert into 个人信息 values( & Label1.Text & , & aihao & , & RadioButtonList1.SelectedValue & , & TextBox4.Text & ) comm.CommandText = sql comm.Connection = conn If comm.ExecuteNonQuery() 0 Then Server.Transfer(/登录.aspx) Else Response.Write(数据未写进数据库！) End If conn.Close() End Sub三、 实训总结通过这次实训，让我学会了如何制作一个动态网站，当然在制作的时候也遇到了很多的困难，如何打开自己新建的网站，在老师未教我们的时候，我则是一个网页接着一个网页的打开，这样既费时又费事，在老师说过后，将网站的一个文件夹一起打开，这样就方便了很多。经历了这次实训，我锻炼了动手能力，可以运用自己所学专业知识，顺利的制作了一个动态网站。这次实训，让我获得在