<%@ Language=VBScript %> <% dim ASPBook dim StrSQL if not isempty(request("page")) then Mypage=cint(Request("page")) else Mypage=1 end if set ASPBook = Server.CreateObject("ADODB.Recordset") StrSQL = "Select * from guest order by ID desc" ASPBook.open StrSQL,conn,1,1 ASPBook.pagesize=Mypagesize maxpages=cint(ASPBook.pagecount) totalsize=cint(Mypagesize) ASPBook.absolutepage=Mypage GuestTotal=ASPBook.RecordCount if cint(Mypage) >1 then if cint(Mypage) > maxpages then MESSAGE("
  • 没有你所想去的页数!
  • ") Response.End end if end if HEADER "显示留言" MyMenu %> 欢迎留言
    化学性食物和霉变粮食食物中毒

    摘自 http://www.100md.com/ 
    化学性食物中毒


    引起这类食物中毒的原因有化学毒物污染食品。

    1、有机磷农药中毒。 目前我国常用的有机磷农药对硫磷(1605)、内吸磷(1059)、甲拌磷(3911)、乐果、敌百虫、敌敌畏等。 1)主要临床表现有以下三类症状:①毒蕈碱样症状:恶心呕吐、腹痛腹泻、多汗、流涎、视力模糊、瞳孔缩小、呼吸困难等;②烟碱样症状:全身紧束感、肌肉震挛、呼吸麻痹、肌力减退等;③中枢神经症状:头昏头痛、乏力、烦燥不安、言语障碍、精神恍惚以至昏迷。患者最后常因呼吸衰竭、呼吸机麻痹而死亡。 2)治疗立即催吐、反复洗胃,(注意,敌百虫中毒者禁用碱性溶液洗胃。)物资解毒药为阿托品、解磷定等。 3)预防。因此类中毒主要由农药污染食品或误服农药引起,故应从以下几方面着手预防: ① 加强宣传教育工作。 ② 严格管理制度。

    2、恶硝酸盐中毒 1)中毒表现:多在食后1—3小时发病,其主要症状是口指甲及全身皮肤出现紫绀等皮肤缺氧的表现。伴随有头晕、腹胀等,重症状者可有昏迷、抽搐、大小便失禁,最后因呼吸困难而死亡。 2)治疗:除一般急救处理和对症治疗外,应立即使用特效药1%美兰溶液解毒。以每公斤体重2毫克加入50%葡萄糖液静脉注射。每1—2小时一次,症状缓解、青紫消失即可停药,同时给维生素C效果更好。 3)预防:①严格执行亚硝酸盐、硝酸盐等化学物质的保管制度,②不得出售或食用腐败变质的蔬菜,③食品生产的原料和添加剂质量符合国家标准。

    霉变粮食食物中毒

    1)中毒表现:该毒素主要侵害中枢神经系统,引起一毓中毒症状。发病初恶心、呕吐、嘴唇发麻、头昏眼花,病重者颜面潮红、神志恍惚、呈酒醉貌。有时体温、呼吸、血压也有异常。一般无死亡发生。
    2)治疗:无特殊疗法。可按食物中毒急求原则处理。
    3)预防:主要是防止粮食霉变。在灾区特别要加强粮食贮存管理,作为通风、防潮。已有霉变发生时,要用多次风扬、筛选、用碾米机轧辊碾皮等方法清除霉粒,消除毒素。

    <% function PageLink PageShowSize = 10 Scriptname=Request.Servervariables("script_name") PageNextSize=int((MyPage-1)/PageShowSize)+1 Pagetpage=int((GuestTotal-1)/MyPageSize)+1 if Maxpages > 1 then if PageNextSize >1 then PagePrev=PageShowSize*(PageNextSize-1) Response.write "[<<]-" end if if Mypage-1 > 0 then Prev_Page = MyPage - 1 Response.write "[<] " end if if maxpages>=PageNextSize*PageShowSize then PageSizeShow = PageShowSize else PageSizeShow = Maxpages-PageShowSize*(PageNextSize-1) end if for PageCounterSize=1 to PageSizeShow PageLink = (PageCounterSize+PageNextSize*10)-10 if PageLink <> cint(Mypage) then Response.write "[" & PageLink & "] " else Response.Write PageLink & " " end if next if Mypage+1 <=Pagetpage then Next_Page = MyPage + 1 Response.write "[>]" end if if maxpages > PageShowSize*PageNextSize then PageNext = PageShowSize * PageNextSize + 1 Response.write "-[>>]" end if else Response.write "[1]" end if END function set ASPBook=nothing conn.Close set conn = nothing %>