Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails
Set adox = CreateObject("ADOX.Catalog") Set Conn = CreateObject("ADODB.Connection") Conn.open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=drops.accdb" adox.activeConnection = Conn For Each t In adox.Tables Wscript.Echo "TABLE," & t.Name & "," & t.Type For Each c in t.columns Wscript.Echo "COLUMN," & c.Name & "," & c.Type Next Next For Each p in adox.Procedures Wscript.Echo "PROC," & p.Name & "," & Replace(p.Command.CommandText,chr(13),chr(13)) Next For Each v in adox.Views Wscript.Echo "VIEW," & v.Name & "," & Replace(v.Command.CommandText,chr(13),chr(13)) Next Conn.close Set Conn = nothing Set adox = nothing
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
26 Experts available now in Live!