error de parametros

[txetxo]

Hola

Tengo el siguiente codigo

Private Sub Command1_Click()
Dim miconexion As ADODB.Connection
Dim mirecordset As ADODB.Recordset
Set mirecordset = New ADODB.Recordset
Set miconexion = New ADODB.Connection
miconexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\josetxo\Escritorio\pruebas VB y BD\datos convertidos.mdb;Persist Security Info=False"
miconexion.Open
mirecordset.Open "select jugadores_dorsal, jugadores_nombre, jugadores_goles from jugadores where jugadores_nombre='josetxo galarregui gonzalez'", miconexion, adOpenDynamic, adLockOptimistic
end sub

pero al ejecutarlo me da un error: NO SE HAN ESPECIFICADO VALORES PARA ALGUNOS DE LOS PARAMETROS REQUERIDOS

¿Alguien me puede ayudar?

¿Como presento los datos en un MsFlexGrid?

ADO no es mi fuerte de momento
Gracias de antemano.

[lop7]

Hola...
prueba asi:

Private Sub Command1_Click()
dim str as string
Dim miconexion As ADODB.Connection
Dim mirecordset As ADODB.Recordset
Set mirecordset = New ADODB.Recordset
Set miconexion = New ADODB.Connection
miconexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\josetxo\Escritorio\pruebas VB y BD\datos convertidos.mdb;Persist Security Info=False"
miconexion.Open

str= "josetxo galarregui gonzalez"
mirecordset.Open "select jugadores_dorsal, jugadores_nombre, jugadores_goles from jugadores where jugadores_nombre= str, miconexion, adOpenDynamic, adLockOptimistic
end sub

a ver que te dice...ok
saludos...
nos vmos...