꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	HTML 사용
제목 *
내용 *	> > 안녕하세요..? > > > > 머좀 물어보려고 하는데요...써도될지.. > > > > site galaxy를깔고..제가 게시판을 만들다가 자료실로 개편을 하는 중입니다.그런데.. > > > > 자료업로드를 하면...자료는 자료대로 저장이 됩니다. > > 문제는.. 엑세스를 사용하는데 엑세스 db에 저장이 안된다는겁니다. > > > > 엑세스 db에 저장이 안되니..글을 쓸 수가 있어야 말이죠.. > > 쏘스를 올려드릴테니..한번 보시고.. 가르쳐 주세요.. > > > > 그리고...자료의 용량 제한은 어떻게 해얄지요.? > > rs_up_size 의 용량계산이 안되서 0으로 처리를했습니다. > > > > 미리 감사드립니다. > > > > <!--#include virtual='dbopen.inc'--> > > <!--#include virtual='board_setting.inc'--> > > <% > > response.expires = 0 > > response.buffer = true > > ON ERROR RESUME NEXT > > > > SET uploadform = server.createobject("sitegalaxyupload.form") > > rs_id = uploadform("id") > > rs_user = uploadform("user") > > rs_passwd = uploadform("passwd") > > rs_email = uploadform("email") > > rs_homepage = uploadform("homepage") > > rs_mailreceive = uploadform("mailreceive") > > rs_html = uploadform("html") > > rs_header = uploadform("header") > > rs_title = uploadform("title") > > rs_content = uploadform("content") > > rs_up_name = uploadform("up_name") > > rs_up_size = uploadform("up_size") > > rs_up_desc = uploadform("up_desc") > > rs_ipaddr = uploadform.Servervariables("remote_host") > > rs_up_name = uploadform("up_name") > > rs_up_desc = uploadform("up_desc") > > rs_up_size = 0 > > rs_up_path = server.mappath(".")& "/file_up/" > > rs_up_name = mid(rs_up_name,instrrev(rs_up_name , "\" ) + 1 ) > > uploadform("up_name").SaveAs rs_up_path & rs_up_name > > > > ' 요부분이 뭔지 모르겠어요... 이부분을 실행하면 에러가 있다고 그래서 실행 안하고 > > '주석으로 처리했습니다. > > ' IF Err THEN > > ' response.write err.number & "<br>" & err.source & "<br>" & err.description > > ' set uploadform = nothing > > ' 'response.end > > ' END IF > > > > SET uploadform = nothing > > %> > > <!--#include virtual='writecontrol.inc'--> > > <% > > IF rs_mailreceive = "on" THEN > > rs_mailreceive = 1 > > ELSE > > rs_mailreceive = 0 > > END IF > > IF rs_html = "on" THEN > > rs_html = 1 > > ELSE > > rs_html = 0 > > END IF > > > > sql = "SELECT id FROM " & bd_id & " ORDER BY id DESC" > > rs.pagesize = 1 > > rs.open sql,db,1 > > > > IF rs.eof then ' 기존의 글이 한개도 없다면? > > maxid = 1 ' 첫번째 글 > > else ' 기존의 글이 있다면 그 글은 가장 번호가 높은수이다. > > maxid = rs("id") + 1 ' 글번호 = 글번호 + 1 > > end if ' 글번호 추가 끝 > > rs.close > > > > IF rs_id = "" THEN '만약 받아온게 없다면.... 새글이므로 > > no = maxid > > no1 = maxid '받아온게 없으므로 글번호(모글)의 번호 > > no2 = 0 '리플의 순서 > > no3 = 0 '예비용.? > > ELSE '리플인경우라면? 여기서 리플의 순서를 파악하고 다시 순서를 교체해야 한다. > > no1 = rs_id '모글번호는 받은값. > > sql = "SELECT no1,no2,no3 FROM " & bd_id & " WHERE id = " & rs_id '모글의 데이터를 가지고 옴 > > rs.open sql,db,1 > > no = rs_id > > no1 = cint(rs("no1")) > > no2 = cint(rs("no2")) > > no3 = cint(rs("no3")) > > rs.close > > > > sql = "UPDATE " & bd_id & " SET no2 = no2 + 1 WHERE no1 = " & no1 & " and no2 > " & no2 > > response.write sql & "<br>" > > db.execute sql > > > > no2 = no2 + 1 > > no3 = no3 + 1 > > END IF > > > > sql = "INSERT INTO " & bd_id & " ( id , no , no1 , no2 , no3 , user , passwd , email , homepage , ipaddr , count , wdate , " > > sql = sql & " header , title , content , up_name , up_size , up_desc , etc , mailreceive , html ) VALUES " > > sql = sql & "(" & maxid & "," & no & "," & no1 & "," & no2 & "," & no3 & ",'" & rs_user > > sql = sql & "','" & rs_passwd & "','" & rs_email & "','" & rs_homepage & "','" & rs_ipaddr > > sql = sql & "'," & 0 & ",'" & now() & "','" & rs_header & "','" & rs_title & "','" & rs_content > > sql = sql & "','" & rs_up_name & "'," & rs_up_size & ",'" & rs_up_desc & "','" & rs_etc & "'," & rs_mailreceive > > sql = sql & "," & rs_html & ")" > > > > response.write sql > > > > db.execute sql > > > > 'sql 을 찍어봐도 sql구문은 이상이 없는데 ... db에 저장이 안됩니다. > > > ----------------------------------------------------------- > > 현재 소스상에서는 별 문제가 안 보이는데요.... > > bd_id 값을 받아오는 부분이 보이진 않지만.... > > sql 문을 찍어 봤을때 문제가 없었다고 하셨으니... 그건 아닐테고.... > > ON ERROR RESUME NEXT를 빼고 한번 해 보시죠... > > 에러가 나는지 않나는지 살펴 보게요... > > 만약 에러가 안 난다면.... execute가 안 된다는거닌까.. > > 혹시 if 문 같은거 살펴 보시구요... > > 파일 사이즈는 아래와 같이 얻으실 수 있습니다. > > P_FileSize=UploadForm("업로드파일폼이름").Size > > 그럼.... > > -----------------------------------------------------------

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *