Access con .Net

07/09/2004 - 22:35 por Alexcar Borges | Informe spam
Buenas Tardes, amigos soy un novato tratando de generar
aplicaciones en .Net, necesito saber cómo manejar Base de
Datos de Access desde .Net sin necesidad de un objeto, o
con él.

Le agradecería favor me enviaran un ejemplo a
Alexcar_Borges@banesco.com ya que he revisado todos los
ejemplos expuestos en la página del guille.info pero
siempre me dan error..

Poseo una conexión de la siguiente manera pero no se ver
por ejemplo un registro de una tabla específica:

Public Verificar As Boolean
Public Cnnx As New ADODB.Connection
Public Rst1 As New ADODB.Recordset
Public Conet As String, MvSql1 As String, Sw1 As
Boolean

Function doCnn()
'
On Error Resume Next
'
Cnnx.CursorLocation­ODB.CursorLocationEnum.adUseClient
Cnnx.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=Base de Datos.mdb;Persist Security Info=False")
'
End Function

Function doRst1()
'
On Error GoTo Ver1
'
Rst1.Open(MvSql1, Cnnx,
ADODB.CursorTypeEnum.adOpenDynamic,
ADODB.LockTypeEnum.adLockBatchOptimistic)
'
Exit Function
'
Ver1:
'
Sw1 = True
MsgBox(err.Description)
'
End Function

Function doRst1C()
'
On Error Resume Next
'
Rst1.Close()
'
End Function
 

Leer las respuestas

#1 DJ MIA0
08/09/2004 - 00:09 | Informe spam
Comprate un libro que hable sobre ado. El 98 % de los
libros te dice eso.


Miao...



Buenas Tardes, amigos soy un novato tratando de generar
aplicaciones en .Net, necesito saber cómo manejar Base


de
Datos de Access desde .Net sin necesidad de un objeto, o
con él.

Le agradecería favor me enviaran un ejemplo a
ya que he revisado todos los
ejemplos expuestos en la página del guille.info pero
siempre me dan error..

Poseo una conexión de la siguiente manera pero no se ver
por ejemplo un registro de una tabla específica:

Public Verificar As Boolean
Public Cnnx As New ADODB.Connection
Public Rst1 As New ADODB.Recordset
Public Conet As String, MvSql1 As String, Sw1 As
Boolean

Function doCnn()
'
On Error Resume Next
'
Cnnx.CursorLocation­ODB.CursorLocationEnum.adUseClient
Cnnx.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=Base de Datos.mdb;Persist Security Info=False")
'
End Function

Function doRst1()
'
On Error GoTo Ver1
'
Rst1.Open(MvSql1, Cnnx,
ADODB.CursorTypeEnum.adOpenDynamic,
ADODB.LockTypeEnum.adLockBatchOptimistic)
'
Exit Function
'
Ver1:
'
Sw1 = True
MsgBox(err.Description)
'
End Function

Function doRst1C()
'
On Error Resume Next
'
Rst1.Close()
'
End Function
.

Preguntas similares