新闻管理系统课程设计报告论文

理员邮箱表 2-3 新闻信息表字段名字段类型字段长度字段说明 NewsId 自动编号长整型新闻编号 C lassId 数字长整型新闻类别 T itle 文本 50 新闻标题 A uthor 文本 50 新闻作者 O riginal 文本 50 新闻出处 U pdateTime 日期/ 时间新闻更新时间 C ontent 备注新闻内容专业资料参考首选表 2-4 新闻栏目表字段名字段类型字段长度字段说明 C lassesid 自动编号长整型新闻类别编号 classesname text 50 新闻类别名称表 2-5 新闻评论表字段名字段类型字段长度字段说明 ReViewID 自动编号长整型新闻评论自动编号 NewsID 数字长整型新闻编号 ReViewTitle 文本 50 评论标题 Content 备注评论内容 Author 文本 50 评论会员 Email 文本 50 评论会员邮箱专业资料参考首选第3章系统实现 3.1 新闻管理系统登录页面当以管理员身份登录时,出现如下界面。输入用户名和密码,当与数据库中的内容相匹配时既可登录。图 3-1 登录界面代码如下: Dim i As Integer For i=0 To ds.Tables( "login" ).Rows.Count -1 If username.Text = ds.Tables( "login" ).Rows(i)(0).ToString().Trim() And password.Text = ds.Tables( "login" ).Rows(i)(1).ToString().Trim() Then Response.Redirect( "news.aspx" ) Else Response.Write( "<script>alert(' 该用户名或密码错误')</script>" ) End If Next