Mega Code Archive

 

Categories / VisualBasic Script / Access

 

Deleting Records via ADO

Public Sub ADOWipeOutAttribute(RecID)     ' Establish a connection transfers.mdb     MyConn = "C:\mydb.mdb"     With New ADODB.Connection         .Provider = "Microsoft.Jet.OLEDB.4.0"         .Open MyConn         .Execute "Delete From tblTransfer Where ID = " & RecID         .Close     End With End Sub