꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	HTML 사용
제목 *
내용 *	> > DExtUpload컴포넌트의 수정시 에러입니다. > > 등록하기에서는 아무문제 없이 등록이 되는데 > > 유독 게시글을 불러와 수정을 하면은 아래와 같은 에러메시지가 나타답니다. > > > > ----------------------------------------- > > 에러원문 > > ----------------------------------------- > > DEXTUpload (0x800A0034) > > 파일 이름 또는 번호가 잘못되었습니다. > > /admin/commodity_modify_end.asp, line 11 > > > > > > ----------------------------------------- > > 수정페이지 소스원문 > > ----------------------------------------- > > <%@ LANGUAGE="VBSCRIPT"%> > > <!-- #include file="include/dsn.asp" --> > > <% > > 'Program by Sung-an, Park > > 'ch2u@ch2u.net > > 'Jan.2002 > > 'Database : MS-SQL70~MS-SQL2000 > > 'DextUpload Component > > > > Set uploadform = Server.CreateObject("DEXT.FileUpload") > > > > idx = uploadform("idx") > > photo_check = uploadform("photo") > > > > if photo_check = "" then > > > > cardno = uploadform("cardno") > > cardno = replace(cardno,"'","''") > > > > commodity = uploadform("commodity") > > commodity = replace(commodity,"'","''") > > > > styleno = uploadform("styleno") > > styleno = replace(styleno,"'","''") > > > > size = uploadform("size") > > size = replace(size,"'","''") > > > > material = uploadform("material") > > material = replace(material,"'","''") > > > > content = uploadform("content") > > content = replace(content,"'","''") > > > > season = uploadform("season") > > > > > > SQL = "Update csc Set " > > SQL = SQL & "cardno='" & cardno & "'" > > SQL = SQL & ",commodity='" & commodity & "'" > > SQL = SQL & ",styleno='" & styleno & "'" > > SQL = SQL & ",size='" & size & "'" > > SQL = SQL & ",material='" & material & "'" > > SQL = SQL & ",content='" & content & "'" > > SQL = SQL & ",season='" & season & "' where idx=" & idx > > > > db.Execute SQL > > > > db.Close > > set db = Nothing > > else > > uploadform.DefaultPath = filepath '제품사진이 저장될 절대 디렉토리 > > filepath = uploadform.DefaultPath > > image_file = uploadform("photo").FileName > > > > imgtype = uploadform("photo").ImageFormat > > > > imgwidth = uploadform("photo").ImageWidth > > imgheight = uploadform("photo").ImageHeight > > > > 'Set fso = Server.CreateObject("Scripting.FileSystemObject") > > > > filespec = filepath & "\" & uploadform("deletephoto") '---수정시 기존파일삭제 시작 --- > > > > If uploadform.FileExists(filespec) Then > > uploadform.DeleteFile filespec > > end if '---수정시 기존파일삭제 끝 --- > > > > upfilepath = filepath & "\" & image_file > > uploadedfile = uploadform.SaveAs(upfilepath, False) > > image_up_file = mid(uploadedfile, instrrev(uploadedfile,"\")+1) '파일네임구하기 > > '----------------------------------------------------------------------------------- > > > > cardno = uploadform("cardno") > > cardno = replace(cardno,"'","''") > > > > commodity = uploadform("commodity") > > commodity = replace(commodity,"'","''") > > > > styleno = uploadform("styleno") > > styleno = replace(styleno,"'","''") > > > > size = uploadform("size") > > size = replace(size,"'","''") > > > > material = uploadform("material") > > material = replace(material,"'","''") > > > > content = uploadform("content") > > content = replace(content,"'","''") > > > > season = uploadform("season") > > > > img_width = imgwidth > > img_height = imgheight > > > > if img_width > img_height and img_width > 120 then > > result_width = 120 > > result_height = Cint(img_height * (120/img_width)) > > elseif img_height > width and img_height > 120 then > > result_width = Cint(img_width * (120/img_height)) > > result_height = 120 > > else > > result_width = img_width > > result_height = img_height > > end if > > > > > > SQL = "Update csc Set " > > SQL = SQL & "cardno='" & cardno & "'" > > SQL = SQL & ",commodity='" & commodity & "'" > > SQL = SQL & ",styleno='" & styleno & "'" > > SQL = SQL & ",size='" & size & "'" > > SQL = SQL & ",material='" & material & "'" > > SQL = SQL & ",photo='" & image_up_file & "'" > > SQL = SQL & ",photowidth=" & img_width > > SQL = SQL & ",photoheight=" & img_height > > SQL = SQL & ",imgwidth=" & result_width > > SQL = SQL & ",imgheight=" & result_height > > SQL = SQL & ",content='" & content & "'" > > SQL = SQL & ",season='" & season & "' where idx=" & idx > > > > db.Execute SQL > > > > db.Close > > set db = Nothing > > > > end if > > > > Set uploadform = Nothing > > Response.Redirect "modify_end_massage.asp?idx=" & idx > > %> > > ------------------------------------------------ > > 소스원문입니다. 조금 무식한 방법을 택했지만 > > 확실하게 할려고 위와 같이 코딩했구요 > > > > 파일이 있으면 이미지의 가로 및 세로크기 > > 구하지 않고 업로드도 안하는 밥법입니다. > > > > > ----------------------------------------------------------- > > 11번째 줄이 머죠?? > > 앞쪽에 include 가 있을 경우에는 갸를 포함하기때매 > > ㅡㅡㅋ 틀려지는데... > > 소스도 별 이상이 없고... 이상하넴... ㅡㅡㅋ > > -----------------------------------------------------------

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *