 |
|
 |
| 地址： |
西安市南稍门友谊 |
|
西路11号红十字会 |
|
京都医院 |
| 电话： |
13991297293 |
| 传真： |
029-87888397 |
|
 |
|
|
|
|
 |
|
西安市红十字会京都医院血液病专科经过30余年的刻苦钻研，收集战国到清末2000多年历代治疗血症的文献精华100多种，血症单验方500多道，逐一筛选，临床验证，经北京中医学院老师的精心指导，整理出一套治疗血液病的有效方药：复方四胶口服液、参马生血散、五虫四白平消胶囊、山甲升白散、升板灵等系列制剂。
更多.... |
|
 |
<%
function dvHTMLEncode(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), " ")
fString = Replace(fString, CHR(10), "
")
dvHTMLEncode = fString
end if
end function
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from content where id=1 "
rs.open sql,conn,1,1
ductor=rs("ductor")
yazc=rs("yazc")
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
| <%=dvHtmlEncode(ductor)%> |
|
