无法将'System.Data.SqlClient.SqlConnection'类型的错误值转换为'字符串'

-1

似乎无法确定在此错误中使用的代码。无法将'System.Data.SqlClient.SqlConnection'类型的错误值转换为'字符串'

它指出在此行暗淡Flag_DR作为SqlDataReader的= Flag_com.ExecuteReader

非常感谢

  Private Sub txt_Password_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txt_Password.KeyDown 
      If e.KeyCode = Keys.Enter Then 
      If txt_Username.Text = "hospital" And txt_Password.Text = "user" Then 
      Me.Hide() 

      Dim r0 As String 

      Dim Flag_constr As New SqlConnection("Data Source=(localdb)\Projects;Initial Catalog=MasterDB;Integrated Security=True;Connect Timeout=30;Encrypt=False;TrustServerCertificate=False") 
      'Dim Fill_Textbox_cmdstr As String = "select Regno,Name,Age,Address,Phone,Checkupdate,Checkuptime,Disease,Bloodgroup,Doctor,Remarks from clinicpatients where Regno=1" 
      Dim Flag_cmdstr As String = "select * from flag" 
      Dim Flag_con As New SqlConnection("Data Source=(localdb)\Projects;Initial Catalog=MasterDB;Integrated Security=True;Connect Timeout=30;Encrypt=False;TrustServerCertificate=False") 
      Dim Flag_com As New SqlCommand(Flag_cmdstr, Flag_con) 
      Flag_con.Open() 
      Dim Flag_DR As SqlDataReader = Flag_com.ExecuteReader 
      While Flag_DR.Read 
       r0 = Flag_DR(0) 
      End While 
      Flag_con.Close() 

      If r0 = 0 Then 
       Dim objfrmBed As New frmBed() 
       objfrmBed.Show() 
      ElseIf r0 = 1 Then 
       Dim objfrmMain As New frmMain() 
       objfrmMain.Show() 
      End If

来源

2016-02-12 Jobet Avila

你已经用'Flag_constr'创建了一个使用实际连接字符串的连接，第二个'Flag_con'是多余的。你的重复变量名称让你感到困惑 – Plutonix

你的编辑完全改变了这个问题。你列出的错误不可能来自你所说的行。另外它使@Plutonix评论无意义。 –

我已回滚您的编辑。答案发布后，您无法完全改变问题：主体不再与标题匹配，并且使发布的答案失效。答案解决了你原来的问题，所以要亲切并接受答案并继续前进。 – Plutonix

有什么不对您的连接字符串。你是否可以改变它，如下所示，然后再试一次：

Dim Flag_con As New SqlConnection("Data Source=(localdb)\Projects;Initial Catalog=MasterDB;Integrated Security=True;Connect Timeout=30;Trusted_Connection=True;MultipleActiveResultSets=True;")

来源

2016-02-12 14:23:57

我认为这是正确的。你怎么看？它工作？ – 2016-02-15 08:28:57

无法将'System.Data.SqlClient.SqlConnection'类型的错误值转换为'字符串'

回答

相关问题