Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
OLE with Access
- Access 2000 Advanced DML Transactions
- Access Recordset to CSV File UDF
- Access RunCommand Constants
- ACCESS Table or Query Exists
- Access to Excel via SQL
- Access Visible Problem
- Adding Fields to an Existing Access Table
- Advanced DML Transactions
- Advanced SQL in the Jet 4.0 Provider Example
- Another OLE with Access Example
- Automating Access Tutorial
- Check if Access Table Exists
- Commit Rollback Begin Trans Updatebatch
- Control Access Forms
- Count Access Records
- Csv to Access
- Dealing with ACCESS 97 Field Types
- execute a macro in Access
- Execute a Public function in Access
- Export Access Report in Choice of Formats
- Export MDB to Flat File
- Find Read and Insert Data in Access
- Gather ACCESS Table and Column Information Into Excel
- Get Access Version That Created MDB File
- Get Column Data From an Access Database
- Get Record Count
- How to Use the OpenTable method
- Launch Access Macro from Commandline
- Loop thru a recordset in Access
- Office 2003 Macro Security Issue
- OLE and Access
- OLE Import a table into Access
- OLE Import Table into Access
- Open Access DB with DAO
- Pack an Access Database
- Query and Export Data from Microsoft Access
- Read Write Delete Tables from Access DB
- Repair MDB
- Retrieve Data in Access
- SQL UPDATE Fails with Access
- UDF to Return Record Count
- Updating Table From Filtered Recordset
- Ways to Get Data from and Access file without Access installed
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Repair MDB
Question:
Is there a way to repair a MDB via Winbatch. I have got some command for compacting an MDB and I think the same should be possible for repair like:henv = __Database_Init() If henv == -1 Then Return -1 hdbc = __Database_InitSQL(henv) If hdbc < 0 Then Return -2 ret=qConfigData(2, "Microsoft Access Driver (*.mdb)", "COMPACT_DB=%db_nam% %db_nam% General", @FALSE) qFreeConnect(hdbc) qFreeEnv(henv)
Answer:
If you have Access installed (not just the Driver) you can use
cMDB = "c:\MY.MDB" ;Full path/name of access db
cBkup = "c:\MYBCKUP.MDB" ; Backup file name
oDB = CreateObject("Access.Application")
oDB.CompactRepair(::LogFile=@TRUE,SourceFile=cMDB,DestinationFile=cBkup)
oDB=0
If FileExist(cBkup)
FileCopy(cBkup,cMDB,@FALSE)
FileDelete(cBkup)
EndIf
I would hold off on the FileDelete(cBkup) unil I was sure things worked as planned. NOTE: the Access file must not be
opened on the PC.
Article ID: W17142
File Created: 2007:07:03:14:28:28
Last Updated: 2007:07:03:14:28:28