【教程】从Access到Asp.net（六）

情比金坚

【建立一个应用程序】
首先回忆一下我们以前做过的内容：我们有了一个虚拟目录，我的叫acc2asp,还有一个acess的数据源，我的叫min_ishop.mdb，现在我们把这个数据源拷贝到虚拟目录中来。
启动vs.net2003，进入启动主窗体，点击新建项目

[此贴子已经被作者于2006-8-15 9:37:39编辑过]

情比金坚

我们是用VB的人，所以要选择Visaul Basic 项目，我们编写的是ASP.NET Web应用程序，更改项目的目录地址，我的目录是acc2asp，然后点击确定。

情比金坚

这里面有我们经常要用到的几个工具：资源窗口，属性窗口，工具箱，作业卡，切换按钮：
资源窗口是我们目前编辑的项目的资源，和access  VBA差不多，但是他有一个线轴按钮，点击可以自动收起，鼠标移动到再自动展开，很好用，看不到资源窗口点击上方的按钮就出来了。
工具箱有好多层，我们用的比较多的是web控件和数据控件（在组件层里面）
工作区的下方是切换按钮，在视图模式和html模式之间转换，我们在视图模式中设计东西会自动转换成html代码，同样在html中编辑改动后会自动体现在视图模式。
跟access一样，点击工具箱里的相应控件，在页面上面拖动，就可以画出一个空间，然后点击右键-----属性-----出现属性框，可以在其中编辑属性。
双击页面空白区域，会出现一个新的作业卡，是该页面的vb逻辑代码编写的地方。

[此贴子已经被作者于2006-8-12 3:15:16编辑过]

情比金坚

【设置配置信息】


在右面的资源窗体里，你能发现一个叫Web.config的文件，这是个很重要的文件，是储存着项目的全部配置信息的，它有很多个节点，分别储存不同的配置信息，在<configuration>之后是我们生命节点，填写配置信息的地方。


我们在这里设置数据库的连接信息，双击Web.config,打开了编辑卡，


我在其中添加了一个节点：<appSettings>


<appSettings>


    <add key="constr" value="rovider=Microsoft.Jet.OLEDB.4.0;Jet OLEDBatabase Password=;Data Source=" />


    <add key="dbs" value="\mini_shop.mdb" />   


</appSettings>

情比金坚

【建立管理登录窗体】
       记得我们在access时是从登录窗体开始设计的，好我们仍然从登录开始：这是项目中已经有一个叫webform1.aspx的窗体了，更改他的名字为admin_login.aspx，注意后缀名是aspx
       然后拖三个标签框、两个文本框、一个命令按钮到页面中来：点击右键，打开属性，点击标签就是标签的属性；更改其中的text属性（这跟access里的属性值不太一样）每个控件有一个ID属性，是他的名字，在代码中我们就用它来区别控件。
【web  textbox控件】
       我们把textbox2的模式属性设为密码
       把label3的id改为“labelmsg”,把字体改称红色

[此贴子已经被作者于2006-8-12 3:35:54编辑过]

情比金坚

双击命令按钮，进入代码编写界面，或者点击admin_login.vb的作业卡

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Handles Button1.Click
        Dim myconstr As String = ConfigurationSettings.AppSettings("constr") &

Server.MapPath(".") & ConfigurationSettings.AppSettings("dbs")
        Dim mysql As String
        Dim mycon As OleDb.OleDbConnection = New OleDb.OleDbConnection(myconstr)
        mycon.Open()
        If TextBox1.Text = "" Or TextBox2.Text = "" Then
            Labelmsg.Text = "请填写正确的用户名和密码，若尚未注册请先注册"
        Else
            mysql = "select * from tab_admininfo where sname='" + TextBox1.Text + "'"
            Dim mycmd As OleDb.OleDbCommand = New OleDb.OleDbCommand(mysql, mycon)
            Dim myrs As OleDb.OleDbDataReader
            myrs = mycmd.ExecuteReader()
            myrs.Read()
            If TextBox1.Text = myrs("sname") Then
                If TextBox2.Text = myrs("spwd") Then     '这是使用md5加密前的写法
                    Response.Redirect("admin_mat.htm")
                Else
                    Labelmsg.Text = "请输入正确的密码"
                End If
            Else
                Labelmsg.Text = "你还没有注册，请先注册"
            End If

        End If
        mycon.Close()

    End Sub

用ConfigurationSettings获得我们储存在web.config里的信息，联成啦一个长长的字符串，然后就是用ADO.NET来查询我们需要的值：
这里使用了ADO.NET的Connection对象，Command对象，DataReader对象，这些对象都分成SQL和OLEDB两种，我们使用的当然是OLEDB，在asp.net 所有变量都必须先声明，对于有好的编程习惯的人来说这不算什么。
然后我们使用了Read方法来读取数据库，这个方法只能读，并且只能向前移动，不过正好适合我们场合用。同样跟access一样，这里的代码还没有完成，在以后回来再加入记录登录人员信息的代码。

[此贴子已经被作者于2006-8-12 3:34:10编辑过]

情比金坚

【添加一个框架网页】


在你的项目上点击右键-----选择添加-----选择html页，选择框架集，把名称改称admin_mat.htm,点击打开，选择垂直拆分。好确定

[此贴子已经被作者于2006-8-12 3:27:22编辑过]

情比金坚

【运行】


回到admin_login.aspx的设计试图，点击右键，选择在浏览器中浏览，好了你可以看看你的设计成功了吗？

情比金坚

【小结】
本章我们学习了：
项目的创建
添加web config节点
Label,textbox,button,三个web控件的使用
通过属性窗体设置控件属性
文本框密码属性的设置方法
字体的颜色，字号
Ado.net的连接方法
Ado.net读取数据的方法之一——Read方法
打开另一个页面的命令
添加页面的方法
创建一个框架的htm页
运行调试的方法

老鬼

N久没接触网页编程了，没想到现在的.NET都发展到这份上了，功能很强大啊