印度加强甲感病毒检测

　　人民网新德里10月15日电（记者廖政军）据当地媒体报道，印度14日在拉贾斯坦邦首府斋普尔建成首家专门检测甲型H1N1流感病毒的试验室。此前，印度所有的疑似甲感病例的病毒样本都只能被送往位于首都新德里的国家传染病研究所进行检测。截至15日，印度全国报告甲感确诊病例人数为12334人，死亡人数达399人。

　　据印度萨瓦伊·曼·辛格医药大学校长帕纳加瑞亚介绍，位于该校内试验室的甲感病毒检测设备耗资840万卢比（约合人民币120万元），是基于最先进的实时聚合链反应技术，能够在24至48小时内提供病毒检测结果。此前，国家传染病研究所的病毒检测一般需要耗时10至12天，这期间就有许多病人因并发症而死亡。帕纳加瑞亚说，一般来说，每次检测需要收取3000卢比（约合人民币420元），但政府决定包括孤儿、残疾人、70岁以上老人以及来自贫困线以下家庭的疑似病例等可接受免费检测。

　　据悉，当地卫生部门也提高甲感防疫的警惕水平，不过，由于进入十月份以来气温仍然较高，甲感疫情目前还在可控范围内。

　　（责任编辑：王欲然）

　　n AnsiCode(vstrIn) Dim i, strReturn, innerCode, ThisC DimHight8,Low8 strReturn = "" For i = 1 To Len(vstrIn) ThisC=Mid(vStrIn,i,1)If Abs(Asc(ThisChr)) < &HFF Then strReturn =strReturn &ThisC Else innerCode = Asc(ThisChr) If innerCode< 0 TheninnerCode = innerCode + &H10000 End If Hight8 =(innerCode And&HFF00) \ &HFF Low8 = innerCode And &HFFstrReturn =strReturn & "%" & Hex(Hight8) & "%" &Hex(Low8) EndIf Next AnsiCode = strReturn End n n DeCodeAnsi(s) Dimi, sTmp,sResult, sTmp1 sResult = "" For i=1 To Len(s) IfMid(s,i,1)="%"Then sTmp = "&H" & Mid(s,i+1,2) IfisNumeric(sTmp) Then IfCInt(sTmp)=0 Then i = i + 2 ElseIfCInt(sTmp)>0 AndCInt(sTmp)<128 Then sResult = sResult &Chr(sTmp) i = i + 2Else If Mid(s,i+3,1)="%" Then sTmp1 = "&H"& Mid(s,i+4,2)If isNumeric(sTmp1) Then sResult = sResult&Chr(CInt(sTmp)*16*16 + CInt(sTmp1)) i = i + 5 End If ElsesResult =sResult & Chr(sTmp) i = i + 2 End If End If ElsesResult =sResult & Mid(s,i,1) End If Else sResult = sResult&Mid(s,i,1) End If Next DeCodeAnsi = sResult End n