<% Set oADO = OpenDatabase(database_full_path) Set rs = oADO.Execute("select * from Mini order by id") If Not rs.EOF Then aData = rs.GetRows rs.Close : Set rs = Nothing oADO.Close : Set oADO = Nothing aColumns = UBound(aData,1) + 1 aRows = UBound(aData,2) + 1 response.write(aRows & " rows x " & aColumns & " columns
") Response.Write "" Response.Write "" for i = 0 to (aColumns - 1) Response.Write "" next Response.Write "" for curColumn = 0 to (aRows - 1) Response.Write "" for curRow = 0 to (aColumns - 1) Response.Write "" next Response.Write "" next Response.Write "
" & i & " 
" & aData(curRow, curColumn) & " 
" %> [allowsmilie] => 1 [showsignature] => 0 [ipaddress] => [iconid] => 0 [visible] => 1 [attach] => 0 [infraction] => 0 [reportthreadid] => 0 [isusenetpost] => 1 [msgid] => <6a68ace3.0408192349.60c8be60@posting.google.com> [ref] => <#nbrEtThEHA.140@TK2MSFTNGP12.phx.gbl> [htmlstate] => on_nl2br [postusername] => Mike [ip] => mike_newsgroups [isdeleted] => 0 [usergroupid] => [membergroupids] => [displaygroupid] => [password] => [passworddate] => [email] => [styleid] => [parentemail] => [homepage] => [icq] => [aim] => [yahoo] => [msn] => [skype] => [showvbcode] => [showbirthday] => [usertitle] => [customtitle] => [joindate] => [daysprune] => [lastvisit] => [lastactivity] => [lastpost] => [lastpostid] => [posts] => [reputation] => [reputationlevelid] => [timezoneoffset] => [pmpopup] => [avatarid] => [avatarrevision] => [profilepicrevision] => [sigpicrevision] => [options] => [akvbghsfs_optionsfield] => [birthday] => [birthday_search] => [maxposts] => [startofweek] => [referrerid] => [languageid] => [emailstamp] => [threadedmode] => [autosubscribe] => [pmtotal] => [pmunread] => [salt] => [ipoints] => [infractions] => [warnings] => [infractiongroupids] => [infractiongroupid] => [adminoptions] => [profilevisits] => [friendcount] => [friendreqcount] => [vmunreadcount] => [vmmoderatedcount] => [socgroupinvitecount] => [socgroupreqcount] => [pcunreadcount] => [pcmoderatedcount] => [gmmoderatedcount] => [assetposthash] => [fbuserid] => [fbjoindate] => [fbname] => [logintype] => [fbaccesstoken] => [newrepcount] => [vbseo_likes_in] => [vbseo_likes_out] => [vbseo_likes_unread] => [temp] => [field1] => [field2] => [field3] => [field4] => [field5] => [subfolders] => [pmfolders] => [buddylist] => [ignorelist] => [signature] => [searchprefs] => [rank] => [icontitle] => [iconpath] => [avatarpath] => [hascustomavatar] => 0 [avatardateline] => [edit_userid] => [edit_username] => [edit_dateline] => [edit_reason] => [hashistory] => [pagetext_html] => [hasimages] => [signatureparsed] => [sighasimages] => [sigpic] => [sigpicdateline] => [sigpicwidth] => [sigpicheight] => [postcount] => 4 [attachments] => [allattachments] => ) --> <% Set oADO = OpenDatabase(database_full_path) 'Set rs = oADO.Execute("select * from Mini order by id") Set rs = oADO.Execute("exec qtrade_3 1") If Not rs.EOF Then aData = rs.GetRows rs.Close : Set rs = Nothing oADO.Close : Set oADO = Nothing aColumns = UBound(aData,1) + 1 aRows = UBound(aData,2) + 1 response.write(aRows & " rows x " & aColumns & " columns
") Response.Write "" Response.Write "" for i = 0 to (aColumns - 1) Response.Write "" next Response.Write "" for curRow = 0 to (aRows - 1) Response.Write "" for curColumn = 0 to (aColumns - 1) Response.Write "" next Response.Write "" next Response.Write "
" & i & " 
" & aData(curRow, curColumn) & " 
" %> [allowsmilie] => 1 [showsignature] => 0 [ipaddress] => [iconid] => 0 [visible] => 1 [attach] => 0 [infraction] => 0 [reportthreadid] => 0 [isusenetpost] => 1 [msgid] => <6a68ace3.0408200214.271d660b@posting.google.com> [ref] => <#nbrEtThEHA.140@TK2MSFTNGP12.phx.gbl> [htmlstate] => on_nl2br [postusername] => Mike [ip] => mike_newsgroups [isdeleted] => 0 [usergroupid] => [membergroupids] => [displaygroupid] => [password] => [passworddate] => [email] => [styleid] => [parentemail] => [homepage] => [icq] => [aim] => [yahoo] => [msn] => [skype] => [showvbcode] => [showbirthday] => [usertitle] => [customtitle] => [joindate] => [daysprune] => [lastvisit] => [lastactivity] => [lastpost] => [lastpostid] => [posts] => [reputation] => [reputationlevelid] => [timezoneoffset] => [pmpopup] => [avatarid] => [avatarrevision] => [profilepicrevision] => [sigpicrevision] => [options] => [akvbghsfs_optionsfield] => [birthday] => [birthday_search] => [maxposts] => [startofweek] => [referrerid] => [languageid] => [emailstamp] => [threadedmode] => [autosubscribe] => [pmtotal] => [pmunread] => [salt] => [ipoints] => [infractions] => [warnings] => [infractiongroupids] => [infractiongroupid] => [adminoptions] => [profilevisits] => [friendcount] => [friendreqcount] => [vmunreadcount] => [vmmoderatedcount] => [socgroupinvitecount] => [socgroupreqcount] => [pcunreadcount] => [pcmoderatedcount] => [gmmoderatedcount] => [assetposthash] => [fbuserid] => [fbjoindate] => [fbname] => [logintype] => [fbaccesstoken] => [newrepcount] => [vbseo_likes_in] => [vbseo_likes_out] => [vbseo_likes_unread] => [temp] => [field1] => [field2] => [field3] => [field4] => [field5] => [subfolders] => [pmfolders] => [buddylist] => [ignorelist] => [signature] => [searchprefs] => [rank] => [icontitle] => [iconpath] => [avatarpath] => [hascustomavatar] => 0 [avatardateline] => [edit_userid] => [edit_username] => [edit_dateline] => [edit_reason] => [hashistory] => [pagetext_html] => [hasimages] => [signatureparsed] => [sighasimages] => [sigpic] => [sigpicdateline] => [sigpicwidth] => [sigpicheight] => [postcount] => 5 [attachments] => [allattachments] => ) -->