꿈속나라

당신에게로 떠나는 꿈속여행 - 꿈속나라(http://www.inyourdream.net)

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

등록하실때는 필수항목을 모두 입력하셔야 합니다.

이름 *	HTML 사용
제목 *
내용 *	> 아무런 반응이 없어요.. 수정도 못하구.... 에러도 없구... 왜 이러는지... > > 자료실 수정부분 소스 입니다. > > 에러도 없는데 반응도 없네요... 그냥 빈공간만 덜렁~ > > > > 자료실 수정부분인데.... 수정페이지에서 아무런 에러메세지도 없이 암것도 안나와요.. 왜 이럴까요... > > > elseif method="edit" then > > num=cint(UploadForm("num")) > page=cint(UploadForm("page")) > > content_num = UploadForm("content_num") > content_num = Replace(content_num," ","....") > content_num = trim(Replace(content_num,"'","''")) > > record_date = UploadForm("record_date") > record_date = Replace(record_date," ","....") > record_date = trim(Replace(record_date,"'","''")) > > hname = UploadForm("hname") > hname = Replace(hname," ","....") > hname = Trim(Replace(hname,"'","''")) > > place = UploadForm("place") > place = Replace(place," ","....") > place = Trim(Replace(place,"'","''")) > > branch = UploadForm("branch") > branch = Replace(branch," ","....") > branch = Trim(Replace(branch,"'","''")) > > couplet_title = UploadForm("couplet_title") > couplet_title = Replace(couplet_title," ","....") > couplet_title = Trim(Replace(couplet_title,"'","''")) > > > announcement = UploadForm("announcement") > announcement = Replace(announcement," ","....") > announcement = Trim(Replace(announcement,"'","''")) > > > issue = UploadForm("issue") > issue = Replace(issue," ","....") > issue = Trim(Replace(issue,"'","''")) > > > summary = UploadForm("summary") > summary = Replace(summary," ","....") > > passwd=Trim(UploadForm("passwd")) > > sqlmStr="select passwd from uos_uis where num='"&num&"'" > Set rsm = DbCon.Execute(sqlmStr) > rsm_pass=rsm(0) > rsm.close > set rsm=nothing > > if rsm_pass=passwd then > sql="UPDATE test SET content_num='"&content_num&"', record_date='"&record_date&"', > hname='"&hname&"',place='"&place&"', writeday=now(), > branch='"&branch& "',couplet_title='"&couplet_title&"',announcement='"&announcement&"',issue='"&issue&"',s > ummary='"&summary&"' " > sql = sql & " WHERE num=" & num > DbCon.Execute(sql) > else > response.redirect "edit.asp?sort1="&sort1&"&sort2="&sort2&"&page="&page&"&num="&num > end if > > re="couplet_list.asp?sort1="&sort1&"&sort2="&sort2&"&page="&page > response.redirect re > DbCon.Close > > > > > > 자료실 수정부분 소스 입니다. > > 에러도 없는데 반응도 없네요... 그냥 빈공간만 덜렁~ > > > > 자료실 수정부분인데.... 수정페이지에서 아무런 에러메세지도 없이 암것도 안나와요.. 왜 이럴까요... > > > elseif method="edit" then > > num=cint(UploadForm("num")) > page=cint(UploadForm("page")) > > content_num = UploadForm("content_num") > content_num = Replace(content_num," ","....") > content_num = trim(Replace(content_num,"'","''")) > > record_date = UploadForm("record_date") > record_date = Replace(record_date," ","....") > record_date = trim(Replace(record_date,"'","''")) > > hname = UploadForm("hname") > hname = Replace(hname," ","....") > hname = Trim(Replace(hname,"'","''")) > > place = UploadForm("place") > place = Replace(place," ","....") > place = Trim(Replace(place,"'","''")) > > branch = UploadForm("branch") > branch = Replace(branch," ","....") > branch = Trim(Replace(branch,"'","''")) > > couplet_title = UploadForm("couplet_title") > couplet_title = Replace(couplet_title," ","....") > couplet_title = Trim(Replace(couplet_title,"'","''")) > > > announcement = UploadForm("announcement") > announcement = Replace(announcement," ","....") > announcement = Trim(Replace(announcement,"'","''")) > > > issue = UploadForm("issue") > issue = Replace(issue," ","....") > issue = Trim(Replace(issue,"'","''")) > > > summary = UploadForm("summary") > summary = Replace(summary," ","....") > > passwd=Trim(UploadForm("passwd")) > > sqlmStr="select passwd from uos_uis where num='"&num&"'" > Set rsm = DbCon.Execute(sqlmStr) > rsm_pass=rsm(0) > rsm.close > set rsm=nothing > > if rsm_pass=passwd then > sql="UPDATE test SET content_num='"&content_num&"', record_date='"&record_date&"', > hname='"&hname&"',place='"&place&"', writeday=now(), > branch='"&branch& "',couplet_title='"&couplet_title&"',announcement='"&announcement&"',issue='"&issue&"',s > ummary='"&summary&"' " > sql = sql & " WHERE num=" & num > DbCon.Execute(sql) > else > response.redirect "edit.asp?sort1="&sort1&"&sort2="&sort2&"&page="&page&"&num="&num > end if > > re="couplet_list.asp?sort1="&sort1&"&sort2="&sort2&"&page="&page > response.redirect re > DbCon.Close > > > -----------------------------------------------------------

추가할 이미지를 입력하세요.

이미지 1
이미지설명 1

추가할 자료를 입력하세요.

자료 1
자료설명 1

추가할 싸이트를 입력하세요.

관련싸이트 1
싸이트설명 1

Password *