Error :([DBNMPNTW]Connection broken.)

[Buildboy]

Hi All,
I am trying to write some data to the data base, the same vbscript works for XP and 2K3, its only on 2K that I am seeing this error. here is the script:

dim conn, rs, sql

sql = "INSERT INTO dbo.VMHostMapping (MachineName,vmxLink,VMHostIP,OSName) VALUES('%HOST_NAME%','%VM_URL%','%VM_HOST_IP%', '%OS_VERSION%')"

set conn = CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")

conn.Open "Provider=SQLOLEDB.1;Data Source=10.10.10.10;Initial Catalog=Framework","some_user","****"
rs.Open sql, conn, 1, 2

what am I missing here?
Thaks for the help in advance