Ademas de tener todo lo que te dicen... este seria un ejemplo:
lcServer="direccion_ip" && la direccion de la web
lcDatabase="base_datos" && nombre de la base de datos
lcUser = "usuario" && Nombre usuario
lcPassword = "clave" && clave usuario
lcStringConn="Driver={MySQL ODBC 3.51 Driver};Port=3306"+;
";Server="+lcServer+;
";Database="+lcDatabase+;
";Uid="+lcUser+;
";Pwd="+lcPassWord
SQLSETPROP(0,"DispLogin",3)
lnHandle=SQLSTRINGCONNECT(lcStringConn)
IF lnHandle > 0 && es que consiguio conectarse
SQLEXEC(lnhandle,'use base_datos') && se puede saltar
SQLEXEC(lnhandle,"delete from tabla1 ") && borrar de tabla
hora=CHR(39)+TIME()+CHR(39)
anno=CHR(39)+DTOC(DATE())+CHR(39)
SQLEXEC(lnhandle,"insert into tabla1 (codigobt,delegabt,horabt,diabt) values ('12345678901234567890','999',&hora,&anno)") && escribir
SQLEXEC(lnhandle,"select * from trazos","pruebas") && leer
BROWSE && mostrar en pantalla
SQLDISCONNECT(lnHandle) && desconectar
endif
Espero te sirva...