꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	Microsoft VBScript 런타임 오류 (0x800A000D) 형식이 일치하지 않습니다 /mdmusic/update_ok.asp, line 44 ------------------------------------------- file = UploadForm("music") attach_file = file.FilePath filename = Mid(attach_file, InstrRev(attach_file, "\") + 1) ' 파일명을 얻는다. filetype = right(FileName,4) save_music = music_folder & "\" & filename ' 저장할 파일의 경로 설정 db_music = filename '디비에 저장되는 이름 If (FSO.FileExists(save_music)) Then ' 같은 이름의 파일이 있을 때 삭제 count = 0 do while FSO.FileExists(save_music) count = count + 1 save_music = music_folder & "\" & CStr(count) & filename db_music = CStr(count) & filename '디비에 저장되는 바뀌는 이름 Loop End If File.SaveAs save_music ' 파일을 업로드 Set FSO = Nothing %> <-----여기가 라인 44임돠ㅡㅡ; <% title = UploadForm("title") title = replace(title,"'","''") music_time = UploadForm("minute")*60 + UploadForm("second") category = UploadForm("category") category = replace(category,"'","''") new_category = UploadForm("new_category") new_category = replace(new_category,"'","''") page = UploadForm("page") music_name = replace(db_music,"'","''") if category = "" then category = new_category end if db.Open DSNName Sql = "insert into music (title,music,music_time,category,date) values (" Sql = Sql & "'" & title & "'," Sql = Sql & "'" & music_name & "'," Sql = Sql & music_time & "," Sql = Sql & "'" & category & "', GetDate())"

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *