|
发表于 2020-2-13 21:45:01
|
显示全部楼层
在Default.aspx.vb页面的最上端你一样也得引用这句代码Imports System.Data.SqlClient
然后再代码中联数据库就举个简单的例子吧。
Dim con As New SqlConnection("server=.;database=jie;uid=sa;pwd=;")
//server=.代表连接的是本机的数据库,database写你要连接的数据库名,用户名和密码写你自己的。
Dim cmd As New SqlCommand("select Uid from 用户表 where 用户名称='" & TextBox1.Text & "' and 用户密码='" & TextBox2.Text & "'", con)
Dim dr As SqlDataReader
con.Open()
dr = cmd.ExecuteReader
If dr.Read Then
Response.Redirect("WebForm1.aspx")
Else
Response.Write("<script>alert('用户名或密码错误')</script>")
End If
dr.Close()
con.Close() |
|