꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	> 챙선배... > 궁금한게 있어서요... > > > Private Sub schupdate_UserEvent(ByVal EventName As String) > '데이타 수정처리 > > Dim update1, update2, update3 As String > Dim update4, update5, update6 As String > Dim update7, update8, update9, meventname As String > Dim schupdate As New ADODB.Recordset > > update1 = Left(Request.Form("sa_code"), 5) > update2 = Request.Form("work_code") > update3 = Request.Form("start_date") > update4 = Request.Form("end_date") > update5 = Request.Form("plan_date") > update6 = Request.Form("status") > update7 = Request.Form("work_contents") > update8 = Request.Form("docno") > update9 = Request.Form("note") > > With Response > .write "<html>" > .write "<head>" > .write "<title> </title>" > .write "<script language='javascript'>" > .write "function check() {" > .write "alert('수정하나');" > .write "var ans;" > .write "if(confirm('수정하시겠습니까?')) {" > .write "} else {" > .write "ans='javascript:history.go(-1)';" > .write "location.href=ans;" > > .write " }" > .write "}" > .write "</script>" > .write "</head>" > .write "<body onload='check()'>" > .write "</body>" > .write "</html>" > End With > End Sub > > 위에서 confirm 값이 true가 넘어오면 아래에 있는 update문을 실행해야 하거든요...script문 내에서 sql을 사용할 수 있다면 좋을텐데...그렇지 않으면 아예 다른 sub함수를 호출하는 방법은 없을까요? > > With schupdate > .ActiveConnection = DataEnv.ADOCON > .Source = "update schedule_m set " & _ > "s_code='" & update1 & "'," & _ > "s_work_num='" & update2 & "'," & _ > "s_start_day ='" & update3 & "'," & _ > "s_end_day='" & update4 & "'," & _ > "s_plan_day='" & update5 & "'," & _ > "s_status='" & update6 & "'," & _ > "s_work='" & update7 & "'," & _ > "s_doc_no='" & update8 & "', " & _ > "s_note='" & update9 & "' " & _ > "where s_work_num='" & EventName & "'" > .open > MsgBox "수정 되었습니다." > End With > > meventname = update2 + "," + update1 + "," + Trim(Mid(Request.Form("sa_code"), 7, 15)) > > > schtitleview_UserEvent (meventname) > > > End Sub ----------------------------------------------------------- 업데이트 문이 들어 있는 페이지에서 javascript를 쓰지 않고, 그 전에 있는 페이지에서 javscsript를 써서 confirm여부를 확인 하면 되지 않을까요.. if(confirm('수정하시겠습니까?')){ 업데이트할 페이지로 이동 } [확인]을 누르면 페이지 이동을 하면서 업데이트를 시키고, [취소]를 누르면 아무런 작동이 없구.. 날이 덥네요...

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *