꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

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

이름 *	HTML 사용
제목 *
내용 *	> 다 잘들어가는데 패스워드만 안들어가네요 > 알려주세요. 에러는 없는데 패스워드만 문제입니다 > > <% > ' 사용자 정보 입력 > USER_ID = Request("USER_ID") > USER_PASSWORD = Request("USER_PASSWORD") > USER_NAME = Request("USER_NAME") > USER_NAME1 = Request("USER_NAME1") > COUNTRY = Request("COUNTRY") > TEL = Request("TEL") > FAX = Request("FAX") > EMAIL = Request("EMAIL") > ADDRESS = Request("ADDRESS") > > > '시리얼 넘버 생성엔진 소스---------------------------------- > '************************************************************************** > > set DBconnection = server.CreateObject("ADODB.connection") > DBconnection.Open ("DSN=sql;UID=sa;PWD=") > > '위의 ADOdb커넥션 개체가 들어가야지 데이타베이스와 연결 > '######################################################################### > > > sql = "select top 1 num from member order by num desc" > > '커넥션 인자를 바꿔줬음 DBconnection > set aa = DBconnection.execute (sql) > > if aa.EOF then > num_1 = 1 + 1 '넘버가 하나도 없으면 > else > num_1 = 1 + aa("num") '넘버가 있으면 가장큰수의 +1 : 보라넷 전용 > end if > > 'else > ' num_1 = 1 + aa("no") '넘버가 있으면 가장큰수의 +1 지우지 말것 > > > num = len(num_1) '넘버의 길이 > > '############################################################################# > '이부분이 잘못 되었다면...아래 부분의 no 라는 필드가 없어서 no 대신에 num을 넣었읍니다. > > 'response.write num_1 & "/" & aa("no")& "\|" > '위의 것이 아니라... > 'response.write num_1 & "/" & aa("num_1")& "\|" '이부분에러난다 > '이걸로 바뀌어야 겠죠..,. > '########################################################################### > > totalnum = 13 - num '13자에서 빼기 넘버의 길이 > > number = 1 > > Result = left("0000006000000" & CStr(Number), totalnum) '13자리숫자에서 남은 수 오른쪽부터 자르기 > > > > > jumin = Result & num_1 '오른쪽부터 자른수 에 순차넘버 붙이기 > > response.write jumin & "<hr>" > > '여기까지------------------------------------------------- > > > > ' 작은 따옴표 저장을 위한 Replace 사용 > INTRO = Request("INTRO") > INTRO = Replace(INTRO,"'","''") > > > ' 데이터베이스 연결 설정 > > Set dbCon = Server.CreateObject("ADODB.Connection") > dbCon.Open ("DSN=sql;UID=sa;PWD=;") > ' 아이디 중복 여부 검사 > > > sqlstr = "select Count(Num) from member where USER_ID ='" & USER_ID & "'" > > set Rs = dbCon.execute(sqlstr) > > if Rs(0) = 0 then > > > ' 중복되는 아이디가 없을 경우 테이블에 회원정보 저장 > sqlstr = "INSERT INTO member(USER_ID, USER_PASSWORD, USER_NAME,USER_NAME1,COUNTRY,TEL,FAX, EMAIL,ADDRESS,INTRO,REGISTER,JUMIN)" > sqlstr = sqlstr & " VALUES ('" & USER_ID & "','" & USER_PASSWORD & "','" & USER_NAME & "','" & USER_NAME1 & "','" & COUNTRY & "','" & TEL &"','" & FAX & "','" &EMAIL & "','" & ADDRESS & "','" & INTRO & "',getdate(),'" & JUMIN &"')" > Set MemberInsert = dbCon.execute(sqlstr) > %> > > <script language="javaScript"> > > alert('boranet 에 정상적으로 등록되었습니다.\n\n즐거운 서핑 되십시오.'); > > </script> > > > 　　 <% else ' 중복되는 아이디가 있는 경우 중복 메시지 출력 %> > 　　 > <script language="javaScript"> > > alert('이미 등록된 아이디입니다.\n\n확인후 다시 시도해 주십시오'); > history.back(-1);</script> > 　　　<%end if%> > <html> > <head> > <title>boranet</title> > <meta http-equiv="Content-Type" content="text/html; charset=euc-kr"> > > <script language=javascript > > function aaa() > { > document.SurfGoldform.action= "http://211.50.17.22/interface/interface_register_server_for.asp"; > document.SurfGoldform.submit(); > } > </script> > </head> > > <body bgcolor="#FFFFFF" topmargin=0 leftmargin=30 marginheight=0 onload="aaa();"> > <%time1 = date() & " " &hour(now) & ":" & minute(now) & ":" & second(now)%><BR> > <%'로딘이 수정 SQL 로 날짜 만드는법... > Que = "select convert(varchar(24), getdate(), 113)" > Set Rs = DBconnection.Execute(QUE) > time2 = Rs(0) > 'reg1 & reg2 > %> > <!--서프골드로 회원 내용 보내기. 현재 테스트서버로 보내는 겁니다. 나중에 sufgold주소로 바꿔야 할 듯 합니다.--> > <form name="SurfGoldform"> > <input type=hidden name="u_jumin" value="<%=JUMIN%>"> > <input type=hidden name="u_name" value="<%=USER_NAME & USER_NAME1%>"> > <input type=hidden name="u_id" value="<%=USER_ID%>"> > <input type=hidden name="u_email" value="<%=EMAIL%>"> > <input type=hidden name="u_password" value="<%=USER_PASSWORD%>"> > <input type=hidden name="u_company" value="BORA"> > <input type=hidden name="u_transdesc" value="E0010"> > <input type=hidden name="u_transtime" value="<%=time2%>"> > <input type=hidden name="u_returnURL" value="www.boranet.com/eng/mem/thanks.asp?"> > </form> > <!---여기 까지 작업//---> > > <table border="0" width="488"> > > > <tr> > <td width="482" height="62" valign="bottom"> > <p> </p> > > <p> <img src="../img/line.gif" width="471" height="8" border="0"> </p> > </td> > </tr> > </table> > > <table width="487" border="0"> > <tr bgcolor="#FFFFFF"> > <td height="341" width="481"> > <div align="center"> > <p><img src="../img/boranetlogo.gif" width="150" height="26"></p> > <p><font color="#339900"><b><font face="돋움" size="2" color="#6666FF">의 > 회원이 되신것을 </font></b></font></p> > <p><font color="#6666FF"><b><font face="돋움" size="2">축하드립니다.</font></b></font></p> > </div> > </td> > </tr> > </table> > > > <!--#include file="baseline.inc"--> > </body> > </html> > > > > > > -----------------------------------------------------------

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

이미지 1
이미지설명 1

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

자료 1
자료설명 1

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

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

Password *