Close Method

In the following example we are connecting to an Access database, checking to see if a value exists in the open recordset, then disconnecting the connection.

VB SCRIPT

sConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=@test\crm.mdb;Mode=Share Deny None;Persist Security Info=False"

App.DbConnect "SampleConnection", nlDBServerADO, sConnectString

SampleConnection.Open "SampleRecordset", "Table1", nlDBUseClient, nlDBOpenDynamic, nlDBLockReadOnly, nlDBCmdTable

SampleRecordset.Move nlDBMoveFirst

SampleRecordset.Find "EntityRef =" & App.GetValue("varSearch"),nlDBFindForward

If SampleRecordset.EOF = False then

App.MsgBox App.GetValue("varSearch") & " was found!!!!!", "Found!!!!!", nlMsgInformation, nlMsgOkOnly

else

App.MsgBox "Record was not found", "Alert", nlMsgInformation, nlMsgOkOnly

End If

SampleConnection.Close "SampleRecordset"

SampleConnection.Disconnect

The following function closes the database and the connection to the database server

JSCRIPT

function close()

{

SampleConnection.Close("SampleRecordset");

SampleConnection.Disconnect();

}