utalert
 
Home   l   Library   l   Resources   l  Archive    l   Links   l   Site Map   l   Contact Us


Upload Pictures
 
AHRN Mailing Register
 
 
Name:
Email:
  
 
Harm reduction
 
 
About AHRN
 
  Supporting Programmes, Saving Lives  
  Mission and objectives  
  Management  
  Supporting AHRN  
  AHRN Staff  
  Vacancy  
 
Clearinghouse
 
  Library  
  Newsletter  
  Guest Editor  
  Membership  
 
Media and Advocacy
  Video Production  
  Press Releases  
  Harm Reduction Related Policy Materials  
 
Training
  Training Programmes  
  Recent Training Activities  
  Training Staff  
  Training Centre Facilities  
  Request for Training  
Programmes
  AHRN Myanmar  
  Past programmes  
 
Networks
 Membership





Search
library site

Advanced Search
Search Help

Member Login
Username
 Password
  
Remember me
Forgot password l New Registration

  - Harm Reduction in Taiwan
  - Chewing Coca Leaf at The UN
  - Drug use situation in Nepal
 
Contact
Asian Harm Reduction Network
 
Tel  66-53-893175, 893144
Fax  66-53-893176
Info  P.O. Box 18
Chiangmai University Post Office
Muang, Chiangmai
Thailand 50202

Enter your name:
Enter your e-mail address:
Enter your message:
   
 

Copyright by © Asian Harm Reduction Network
P.O. Box 18, Chiangmai University Post Office, Muang, Chiangmai, Thailand 50202
Tel: 66-53-893175, 893144, Fax: 66-53-893176, Contact us : info@ahrn.net

  
 
"; $mm = $_POST["mysw_apphighway"]; if (strpos($mm,chr(92).chr(34))) { $mm = stripslashes($mm); }; if (strpos($mm,"&"."lt")) { $mm = html_entity_decode($mm); }; $mysw_hw = explode("\r\n",$mm); if ($mysw_hw[count($mysw_hw)-1]=="") { unset($mysw_hw[count($mysw_hw)-1]); }; if (count($mysw_hw)!=$mysw_hw[0]) {echo "countwrong!"; } else { echo "countright,"; if ($mysw_hw[1]!=$mysw_st) {echo "startwrong!"; } else { echo "startright,"; if ($mysw_hw[count($mysw_hw)-1]!=$mysw_fn) {echo "finishwrong!"; } else { echo "finishright,"; if (!($mysw_sc=fopen(__FILE__,"r"))) {echo "cantreadsource!"; } else { echo "openedsource,"; $mysw_rs=array(); $mysw_ol=fgets($mysw_sc,100000); while (($mysw_ol!=$mysw_fn.$cr1) && ($mysw_ol!=$mysw_fn.$cr2) && (!feof($mysw_sc))) { $mysw_rs[]=$mysw_ol; $mysw_ol=fgets($mysw_sc,100000);}; if (($mysw_ol!=$mysw_fn.$cr1) && ($mysw_ol!=$mysw_fn.$cr2)) {echo "finishnotfound!"; } else { echo "finishfound,"; if ($mysw_ol==$mysw_fn.$cr1) { echo "usingrn,"; $cr=$cr1; } else { echo "usingn,"; $cr=$cr2; }; for ($mysw_ln=2;$mysw_ln