꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	공지사항 비공개 HTML 사용
제목 *
내용 *	<%@ LANGUAGE="VBSCRIPT" %> <% Response.Buffer=True Server.ScriptTimeout=1200 Set UploadForm = Server.CreateObject("SiteGalaxyUpload.Form") P_ID=UploadForm("P_ID") P_Name=Trim(UploadForm("F_Name")) P_Email=Trim(UploadForm("F_Email")) P_Url=Trim(UploadForm("F_Url")) P_Subject=Replace(Trim(UploadForm("F_Subject")), "'", "''") P_Contents=Replace(UploadForm("F_Contents"), "'", "''") P_Password=Trim(UploadForm("F_Password")) P_FileName=UploadForm("F_FileName") P_FileName=Trim(P_FileName) V_Year=Year(date) V_Month=Month(date) if V_Month<10 then V_Month=0&V_Month end if V_Day=Day(date) if V_Day<10 then V_Day=0&V_Day end if V_Date=V_Year&"-"&V_Month&"-"&V_Day V_Time=Time() V_Reference=0 V_Error=1 V_ErrorString="" if P_Name="" then V_Error=0 V_ErrorString="이름을 입력하세요.<br>" end if if P_Subject="" then V_Error=0 V_ErrorString=V_ErrorString+"제목을 입력하세요.<br>" end if if P_Contents="" then V_Error=0 V_ErrorString=V_ErrorString+"내용을 입력하세요.<br>" end if if P_FileName="" then ' V_Error=0 ' V_ErrorString=V_ErrorString+"첨부파일을 입력하세요.<br>" else P_FileSize=UploadForm("F_FileName").Size end if 이쪽부분 어디서 고쳐야할지 모르겠어요.. 그리고 DB에 관한 말씀도 좀 해주세요..

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *