<%
function htmlencode2(str)
dim result
dim l
if isNULL(str) then
htmlencode2=""
exit function
end if
l=len(str)
result=""
dim i
for i = 1 to l
select case mid(str,i,1)
case chr(13)
result=result+"
"
case chr(34)
result=result+"""
case chr(32)
'result=result+" "
if i+1<=l and i-1>0 then
if mid(str,i+1,1)=chr(32) or mid(str,i+1,1)=chr(9) or mid(str,i-1,1)=chr(32) or mid(str,i-1,1)=chr(9) then
result=result+" "
else
result=result+" "
end if
else
result=result+" "
end if
case chr(9)
result=result+" "
case else
result=result+mid(str,i,1)
end select
next
htmlencode2=result
end function
%>
|
徐光春到平煤开封东大视察 |
2008/08/01 |
|
平煤举行抗震救灾英模事迹报告会 |
2008/08/01 |
|
一矿“吴如学习室”成立 |
2008/08/01 |
|
平煤召开2008年第一次股东会 |
2008/07/23 |
|
朝川加盟平煤十周年庆祝大会隆重举行 |
2008/06/26 |
|
平煤长安能源公司挂牌成立 |
2008/06/26 |
|
《焦点访谈》报道平煤救援队在灾区的感人事迹 |
2008/06/16 |
|
平煤夏季安全大检查全面展开 |
2008/06/11 |
|
集团公司６月份安全例会强调切实履行业务保安职责 |
2008/06/10 |
|
集团公司“安全生产月”活动全面展开 |
2008/06/10 |
|
南昌长力钢铁公司领导到平煤走访 |
2008/06/10 |
|
平煤集团已向地震灾区捐款1285万元 |
2008/06/10 |
|
平煤职工自发捐款三百四十六万元 |
2008/05/16 |
|
平煤救援队投入灾区抢险 |
2008/05/16 |
|
平煤救援队星夜奔赴灾区 |
2008/05/15 |
|
平煤向地震灾区捐款一百万元 |
2008/05/15 |
|
ＧＥＰＯＮ无源光纤网络在平煤应用 |
2008/05/15 |
|
海螺集团领导到平煤走访 |
2008/05/15 |
|
平煤武装部拓展训练有特色 |
2008/05/15 |
|
全面开创建设新型能源化工集团新局面——２００８年新年献辞 |
2008/01/02 |
平煤首页 