Ihave been working on database but Though iam able to create But Cannot Write in data base..
Dim ADOXcatalog As New ADOX.Catalog
Dim ADOXtable As New ADOX.Table
Dim ADOXindex As New ADOX.Index
On Error GoTo errhandler
ADOXcatalog.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "c:\info.mdb")
On Error Resume Next
ADOXcatalog.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
& "c:\newdata.mdb"
'name table, append fields to table
ADOXtable.Name = "Employees"
ADOXtable.Columns.Append("Name", ADOX.DataTypeEnum.adVarWChar, 40)
ADOXtable.Columns.Append("ID", ADOX.DataTypeEnum.adInteger)
ADOXtable.Columns.Append("Department", ADOX.DataTypeEnum.adVarWChar, 20)
'append tables to database
ADOXcatalog.Tables.Append(ADOXtable)
Plz tell mo how to create Rows .. imean Adding data Under each colum .. like Names under Name colum and ID's under ID colum....