Question

vb登陆界面，登陆界面代码，数据库文件，求高手教我怎么将vb和sql连接起来！若是代码，麻烦说下添哪，谢！





Answer 1

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim conn As New SqlConnection
Dim str_conn As String
str_conn = "data source=(local);database=数据库名称;integrated security=sspi"
conn.ConnectionString = str_conn
Dim cmd As New SqlCommand
Dim sql As String = "select count(*) from 表名 where 用户名='" & Trim(Me.TextBox1.Text) & "'and 密码='" & Trim(Me.TextBox2.Text) & "'"
cmd.CommandText = sql
cmd.Connection = conn
Try
conn.Open()
Dim i As Integer
i = 0
i = cmd.ExecuteScalar
If i = 1 Then
Me.Response.Redirect("default2.aspx")
Else
Me.Label1.Text = ("用户或密码错误")
End If
Catch ex As Exception
End Try
conn.Close()

Answer 2

帮你写

追问

不用了不用了 ，作业我交了，谢谢