Acceso rapido a SQl 2000

[juanjoxx]

Hola a todos los del foro : 
Alguien sabe cual es la mejor manera de acceder a un BD en SQL 2000, es decir q el acceso a ella sea de manera rapida ?

io probvee con esto donde BD es mi Base de Datos pe  :

Set Cnn = New ADODB.Connection
Cnn.CursorLocation = adUseClient
Cnn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=" & BD & ";Data Source=."
Cnn.Open

With CmdProducts
    .ActiveConnection = Cnn
    .CommandText = "Products" ' tabla
    .CommandType = adCmdTable
    .Prepared = True
    .Execute
End With
Set RstProducts = New ADODB.Recordset
RstProducts.CursorLocation = adUseClient
RstProducts.Open CmdProducts, , adOpenDynamic, adLockOptimistic

y nahaaaa ahora esto dependera ? de los datos q estoy jalando de mi BD o de la consulta q realizo? , la PC q tengo es una P4 2.8, 1Gb de ram (servidor) y el cliente es de P4 2.4, 512 ram aun asi quisiera saber si hay otra manera de acceder a la BD de una maera mas raipido? o mejor cambiod e lenguaje como PB9.0 (dicen q el acceso es mas rapido - sera cierto ?)

gracias a todos pro leer el msje y ayudar en la consulata  bye...

[CeLaYa]

pues yo lo hago así para la base de datos:

Código [Seleccionar] Expandir



Public BD As Connection
Public Tb As Recordset


Código [Seleccionar] Expandir


conexion = "Provider=SQLOLEDB.1;" & _
               "Persist Security Info=False;" & _
               "User ID=" & Usuario & ";" & _
               "pwd=" & Pass & ";" & _
               "Initial Catalog=" & basededatos & ";" & _
               "Data Source=" & Servidor

    On Local Error Resume Next
    BD.Open conexion
    If Err Then MsgBox Err.Number & vbCrLf & Err.Description
    exit sub
    On Local Error GoTo 0


y para abrir tablas asÍ:

Código [Seleccionar] Expandir


Set Tb = New Recordset
Tb.Open "Consulta SQL", BD, adOpenDynamic, adLockOptimistic


y lo hace rápido, aunque creo que también habria que tener encuenta la cantidad de datos de la consulta y velocidad de tus tarjetas de red