algun ejemplo de Crystal 10

[xknown]

Eso no es problema de Crystal Reports, viendo tu código me parece que tu cadena de conexión está mal, me parece que debería ser:

Código:

 Te faltó el ; después de db1.mdb

Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Persist Security
Info=False;")

ó

Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;")

Saludos