ExecuteNonQuery: la propiedad Connection no se ha inicializado. tengo el siguiente codigo para insertar datos en una base de datos de sql trabajo con asp y lenguaje vb. Imports System.Data Imports System.Data.SqlClient Imports System.Text PartialClass _Default Inherits System.Web.UI.Page ProtectedSub btnguardar2_Click(ByVal sender AsObject, ByVal e As System.EventArgs) Handles btnguardar2.Click Dim con AsNew SqlConnection
con.ConnectionString = "Data Source=SS1\SQLEXPRESS;" + "Initial Catalog=INTRANET;Integrated Security=True" Dim comd AsNew SqlCommand
comd.CommandText = "Insert into bancos(banco,titular,cuenta,clave,tipo,moneda,)" + "VALUES(,@banco,@titular,@cuenta,@clave,@tipo,@mon eda)" comd.Parameters.Add("@banco", SqlDbType.NVarChar)
comd.Parameters.Add("@titular", SqlDbType.NVarChar)
comd.Parameters.Add("@cuenta", SqlDbType.NVarChar)
comd.Parameters.Add("@clave", SqlDbType.NVarChar)
comd.Parameters.Add("@tipo", SqlDbType.NVarChar)
comd.Parameters.Add("@moneda", SqlDbType.NVarChar)
comd.Parameters("@banco").Value = Me.txtbanco.Text
comd.Parameters("@titular").Value = Me.txttitular.Text
comd.Parameters("@cuenta").Value = Me.txtcuenta.Text
comd.Parameters("@clave").Value = Me.txtcbancaria.Text
comd.Parameters("@tipo").Value = Me.txttipocuen.Text
comd.Parameters("@moneda").Value = Me.txtmoneda.Text Dim re AsInteger Using con
con.Open()
re = comd.ExecuteNonQuery()
con.Close() EndUsing 'Try 'con.Open() ' comd.ExecuteNonQuery() ' con.Close() ' Catch ex As Exception ''pasos si error ' Finally 'con.Close() 'End Try EndSub
EndClass al correrlo este me marca: ExecuteNonQuery: la propiedad Connection no se ha inicializado. el try no me sirvio, si lo activo no marca error pero no guarda nada, alguien puede ayudarme. se los agradezco |