Why this code doesn't work!?

Object:Grid1                Procedure:Init()

lodo = Createobject("CursorAdapter")
lodo.DataSourceType="ODBC"
lodo.alias="ODBC_CCS"
lodo.Datasource=Sqlstringconnect("DRIVER=SQL Server;Network=DBMSSOCN;SERVER=172.27.26.12;database=operacionesctv;uid=operacionesctv;pwd=rachel101")
lodo.SelectCmd="select * from supervisores"
lodo.CursorFill()
this.RecordSource="ODBC_CCS"


THX.