%'=================================================
'过程名: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 %>
BJ PHDS has started OTC application for German manufacturers
|
| BJ PHDS has started OTC application for Hitrechol and Circanetten New to SFDA on behalf of German manufactures. The process has been going smoothly. These two products are the most popular treatments for hemorrhoids and gall-stone treatment in China.
|
|
 |
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 |
|