將以下內容儲存為檔案uo_datawindow_autoscroll.sru , 然後匯入pbl中,再通過匯入的uo_datawindow_autoscroll物件來建立dw(當前預設的時間為1秒,更改dw的「滾動時間間隔」屬性可以設定滾動時間間隔)
$pbexportheader$uo_datawindow_autoscroll.sruforward
global type uo_datawindow_autoscroll from
datawindow
end type
type timing_scroll
from
timing within uo_datawindow_autoscroll
end type
end forward
global type uo_datawindow_autoscroll from
datawindow
integer width = 686
integer height = 400
string title = "
none
"boolean livescroll = true
borderstyle borderstyle = stylelowered!
event
ue_timer ( )
timing_scroll timing_scroll
end type
global
uo_datawindow_autoscroll uo_datawindow_autoscroll
type variables
dec 滾動時間間隔 = 1
protected
:datawindow idw
end variables
event ue_timer();if describe("
evaluate('if(page() = pagecount(), 1, 0)',
" + string(object.datawindow.lastrowonpage) + "
)") = '1'
then
this.scrolltorow(1
)else
this
.scrollnextpage( )
end
ifend
event
on uo_datawindow_autoscroll.create
this.timing_scroll=create timing_scroll
end on
on uo_datawindow_autoscroll.destroy
destroy(
this
.timing_scroll)
end on
event constructor;idw = this
this.modify( '
create compute(band=foreground alignment="2" expression="page() + ~
'/~'
+ pagecount()"border="0" color="255" x="199" y="8" height="64" width="326" format="[general]" html.valueishtml="0" name=compute_page visible="1" font.face="宋體" font.height="-9" font.weight="700" font.family="0" font.pitch="2" font.charset="134" background.mode="1" background.color="536870912" )')
timing_scroll.start(滾動時間間隔)
end
event
type timing_scroll
from timing within uo_datawindow_autoscroll descriptor "
pb_nvo
" = "
true
"end type
on timing_scroll.create
call super::create
triggerevent(
this, "
constructor")
end on
on timing_scroll.destroy
triggerevent(
this, "
destructor")
call super::destroy
end on
event timer;idw.triggerevent("
ue_timer")
end
event
CDSN上一頁下一頁功能模仿
從後台讀取記錄,如果資料過多,就需要劃分多頁去顯示,本章就是模仿cdsn來實現該功能的,採用asp動態語言實現的,求噴我,css這部分我完全是copy過來的,只改了一點,我主要完成的是asp後面的 本章也是做乙個記錄,方便後面專案中使用,如上圖所示。新建pagelist.css檔案 css docu...
用資料庫的方式編輯上一頁 下一頁
using sqlconnection con new sqlconnection server guid article id new guid 文章的id號 guid perarticleid guid.empty guid nextarticleid guid.empty 獲取文章欄目 str...
php獲取文章上一頁與下一頁的方法
本文例項講述了 先看個例子 1,2,3,4,5.假如上面5個是id了,我要對我們要用order by id asc得出的排序應該是,4,好了原理就這麼簡.sql實現方法,如下 如下 sql select 字段 from 表名 where id 3 order by id asc limit 1 得出...