Ver Mensaje Individual
  #12 (permalink)  
Antiguo 13/06/2006, 13:55
jericosoft
 
Fecha de Ingreso: febrero-2006
Mensajes: 37
Antigüedad: 18 años, 3 meses
Puntos: 0
Crea un DSN de sql que se conecte a tu base

luego en tu form pon un DATA Control

Conectalo con :

ControlData.DatabaseName="PROVIDER=MSDASQL;dsn=Nom breDSN;uid=;pwd=;"
ControlData.Refresh

con eso tienes acceso a todas tus tablas , tengan el nombre que sea

Ademas de que si el servidor sql no esta activo te manda un error que puedes manejar facilmente.


Accede a tus datos asi :

ControlData.RecordSource = "select dato1,dato2,dato3 from 01-clientes where dato1 = 1 and dato2 = " & Chr$(39) & Text1 & Chr$(39)
ControlData.Refresh


Para seleccionar fechas haz arreglos con dos DTPICKER que el usuario selecciona :

sfecha = ""
Dfecha = Mid$(DTP1.Value, 7, 4) & "-" & Mid$(DTP1.Value, 4, 2) & "-" & Mid$(DTP1.Value, 1, 2) & " 00:00:00.000"
afecha = Mid$(DTP2.Value, 7, 4) & "-" & Mid$(DTP2.Value, 4, 2) & "-" & Mid$(DTP2.Value, 1, 2) & " 00:00:00.000"
sfecha = "Between {ts '" & Dfecha & "'} and {ts '" & afecha & "'}"

ControlData.RecordSource = "select dato1,dato2,dato3 from 00-servicios where dato1 = 1.00 and fechaentrega " & sfecha & " order by dato2, fechaentrega asc"
ControlData.Refresh


Espero te sirva la idea
__________________
Jerico