큐브리드 도움말에서 asp 페이지는 아래와 같은 코드가 제공이 되는데요.
.Net aspx는 db를 유연하게(레코드별로) 제어하기 위해서 어떤 코드를 어떻게 사용할 수 있는지 아시는대로 부탁 드리겠습니다
<%
' DSN과 SQL문을 가져온다.
strIP = Request( "server_ip" )
strPort = Request( "cas_port" )
strUser = Request( "db_user" )
strPass = Request( "db_pass" )
strName = Request( "db_name" )
strQuery = Request( "query" )
if strIP = "" then
Response.Write "SERVER_IP를 입력하세요"
Response.End ' IP가 없으면 페이지 종료
end if
if strPort = "" then
Response.Write "Port 번호를 입력하세요"
Response.End ' Port가 없으면 페이지 종료
end if
if strUser = "" then
Response.Write "DB_USER를 입력하세요"
Response.End ' DB_User가 없으면 페이지 종료
end if
if strName = "" then
Response.Write "DB_NAME을 입력하세요"
Response.End ' DB_NAME이 없으면 페이지 종료
end if
if strQuery = "" then
Response.Write "확인하고자 하는 Query를 입력하세요"
Response.End ' Query가 없으면 페이지 종료
end if
' 연결 객체 생성
strDsn = "driver={CUBRID Driver};server=" & strIP & ";port=" & strPort & ";uid=" & strUser & ";pwd=" & strPass & ";db_name=" & strName & ";"
' DB연결
Set DBConn = Server.CreateObject("ADODB.Connection")
DBConn.Open strDsn
' SQL 실행
Set rs = DBConn.Execute( strQuery )
' SQL문에 따라 메시지 보이기
if InStr(Ucase(strQuery),"INSERT")>0 then
Response.Write "레코드가 추가되었습니다."
Response.End
end if
if InStr(Ucase(strQuery),"DELETE")>0 then
Response.Write "레코드가 삭제되었습니다."
Response.End
end if
if InStr(Ucase(strQuery),"UPDATE")>0 then
Response.Write "레코드가 수정되었습니다."
Response.End
end if
%>
<table>
<%
' 필드 이름 보여주기
Response.Write "<tr bgColor=#f3f3f3>"
For index =0 to ( rs.fields.count-1 )
Response.Write "<td><b>" & rs.fields(index).name & "</b></td>"
Next
Response.Write "</tr>"
' 필드 값 보여주기
Do While Not rs.EOF
Response.Write "<tr bgColor=#f3f3f3>"
For index =0 to ( rs.fields.count-1 )
Response.Write "<td>" & rs(index) & "</td>"
Next
Response.Write "</tr>"
rs.MoveNext
Loop
%>
<%
set rs = nothing
%>
.Net aspx는 db를 유연하게(레코드별로) 제어하기 위해서 어떤 코드를 어떻게 사용할 수 있는지 아시는대로 부탁 드리겠습니다
<%
' DSN과 SQL문을 가져온다.
strIP = Request( "server_ip" )
strPort = Request( "cas_port" )
strUser = Request( "db_user" )
strPass = Request( "db_pass" )
strName = Request( "db_name" )
strQuery = Request( "query" )
if strIP = "" then
Response.Write "SERVER_IP를 입력하세요"
Response.End ' IP가 없으면 페이지 종료
end if
if strPort = "" then
Response.Write "Port 번호를 입력하세요"
Response.End ' Port가 없으면 페이지 종료
end if
if strUser = "" then
Response.Write "DB_USER를 입력하세요"
Response.End ' DB_User가 없으면 페이지 종료
end if
if strName = "" then
Response.Write "DB_NAME을 입력하세요"
Response.End ' DB_NAME이 없으면 페이지 종료
end if
if strQuery = "" then
Response.Write "확인하고자 하는 Query를 입력하세요"
Response.End ' Query가 없으면 페이지 종료
end if
' 연결 객체 생성
strDsn = "driver={CUBRID Driver};server=" & strIP & ";port=" & strPort & ";uid=" & strUser & ";pwd=" & strPass & ";db_name=" & strName & ";"
' DB연결
Set DBConn = Server.CreateObject("ADODB.Connection")
DBConn.Open strDsn
' SQL 실행
Set rs = DBConn.Execute( strQuery )
' SQL문에 따라 메시지 보이기
if InStr(Ucase(strQuery),"INSERT")>0 then
Response.Write "레코드가 추가되었습니다."
Response.End
end if
if InStr(Ucase(strQuery),"DELETE")>0 then
Response.Write "레코드가 삭제되었습니다."
Response.End
end if
if InStr(Ucase(strQuery),"UPDATE")>0 then
Response.Write "레코드가 수정되었습니다."
Response.End
end if
%>
<table>
<%
' 필드 이름 보여주기
Response.Write "<tr bgColor=#f3f3f3>"
For index =0 to ( rs.fields.count-1 )
Response.Write "<td><b>" & rs.fields(index).name & "</b></td>"
Next
Response.Write "</tr>"
' 필드 값 보여주기
Do While Not rs.EOF
Response.Write "<tr bgColor=#f3f3f3>"
For index =0 to ( rs.fields.count-1 )
Response.Write "<td>" & rs(index) & "</td>"
Next
Response.Write "</tr>"
rs.MoveNext
Loop
%>
<%
set rs = nothing
%>
따라서 .net에서 사용하시기 위해서는 ODBC나 OLEDB를 이용하셔야 됩니다.
aspx에서도 ADODB객체를 이용하시면 될 것으로 보입니다.
관련하여 .net aspx의 간단한 코드를 만들어서 기술 문서로 등록하도록 하겠습니다.
사용에 불편을 드려서 죄송합니다.