<% randomize no=int(10*rnd)+1 Set MyConn = Server.CreateObject("ADODB.Connection") dbpath=Server.MapPath(".") path1=replace(dbpath,"wwwroot","db\site.mdb") MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & path1 & ";" SQL_query = "SELECT * FROM hafez where verseid=" & no Set RS = MyConn.Execute(SQL_query) WHILE NOT RS.EOF fverse=RS("fverse") lverse=RS("lverse") RS.MoveNext WEND sql_query2="SELECT * FROM counter WHERE Id=2" Set RS = MyConn.Execute(sql_query2) WHILE NOT RS.EOF inc=RS("counter") RS.MoveNext WEND SQL_query3 = "UPDATE counter SET counter='" & inc+1 & "' WHERE Id=2" MyConn.Execute(SQL_query3) MyConn.Close %>
انتشارات نیستان جم

<%=lverse%>

<%=fverse%>

   

 
دكتر عبدالكريم سروش
دکتر عبدالکریم
سروش
 
 
دكتر علي موسوي گرمارودي
دکترعلي
موسوی گرمارودی
 

 

 
   

ضمن احتـــرام به همه دوستداران حضـرت حافظ به اطلاع می رساند که استـفـاده

 

از صوت دیوان حافظ و سایر تولیدات این انتشارات در سایر سایت ها و یا نرم افزارهای

 
موبایل، بدون اجازه این انتشارات ممنوع می باشد.
 

 

 
 
نسخه صوتی غزلیات شمس  صحیح ترین نسخه صوتی دیوان حافظ
 با قرائت دکتر عبدالکریم سروش  با قرائت دکتر  موسوی  گرمارودی
   
   
 
 
لسان الغيب حافظ 3 لسان الغیب حافظ 3.9   رسول آفتاب

رسول آفتاب غزلیات شمس

سروش قونيه

سروش قونیه "ویرایش نستعلیق"

قرائت غزلیات حافظ

 

قرائت غزلیات شمس تبریزی

 

 قرائت لب لباب مثنوی

 

 
 

   مثنوي معنوي

ديوان شمس

دیوان حافظ

        
 

 

آلبوم تصاوير

فــال حافـظ
Copyright 1996-<%=year(date())%> Neyestan Jam Publisher. All rights reserved. به نا امیدی از این در مرو بزن فالی      بود که قرعه دولت به نام ما افتد