Adding value from database to datatable

[kriday]

I have written the following code to add data from db to datatable
before this i have specified connection string.

Code:

strSQL = " Select * from UserId"
Set objResults = objDB.Execute(strSQL)
nrow=1
Do Until objResults.EOF
    strUserid = objResults.Fields("UserId")
    Datatable.SetCurrentRow(nrow)
    Datatable.GlobalSheet.AddParameter "UserId" , strUserid
    msgbox Datatable("UserId",dtGlobalSheet)
    Reporter.ReportEvent micDone, strUserid , " "
    objResults.MoveNext
    nrow=nrow+1
Loop

now my problem is data is added to the same row like
UserId UserId1
12 31
but i want them like this
UserId
12
31

I need help on this
Thanks in advance