[問題] 麻煩幫忙看一段程式碼(瀏覽人數)
大家好. 我快要這個bug整掛了.
這支目的是要記錄每天上線瀏覽人數
程式碼如下
==============================================================
userip = ""
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then
userip = Request.ServerVariables("REMOTE_ADDR")
end if
Set rs_IP = Server.CreateObject("ADODB.Recordset")
StrSql = "select IP_Address from OnLineBrowse
where IP_Address='"&userip&"' and CreDate=date();"
rs_IP.Open StrSql, conn
if (rs_IP.eof or rs_IP.bof) then
Set rsWIP = Server.CreateObject("ADODB.Recordset")
strSQL = "insert into OnLineBrowse(IP_Address)
values('"&userip&"')"
rsWIP.Open strSQL, conn
rsWIP.close()
set rsWIP = nothing
end if
rs_IP.close()
set rs_IP = nothing
==============================================================
這段程式真的非常詭異 這兩天執行後發現
網頁一讀到這一段程式 就會出現error.
恐怖的是 按f5重新整理後 網頁就出來了..
我拆成一段一段執行 都沒問題
全部一起執行 就又出現bug.
但看好多遍 我實在覺得寫法沒問題阿..
是由ASP+ACCESS組成的 請問有人知道BUG出現在哪嗎 = = 謝謝 感激!!
ps.SELECT & INSERT 那兩個句子是沒斷掉的 為方便大家看我才做斷行
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.167.109.111
※ 編輯: cyr1216 來自: 118.167.109.111 (02/08 23:24)
推
02/08 23:56, , 1F
02/08 23:56, 1F
→
02/09 00:12, , 2F
02/09 00:12, 2F
→
02/09 08:16, , 3F
02/09 08:16, 3F
→
02/09 08:17, , 4F
02/09 08:17, 4F
→
02/09 08:17, , 5F
02/09 08:17, 5F
→
02/09 12:12, , 6F
02/09 12:12, 6F