Citect connectivity to SQL

sir can u please provide citect code to move scada tags data to ms sql server table
i trying hard but not gettng success.

FUNCTION
SQLInsert()

INT err,CODBC;

//Connect to SQL Server
CODBC = SQLConnect("DSN=ODBCDSN;UID=;PWD=");
IF CODBC = -1 THEN
DspError("Cannot Open Database");
END

err = SQLExec(CODBC,"INSERT INTO db.TABLE (SomeStringColumn, SomeNumberColumn2) VALUES ('"+ CitectTag1 + "'," + CitectTag2 + ");");
If err <> 0 Then
//Saves error message to a file
err = FileOpen("C:\ersql.txt","r+");
FileWriteLn(err,"SQL Insert "+SQLErrMsg());
FileClose(err);
DspError("Could not Insert to SQL Database");
RETURN
End

SQLDisconnect(CODBC);

END

Thank u so much sir