꿈속나라

당신에게로 떠나는 꿈속여행 - 꿈속나라(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 *