insert不了oracle?用的是VB

Dim cnGet As ADODB.Connection
Dim rsGet As ADODB.Recordset
Dim sConnect, sSql As StringsConnect = "Provider=OraOLEDB.Oracle.1;Persist Security Info=False;Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=192.168.10.56)(PORT=1521)))(CONNECT_DATA=(SERVICE_NAME=myoracle)));User ID=hire;Password=hire;"Set cnGet = New ADODB.Connection
cnGet.Open sConnect
Set rsGet = New ADODB.Recordset
sSql = "insert into sys_time (road_no,sys_time,user_name,modified_date) values (1,2,3,4)"
cnGet.Execute sSql为什么oracle还是没写入记录?又没有提示出错. 我用的是oracle9i