Visual Basic - Error 13, no coinciden los tipos.

Life is soft - evento anual de software empresarial
   
Vista:

Error 13, no coinciden los tipos.

Publicado por Luís Mercado (49 intervenciones) el 10/09/2007 17:29:32
disculpen tengo un problemillo, uso vb 6 y cr 4.6, y al ejecutar estos códigos me da el "error 13 no coinciden los tipos", en la línea .reportsource=rlistado.

ahora si la anulo esta línea, porque me parece que está mal (opinion muy personal) me da el "error 20536 en tiempo de ejecución, imposible de conectar registro de parámetros incorrectos" en la línea .action=0. si alguien me da una manito por favor os agradecería mucho, por su amable ayuda.

If DataCombo1 <> "" Then
Set reporte = Nothing
strFormula = "({datosgen.curso}='" & ensayo.DataCombo1.Text & " ')"
strlistado = "Listado Generales de Alumnos"
rlistado = "c:\encanto\rpt\datosgen1.rpt"
With MDIprobando.reporte
.ReportFileName = rlistado
.SelectionFormula = strFormula
.DataFiles(0) = "C:\encanto\integrl97.mdb"
.WindowTitle = "listado por curso"
.Destination = crptToPrinter
.Connect = cnn
.ReportSource = rlistado
.Action = 0
End With
Set reporte = Nothing
Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If
End Sub

**
por favor abstenerse de responder quienes no dan respuestas serias y de ayuda. muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error 13, no coinciden los tipos.

Publicado por Khristian (38 intervenciones) el 11/09/2007 18:02:37
No será

..........
rlistado = "c:\encanto\rpt\datosgen1.rpt"
...............
.............
.........
.ReportFileName = rlistado
...........
..........


---------------------------------------
www.khristian-rodriguez.tk
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error 13, no coinciden los tipos.

Publicado por Luís Mercado (49 intervenciones) el 11/09/2007 22:12:09
pues gracias por comentar pero no entiendo la sugerencia, lo que has puesto es lo que tengo puesto yo en mis códigos, podrías explicarme un poco mejor? disculpa mi falta de iluminación y gracias de nuevo.

Luís Mercado
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error 13, no coinciden los tipos.

Publicado por Khristian (38 intervenciones) el 14/09/2007 03:42:35
NO VEO QUE SEA LO MISMO

TU -->

.ReportSource = rlistado

YO -->

.ReportFileName = rlistado
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error 13, no coinciden los tipos.

Publicado por Luís Mercado (49 intervenciones) el 17/09/2007 15:05:28
Que bruto soy, mil gracias por tu ayuda y aclaración, pues mira ahora he cambiado casi todo en busca de una solución.

y tengo esta codificación (la de abajo) que no me da error, pero tampoco hace nada ni imprime nada, en fin cuando sale un mensaje de error uno tiene una pista pero ahora la cosa se me pone más negra al no saber de donde está mal.

intenté con mis códigos anterior a cambiar la opción reportsource por reportfilename, pero igual no funciona.

Private Sub Form_Load()
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.ConnectionString = "C:\encanto\integrl.mdb"
cnn.Open
End Sub
Private Sub imprimir_Click()
If DataCombo1 <> "" Then
Set reporte = Nothing
strformula = "({Datosgen.curso}=' " & ensayo.DataCombo1.Text & " ')"
With MDIprobando.reporte

.SelectionFormula = strformula
.Connect = cnn
.DataFiles(0) = "c:\encanto\integrl.mdb"
.ReportFileName = "c:\encanto\rpt\datosgen1.rpt"
.WindowState = crptMaximized
.WindowTitle = "listado simple"
.RetrieveDataFiles
.Destination = crptToPrinter
.PrintReport
'.Action = 0
End With
Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If
End Sub

gracias por tu paciencia y ayuda, saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Error 13, no coinciden los tipos.

Publicado por Adriss (1 intervención) el 09/04/2010 23:35:06
Hola a todos!!!!
lo que pasa es que estoy haciendo un paqueño programa con vb
y este me repota un error en la siguiente linea de codigo:

.Documents.Open Filename:=Cells((contador), 8), ReadOnly:=True

conador es una variable de tipo integer ,inicialixzada en un for ..next
ayudenme porfis es urgente...

....a el error es el error 13:no coincidfen los tipos
gracias.... gracias :)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error 13, no coinciden los tipos.

Publicado por bol (1 intervención) el 05/12/2007 19:42:56
Puedes ver esta página http://www.vbscripttips.com/id?76576556
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error 13, no coinciden los tipos.

Publicado por Ricardo (2 intervenciones) el 02/07/2013 18:41:34
hay que cambiar la prioridad de las referencias.

menu >proyecto >referencias

seleccionas "Microsoft DAO 3.6 Object Library" o "Microsoft DAO 3.51 Object Library" segun el que tengas referenciado para tu base de datos y lo subes de prioridad con las flechas hasta despues de OLE Automation y asi se deve de solucionar el problema
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar