%'=================================================
'过程名:ManualPagination
'作 用:采用手动分页方式显示文章具体的内容
'参 数:无
'=================================================
sub ManualPagination()
dim ArticleID,strContent,CurrentPage
dim ContentLen,MaxPerPage,pages,i
dim arrContent
ArticleID=rsArticle("ArticleID")
strContent=rsArticle("Content")
ContentLen=len(strContent)
CurrentPage=trim(request("ArticlePage"))
if Instr(strContent,"[NextPage]")<=0 then
response.write strContent
'response.write "
[1]
"
else
arrContent=split(strContent,"[NextPage]")
pages=Ubound(arrContent)+1
if CurrentPage="" then
CurrentPage=1
else
CurrentPage=Cint(CurrentPage)
end if
if CurrentPage<1 then CurrentPage=1
if CurrentPage>pages then CurrentPage=pages
response.write arrContent(CurrentPage-1)
response.write ""
if CurrentPage>1 then
response.write "上一页 "
end if
for i=1 to pages
if i=CurrentPage then
response.write "[" & cstr(i) & "] "
else
response.write "[" & i & "] "
end if
next
if CurrentPage下一页"
end if
response.write "
"
end if
end sub %>
Extended usage of food additive for Jelly Belly candy has been approved by Ministry of Health
|
| PHDS is notified that MOH has approved the extended usage of food additives for a series of 50 candies from Jelly Belly Candy Company. On the bulletin of 2006 No.1 published on January 26 2006 by MOH, five food additives of Jelly Belly candy have been permitted for their extended usage. All of the above make Jelly Belly candy, a series of products sold in Europe and USA for more than one hundred years, ready to be launched into China market
|
|
 |
Address: #8 Dongxiang Road, Miyun Industry Developing Zone, Beijing, China
Liaison Office: A -1201 Ocean Express, No.66, Xiaguang Li, North Rd, East Third Ring Rd. Beijing PR.China 100027
Tel: +86-10-84466227/28/29(Ext.) Fax: +86-10-84466225 Email: customer@cnphds.com BJ ICP No 05018921 |
|