<%Option Explicit Response.Buffer = True Dim sDataPath Dim strPath Dim sMailPath Dim objRst Dim strSQL Dim x %> <% Sub NewsItem 'Setup SQL strSQL = ("Select * From News Order By dDate Desc") 'Open Recordset If DB_GetRS(objRst, strSQL) = 1 Then if not objRst.EOF then x = 1 do while not objRst.EOF Response.Write "" Response.Write "" & DisplayText(objRst("sHeadline")) & "
" Response.Write "" & DisplayText(objRst("sSubHeadline")) & "
" Response.Write "(more>>)" if x = 3 then exit do x = x + 1 objRst.movenext Loop else 'Response.Write "There are no current Press Releases." end if objRst.Close else Response.Write "There has been a problem accessing the Press Release Database." end if end sub %> P.E.T. Scan Arizona: Leading Provider of Positron Emission Tomography




Positron Emission Tomography (PET) is rapidly becoming the most significant advancement in Radiology since MRI.

PET is used for diagnosis and management of cancer, neurological disorders and evaluation of the heart muscle after a heart attack, and is able to generate 3 dimensional images of the whole body.

Our web site is designed to make it easy for doctors and patients to use our services and keep abreast of this dynamic technology.

 



 

     
© 2008 PET Scan Arizona, LLC ~ Privacy Statement