MAS90 Database and Scripting

[McKirahan]

I'd like to write scripts that access Best Software's MAS90 application
database (v3.71).

Can anyone point me to some examples or background material?

Thank you.

[Ray at]

Do you know what kind of database this product uses?

Ray at home

"McKirahan" <News@McKirahan.com> wrote in message
news:2KUtb.166242$mZ5.1143687@attbi_s54...

> I'd like to write scripts that access Best Software's MAS90 application
> database (v3.71).
>
> Can anyone point me to some examples or background material?
>
> Thank you.
>
>

[McKirahan]

"Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...

> Do you know what kind of database this product uses?
>
> Ray at home
>
> "McKirahan" <News@McKirahan.com> wrote in message
> news:2KUtb.166242$mZ5.1143687@attbi_s54...

> > I'd like to write scripts that access Best Software's MAS90 application
> > database (v3.71).
> >
> > Can anyone point me to some examples or background material?
> >
> > Thank you

It's proprietary but is available via ODBC.

The product comes with a sample script (VBS and JS) that is invoked via a
button added to an existing form via the Customizer facility. It only dumps
a few application server variables to show that it works.

However, I'd like to be able to script against it externally. I'm looking
to develop ad hoc reports (read only) preferably in VBScript though I would
consider VB6 or VB.Net. The product does include facilities to view the
database tables and their layouts via PDF files.

