Zona HTML Zona Java Zona PHP Zona ASP Zona Bases de datos
Inicio > Foros > Visual Basic > Error con módulo conexion DB
-Foros de debate

Visual Basic
Lista de foros | Lista de mensajes de este foro

Privacidad: Recuerde que la información escrita en los foros de programación es 100% pública y que su ip será registrada asociada a su mensaje. Si encuentra un mensaje fuera de lugar, por favor, notifiquelo para su revisión y eliminación.

Error con módulo conexion DB
Enviado por Marcela Puerta el día 5 de junio de 2008

Hola a todos ,
Estoy trabajando en visual studio 2005 y tengo un problema con un módulo que creé para conectarme con la base de datos(slq server 2005); en el momento que voy a adicionar una fila, con esta conexión me saca error en tables ahí va la conexión y la parte de grabación.
Envio como lo estoy haciendo por si alguien me puede ayudar?
Gracias....

Friend Sub conexionbd(ByVal SQL As String)
Try
con = New SqlConnection(\\\"Data Source = (local); Initial Catalog = BASEDEDATOS; Integrated Security = True\\\")
con.Open()
cmd = New SqlCommand(SQL, con)
da = New SqlDataAdapter(cmd)
ds = New DataSet()
da.Fill(ds)
Catch ex As SqlException
MsgBox(\\\"Problema en la conexion con la BD\\\")
Finally
con.Close()
End Try
End Sub

\\\'crear un nuevo objeto fila
Dim odatarow As DataRow

odatarow = ds.Tables(\\\"clientes\\\").NewRow

\\\'añadir datos a las columnas de la fila
odatarow(\\\"idclien\\\") = txidclien.Text
odatarow(\\\"fechingclien\\\") = txfechingclien.Text
odatarow(\\\"nomclien\\\") = txnomclien.Text
odatarow(\\\"primapell\\\") = txprimapell.Text
odatarow(\\\"segapell\\\") = txsegapell.Text

\\\'añadir el objeto fila a la colección de filas de la tabla
ds.Tables(\\\"clientes\\\").Rows.Add(odatarow)

\\\'actualización
da.Update(ds, \\\"clientes\\\")

 

Tienda
Patrocinados
 

Copyright © 1999-2006 Programación en castellano. Todos los derechos reservados.
Formulario de Contacto - Datos legales - Publicidad

Hospedaje web y servidores dedicados linux por Ferca Network