home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
202.53.64.216
/
202.53.64.216.tar
/
202.53.64.216
/
janahitha
/
newfile.asp
< prev
next >
Wrap
Text File
|
2004-11-26
|
673b
|
31 lines
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%
set con=server.CreateObject("ADODB.Connection")
con.Open "Provider=SQLOLEDB;Data Source=gopi;initial catalog=Sample;user id=sa;password="
Response.Write(con.ConnectionString)
strSql="select * from tblSample"
%>
<br>
<%
Response.Write(strSql)
'set rs = server.createobject("adodb.recordset")
'rs.open sql, con, 3, 3
set rs=server.CreateObject("ADODB.Recordset")
'rs.Open strSql,3,3
set rs=con.Execute(strSql)
'rs.CursorLocation=adUseClient
do while not rs.EOF
Response.Write(rs(1))
rs.MoveNext
loop
%>
</BODY>
</HTML>