|
|
|
ช่วยดู error นี้ให้หน่อยนะค่ะ ADODB.Recordset error '800a0bb9' |
|
|
|
|
|
|
|
ตอนนี้เจอ error นี้ค่ะ
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
โค้ด Code (ASP)
<body>
<table width="760" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#F0F0F0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="780" height="100">
<param name="movie" value="../images/Movie1.swf">
<param name="quality" value="high">
<embed src="../images/Movie1.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="780" height="100"></embed>
</object>
</td>
</tr>
<tr>
<td class="balck_14 style1"> </td>
</tr>
<tr>
<td valign="top" class="white_14 style5">
<table width="760" align="center">
<tr>
<td>
<div align="center">
<%
dim keyword1
select1=Request.Form("select1")
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT ID,videoname,picpath,filepath FROM tblvideoclip "
rs.CursorType = 3
rs.Open sql, strCon *****บรรทัดที่ บอกว่า error ค่ะ
%>
<%
if not rs.eof then
Do While Not rs.Eof
%>
</div></td>
</tr>
<tr class="body2" align="center">
<td class="td1" align="center">
<a href="../clips.asp?id=<%=rs("id")%>" target="_blank"><img border="0" src="<%=rs("picpath")%>" /></a>
<%=rs("videoname")%></td>
</tr>
<tr>
<td>
<div align="center">
<%
rs.MoveNext
Loop
%>
<%
End If
%>
<%
rs.Close
Set rs=Nothing
strCon.Close
Set strCon=Nothing
%>
</div> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="25">
<div align="center" class="balck_14">
<p>
<img src="../images/Active3.gif" width="11" height="12" border="0" /> <span class="body2">
</span>
</p>
</div>
</td>
</tr>
<tr>
<td><!--#include file="../include/foot1.html" --></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
ช่วยดูให้หน่อยนะค่ะ แก้มาทั้งวันแล้วยังไม่ได้เลยค่ะ
Tag : ASP, Ms SQL Server 2008, Web (ASP.NET)
|
|
|
|
|
|
Date :
2011-09-30 14:50:33 |
By :
ของความกรุณา |
View :
2139 |
Reply :
2 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Code (ASP)
<%
Dim Conn,strSQL,objRec
Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("mydatabase.mdb"),"" , ""
strSQL = "SELECT * FROM customer "
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open strSQL, Conn, 1,3
%>
<table width="600" border="1">
<tr>
<th width="91"> <div align="center">CustomerID </div></th>
<th width="98"> <div align="center">Name </div></th>
<th width="198"> <div align="center">Email </div></th>
<th width="97"> <div align="center">CountryCode </div></th>
<th width="59"> <div align="center">Budget </div></th>
<th width="71"> <div align="center">Used </div></th>
</tr>
<%
While Not objRec.EOF
%>
<tr>
<td><div align="center"><%=objRec.Fields("CustomerID").Value%></div></td>
<td><%=objRec.Fields("Name").Value%></td>
<td><%=objRec.Fields("Email").Value%></td>
<td><div align="center"><%=objRec.Fields("CountryCode").Value%></div></td>
<td align="right"><%=objRec.Fields("Budget").Value%></td>
<td align="right"><%=objRec.Fields("Used").Value%></td>
</tr>
<%
objRec.MoveNext
Wend
%>
ลองแบบนี้ดูครับ
Go to : ASP Microsoft Access List Record
|
|
|
|
|
Date :
2011-09-30 17:15:02 |
By :
webmaster |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ได้แล้วค่ะ พอดีลืม include connection ค่ะ
|
|
|
|
|
Date :
2011-10-01 15:40:05 |
By :
ขอบคุณค่ะ |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 00
|