by Tata's ()
Category: Databases/Data Access/DAO/ADO
Compatability: Visual Basic 3.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: 
(9 Votes)
Using this Program one can browse for Access Database through Network or local computer, pick a table you want to make an XML file from, and finally push a button to create a file in XML format. One can also display the newly created XML file and print it into Textbox with further "copy-and-paste".
For database browsing I used an API call: GetOpenFileName Lib "comdlg32.dll" instead of bulky CommonDialog Control.
For getting a tablenames of the database I used OpenSchema(adSchemaTables)for create Connection and then simply added tablenames into Combobox.
Then I used File access VB feature to write an XML file from access table, reading column names and columns, converting it into XML format and writing on disk.
The last feature this program has to print out a newly created XML file into Textbox for analysis and, if necessary, "copy-and-paste".
Inputs
All the inputs are: Access Database Path and name like: C:\My Databases\MyData.mdb
I use "Browse for files" using API call:
GetOpenFileName Lib "comdlg32.dll", it works faster.
Assumes
Just unzip and upload into your directory.
Code Returns
Ready to go XML file. The default directory is the Project directory, can be simply modified.
Side Effects
There are no side effects besides the necessaty to customize an Output directory.
API DeclarationsPrivate Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
"GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long
Download AccessTOXML (10 KB)
VBcoders