<%@ Page Language="VB" ValidateRequest="False" %> Medical imaging to diagnose or examine disease : elaboratory.co.uk

Advertiser
<% Dim id1 As Integer = 0 Dim zone1 As String = "A" Dim type1 As String = "" Dim override1 as Boolean = False Dim sDIRNAME1 As String = "" Dim sSearch1 As String = "" Dim sKW1 As String = "" Dim sExecPath1 As String = "/_scr/adserve.aspx?" & _ "id=" & id1 & "&" & _ "fid=16765&" & _ "zone=" & zone1 & "&" & _ "type=" & type1 & "&" & _ "override=" & override1 & "&" & _ "siteid=41&" if len(request.form.tostring)>0 then if not isnothing(request.form("directoryresultsearch")) then if len(request.form("directoryresultsearch"))>0 then sSearch1=request.form("directoryresultsearch") end if if not isnothing(request.form("dirname")) then if len(request.form("dirname"))>0 then sDIRNAME1=request.form("dirname") end if end if if not isnothing(request("searchfor")) then sKW1=request("searchfor") sExecPath1 &="kw=" & sKW1 if len(sDIRNAME1)>0 and len(sSearch1)>0 then sExecPath1 &="&dn=" & sDIRNAME1 & "&" & _ "ph=" & sSearch1 end if Server.Execute(sExecPath1) %>

Lab Equipment

Pharmaceutical

Imaging

Doctors use imaging to produce pictures of areas inside the body for tests or evaluations.

There are a variety of imaging techniques available to doctors. These are used to produce a picture of internal body structures for the purpose of more accurate diagnosis.

Some imaging methods commonly used to detect illness include:

X-rays

Mammograms

CT scans

MRIs (magnetic resonance imaging)

Scintigraphy

Ultrasound

These are all commonly used in detection of cancer, for example, allowing doctors to see if a tumor is present. In many cases, in order to enhance and improve the image, doctors may use a special dye to make target organs show up better on film. These dyes may be swallowed or introduced into the body through a needle or tube.

Those who work in this diagnostic field have a need for supplies and equipment, so it is essential to not only find a reliable supplier, but also be sure that you are getting the right price.

To help you track down the items you need, we have brought together a comprehensive list of suppliers, offering everything from diffractometers to endoscopes, prisms to probes.

Check out our listings to get the best supplies and equipment at the best price.

Laboratory Design & Storage

Seperation Techniques

Advertiser
<% Dim id2 As Integer = 0 Dim zone2 As String = "N" Dim type2 As String = "" Dim override2 as Boolean = False Dim sDIRNAME2 As String = "" Dim sSearch2 As String = "" Dim sKW2 As String = "" Dim sExecPath2 As String = "/_scr/adserve.aspx?" & _ "id=" & id2 & "&" & _ "fid=16765&" & _ "zone=" & zone2 & "&" & _ "type=" & type2 & "&" & _ "override=" & override2 & "&" & _ "siteid=41&" if len(request.form.tostring)>0 then if not isnothing(request.form("directoryresultsearch")) then if len(request.form("directoryresultsearch"))>0 then sSearch2=request.form("directoryresultsearch") end if if not isnothing(request.form("dirname")) then if len(request.form("dirname"))>0 then sDIRNAME2=request.form("dirname") end if end if if not isnothing(request("searchfor")) then sKW2=request("searchfor") sExecPath2 &="kw=" & sKW2 if len(sDIRNAME2)>0 and len(sSearch2)>0 then sExecPath2 &="&dn=" & sDIRNAME2 & "&" & _ "ph=" & sSearch2 end if Server.Execute(sExecPath2) %>

<% Dim id3 As Integer = 0 Dim zone3 As String = "B" Dim type3 As String = "" Dim override3 as Boolean = False Dim sDIRNAME3 As String = "" Dim sSearch3 As String = "" Dim sKW3 As String = "" Dim sExecPath3 As String = "/_scr/adserve.aspx?" & _ "id=" & id3 & "&" & _ "fid=16765&" & _ "zone=" & zone3 & "&" & _ "type=" & type3 & "&" & _ "override=" & override3 & "&" & _ "siteid=41&" if len(request.form.tostring)>0 then if not isnothing(request.form("directoryresultsearch")) then if len(request.form("directoryresultsearch"))>0 then sSearch3=request.form("directoryresultsearch") end if if not isnothing(request.form("dirname")) then if len(request.form("dirname"))>0 then sDIRNAME3=request.form("dirname") end if end if if not isnothing(request("searchfor")) then sKW3=request("searchfor") sExecPath3 &="kw=" & sKW3 if len(sDIRNAME3)>0 and len(sSearch3)>0 then sExecPath3 &="&dn=" & sDIRNAME3 & "&" & _ "ph=" & sSearch3 end if Server.Execute(sExecPath3) %>