리눅스 서버에 있는 mysql의 데이터를 asp에서 컨트롤 할 수 있는 방법
<%@ Language=VBScript %>
<%
tb = \테이블네임\
dsn = \ODBC DSN 네임\
uid = \유저아이디\
upass = \유저패스\
response.expires=0
que = \select * from \ & tb & \ order by id desc\
Dim DbConn
Set DbConn = Server.CreateObject(\adodb.Connection\)
DbConn.Open dsn,uid,upass
Dim Rs
Set Rs = Server.CreateObject(\adodb.RecordSet\)
Rs.PageSize = 10
Rs.Open que,DbConn,1
do until Rs.EOF Or p > rs.PageSize
%>
받는이 : <%=Rs(\recv_uid\)%>
보낸이 : <%=Rs(\send_uname\)%>
보낸이 ID : <%=Rs(\send_uid\)%>
보낸날짜 : <%=Rs(\send_date\)%>
쪽지내용 : <%=Rs(\comment\)%>
<%
Rs.MoveNext
loop
%>
|