Create Table

[nagasrikanth]

Wasn't the fallowing code creates a phisically visible table...???

Set d = w.OpenDatabase("C:\Documents and Settings\Administrator\Desktop\db11.mdb")
Set rst = d.OpenRecordset("query1")
    rst.MoveFirst
    While Not rst.EOF
        Set t = d.CreateTableDef(rst(0))
        With t
            .Fields.Append .CreateField("srikanth", dbText) 
        End With
        rst.MoveNext
        Set t = Nothing
    Wend

then y iam uanble to see how is my tables looks like...the code was running with out any error....please help in this issue.....its a bit urgent..pleasee..