|
|
|
|
 |
|
궁금이 / 2001-06-06 / 오전 11:18:55 / 211.181.38.139
조회수 : 125
|
| [질문] 수정시 html태그 문제 |
현재 다음과 같이 <input type="checkbox" name="html" value="1"> HTML사용
을 만들어 입력란에 추가하였습니다.
문제는 이곳에서 새롭게 입력하는 것과는 달이 태그의 적용이 되지 않습니다.
값을 받아들이는 것의 소스는 다음과 같습니다.
<!--#include file=../include/dbopen.asp-->
<%
Const adOpenForwardOnly = 0
Const adOpenKeyset = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3
Dim board_id, board_writer, board_email
Dim board_no, board_title, board_memo, board_homepage, board_count
Dim keyfield, keyword, sortfield, sortword, strSQL
Server.ScriptTimeOut = 7200
'사용자가 입력한 기본적인 데이타
board_writer = trim(Request("board_writer"))
board_email = trim(Request("board_email"))
board_title = Replace(trim(Request("board_title")), "'", "''")
board_memo = Replace(trim(Request("board_memo")), "'", "''")
board_homepage = trim(Request("board_homepage"))
' 전달되어지는 데이타
board_no = request("board_no")
board_count = request("board_count")
keyfield = request("keyfield")
keyword = request("keyword")
sortfield = request("sortfield")
sortword = request("sortword")
board_pass = request("board_pass")
html=trim(request("html"))
'+++++++++++++++++++++++++++++++
board_userip=request.servervariables("REMOTE_HOST")'사용자 IP
board_useros=request.servervariables("HTTP_USER_AGENT")'사용자 컴 정보
'+++++++++++++++++++++++++++++++
board_count = board_count - 1
' 현재 글 존재유무확인
strSQL = "SELECT * FROM bulletboard WHERE board_no = " & board_no
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL,DbCon,adOpenKeyset
if rs.EOF or rs.BOF then
rs.Close
Set rs = nothing
DbCon.Close
Set DbCon = nothing
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
alert("*^_^*\n수정하시려는 글은 이미 삭제되었습니다.\nnayaBoard - notice用(nextmoon@lycos.co.kr)");
history.go(-2);
//-->
</SCRIPT>
<%
elseif board_pass <> rs("board_pass") then
rs.Close
Set rs = nothing
DbCon.Close
Set DbCon = nothing
user_pass = false
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
alert("*^_^*\n죄송합니다.\n암호가 틀리면 수정할 수 없습니다.\n세부목록 보기로 돌아갑니다.\nnayaBoard - notice用(nextmoon@lycos.co.kr)");
history.go(-2);
//-->
</SCRIPT>
<%
else
rs.Close
Set rs = nothing
' 현재 글 존재유무확인 끝
' 현재 글의 수정
strSQL = "UPDATE bulletboard SET " &_
" board_writer= '" & board_writer & "'" & "," &_
" board_email= '" & board_email & "'" & "," &_
" board_homepage= '" & board_homepage & "'" & "," &_
" board_title= '" & board_title & "'" & "," &_
" board_memo= '" & board_memo & "'" &_
***************************************
" board_userip= '" & board_userip & "'" &_
" board_useros= '" & board_useros & "'" &_
" board_html= '" & html & "'" &_
위 부분을 입력하면 에러가 발생됩니다.ip,os,html
***************************************
" WHERE board_no = " & board_no
DbCon.Execute(strSQL)
DbCon.Close
Set DbCon = nothing
Response.Redirect "notice_read_dis.asp?board_no=" & board_no & _
"&board_count=" & board_count & _
"&keyfield=" & keyfield & _
"&keyword=" & keyword & _
"&sortfield=" & sortfield & _
"&sortword=" & sortword
end if
%>
상위 Dim변에 값을 넣어주어도 같은 에러거든여.
참 이것을 두개의 체크박스로 태그 제한과 적용으로 할면 어케해야할까요 지금의 방법이 좀 문제가 있는것 같아서리 말이져. |
|
|
|