error de parametros

[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...