※ 引述《cancercjm (囧rz...)》之銘言：
: ※ 引述《Websphere (Just cruising)》之銘言：
: : replace it with
: : db.Source = "SELECT * FROM 知識分享 WHERE id=" & iRnd
: 錯誤類型：
: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
: [Microsoft][ODBC Microsoft Access Driver] 參數太少，預期個數 1。
: /plan/html/down.asp, line 18
: 還是有問的說
: 我上網查了很久 實在測試不出來哪裡錯 >"<
後來我亂改亂改 就可以用了
id的部份我改成自己設的
就可以用了
謝謝 ^^
<%
Dim db
Dim db_numRows
Set db = Server.CreateObject("ADODB.Recordset")
db.ActiveConnection = MM_db_STRING
Dim iRnd
Randomize
iRnd=Int(Rnd() * 4)+1
db.Source = "SELECT * FROM 知識分享 WHERE 識別碼=" & iRnd
db.CursorType = 0
db.CursorLocation = 2
db.LockType = 1
db.Open()
db_numRows = 0
%>
--
嚇死人的照片 http://www.wretch.cc/album/pjdfbj
看不懂的網誌 http://www.wretch.cc/blog/pjdfbj
很白爛的自介 http://www.wretch.cc/user/pjdfbj
缺水的留言版 http://www.wretch.cc/guestbook/pjdfbj
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.59.207.228