Prev: change date in a sql statement from a cell
Next: Need Help with a cell?
From: Bob Phillips on 27 Mar 2010 11:18
This was it.

Try this

Set oConn = CreateObject("ADODB.Connection")
oConn.Open sConnString
Set oCat = CreateObject("ADOX.Catalog")
Set oCat.ActiveConnection = oConn

iRow = 1
For Each tbl In oCat.Tables
If (tbl.Type <> "SYSTEM TABLE") Then
sTableName = tbl.name
cLength = Len(sTableName)
iTestPos = 0
iStartpos = 1
Debug.Print sTableName
End If
Next tbl

oConn.Close
Set oCat = Nothing




--

HTH

Bob

"Madiya" <madiya122(a)yahoo.co.uk> wrote in message
news:d112bbee-4b02-46a7-8579-8cc15ddb05d9(a)k36g2000prb.googlegroups.com...
On Mar 18, 8:29 pm, "Bob Phillips" <bob.phill...(a)somewhere.com> wrote:
> Yes, I posted a reply yesterday.
>
> Bob
>
> "Madiya" <madiya...(a)yahoo.co.uk> wrote in message
>
> news:4d2ff8bd-4727-4d39-9b32-9ac9095974ba(a)k24g2000pro.googlegroups.com...
> On Mar 17, 9:43 am, Madiya <madiya...(a)yahoo.co.uk> wrote:
>
> > Hi,
> > How do I list all user tables in a SQL Server database?
> > Once done I have to passon some commends also to all the listed
> > tabled.
>
> > I already have connection strings and also able to extract records as
> > pe the criteria from one defined table but do not know how to loop
> > thru the tables or table properties.
>
> > Any pointers are appreciated.
>
> > Regards,
> > Madiya
>
> Somebody working with VBA and SQL?

Bob,
Thanks but I could not find your reply.
Can you Pl post back here or give me link to that msg pl.

Regards,
Madiya


First  |  Prev  | 
Pages: 1 2
Prev: change date in a sql statement from a cell
Next: Need Help with a cell?