I found one article that discusses this ("MAS 90 Windows Scripting Part I"
[url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])
but the author (whom I've e-mailed without a reply so far) hasn't followed
up with Part II that he says will have the specifics.

[Ray at]

If you have an ODBC connection, you should be able to use it just like it's
any other database, pretty much. Have you done such things with other
databases before, like Access or SQL?

Ray at home

"McKirahan" <News@McKirahan.com> wrote in message
news:wCZtb.171426$275.544890@attbi_s53...

> "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...

> > Do you know what kind of database this product uses?
> >
> > Ray at home
> >
> > "McKirahan" <News@McKirahan.com> wrote in message
> > news:2KUtb.166242$mZ5.1143687@attbi_s54...

> > > I'd like to write scripts that access Best Software's MAS90

application

> > > database (v3.71).
> > >
> > > Can anyone point me to some examples or background material?
> > >
> > > Thank you

>
> It's proprietary but is available via ODBC.
>
> The product comes with a sample script (VBS and JS) that is invoked via a
> button added to an existing form via the Customizer facility. It only

dumps

> a few application server variables to show that it works.
>
> However, I'd like to be able to script against it externally. I'm looking
> to develop ad hoc reports (read only) preferably in VBScript though I

would

> consider VB6 or VB.Net. The product does include facilities to view the
> database tables and their layouts via PDF files.
>
> I found one article that discusses this ("MAS 90 Windows Scripting Part I"
> [url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])
> but the author (whom I've e-mailed without a reply so far) hasn't followed
> up with Part II that he says will have the specifics.
>
>

[McKirahan]

All I've been using lately are DSN-less connections.

I guess I just need a kick-start to revise this code:

Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
Const cMDB = "Database.mdb"
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open cDSN & Server.MapPath(cMDB)

I could find anything at [url]http://www.aspfaq.com/database.asp[/url].

Thanks for your replies.


"Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...

> If you have an ODBC connection, you should be able to use it just like

it's

> any other database, pretty much. Have you done such things with other
> databases before, like Access or SQL?
>
> Ray at home
>
> "McKirahan" <News@McKirahan.com> wrote in message
> news:wCZtb.171426$275.544890@attbi_s53...

> > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...

> > > Do you know what kind of database this product uses?
> > >
> > > Ray at home
> > >
> > > "McKirahan" <News@McKirahan.com> wrote in message
> > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > I'd like to write scripts that access Best Software's MAS90

> application

> > > > database (v3.71).
> > > >
> > > > Can anyone point me to some examples or background material?
> > > >
> > > > Thank you

> >
> > It's proprietary but is available via ODBC.
> >
> > The product comes with a sample script (VBS and JS) that is invoked via

a

> > button added to an existing form via the Customizer facility. It only

> dumps

> > a few application server variables to show that it works.
> >
> > However, I'd like to be able to script against it externally. I'm

looking

> > to develop ad hoc reports (read only) preferably in VBScript though I

> would

> > consider VB6 or VB.Net. The product does include facilities to view the
> > database tables and their layouts via PDF files.
> >
> > I found one article that discusses this ("MAS 90 Windows Scripting Part

I"

> >

[url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > but the author (whom I've e-mailed without a reply so far) hasn't

followed

> > up with Part II that he says will have the specifics.

[McKirahan]

I guess it would be:

Const cDSN = "mySystemDSN"
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "DSN=" & cDSN

Or,

objADO.Open "DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword "

I guess I'd use ADOX to walk throught the datbase structure.

Would you have any other thoughts? Thanks.



"McKirahan" <News@McKirahan.com> wrote in message
news:SZZtb.22211$Dw6.121630@attbi_s02...

> All I've been using lately are DSN-less connections.
>
> I guess I just need a kick-start to revise this code:
>
> Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> Const cMDB = "Database.mdb"
> Dim objADO
> Set objADO = CreateObject("ADODB.Connection")
> objADO.Open cDSN & Server.MapPath(cMDB)
>
> I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
>
> Thanks for your replies.
>
>
> "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...

> > If you have an ODBC connection, you should be able to use it just like

> it's

> > any other database, pretty much. Have you done such things with other
> > databases before, like Access or SQL?
> >
> > Ray at home
> >
> > "McKirahan" <News@McKirahan.com> wrote in message
> > news:wCZtb.171426$275.544890@attbi_s53...

> > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

message

> > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > Do you know what kind of database this product uses?
> > > >
> > > > Ray at home
> > > >
> > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > I'd like to write scripts that access Best Software's MAS90

> > application

> > > > > database (v3.71).
> > > > >
> > > > > Can anyone point me to some examples or background material?
> > > > >
> > > > > Thank you
> > >
> > > It's proprietary but is available via ODBC.
> > >
> > > The product comes with a sample script (VBS and JS) that is invoked

via

> a

> > > button added to an existing form via the Customizer facility. It only

> > dumps

> > > a few application server variables to show that it works.
> > >
> > > However, I'd like to be able to script against it externally. I'm

> looking

> > > to develop ad hoc reports (read only) preferably in VBScript though I

> > would

> > > consider VB6 or VB.Net. The product does include facilities to view

the

> > > database tables and their layouts via PDF files.
> > >
> > > I found one article that discusses this ("MAS 90 Windows Scripting

Part

> I"

> > >

> [url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > but the author (whom I've e-mailed without a reply so far) hasn't

> followed

> > > up with Part II that he says will have the specifics.

>
>

[Ray at]

Do you have a system DSN setup? If so:

Const cDSN = "dsn=NameOfDSN"
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open cDSN

Ideally, you wouldn't use a DSN, but you can always change that later for
the sake of getting started.

Ray at home


"McKirahan" <News@McKirahan.com> wrote in message
news:SZZtb.22211$Dw6.121630@attbi_s02...

> All I've been using lately are DSN-less connections.
>
> I guess I just need a kick-start to revise this code:
>
> Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> Const cMDB = "Database.mdb"
> Dim objADO
> Set objADO = CreateObject("ADODB.Connection")
> objADO.Open cDSN & Server.MapPath(cMDB)
>
> I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
>
> Thanks for your replies.
>
>
> "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...

> > If you have an ODBC connection, you should be able to use it just like

> it's

> > any other database, pretty much. Have you done such things with other
> > databases before, like Access or SQL?
> >
> > Ray at home
> >
> > "McKirahan" <News@McKirahan.com> wrote in message
> > news:wCZtb.171426$275.544890@attbi_s53...

> > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

message

> > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > Do you know what kind of database this product uses?
> > > >
> > > > Ray at home
> > > >
> > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > I'd like to write scripts that access Best Software's MAS90

> > application

> > > > > database (v3.71).
> > > > >
> > > > > Can anyone point me to some examples or background material?
> > > > >
> > > > > Thank you
> > >
> > > It's proprietary but is available via ODBC.
> > >
> > > The product comes with a sample script (VBS and JS) that is invoked

via

> a

> > > button added to an existing form via the Customizer facility. It only

> > dumps

> > > a few application server variables to show that it works.
> > >
> > > However, I'd like to be able to script against it externally. I'm

> looking

> > > to develop ad hoc reports (read only) preferably in VBScript though I

> > would

> > > consider VB6 or VB.Net. The product does include facilities to view

the

> > > database tables and their layouts via PDF files.
> > >
> > > I found one article that discusses this ("MAS 90 Windows Scripting

Part

> I"

> > >

> [url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > but the author (whom I've e-mailed without a reply so far) hasn't

> followed

> > > up with Part II that he says will have the specifics.

>
>

[Ray at]

Yes, ADOX should let you go through the tables. It sounds like you're on
the right track. I looked at the site for this product, and I see they have
a SQL Server version. I guess that is not what you have, eh?

Try this code:

Dim oADO, oADOX
Set oADO = Server.CreateObject("ADODB.Connection")
oADO.Open "dsn=YourSystemDSN"
Set oADOX = Server.CreateObject("ADOX.Catalog")
oADOX.ActiveConnection = oADO

For Each Table in oADOX.Tables
Response.Write Table.Name & "<br>"
For Each Column in Table.Columns
Response.Write " ---" & Column.Name & "<br>"
For Each Prop in Column.Properties
Response.Write " ------" & Prop.Name & ": " & Prop & "<br>"
Next
Next
Response.Write "<hr>"
Next

Set oADOX = Nothing
oADO.Close : Set oADOX = Nothing

Ray at home



"McKirahan" <News@McKirahan.com> wrote in message
news:h8_tb.217724$HS4.1915016@attbi_s01...

> I guess it would be:
>
> Const cDSN = "mySystemDSN"
> Dim objADO
> Set objADO = CreateObject("ADODB.Connection")
> objADO.Open "DSN=" & cDSN
>
> Or,
>
> objADO.Open "DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword "
>
> I guess I'd use ADOX to walk throught the datbase structure.
>
> Would you have any other thoughts? Thanks.
>
>
>
> "McKirahan" <News@McKirahan.com> wrote in message
> news:SZZtb.22211$Dw6.121630@attbi_s02...

> > All I've been using lately are DSN-less connections.
> >
> > I guess I just need a kick-start to revise this code:
> >
> > Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> > Const cMDB = "Database.mdb"
> > Dim objADO
> > Set objADO = CreateObject("ADODB.Connection")
> > objADO.Open cDSN & Server.MapPath(cMDB)
> >
> > I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
> >
> > Thanks for your replies.
> >
> >
> > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> > news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...

> > > If you have an ODBC connection, you should be able to use it just like

> > it's

> > > any other database, pretty much. Have you done such things with other
> > > databases before, like Access or SQL?
> > >
> > > Ray at home
> > >
> > > "McKirahan" <News@McKirahan.com> wrote in message
> > > news:wCZtb.171426$275.544890@attbi_s53...
> > > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

> message

> > > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > > Do you know what kind of database this product uses?
> > > > >
> > > > > Ray at home
> > > > >
> > > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > > I'd like to write scripts that access Best Software's MAS90
> > > application
> > > > > > database (v3.71).
> > > > > >
> > > > > > Can anyone point me to some examples or background material?
> > > > > >
> > > > > > Thank you
> > > >
> > > > It's proprietary but is available via ODBC.
> > > >
> > > > The product comes with a sample script (VBS and JS) that is invoked

> via

> > a

> > > > button added to an existing form via the Customizer facility. It

only

> > > dumps
> > > > a few application server variables to show that it works.
> > > >
> > > > However, I'd like to be able to script against it externally. I'm

> > looking

> > > > to develop ad hoc reports (read only) preferably in VBScript though

I

> > > would
> > > > consider VB6 or VB.Net. The product does include facilities to view

> the

> > > > database tables and their layouts via PDF files.
> > > >
> > > > I found one article that discusses this ("MAS 90 Windows Scripting

> Part

> > I"

> > > >

> >

[url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > > but the author (whom I've e-mailed without a reply so far) hasn't

> > followed

> > > > up with Part II that he says will have the specifics.

> >
> >

>
>

[McKirahan]

I tried the following code which I thought I had used successfully before
but it failed with "Object or provider is not capable of performing
requested operation." when it tried to perform
"objADO.OpenSchema(adSchemaTables)".

Option Explicit
'*
'* This VBS (Visual Basic Script) Program does the following:
'* 1) Use ADOX to identify the database tables in the MAS90 database.
'*
'* Declare Constants
'*
Const cVBS = "MAS90ADO.vbs"
Const cDSN = "SOTAMAS90"
'*
'* Declare ADO Constants
'*
Const adSchemaTables = 10
'*
'* Declare Variables
'*
Dim strTBL
strTBL = cDSN & " Tables:" & vbCrLf
'*
'* Declare Objects
'*
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "DSN=" & cDSN
Dim objRST
Set objRST = objADO.OpenSchema(adSchemaTables)
'*
'* Identify Tables
'*
Do Until objRST.EOF
strTBL = strTBL & objRST("TABLE_NAME") & vbCrLf
objRST.MoveNext
Loop
'*
'* Destroy Objects
'*
objRST.Close
Set objRST = Nothing
objADO.Close
Set objADO = Nothing
'*
'* Display Tables
'*
WScript.Echo strTBL

"McKirahan" <News@McKirahan.com> wrote in message
news:h8_tb.217724$HS4.1915016@attbi_s01...

> I guess it would be:
>
> Const cDSN = "mySystemDSN"
> Dim objADO
> Set objADO = CreateObject("ADODB.Connection")
> objADO.Open "DSN=" & cDSN
>
> Or,
>
> objADO.Open "DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword "
>
> I guess I'd use ADOX to walk throught the datbase structure.
>
> Would you have any other thoughts? Thanks.
>
>
>
> "McKirahan" <News@McKirahan.com> wrote in message
> news:SZZtb.22211$Dw6.121630@attbi_s02...

> > All I've been using lately are DSN-less connections.
> >
> > I guess I just need a kick-start to revise this code:
> >
> > Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> > Const cMDB = "Database.mdb"
> > Dim objADO
> > Set objADO = CreateObject("ADODB.Connection")
> > objADO.Open cDSN & Server.MapPath(cMDB)
> >
> > I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
> >
> > Thanks for your replies.
> >
> >
> > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> > news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...

> > > If you have an ODBC connection, you should be able to use it just like

> > it's

> > > any other database, pretty much. Have you done such things with other
> > > databases before, like Access or SQL?
> > >
> > > Ray at home
> > >
> > > "McKirahan" <News@McKirahan.com> wrote in message
> > > news:wCZtb.171426$275.544890@attbi_s53...
> > > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

> message

> > > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > > Do you know what kind of database this product uses?
> > > > >
> > > > > Ray at home
> > > > >
> > > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > > I'd like to write scripts that access Best Software's MAS90
> > > application
> > > > > > database (v3.71).
> > > > > >
> > > > > > Can anyone point me to some examples or background material?
> > > > > >
> > > > > > Thank you
> > > >
> > > > It's proprietary but is available via ODBC.
> > > >
> > > > The product comes with a sample script (VBS and JS) that is invoked

> via

> > a

> > > > button added to an existing form via the Customizer facility. It

only

> > > dumps
> > > > a few application server variables to show that it works.
> > > >
> > > > However, I'd like to be able to script against it externally. I'm

> > looking

> > > > to develop ad hoc reports (read only) preferably in VBScript though

I

> > > would
> > > > consider VB6 or VB.Net. The product does include facilities to view

> the

> > > > database tables and their layouts via PDF files.
> > > >
> > > > I found one article that discusses this ("MAS 90 Windows Scripting

> Part

> > I"

> > > >

> >

[url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > > but the author (whom I've e-mailed without a reply so far) hasn't

> > followed

> > > > up with Part II that he says will have the specifics.

> >
> >

>
>

[McKirahan]

Excellent! Thank you very much!
I should be able to do what I want to do now.

There are 276 Tables in the database so I ran it with the Table.Columns
commented out.
Also, I couldn't get the Table.Properties to work (when I specified a single
table).

I tried the following modification of your code (VBS instead of ASP):

Option Explicit
'*
'* This VBS (Visual Basic Script) Program does the following:
'* 1) Use ADOX to identify the database tables in the MAS90 database.
'*
'* Declare Constants
'*
Const cVBS = "MAS90ADOX.vbs"
Const cDSN = "SOTAMAS90"
'*
'* Declare Variables
'*
Dim intTBL
intTBL = 0
Dim strTBL
strTBL = " '" & cDSN & "' Tables:" & vbCrLf
'*
Dim Table
Dim Column
'*
'* Declare Objects
'*
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "DSN=" & cDSN
Dim objADX
Set objADX = CreateObject("ADOX.Catalog")
objADX.ActiveConnection = objADO
'*
'* Identify Tables
'*
For Each Table in objADX.Tables
intTBL = intTBL + 1
strTBL = strTBL & Table.Name & vbCrLf
' For Each Column in Table.Columns
' strTBL = strTBL & vbTab & Column.Name & vbCrLf
' Next
Next
'*
'* Destroy Objects
'*
objADO.Close
Set objADO = Nothing
Set objADX = Nothing
'*
'* Display Tables
'*
WScript.Echo intTBL & strTBL


"Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
news:#IUmKhNrDHA.372@TK2MSFTNGP11.phx.gbl...

> Yes, ADOX should let you go through the tables. It sounds like you're on
> the right track. I looked at the site for this product, and I see they

have

> a SQL Server version. I guess that is not what you have, eh?
>
> Try this code:
>
> Dim oADO, oADOX
> Set oADO = Server.CreateObject("ADODB.Connection")
> oADO.Open "dsn=YourSystemDSN"
> Set oADOX = Server.CreateObject("ADOX.Catalog")
> oADOX.ActiveConnection = oADO
>
> For Each Table in oADOX.Tables
> Response.Write Table.Name & "<br>"
> For Each Column in Table.Columns
> Response.Write " ---" & Column.Name & "<br>"
> For Each Prop in Column.Properties
> Response.Write " ------" & Prop.Name & ": " & Prop & "<br>"
> Next
> Next
> Response.Write "<hr>"
> Next
>
> Set oADOX = Nothing
> oADO.Close : Set oADOX = Nothing
>
> Ray at home
>
>
>
> "McKirahan" <News@McKirahan.com> wrote in message
> news:h8_tb.217724$HS4.1915016@attbi_s01...

> > I guess it would be:
> >
> > Const cDSN = "mySystemDSN"
> > Dim objADO
> > Set objADO = CreateObject("ADODB.Connection")
> > objADO.Open "DSN=" & cDSN
> >
> > Or,
> >
> > objADO.Open "DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword "
> >
> > I guess I'd use ADOX to walk throught the datbase structure.
> >
> > Would you have any other thoughts? Thanks.
> >
> >
> >
> > "McKirahan" <News@McKirahan.com> wrote in message
> > news:SZZtb.22211$Dw6.121630@attbi_s02...

> > > All I've been using lately are DSN-less connections.
> > >
> > > I guess I just need a kick-start to revise this code:
> > >
> > > Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> > > Const cMDB = "Database.mdb"
> > > Dim objADO
> > > Set objADO = CreateObject("ADODB.Connection")
> > > objADO.Open cDSN & Server.MapPath(cMDB)
> > >
> > > I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
> > >
> > > Thanks for your replies.
> > >
> > >
> > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

message

> > > news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...
> > > > If you have an ODBC connection, you should be able to use it just

like

> > > it's
> > > > any other database, pretty much. Have you done such things with

other

> > > > databases before, like Access or SQL?
> > > >
> > > > Ray at home
> > > >
> > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > news:wCZtb.171426$275.544890@attbi_s53...
> > > > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

> > message

> > > > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > > > Do you know what kind of database this product uses?
> > > > > >
> > > > > > Ray at home
> > > > > >
> > > > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > > > I'd like to write scripts that access Best Software's MAS90
> > > > application
> > > > > > > database (v3.71).
> > > > > > >
> > > > > > > Can anyone point me to some examples or background material?
> > > > > > >
> > > > > > > Thank you
> > > > >
> > > > > It's proprietary but is available via ODBC.
> > > > >
> > > > > The product comes with a sample script (VBS and JS) that is

invoked

> > via

> > > a
> > > > > button added to an existing form via the Customizer facility. It

> only

> > > > dumps
> > > > > a few application server variables to show that it works.
> > > > >
> > > > > However, I'd like to be able to script against it externally. I'm
> > > looking
> > > > > to develop ad hoc reports (read only) preferably in VBScript

though

> I

> > > > would
> > > > > consider VB6 or VB.Net. The product does include facilities to

view

> > the

> > > > > database tables and their layouts via PDF files.
> > > > >
> > > > > I found one article that discusses this ("MAS 90 Windows Scripting

> > Part

> > > I"
> > > > >
> > >

> [url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > > > but the author (whom I've e-mailed without a reply so far) hasn't
> > > followed
> > > > > up with Part II that he says will have the specifics.
> > >

[TomB]

Have you tried connecting to it with Access and "linking to the tables"

You should then be able to view tables and structures fairly easily.

Tom
"McKirahan" <News@McKirahan.com> wrote in message
news:Ki%tb.171734$275.547590@attbi_s53...

> Excellent! Thank you very much!
> I should be able to do what I want to do now.
>
> There are 276 Tables in the database so I ran it with the Table.Columns
> commented out.
> Also, I couldn't get the Table.Properties to work (when I specified a

single

> table).
>
> I tried the following modification of your code (VBS instead of ASP):
>
> Option Explicit
> '*
> '* This VBS (Visual Basic Script) Program does the following:
> '* 1) Use ADOX to identify the database tables in the MAS90 database.
> '*
> '* Declare Constants
> '*
> Const cVBS = "MAS90ADOX.vbs"
> Const cDSN = "SOTAMAS90"
> '*
> '* Declare Variables
> '*
> Dim intTBL
> intTBL = 0
> Dim strTBL
> strTBL = " '" & cDSN & "' Tables:" & vbCrLf
> '*
> Dim Table
> Dim Column
> '*
> '* Declare Objects
> '*
> Dim objADO
> Set objADO = CreateObject("ADODB.Connection")
> objADO.Open "DSN=" & cDSN
> Dim objADX
> Set objADX = CreateObject("ADOX.Catalog")
> objADX.ActiveConnection = objADO
> '*
> '* Identify Tables
> '*
> For Each Table in objADX.Tables
> intTBL = intTBL + 1
> strTBL = strTBL & Table.Name & vbCrLf
> ' For Each Column in Table.Columns
> ' strTBL = strTBL & vbTab & Column.Name & vbCrLf
> ' Next
> Next
> '*
> '* Destroy Objects
> '*
> objADO.Close
> Set objADO = Nothing
> Set objADX = Nothing
> '*
> '* Display Tables
> '*
> WScript.Echo intTBL & strTBL
>
>
> "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in message
> news:#IUmKhNrDHA.372@TK2MSFTNGP11.phx.gbl...

> > Yes, ADOX should let you go through the tables. It sounds like you're

on

> > the right track. I looked at the site for this product, and I see they

> have

> > a SQL Server version. I guess that is not what you have, eh?
> >
> > Try this code:
> >
> > Dim oADO, oADOX
> > Set oADO = Server.CreateObject("ADODB.Connection")
> > oADO.Open "dsn=YourSystemDSN"
> > Set oADOX = Server.CreateObject("ADOX.Catalog")
> > oADOX.ActiveConnection = oADO
> >
> > For Each Table in oADOX.Tables
> > Response.Write Table.Name & "<br>"
> > For Each Column in Table.Columns
> > Response.Write " ---" & Column.Name & "<br>"
> > For Each Prop in Column.Properties
> > Response.Write " ------" & Prop.Name & ": " & Prop & "<br>"
> > Next
> > Next
> > Response.Write "<hr>"
> > Next
> >
> > Set oADOX = Nothing
> > oADO.Close : Set oADOX = Nothing
> >
> > Ray at home
> >
> >
> >
> > "McKirahan" <News@McKirahan.com> wrote in message
> > news:h8_tb.217724$HS4.1915016@attbi_s01...

> > > I guess it would be:
> > >
> > > Const cDSN = "mySystemDSN"
> > > Dim objADO
> > > Set objADO = CreateObject("ADODB.Connection")
> > > objADO.Open "DSN=" & cDSN
> > >
> > > Or,
> > >
> > > objADO.Open "DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword "
> > >
> > > I guess I'd use ADOX to walk throught the datbase structure.
> > >
> > > Would you have any other thoughts? Thanks.
> > >
> > >
> > >
> > > "McKirahan" <News@McKirahan.com> wrote in message
> > > news:SZZtb.22211$Dw6.121630@attbi_s02...
> > > > All I've been using lately are DSN-less connections.
> > > >
> > > > I guess I just need a kick-start to revise this code:
> > > >
> > > > Const cDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
> > > > Const cMDB = "Database.mdb"
> > > > Dim objADO
> > > > Set objADO = CreateObject("ADODB.Connection")
> > > > objADO.Open cDSN & Server.MapPath(cMDB)
> > > >
> > > > I could find anything at [url]http://www.aspfaq.com/database.asp[/url].
> > > >
> > > > Thanks for your replies.
> > > >
> > > >
> > > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in

> message

> > > > news:#18dKHNrDHA.1880@TK2MSFTNGP09.phx.gbl...
> > > > > If you have an ODBC connection, you should be able to use it just

> like

> > > > it's
> > > > > any other database, pretty much. Have you done such things with

> other

> > > > > databases before, like Access or SQL?
> > > > >
> > > > > Ray at home
> > > > >
> > > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > > news:wCZtb.171426$275.544890@attbi_s53...
> > > > > > "Ray at <%=sLocation%>" <myfirstname at lane 34 . komm> wrote in
> > > message
> > > > > > news:eXezgMKrDHA.2216@TK2MSFTNGP12.phx.gbl...
> > > > > > > Do you know what kind of database this product uses?
> > > > > > >
> > > > > > > Ray at home
> > > > > > >
> > > > > > > "McKirahan" <News@McKirahan.com> wrote in message
> > > > > > > news:2KUtb.166242$mZ5.1143687@attbi_s54...
> > > > > > > > I'd like to write scripts that access Best Software's MAS90
> > > > > application
> > > > > > > > database (v3.71).
> > > > > > > >
> > > > > > > > Can anyone point me to some examples or background material?
> > > > > > > >
> > > > > > > > Thank you
> > > > > >
> > > > > > It's proprietary but is available via ODBC.
> > > > > >
> > > > > > The product comes with a sample script (VBS and JS) that is

> invoked

> > > via
> > > > a
> > > > > > button added to an existing form via the Customizer facility.

It

> > only

> > > > > dumps
> > > > > > a few application server variables to show that it works.
> > > > > >
> > > > > > However, I'd like to be able to script against it externally.

I'm

> > > > looking
> > > > > > to develop ad hoc reports (read only) preferably in VBScript

> though

> > I

> > > > > would
> > > > > > consider VB6 or VB.Net. The product does include facilities to

> view

> > > the
> > > > > > database tables and their layouts via PDF files.
> > > > > >
> > > > > > I found one article that discusses this ("MAS 90 Windows

Scripting

> > > Part
> > > > I"
> > > > > >
> > > >

> >

[url]http://www.aaisinc.com/forum/index.php?board=2;action=display;threadid=10[/url])

> > > > > > but the author (whom I've e-mailed without a reply so far)

hasn't

> > > > followed
> > > > > > up with Part II that he says will have the specifics.
> > > >

>
>