Tengo el siguiente codigo:
------------------------------------------------------------------------
Public Class connec
Public con As OleDb.OleDbConnection
Public da As OleDb.OleDbDataAdapter
Public numero As Integer
Public nombre As String
Public Function ingresar(ByVal con As OleDb.OleDbConnection)
con.Open()
Dim access As String = "insert into CURSO values ('" & numero & "','" & nombre & "')"
con.Close()
Return (0)
End Function
End Class
----------------------------------------------------------------------------------
Public Class Form1
Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrador\Mis documentos\bd1.mdb")
Dim objconnec As New connec
Private Sub btningresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btningresar.Click
objconnec.numero = txtnum.Text
objconnec.nombre = txtnom.Text
objconnec.ingresar(cn)
End Sub
End Class
---------------------------------------------------------------------------------
bueno cuando ingreso no me marca niun error , pero cuand oreviso la base de datos no ingresa nada alguen me puede ayudar...
esto es de vb6.0 el subforo de .net es el link de abajo
http://foro.elhacker.net/index.php/board,62.0.html