2009. 9. 23. 18:04
Ajax
textarea 에 VS수준의 인텔리센스 기능을 탑재시켜주는 야심찬 계획의 프로토타입 입니다
textareaplus.htm
<%
set db = server.createobject("adodb.connection")
db.open application("connectionstring")
set rs = db.execute("select getdate() as current_time")
%>
textareaplus.v2.htm
<object runat="server" id="db" progid="adodb.connection"></object>
<%
db.Open application("conn")
set cmd = server.CreateObject("adodb.command")
cmd.ActiveConnection = db
cmd.CommandType = adcmdstoredproc
cmd.CommandText = "dbo.usp_some_proc"
cmd.NamedParameters = true
cmd.Parameters.Append cmd.CreateParameter("@return_value",adInteger,adParamReturnValue,,0)
cmd.Parameters.Append cmd.CreateParameter("@param1",adVarChar,adParamInput,10,"param1")
set rs = cmd.Execute
do while not rs.EOF
response.Write rs(0)
response.Write "<br>"
rs.MoveNext
next
rs.Close
set rs = nothing
db.Close
%>
출처 : http://taeyo.net/pds/Content.aspx?SEQ=3121&TBL=UPLOAD&PGN=3
