Beginning Access 2002 VBA (Programmer to Programmer)
| |
Command
Command .Cancel Parameter = Command .CreateParameter( Name As String, Type As DataTypeEnum, _ Direction As ParameterDirectionEnum, Size As Integer, [Value As Variant] ) Recordset = Command .Execute( RecordsAffected As Variant, Parameters As Variant, _ Options As Integer)
Connection
Integer = Connection.BeginTrans Connection.Cancel Connection.Close Connection.CommitTrans Recordset = Connection.Execute(CommandText As String, RecordsAffected As Variant, _ Options As Integer) Connection.Open(ConnectionString As String, UserID As String, Password As String, _ Options As Integer) Recordset = Connection.OpenSchema(Schema As SchemaEnum, [Restrictions As Variant], _ [SchemaID As Variant]) Connection.RollbackTrans
Errors
Errors .Clear Errors .Refresh
Field
Field.AppendChunk(Data As Variant) Variant = Field.GetChunk(Length As Integer)
Fields
Fields.Append(Name As String, Type As DataTypeEnum, DefinedSize As Integer, _ Attrib As FieldAttributeEnum) Fields.Delete(Index As Variant) Fields.Refresh
Parameter
Parameter.AppendChunk(Val As Variant)
Parameters
Parameters.Append(Object As Object) Parameters.Delete(Index As Variant) Parameters .Refresh
Properties
Properties .Refresh
Recordset
Recordset.AddNew([FieldList As Variant], [Values As Variant]) Recordset.Cancel Recordset.CancelBatch(AffectRecords As AffectEnum) Recordset.CancelUpdate Recordset = Recordset.Clone(LockType As LockTypeEnum) Recordset.Close CompareEnum = Recordset.CompareBookmarks(Bookmark1 As Variant, Bookmark2 As Variant) Recordset.Delete(AffectRecords As AffectEnum) Recordset.Find(Criteria As String, SkipRecords As Integer, _ SearchDirection As SearchDirectionEnum, [Start As Variant]) Variant = Recordset.GetRows(Rows As Integer, [Start As Variant], [Fields As Variant]) String = Recordset.GetString(StringFormat As StringFormatEnum, _ NumRows As Integer, ColumnDelimiter As String, RowDelimeter As String, _ NullExpr As String) Recordset.Move(NumRecords As Integer, [Start As Variant]) Recordset.MoveFirst Recordset.MoveLast Recordset.MoveNext Recordset.MovePrevious Recordset = Recordset.NextRecordset([RecordsAffected As Variant]) Recordset.Open(Source As Variant, ActiveConnection As Variant, _ CursorType As CursorTypeEnum, LockType As LockTypeEnum, Options As Integer) Recordset.Requery(Options As Integer) Recordset.Resync(AffectRecords As AffectEnum, ResyncValues As ResyncEnum) Recordset.Save(FileName As String, PersistFormat As PersistFormatEnum) Recordset.Seek(KeyValues As Variant, SeekOption As SeekEnum) Boolean = Recordset.Supports(CursorOptions As CursorOptionEnum) Recordset.Update([Fields As Variant], [Values As Variant]) Recordset.UpdateBatch(AffectRecords As AffectEnum)
| |