|
|
|
|
|
| The
Thirty eight laboratories of CSIR are |
 |
|
| |
|
Physical
Science
|
|
•
|
Central Electronics
Engineering Research Institute (CEERI),
Pilani |
|
•
|
Central Scientific
Instruments Organization (CSIO), Chandigarh |
|
•
|
National Geophysical
Research Institute (NGRI), Hyderabad |
|
•
|
National Institute
of Oceanography (NIO), Goa |
|
•
|
National Physical
Laboratory (NPL), New Delhi |
|
|
|
Chemical
Science
|
|
•
|
Central Electrochemical
Research Institute (CECRI), Karaikudi |
|
•
|
Central Leather
Research Institute (CLRI), Chennai |
|
•
|
Central Salt
& Marine Chemicals Research Institute
(CSMCRI), Bhavnagar |
|
•
|
Indian Institute
of Chemical Technology (IICT), Hyderabad |
|
•
|
Indian Institute
of Petroleum (IIP), Dehradun |
|
•
|
National Chemical
Laboratory (NCL), Pune |
|
•
|
Regional Research
Laboratory, Jorhat (RRL-Jorhat), Jorhat
|
|
|
|
Biological
Sciences
|
|
•
|
Central Drug
Research Institute (CDRI), Lucknow |
|
•
|
Central Food
Technological Research Institute (CFTRI),
Mysore |
|
•
|
Central Institute
of Medicinal and Aromatic Plants (CIMAP),
Lucknow |
|
•
|
Centre for
Cellular & Molecular Biology (CCMB),
Hyderabad |
|
•
|
Indian Institute
of Chemical Biology (IICB), Kolkata |
|
•
|
Industrial
Toxicology Research Centre (ITRC), Lucknow |
|
•
|
Institute
of Genomics and Integrated Biology (IGIB),
New Delhi |
|
•
|
Institute
of Himalayan Bioresources Technology
(IHBT) , Palampur |
|
•
|
Institute
of Microbial Technology (IMTECH), Chandigarh |
|
•
|
National Botanical
Research Institute (NBRI), Lucknow |
|
•
|
Regional Research
Laboratory, Jammu (RRL-Jammu), Jammu |
|
|
|
Engineering
Sciences
|
|
•
|
Central Building
Research Institute (CBRI), Roorkee |
|
•
|
Central Fuel
Research Institute (CFRI), Dhanbad |
|
•
|
Central Glass
& Ceramic Research Institute (CGCRI),
Kolkata |
|
•
|
Central Mechanical
Engineering Research Institute (CMERI),
Durgapur |
|
•
|
Central Mining
Research Institute (CMRI), Dhanbad |
|
•
|
Central Road
Research Institute (CRRI), New Delhi |
|
•
|
National Aerospace
Laboratories (NAL), Bangalore |
|
•
|
National Environmental
Engineering Research Institute (NEERI),
Nagpur |
|
•
|
National Metallurgical
Laboratory (NML), Jamshedpur |
|
•
|
Regional Research
Laboratory, Bhopal (RRL-Bhopal), Bhopal |
|
•
|
Regional Research
Laboratory, Bhubaneswar (RRL - Bhubaneswar),
Bhubaneswar |
|
•
|
Regional Research
Laboratory, Thiruvananthapuram (RRL-Thiruvananthapuram) |
|
•
|
Structural
Engineering Research Centre, Madras
(SERC-Madras), Chennai |
|
|
|
Information Science
|
|
•
|
National Institute
of Science Communication and Information
Resources (NISCAIR), New Delhi |
|
•
|
National Institute
of Science, Technology and Development
Studies (NISTADS), New Delhi |
|
| |
|
|
|
|
| |
|
website
copyright © Central Drug Research Institute.
All rights reserved.
No part of this should be Downloaded or used
in any way other than the non-commercial purposes
without prior permission of the Director,
CDRI. |
|
|
|
 |
| Powered
by MARG Software Solutions |
Contact
us |
You
are Visitor No. |
| Best viewed
at 800 X 600 Resolutions | Internet
Explorer 5.0 - Later Version |
<%
if session("iNumber")="" then
'conn.open mydsn
Dim rsHits
Set rsHits=Server.CreateObject("ADODB.Recordset")
rsHits.CursorLocation=adUseClient
rsHits.Open "Select visits from Hits", conn, adOpenKeyset, adLockOptimistic
session("iNumber")=rsHits("visits") + 1
rsHits("visits")=rsHits("visits") + 1
rsHits.Update
rsHits.Close
set rsHits=Nothing
end if
If Len(session("iNumber")) > 0 then
'Display iNumber
Response.Write "" & ConstructDigits(session("iNumber")) & ""
End If
''''
Function ConstructDigits(iValue)
'This function accepts a single parameter, iValue, and
'returns HTML containing a series of images representing
'a graphical image of the value in iValue
'Start by ensuring iValue is a number
If Not IsNumeric(iValue) then
ConstructDigits = iValue & " IS NOT A NUMBER!"
Exit Function
End If
'Can't show decimals!
If InStr(1, iValue, ".") then
ConstructDigits = "CANNOT CONTAIN DECIMALS!"
Exit Function
End If
'Can't show negative numbers!
If iValue < 0 then
ConstructDigits = "CANNOT DISPLAY NEGATIVE NUMBERS!"
Exit Function
End If
Dim iLoop, strResults
For iLoop = (Len(iValue) - 1) to 0 STEP -1
strResults = strResults & ""
Next
ConstructDigits = strResults
End Function
''''
%>
|
|
|
|
|
|
