| 聯(lián)系方式 |
| 全國運(yùn)營電話： |
| 400-6116-016 |
| 日照24小時熱線： |
| 15898986870 |
| 聯(lián)系QQ: |
10932726 1097430389 |
| 電 話: |
0633-2979617 2979674 |
| E-mail: |
info@yishengfanyi.com |
|
| 熱門新聞 |
<%
Set oRs=Server.CreateObject("ADODB.Recordset")
sSql="Select ClassID,ClassName,ParentPath,Child From NewsClass Where ClassID=1"
oRs.Open sSql,oConn,1,1
if oRs("ClassID")>0 then
if oRs("Child")>0 then
ChildID=""
set tClass=oConn.execute("select ClassID from NewsClass where ParentID=" & oRs("ClassID") & " or ParentPath like '" & oRs("ParentPath") & "," & oRs("ClassID") & ",%'")
do while not tClass.eof
if ChildID="" then
ChildID=tClass(0)
else
ChildID=ChildID & "," & tClass(0)
end if
tClass.movenext
loop
else
ChildID=oRs("ClassID")
end if
end if
oRs.close
Set zRs=Server.CreateObject("ADODB.Recordset")
zSql="Select top 20 * From NewsData Where D_ClassID in (" & ChildID & ") and d_recycle=false ORDER BY d_id DESC"
zRs.Open zSql,oConn,1,1
%>
<%do while not zrs.eof
%>
" title="<%=zRs("D_Title")&vbcrlf%>" class="link"><%=gotTopic(zRs("D_Title"),20)%> |
<%zrs.movenext
loop%>
<%zrs.close%>
|
| 公司新聞 |
首頁 > <% Call HoriNavi() %> |
<%=D_Title%>
|
| <%=D_Content%> |
|
|
