|
|
|
|
food / 2000-11-10 / ¿ÀÀü 11:12:09 / 210.219.185.189
Á¶È¸¼ö : 130
|
[Áú¹®] °Ô½ÃÆÇ¿¡·¯¿¡¿ä ¾Ë·ÁÁÖ¼¼¿ä< |
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][ODBC SQL Server Driver][SQL Server]Syntax error converting datetime from character string.
/mytest/board_re/write_ok.asp, line 67
¼Ò½º´Â ÀÌ°ÅÀÔ´Ï´Ù
<%
'request°´Ã¼¸¦ ÅëÇØ ³Ñ¾î¿Â °ªµéÀ» º¯¼ö¿¡ ÀúÀåÇÑ´Ù. (ÃßõµÇ´Â ¹æ¹ýÀÌ´Ù)
name = request("name")
email = request("email")
homepage = request("homepage")
title = request("title")
pwd = request("pwd")
content = request("content")
'Äõ¸®¿¡ '°¡ µé¾î°¡¸é ¿¡·¯°¡ ³ª±â¿¡ ±×°ÍÀ» replace ó¸®ÇØÁØ´Ù.
title = replace(title,"'","''")
content = replace(content,"'","''")
Set db = Server.CreateObject("ADODB.Connection")
db.Open("DSN=sql;UID=sa;PWD=;")
SQL = "Select Max(num) from Board_Re"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, db
If IsNULL(rs(0)) Then
number = 1
else
number = rs(0) + 1
End If
'**************´äº¯Çü °Ô½ÃÆÇ¿¡¼ÀÇ Ãß°¡ºÎºÐ**********************'
if request("idx") <> "" then 'Áï ´äº¯¾²±â¶ó¸é
ref = Cint(request("ref"))
re_step = CInt(Request("re_step"))
re_level = CInt(Request("re_level"))
SQLString = "UPDATE Board_Re SET re_step = re_step + 1 WHERE ref=" & ref & " AND re_step > " & re_step
db.Execute(SQLString)
re_step = re_step + 1
re_level = re_level + 1
else ' ÷ ±Û¾²±â¶ó¸é...
ref = number
re_step=0
re_level=0
end if
'************************************************'
SQL = "INSERT INTO Board_Re (name,email,homepage,title,content,num,"
SQL = SQL & "readnum,writeday,ref,re_level,re_step,pwd) VALUES "
SQL = SQL & "('" & name & "'"
SQL = SQL & ",'" & email & "'"
SQL = SQL & ",'" & homepage & "'"
SQL = SQL & ",'" & title & "'"
SQL = SQL & ",'" & content & "'"
SQL = SQL & "," & number
SQL = SQL & ", 0 ,'" & now() &"'"
SQL = SQL & "," & ref
SQL = SQL & "," & re_level
SQL = SQL & "," & re_step
SQL = SQL & ",'" & pwd & "')"
'Response.Write sql
db.Execute SQL (À̺κР¿¡¼¿¡·¯ÀÔ´Ï´Ù.67¹ø°)
rs.Close
db.close
Set rs = Nothing
Set db = Nothing
Response.redirect "list.asp"
%>
|
|
|
|