异常'system.data.sqlclient.sqlexception'en system.data.dll [英] Exception 'system.data.sqlclient.sqlexception' en system.data.dll

问题描述

大家好，



我的名字是劳尔，我是从墨西哥给你写的。



我正在尝试从Visual Studio到SQL Server建立连接



首先我做了一个模块尝试一个简单的连接，我的服务器是这样的：

  Imports  System.Data.SqlClient 
 模块 CONEXION 
 公共 cn 作为 新 SqlConnection（  server = [Ip Server] database = DB; user id = sa;密码= *****）
 结束 模块 

然后表单代码如下：

  Imports  System.Data.SqlClient 
 
  Public  类 Form1 
  Dim  da  As  SqlDataAdapter 
  Dim  ds  As  DataSet 
 私有  Sub  Form1_Load（ ByVal  sender 作为系统。对象， ByVal  e 作为 System.EventArgs）句柄  MyBase  .Load 
 结束  Sub  
 私有  Sub  btngrabar_Click（ ByVal  sender  As  System。对象， ByVal  e  As  System.EventArgs）句柄 btngrabar.Click 
 
  Dim  sql  As   String  =  插入PRUEBA值（@ CODIGO，@ NOMBRE，@ APELLIDO，@ DIRECCION，@ TELEFONO） 
  Dim  cmd 作为 新 SqlCommand（sql，cn）
 尝试 
 cmd.CommandType = CommandType.Text 
 cmd.Parameters.Add（< span class =code-string>  @ CODIGO，SqlDbType.VarChar， 5 ）。Value =  Me  .txtcodigo.Text 
 cmd.Parameters.Add（ < span class =code-string > @NOMBRE，SqlDbType.VarChar， 25 ）。Value =  Me  .txtnombres。文字
 cmd.Parameters.Add（  @ APELLIDO，SqlDbType.NVarChar， 25 ）。Value =  Me  .txtapellidos.Text 
 cmd.Parameters.Add（  @ DIRECCION，SqlDbType.NVarChar， 25 ）。值= 我 .txtdireccion.Text 
 cmd.Parameters.Add（  @ TELEFONO，SqlDbType.Float， 53 ）。Value =  Me  .txttelefono.Text 
 cn.Open（）
 cmd.ExecuteNonQuery（）
 MessageBox.Show（  REGISTRO INSERTADO CORRECTAMENTE）
  Catch  ex  As 异常
 
 
 结束 尝试 
 结束  Sub  
 
 私有  Sub  btnnuevo_click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs）
 我 .txtcodigo.Text =   
 我 .txtnombres.Text =   
 我 .txtapellidos.T ext =   
 我 .txtdireccion.Text =   
 我 .txttelefono.Text =   
 
 结束  Sub  
 结束  Class  

我第一次认为那是de sa连接，所以我重启了服务和我解决了。但仍然是表格执行中的异常。



存在解决此问题的方法吗？



谢谢你的时间。



最好的问候。

劳尔



< b>我尝试了什么：



我尝试将数据插入'PRUEBAS'数据库，从Visual Studio到SQL Server，当我按下时Cargar按钮，出现de Exception



'System.Data.SqlClient.SqlException'en System.Data.dll



关注

解决方案

好吧，连接字符串错误：

 Public cn As New SqlConnection（server = [Ip Server] database = DB; user id = sa; password = *****）

您需要在服务器和数据库子句之间使用分号：

 Public cn As New SqlConnection（server = [Ip Server]; database = DB; user id = sa; password = *****）

但是开始通过尝试这个：简单的SQL连接字符串创建 [ ^ ]生成一个工作字符串。



然后拼写正确插入：

 Dim sql As String =intert into PRUEBA values（@ CODIGO，@ NOMBRE，@ APELLIDO，@ DIRECCION，@ TELEFONO）

应

 Dim sql As String =INSERT到PRUEBA值（@ CODIGO，@ NOMBRE，@ APELLIDO，@ DIRECCION，@ TELEFONO）

然后，停止吞咽异常！

记录它们，报告它们，但空的捕获块是个坏主意，因为它们丢弃了解决问题所需的所有信息...... / BLOCKQUOTE>

Hello everybody,

My Name is Raúl, and I write for you from México.

I'm trying to make a connection since visual studio to SQL Server

First I did a module trying a simple connection yo my server like this:

Imports System.Data.SqlClient
Module CONEXION
    Public cn As New SqlConnection("server = [Ip Server] database = DB; user id = sa; password=*****")
End Module

Then the form code is like this:

Imports System.Data.SqlClient

Public Class Form1
    Dim da As SqlDataAdapter
    Dim ds As DataSet
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    End Sub
    Private Sub btngrabar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btngrabar.Click

        Dim sql As String = "intert into PRUEBA values(@CODIGO,@NOMBRE,@APELLIDO,@DIRECCION,@TELEFONO)"
        Dim cmd As New SqlCommand(sql, cn)
        Try
            cmd.CommandType = CommandType.Text
            cmd.Parameters.Add("@CODIGO", SqlDbType.VarChar, 5).Value = Me.txtcodigo.Text
            cmd.Parameters.Add("@NOMBRE", SqlDbType.VarChar, 25).Value = Me.txtnombres.Text
            cmd.Parameters.Add("@APELLIDO", SqlDbType.NVarChar, 25).Value = Me.txtapellidos.Text
            cmd.Parameters.Add("@DIRECCION", SqlDbType.NVarChar, 25).Value = Me.txtdireccion.Text
            cmd.Parameters.Add("@TELEFONO", SqlDbType.Float, 53).Value = Me.txttelefono.Text
            cn.Open()
            cmd.ExecuteNonQuery()
            MessageBox.Show("REGISTRO INSERTADO CORRECTAMENTE")
        Catch ex As Exception


        End Try
    End Sub

    Private Sub btnnuevo_click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.txtcodigo.Text = ""
        Me.txtnombres.Text = ""
        Me.txtapellidos.Text = ""
        Me.txtdireccion.Text = ""
        Me.txttelefono.Text = ""

    End Sub
End Class

At first time I thought that was de sa connection, so I restart the services and I was solved. But still the Exception whit the form execution.

Exist a way to solve this issue?

Thank you for your time.

Best Regards.
Raul

What I have tried:

I'm tryng to insert data to the 'PRUEBAS' database since Visual Studio to SQL Server, When I press the "Cargar" button, appears de Exception

'System.Data.SqlClient.SqlException' en System.Data.dll

Regards

解决方案

Well, the connection string is wrong:

Public cn As New SqlConnection("server = [Ip Server] database = DB; user id = sa; password=*****")

You need a semicolon between the server and database clauses:

Public cn As New SqlConnection("server = [Ip Server];database = DB; user id = sa; password=*****")

But start by trying this: Simple SQL Connection String Creation[^] to generate a working string.

Then spell INSERT correctly:

Dim sql As String = "intert into PRUEBA values(@CODIGO,@NOMBRE,@APELLIDO,@DIRECCION,@TELEFONO)"

Should be

Dim sql As String = "INSERT into PRUEBA values(@CODIGO,@NOMBRE,@APELLIDO,@DIRECCION,@TELEFONO)"

Then, stop swallowing exceptions!
Log them, report them, but empty catch blocks are a bad idea as they throw away all the information you need to solve a problem ...

这篇关于异常'system.data.sqlclient.sqlexception'en system.data.dll的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！