de ADO a ADO.net
Publicado por Diana (18 intervenciones) el 26/09/2007 19:35:16
Holas a todos!
Sres. me estoy metiendo con ado.net no se mucho... quisiera saber como hago esto en ado.net
Dim mConn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim special as string
mConn.ConnectionString("Server=localhost;Port=3306;Database=DATABASE_NCM;Uid=root;Pwd="";")
mConn.Open()
With rs
.ActiveConnection = mConn
.CursorLocation = ADODB.CursorLocationEnum.adUseClient 'adUseClient
.CursorType = ADODB.CursorTypeEnum.adOpenDynamic 'adOpenDynamic
.LockType = ADODB.LockTypeEnum.adLockOptimistic 'adLockOptimistic()
.Open("select SPECIAL from tbl_user_ncm where IDE_USER_NCM='" & user & "'")
End With
special = rs.Fields(0)
if special=1 then
....
end if
como hago esto en ado.net utilizando asp.net y mysql....
Por favor ayudenme lo necesito
Muchas gracias
Sres. me estoy metiendo con ado.net no se mucho... quisiera saber como hago esto en ado.net
Dim mConn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim special as string
mConn.ConnectionString("Server=localhost;Port=3306;Database=DATABASE_NCM;Uid=root;Pwd="";")
mConn.Open()
With rs
.ActiveConnection = mConn
.CursorLocation = ADODB.CursorLocationEnum.adUseClient 'adUseClient
.CursorType = ADODB.CursorTypeEnum.adOpenDynamic 'adOpenDynamic
.LockType = ADODB.LockTypeEnum.adLockOptimistic 'adLockOptimistic()
.Open("select SPECIAL from tbl_user_ncm where IDE_USER_NCM='" & user & "'")
End With
special = rs.Fields(0)
if special=1 then
....
end if
como hago esto en ado.net utilizando asp.net y mysql....
Por favor ayudenme lo necesito
Muchas gracias
Valora esta pregunta


0