| 孵化服务 |
|
<%if cid=1 or cid="" then response.Write(">>")%>
工 商 |
<% if cid="1" then%>
| |
法律法规 |
<% if cid=1 or cid="" then %>
| |
<%
if cid2 = "1" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
| 工商办事指南 |
| |
<%
if cid2="2" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
| 资料表格下载
|
| |
|
<% if cid2="3" then%>
办事指南、登记须知
个人及合伙企业相关表格
公用表格
内资企业相关表格
<% end if %>
|
<% end if %>
<% end if %>
|
| 法律服务 |
| 银行 |
|
<%if cid=4 then response.Write(">>")%>
财税服务 |
<% if cid="4" then%>
| |
地税征收的税种 |
| |
<%
if cid2 = "1" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
| 国税征收的税种 |
| |
<%
if cid2="2" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
| 税法规章 |
| |
<%
if cid2="3" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
| 税收新闻
|
| |
<%
if cid2="4" then
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='3 'and classid='" & cid &"' and classid2 = '"& cid2 &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
end if
%>
|
<% end if %>
|
| 投资咨询 |
| 专利申请 |
| 政府介绍 |
|
<%if cid=1 then response.Write(">>")%>
国家 |
<%if cid=1 then%>
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='2 'and classid='" & cid &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
%>
|
<%end if%>
|
<%if cid=2 then response.Write(">>")%>
省市 |
<%if cid=2 then%>
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='2 'and classid='" & cid &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
%>
|
<%end if%>
|
<%if cid=3 then response.Write(">>")%>
开发区 |
<%if cid=3 then%>
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from artcle where typeid='2 'and classid='" & cid &"' order by datetime desc"
rs.open sql,conn,1
perpage=5'分页显示
if IsNumeric(request("page"))=false then
page = 1
else
page=int(request("page"))
end if
if page<1 then page=1
if not rs.eof then
rs.pagesize=perpage
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
end if
while not rs.eof and numrows·" & rs("title")&"
"
rs.movenext
numrows=numrows+1
wend
response.write "页码 "
for i=1 to rs.pagecount
if request("page")=cstr(i) then
response.write "["& i &"]"
else
response.write "."& i &". "
end if
next
%>
|
<%end if%>
| 投资机构 |
| 项目查询 |
| 项目列表 |
| 项目简介 |
| 可行性分析 |
| 投资管理 |
|
|
