꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	> > > <%@ Language=VBScript %> > > > <%'로긴 팅기는 거 달기%> > > > <% > > > > > > user_id = 2000066 > > > 'user_id = session("edmsID") > > > approvePath = Request.Form("approvePath") > '이렇게 날라옵니다...김(사원)-2000001,이(사원)-2000066,박(대리)-2000002,김(과장)-2000003,김(이사)-2000004, > > > SendApprover = Request.Form("SendApprover") > '결재라인1 <== 결재라인 제목이고요... > > > > > > ' 넘어온 결재자중에서 사원번호만 추출하여 루프를 돌린다. > > > tempApprover = split(SendApprover,",") > > > %> > > > <!--#include file="../include/ConnectString.asp"--> > > > <!--#include file="../include/ConnectData.asp"--> > > > <% > > > for i=0 to UBound(tempApprover) > > > temp = split(tempApprover(i),"-") > > > ApproverID = ApproverID & temp(1) &"," > > > next > > > > > > ApproverID = left(ApproverID,len(ApproverID)-1) ' 마지막 끝의 ","를 없앤다. > > > ApproverID = user_id&","& ApproverID&"," '기안자를 추가한다. 뒤에 『 , 』 는 사람수에 맞도록 붙여준 것이다. > > > > > > '현재 나오는 값 → 2000066,2000001,2000066,2000002,2000003,2000004 > > > > > > strSQL="SELECT APP_NAME FROM APPROVAL_TABLE WHERE APP_NAME = '"& SendApprover &"'" > > > set rs=conn.execute(strSQL) > > > > > > if rs.eof then > > > '결재경로 테이블에 저장 > > > Set rsfi = Server.CreateObject("ADODB.RecordSet") > > > > > > '저장하는 거 달기( 인서트문) > > > ApproverID = split(ApproverID,",") > > > > > > for i=0 to UBound(ApproverID) > > > > > > ApproverID = ApproverID(i) > > > > > > AppID1 = Mid(ApproverID,1,4) > > > AppID2 = Mid(ApproverID,5,3) > > > AppID = AppID1&"-"&AppID2 > '이런 삽질을 하는이유는... 오라클 서버에...사원번호가... 2000-066 이런식으로 들어가있기 때문이죠ㅜ_ㅜ > '실제로... MS-SQL 에는... 2000066 이렇게 들어가고요..ㅜ_ㅜ 대리님 미워~!!! ㅜ_ㅜ > > > > > > > strSQLFind="insert into groupadmin.APPROVAL_TABLE VALUES(DEPTNO, APP_NAME, SEQNO, EMPNO)" > > > strSQLFind=strSQLFind & " " > > > strSQLFind=strSQLFind & " select 부서CODE,"&SendApprover&","&i&","&ApproverID&" from openquery(stc,'select 부서CODE,사번 from 인사_최근발령 Where 사직일자 Is Null and 사번=''"&AppID&"''')" > > > set rsFi=conn.execute(strSQLFind) > > > set rsFi=nothing > > > next > > > > > > else > > > %> > > > <script language=javascript> > > > alert("이미존재하는 결재 경로명입니다.\n다른 결재경로명을 적어주세요."); > > > history.back(); > > > </script> > > > <% > > > end if > > > set rs=nothing > > > set conn=nothing > > > %> > > > <script language=javascript> > > > top.frames[0].location.href="../popupFiles/popupGetApproverTop.asp"; > > > top.frames[1].location.href="../popupFiles/popupGetApproverLeft.asp"; > > > location.href="../popupFiles/popupGetApproverRight.asp"; > > > </script> > > > > > > > > > > > > 어디서 틀렸는지 모르겠어요... ㅜ_ㅜ > > > > > > 돠주세용~ > > ----------------------------------------------------------- > 500 오류나는데용... ㅡㅡㅋ > > 그냥... 구문상의 오류 체크만 봐주세요... > > 구문상으로 오류가 없으면... 제가... > > 쿼리문이나 다른거 틀렸으니깐... > > -_-;; 다시 점검을 하려고요... > > 소스에... 설명 더 붙여놓을 게요... ----------------------------------------------------------- 리더님... 질문을 하실때 이런 식으로 하시면 도움을 줄 수가 없습니다. -_- 특히 일반적인 프로그램이 아니고... 리더님이 필요에 의해 만든 프로그램의 경우에 이것이 뭐하는 프로그램이 뭔지 모르면서 왜 이렇게 프로그램을 짰는지 이해를 못한 상태에서 그냥 소스만을 보면서 어디가 틀렸는지 찾기란 서울에서 김서방 찾기와 같다고나 할까요? 에러가 난 다면 에러가 나는 상황 에러의 제목과 에러의 내용 그리고 에러가 발생하는 라인 번호를 정확하게 써주셔야 가능성을 찾아 볼 수 있죠.... 답을 하시는 분들은 슈퍼맨이 아니랍니다.... : ) 그냥 보통 사람일 뿐이죠....

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *