文章内页类

代码如下:

<%
class MyArticle
    dim wenzhang_id
    dim title1,content1
    Private Sub Class_Initialize()
        'response.Write "类的初始化 事件:Class_Initialize<br>"
    end sub

Private Sub Class_Terminate() 
        'response.Write "释放对象 事件:Class_Terminate<br>" 
    end sub

Public Property Let id(byval v) 
        wenzhang_id = v 
    End Property

Public Sub conn_sub() 
        Set conn = Server.createObject("ADODB.Connection")
          cnnstr="DRIVER={Microsoft Access Driver (*.mdb)}; "
          cnnstr=cnnstr & "DBQ=" & Server.MapPath("admin/WataVase/%29to-dream.mdb")
          conn.Open cnnstr

sql = "Select * From Article where Deleted = 0 and ArticleID = "&wenzhang_id
          set rs=Server.CreateObject("adodb.recordset") 
          rs.open sql, conn, 1, 1

title1 = rs("Title")
        content1 = rs("Content")

rs.close
        set rs = nothing

conn.close
        set conn = nothing

end sub

Public Property Get title() 
        title = title1
    End Property

Public Property Get content() 
        content = content1
    End Property

end class

'MyArticle 类 使用说明
'dim wenzhang
'set wenzhang = new MyArticle
'wenzhang.id = 3
'call wenzhang.conn_sub()
'response.write wenzhang.title
'response.write wenzhang.content
'set wenzhang = nothing
%>

(0)

相关推荐

  • 文章内页类

    复制代码 代码如下: <% class MyArticle     dim wenzhang_id     dim title1,content1     Private Sub Class_Initialize()         'response.Write "类的初始化 事件:Class_Initialize<br>"     end sub Private Sub Class_Terminate()          'response.Write &quo

  • Yii实现单用户博客系统文章详情页插入评论表单的方法

    本文实例讲述了Yii实现单用户博客系统文章详情页插入评论表单的方法.分享给大家供大家参考,具体如下: action部分: <?php function test($objs) { $objs->var=10; } class one { public $var=1; } $obj=new one(); echo $obj->var.'<p>'; test($obj); echo $obj->var; exit; PostController.php页面: ... /**

  • 文章内容页广告浮于左上角的解决办法

    这个是整页代码,你可以看着改了,也可以保存成HTML文件,完了试试看就知道了,主要用的CSS+DIV 上面的东西移到模板中,下面的东西也是一样~完了就行了~ <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://

  • Bootstrap框架动态生成Web页面文章内目录的方法

    引言 在写博客的时候,为了条理性起见,经常会使用许多小标题,当文章长时,需要来回在不同的标题之间穿梭,如果手动添加目录,添加锚点,实在是麻烦,为此,可以动态生成一块目录区域,并使用Bootstrap提供的Affix插件将目录区域固定在页面上.Bootstrap文档便使用了它 准备工作-引入bootstrap.min.js 将bootstrap.min.js放入body之前的script标签中,uikit.min.js暂时不引入. 引入相关插件之后,我们的思路是首先根据文章自动生成锚点以及菜单内容

  • 写一个对搜索引擎友好的文章SEO分页类

    使用jsp/php/asp等动态程序生成的页面如何对搜索引擎友好呢?你可能想使用url_rewrite.不过,最好还是让同一个网址在任意时间对应的页面内容都是一样的或者相似的.因为搜索引擎不喜欢页面内容总是在变化的网址. 一般博客文章需要将新发表的文章显示在前面,所以会使用"order by id desc"类似的SQL语句来查询一页包含的多篇文章.例如下面在JAVA+MYSQL中: public Article[] getArticleArray(int from, int size

  • WordPress主题中添加文章列表页页码导航的PHP代码实例

    WordPress 默认给主题开发者的建议是在文章列表底部提供上下页按钮,所以没有提供直接用在文章列表下的分页导航的函数.这里我提供一个比较完善的分页导航函数. /** *WordPress 文章列表分页导航 *http://www.endskin.com/page-navi/ */ function Bing_get_pagenavi( $query = false, $num = false, $before = '<article class="pagenavi postlistpa

  • js键盘方向键 文章翻页跳转的效果[小说站常用已支持firefox]

    一个小小的人性化功能,给用户很大的方便,所以如果你要做类似的网站,侠客建议还是加上哟. 先体验一下此功能吧: 按下向左方向键转到:www.baidu.com 按下向右方向键转到:www.google.com 按下向回车键转到:www.jb51.net 按下ctrl+enter回车键转到:www.jb51.net 实现本功能的javascript代码: 支持按键盘方向键翻页跳转的代码 document.onkeydown = pageEvent; var enableEnter = true; /

  • 微信小程序文章详情页跳转案例详解

    前面写了一篇小程序访问公众号文章 里面所有的文章列表里面都是跳转了同一篇文章链接,那么,如果所有的列表跳转详情页的时候,跳转对应id所在的文章又该怎么写? index.html <view class="container"> <view wx:for="{{cardTeams}}" wx:key="{{index}}" wx:for-item="cardTeam" class="item"

  • 新闻内页-JS分页

    '//判断内容里是不是包含这个分页标签 if instr(cinfo,"[NextPage]")>0 thenflag=1elseflag=0end if '//设置参数<script language="Javascript" >var Text,PageSize,flagText="<%=DealJsText(cinfo)%>"; PageSize=1500;flag=<%=flag%>;</s

  • 一个很不错的PHP翻页类

    复制代码 代码如下: <?php /* * Created on 2007-6-8 * Programmer : Alan , Msn - haowubai@hotmail.com * PHP100.com Develop a project PHP - MySQL - Apache * Window - Preferences - PHPeclipse - PHP - Code Templates */ //为了避免重复包含文件而造成错误,加了判断函数是否存在的条件: if(!function

随机推荐