** Change connection string to the real one
sqlH = SQLSTRINGCONNECT([Driver = SQL Server;Server=ServerName\SQLEXPRESS;Trusted_Connection=yes])
IF sqlH < 0
   AERROR(laError)
   MESSAGEBOX([Failed to connect to server: ]+ laError[1,2])
   RETURN
ENDIF
TEXT TO lcSql NOSHOW TEXTMERGE PRETEXT 15
     CREATE TABLE Test (Field1 varchar(20),
                        Field2 int)
ENDTEXT
IF SQLEXEC(sqlH, m.lcSql) > 0
   *** Sucess
ELSE
   AERROR(laError)
   MESSAGEBOX([Failed to create a table: ]+ laError[1,2])
ENDIF
SQLDISCONNECT(sqlH)