MS SQL

MS SQL RSS

display all the records in table in SQL using VBScript in ASP

Please support our MS SQL advertiser: Intel Parallel Studio Home

•

Join Date: Jun 2007

Posts: 68

Reputation: RahulV is an unknown quantity at this point

Solved Threads: 0

RahulV

Offline

Junior Poster in Training

display all the records in table in SQL using VBScript in ASP

Oct 2nd, 2008

--URGENT--

Ive written a code in VBScript in ASP where back end is SQL. Here I want to display all the records with the data of the selected field of the table "Users" but it displays only the first record repetitively for the total number of records in the table times.

 Help with Code Tags 
 MS SQL Syntax (Toggle Plain Text) 
<html>
<body>
 
<%
dim con, rec, str, id, name, passwd
str="select * from users"
 
SET con=createObject("ADODB.Connection")
con.Open "Provider=SQLOLEDB.1;Data Source=.;Initial Catalog=ComputerWorkshop","sa",""
 
SET rec=CreateObject("ADODB.Recordset")
rec.Open str, con
 
id=rec("biID")
name=rec("vUserName")
passwd=rec("vPassword")
 
Response.WRITE "biID : vUserName : vPassword "
Response.WRITE "<hr>"
 
do until rec.EOF
Response.WRITE id & " : " & name & " : " & passwd
response.WRITE "<br>"
rec.MoveNext
loop
 
rec.close
con.close
%>
 
</body>
</html>
<html>
<body>

<%
dim con, rec, str, id, name, passwd
str="select * from users"

set con=createObject("ADODB.Connection")
con.Open "Provider=SQLOLEDB.1;Data Source=.;Initial Catalog=ComputerWorkshop","sa",""

set rec=CreateObject("ADODB.Recordset")
rec.Open str, con

id=rec("biID")
name=rec("vUserName")
passwd=rec("vPassword")

Response.write "biID : vUserName : vPassword "
Response.write "<hr>"

do until rec.EOF
Response.write id & " : " & name & " : " & passwd
response.write "<br>"
rec.MoveNext
loop

rec.close
con.close
%>

</body>
</html>