一聚教程网:一个值得你收藏的教程网站

热门教程

网络寻呼机数据库版隐藏文件watch.asp

时间:2022-07-02 23:27:26 编辑:袖梨 来源:一聚教程网

<%
    username=session("username")
    if username<>"" then
    Set conn=server.createobject("adodb.connection")
    Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
    DBPath = "Data Source=" & Server.MapPath( "webuser.mdb" )
    conn.Open Provider & DBPath
    
    sql="select toname,isread,adddate from talks where toname='"& username &"'and isread=0 order by adddate"
    set rs=conn.execute(sql)
    if not rs.eof then
    response.write ""
    end if
    rs.close
    set rs=nothing
    conn.close
    set conn=nothing
    
    end if
%>

热门栏目