Try something like this:
server.ScriptTimeout = 240
dim adoConn
dim strConnect
dim strSQL
set adoConn = server.CreateObject("ADODB
strConnect = "Provider=Microsoft.Jet.OL
adoConn.Open strConnect
strSQL = "update tblTable set ForeName = '" & strFN & "', Surname = '" & strSN & "', Date_Of_Birth = ''" & strDOB & ""
strSQL = strSQL & " where Customer_ID = " & lngCustID
adoConn.Execute strSQL
adoConn.Close
set adoConn = nothing
Preece
Main Topics
Browse All Topics





by: BadotzPosted on 2007-01-18 at 05:16:13ID: 18340455
So, what is your question?