|
|
|
|
|
| PICROLIV |
 |
|
| |
|
Click
for +zoom
|
 |
|
Picroliv
|
|
... |
|
|
Picroliv is a hepatoprotective
agent of plant origin. It is an iridoid
glycoside mixture containing 60% picroside
I and kutoside in the ratio of 1:1.5
obtained from the plant, Picrorhiza
kurrooa ( root and rhizome ).
Picroliv ( 6 and 12.5 mg/ kg ) has
shown efficacy comparable to silymarin
( 10 and 20 mg/ kg ) in rodent models
of galactosamine, paracetamol, thioacetamide
and CC14 induced hepatic damage. Picroliv
has shown cholerectic effect in rat
and anti-cholestatic effect in rat,
guinea pigs and cats treated with
paracetamol and ethinyl estradiol.
It has also antiviral and immunostimulant
activities. Picroliv is devoid of
any significant CNS and CVS , autonomic
and other systemic activity.
|
|
Picroliv appears to be safe in rats and
monkeys and has excellent therapeutic
index. Phase I and II clinical trials
have been conducted and the drug has shown
no side effect and is well tolerated.
|
|
|
| |
| |
|
|
| |
|
|
|
|
|
|
| |
|
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
''''
%>
|
|
|
|
|
|
