vb连接SQL
来源:百度知道 编辑:UC知道 时间:2024/06/11 08:40:26
未处理的“System.Data.SqlClient.SqlException”类型的异常出现在 system.data.dll 中。
其他信息: 系统错误。
Dim sconnstring As String = "Data source=(local);Initial Catalog =学生信息系统;Integrated Security=SSPI"
Dim mycn As New SqlConnection
mycn.ConnectionString = sconnstring
mycn.Open() 从这里编译不能通过,
Dim mysql As String = "select * from 用户名='" & (TextBox1.Text) & "'and 密码='" & (TextBox2.Text) & "'"
Dim scomm As New SqlCommand(mysql, mycn)
Dim mydr As SqlDataReader
mydr = scomm.ExecuteReader
If mydr.Read = True Then
mycn.Close()
mycn.Open() 从这里编译不能通过,要怎么该啊,求高手给我指教
其他信息: 系统错误。
Dim sconnstring As String = "Data source=(local);Initial Catalog =学生信息系统;Integrated Security=SSPI"
Dim mycn As New SqlConnection
mycn.ConnectionString = sconnstring
mycn.Open() 从这里编译不能通过,
Dim mysql As String = "select * from 用户名='" & (TextBox1.Text) & "'and 密码='" & (TextBox2.Text) & "'"
Dim scomm As New SqlCommand(mysql, mycn)
Dim mydr As SqlDataReader
mydr = scomm.ExecuteReader
If mydr.Read = True Then
mycn.Close()
mycn.Open() 从这里编译不能通过,要怎么该啊,求高手给我指教
我这里可以通过
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
End Class
Public Class Excete
Public Function ssc()
Dim sconnstring As String = "Data source=(local);Initial Catalog =学生信息系统;Integrated Security=SSPI"
Dim mycn As New SqlConnection
mycn.ConnectionString = sconnstring
mycn.Open() '这里编译通过
End Function
End Class
mycn.Open() 中的括号去掉试试
这样连接数据很麻烦,没想过用UDL连接吗?给我最佳答案,我教你如何用UDL连接,不用写这么多代码的
用try catch看看错误原因