Thank you to apologize for the delay but I know the Egyptian revolution thing for taking all the time in Mrklh election issue has been resolved and I me another question
I'm doing and I Newsflash: there is a mistake
<%
dim strConnString_active
dim conn_active
dim rs
dim topic_cnt,strSql
strConnString_active ="DRIVER={MySQL ODBC 3.51 Driver}; SERVER=0000000; DATABASE=00000000; USER=000000; PASSWORD=000000; OPTION=16387;"
set rs = Server.CreateObject("ADODB.Recordset")
strSql="SELECT FORUM_TOPICS.CAT_ID,FORUM_TOPICS.FORUM_ID,FORUM_TOPICS.TOPIC_ID, FORUM_TOPICS.T_SUBJECT FROM FORUM_TOPICS ORDER BY FORUM_TOPICS.T_LAST_POST DESC LIMIT 20"
' set rs = Conn.Execute (strSql)
rs.cachesize = 20
rs.open strSql, conn_active, adOpenForwardOnly, adLockReadOnly, adCmdText
topic_cnt=1
%><marquee direction="right" scrolldelay="150">
<% do until rs.EOF
Response.Write "<a href='/forum/topic.asp?TOPIC_ID=" & rs("TOPIC_ID") & "' target='_blank' class='linkmid'> " & rs("T_SUBJECT") & "</a>"
%>
<font face=Webdings color=FF0000><</font>
<% rs.MoveNext
topic_cnt=topic_cnt + 1
if topic_cnt = 15 then
exit Do
end if
loop
rs.Close
set rs = nothing
conn_active.close
Set conn_active = Nothing
%>
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
line 19
rs.open strSql, conn_active, adOpenForwardOnly, adLockReadOnly, adCmdText