|
|
|
|
 |
|
주정임 / 2002-07-29 / 오후 9:59:36 / 203.232.32.2
조회수 : 172
|
| [질문] 며칠 째 회원가입 땜에 밤새다 글 올립니다... ㅠ.ㅠ |
며칠 째 고민하다 결국 도움을 청하고자 이케 글 올립니다.
첨엔 Microsoft VBScript 컴파일 오류 error '800a0409'
종결되지 않은 문자열 상수입니다.
/join_ok.asp, line 34
SQL = "INSERT INTO join (user_id, password, name, reg_num1, reg_num2, sex, birth_y, birth_m, birth_d, birthtype, job,
---------------------------------------------------------------------------------------------------------------------^
이라는 이런 오류가 뜨더니, 다시 새로 고침하니까 그이후로는 계속 페이지를 찾을수 없다고 하네요...
확인해 보면 HTTP403 - 사용금지 오류라고 나오거든요... 왜이러죠?
Sql이랑 ODBC 연결 제대로 해줬거든요.
<%
' 3∼18줄 까지 "join.htm"에서 넘겨준 값을 Request 객체의 Form 컬렉션을 이용하여 변수에 저장
user_id=Request.Form("user_id")
password=Request.Form("password")
name=Request.Form("name")
reg_num=Request.Form("reg_num1") &"-"& Request.Form("reg_num2")
sex=Request.Form("sex")
birthday=Request.Form("birth_y") &"."& Request.Form("birth_m") &"."& Request.Form("birth_d")
birtytype=Request.Form("birthtype")
job=Request.Form("job")
teltype=Request.Form("teltype")
tel=Request.Form("tel1") &"-"& Request.Form("tel2") &"-"& Request.Form("tel3")
email=Request.Form("email")
content=Request.Form("content")
joinday=Request.Form("joinday")
' ADODB를 사용해 데이터베이스 연결을 하기 위해 CreateObject를 이용. 이때 설정한 값을 저장하기 위해 변수 con 사용한다.
Set con = Server.CreateObject("ADODB.Connection")
' "DSN=join"을 열었을 때 'jjy' 계정사용.
con.Open ("DSN=join; UID=jjy; PWD=1119")
' 같은 ID가 있는지 확인하기 위해 ID를 select한다.
SQL = " SELECT user_id from join where user_id =' " & Request("user_id") & " ' "
set result=con.Execute (SQL)
' 같은 주민등록번호가 있는지 확인.
SQL = " SELECT reg_num from join where reg_num =' " & Request("reg_num") & " ' "
set rec=con.Execute (SQL)
' 만일 "join" 테이블에 id가 저장되어 있다면
if not result.EOF then
<script language="javascript">
<!-- 만약 사용자가 입력한 ID가 데이터베이스에 저장된 ID와 일치하면, 다음과 같이 "ID가 존재합니다. 다시 입력해 주세요."라는 메시지 창 출력 -->
alert("ID가 존재합니다. 다시 입력해 주세요.")
<!-- ID를 다시 입력할 수 있도록 이전 화면으로 돌아간다-->
history.back();
</script>
' 만일 "join" 테이블에 주민등록번호가 저장되어 있다면
else if not rec.EOF then
<script language="javascript">
<!-- 만약 사용자가 입력한 주민등록번호가 데이터베이스에 저장된 주민등록번호와 일치하면, 다음과 같이 "주민등록번호가 존재합니다. 다시 입력해 주세요."라는 메시지 창 출력 -->
alert("주민등록번호가 존재합니다. 다시 입력해 주세요.")
history.back();
</script>
' 만일 "join" 테이블에 자료가 없다면, 다음 수행
else
' 변수 SQL에 입력한 값을 저장. 이 때 입력한 정보는 데이터베이스 파일에 저장.
SQL = "INSERT INTO join (user_id, password, name, reg_num, sex, birthday, birthtype, job, teltype, tel, email, content, joinday) values(' "
SQL=SQL & "(' " & user_id & " ' "
SQL=SQL & ",' " & password & " ' "
SQL=SQL & ",' " & name & " ' "
SQL=SQL & ",' " & reg_num & " ' "
SQL=SQL & ",' " & sex & " ' "
SQL=SQL & ",' " & birthday & " ' "
SQL=SQL & ",' " & birthtype & " ' "
SQL=SQL & ",' " & job & " ' "
SQL=SQL & ",' " & teltype & " ' "
SQL=SQL & ",' " & tel & " ' "
SQL=SQL & ",' " & email & " ' "
SQL=SQL & ",' " & content & " ' "
SQL=SQL & ",' " & now() & " ')"
'Response.write SQL
con.Execute SQL
Response.Cookies("MyNet").Expires=#12/31/2010 00:00:00#
Response.Cookies("Mynet")("name")=name
Response.Cookies("MyNet")("user_id")=user_id
'가입 완료 창으로 넘어간다.
Response.Redirect "join_ok.asp"
%>
<% end if %>
<%
' 회원 관리 데이터베이스의 기록과 연결 설정을 닫는다.
rec.close
result.close
con.close
' 회원 관리 데이터베이스의 기록과 연결 설정을 초기화한다.
set rec=Nothing
set result=nothing
set con=Nothing
%> |
|
|
|