Indices de SQLServer

Hola!! intenta usar cursores del lado del servidor:

.


Maximiliano Damian Accotto
"Fran.Malaga" escribió en el mensaje
news:032601c3bb1c$3c41ced0$
Saludos,
tengo una aplicación en vb6 que recorre datos de una
tabla (en Access) a través de su índice principal
("PrimaryKey"), el problema es que al actualizar la bd a
SQLServer, en esta operación me dice que el proveedor no
admite esta interfaz. El código utilizado es:

Set BaseDatos = New ADODB.Connection
With BaseDatos
.Open "Provider=SQLOLEDB.1;
Integrated Security=SSPI;
Persist Security Info=False;
Initial Catalog=" & NomBD & ";
Data Source=JUPITER"
End With
Set Tabla1 = New ADODB.Recordset
With Tabla1
.ActiveConnection = BaseDatos
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open "Empresas", , , , adCmdTable
End With

Gracias

Prueba cambiando el ADO Table recordset

Tabla1.open "Empresas"

por

Tabla1.open "SELECT * FROM Empresas"

Saludos,
Ulises


Mostrar la cita

Saludos,
tengo una aplicación en vb6 que recorre datos de una
tabla (en Access) a través de su índice principal
("PrimaryKey"), el problema es que al actualizar la bd a
SQLServer, en esta operación me dice que el proveedor no
admite esta interfaz. El código utilizado es:

Set BaseDatos = New ADODB.Connection
With BaseDatos
.Open "Provider=SQLOLEDB.1;
Integrated Security=SSPI;
Persist Security Info=False;
Initial Catalog=" & NomBD & ";
Data Source=JUPITER"
End With
Set Tabla1 = New ADODB.Recordset
With Tabla1
.ActiveConnection = BaseDatos
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open "Empresas", , , , adCmdTable
End With

Gracias

Fran quizá con lo que te proponen max o ulises soluciones tu problema
puntual, pero si no cambias el chip, seguramente tendrás muchos problemas
con cualquier base de datos relacional que uses, sea Sql-server, sea oracle
o sea lo que sea.

Si quieres actualizar una bd sql, usa update, usa insert, usa delete, usa
SQL en definitiva.

Saludos
Miguel Egea


"Fran.Malaga" escribió en el mensaje
news:032601c3bb1c$3c41ced0$
Saludos,
tengo una aplicación en vb6 que recorre datos de una
tabla (en Access) a través de su índice principal
("PrimaryKey"), el problema es que al actualizar la bd a
SQLServer, en esta operación me dice que el proveedor no
admite esta interfaz. El código utilizado es:

Set BaseDatos = New ADODB.Connection
With BaseDatos
.Open "Provider=SQLOLEDB.1;
Integrated Security=SSPI;
Persist Security Info=False;
Initial Catalog=" & NomBD & ";
Data Source=JUPITER"
End With
Set Tabla1 = New ADODB.Recordset
With Tabla1
.ActiveConnection = BaseDatos
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open "Empresas", , , , adCmdTable
End With

Gracias

Quizás no me he explicado correctamente, el problema lo
tengo cuando quiero utilizar el índice para recorrer la
tabla. Una vez que he abierto la base de datos y he
abierto la tabla, cuando ejecuto:
Tabla1.index="PrimaryKey" me da el error que ya he
comentado antes de que el proveedor no admite la interfaz
para esa operación. Quisiera saber si hay alguna opción
de hacer eso.

Gracias por vuestras respuestas...


Mostrar la cita

Fran quizá con lo que te proponen max o ulises

soluciones tu problema
Mostrar la cita

puntual, pero si no cambias el chip, seguramente tendrás

muchos problemas
Mostrar la cita

con cualquier base de datos relacional que uses, sea Sql-

server, sea oracle
Mostrar la cita

o sea lo que sea.

Si quieres actualizar una bd sql, usa update, usa

insert, usa delete, usa
Mostrar la cita

SQL en definitiva.

Saludos
Miguel Egea


"Fran.Malaga"

escribió en el mensaje
Mostrar la cita

news:032601c3bb1c$3c41ced0$
Saludos,
tengo una aplicación en vb6 que recorre datos de una
tabla (en Access) a través de su índice principal
("PrimaryKey"), el problema es que al actualizar la bd a
SQLServer, en esta operación me dice que el proveedor no
admite esta interfaz. El código utilizado es:

Set BaseDatos = New ADODB.Connection
With BaseDatos
.Open "Provider=SQLOLEDB.1;
Integrated Security=SSPI;
Persist Security Info=False;
Initial Catalog=" & NomBD & ";
Data Source=JUPITER"
End With
Set Tabla1 = New ADODB.Recordset
With Tabla1
.ActiveConnection = BaseDatos
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open "Empresas", , , , adCmdTable
End With

Gracias


.

Insisto fran, verás cuando tu ejecutas una instrucción select campo1,campo2
from tabla where condición order by campo, sql usará o nó el índice si le es
util, no tiene ningún sentido forzarlo a usarlo y por eso no te admite esa
sintaxis. Esa parte deja de administrarla el programador y lo hace el gestor
de base de datos (y por norma lo hace bastante bien)

Saludos

Miguel Egea
Microsoft SQL-SERVER MVP
Brigada Anti-Cursores


"Fran_malaga" escribió en el mensaje
news:0b7601c3be32$71c0aa40$
Quizás no me he explicado correctamente, el problema lo
tengo cuando quiero utilizar el índice para recorrer la
tabla. Una vez que he abierto la base de datos y he
abierto la tabla, cuando ejecuto:
Tabla1.index="PrimaryKey" me da el error que ya he
comentado antes de que el proveedor no admite la interfaz
para esa operación. Quisiera saber si hay alguna opción
de hacer eso.

Gracias por vuestras respuestas...


Mostrar la cita

Fran quizá con lo que te proponen max o ulises

soluciones tu problema
Mostrar la cita

puntual, pero si no cambias el chip, seguramente tendrás

muchos problemas
Mostrar la cita

con cualquier base de datos relacional que uses, sea Sql-

server, sea oracle
Mostrar la cita

o sea lo que sea.

Si quieres actualizar una bd sql, usa update, usa

insert, usa delete, usa
Mostrar la cita

SQL en definitiva.

Saludos
Miguel Egea


"Fran.Malaga"

escribió en el mensaje
Mostrar la cita

news:032601c3bb1c$3c41ced0$
Saludos,
tengo una aplicación en vb6 que recorre datos de una
tabla (en Access) a través de su índice principal
("PrimaryKey"), el problema es que al actualizar la bd a
SQLServer, en esta operación me dice que el proveedor no
admite esta interfaz. El código utilizado es:

Set BaseDatos = New ADODB.Connection
With BaseDatos
.Open "Provider=SQLOLEDB.1;
Integrated Security=SSPI;
Persist Security Info=False;
Initial Catalog=" & NomBD & ";
Data Source=JUPITER"
End With
Set Tabla1 = New ADODB.Recordset
With Tabla1
.ActiveConnection = BaseDatos
.LockType = adLockOptimistic
.CursorType = adOpenKeyset
.CursorLocation = adUseClient
.Open "Empresas", , , , adCmdTable
End With

Gracias


.