|
|
|
|
|
|
|
|
|
|
|
|
刊物浏览 - 民间文学[经典] 09年第4期
民间文学[经典] 09年第4期
 
刊物浏览　　加入时间：2009-5-6 10:43:35　　qiaojun　　点击：1090

 

目录

故事名家

01、好汉三条（上）…………………………………………………崔   陟


我们的节日

06、清明茶的传说…………………（《我们的节日》）丛书编委会供稿

08、午子姑娘的传说………………（《我们的节日》）丛书编委会供稿

09、唐代踏春诗的传说……………（《我们的节日》）丛书编委会供稿

人间万象

10、有桥作证…………………………………………………………张国心

12、神功………………………………………………………………石碣村

13、请专家…………………………………………………………大爱无痕

14、贼喊捉贼…………………………………………………………吴   为

17、三等功……………………………………………………………郭   龙

18、香喷喷的包子……………………………………………………梁洪涛

20、精明的村长………………………………………………………梁柱生

24、这张彩票送得冤…………………………………………………郭福全

26、鱼狗争胜…………………………………………………………李学志

28、哭穷大赛夺冠军…………………………………………………焦松林

30、鞋店斗智…………………………………………………………邢   东

32、非常考验…………………………………………………………彭晓风

34、赌你摔个半残……………………………………………………魏  炜

36、婚礼上的不速之客………………………………………………赵晓波


情节地带

38、蓝焰………………………………………………………………刘自忠

43、案发水云间【长篇连载三】……………………………………叶雪松


月下讲古

48、朱三卖嫂…………………………………………………………肖崇东

50、如来佛与四大金刚………………………………………………刘镇庄

51、楼台相会结良缘…………………………………………………吴   玲

52、黄鹤观……………………………………………………………李廷绪

54、奈何桥上等着我…………………………………………………任黎明

57、王爷坐车…………………………………………………………惊  龙

58、天亮前何以会黑暗………………………………………………陈志荣

60、山东无梁…………………………………………………………刘同喜

61、范仲淹与豆瓣汤…………………………………………………赵长润

62、一案四命…………………………………………………………贺清华

 

 


·民间文学[经典]2010年第8期
·《中国民间文学集成·新疆卷》表彰大会在乌鲁木齐举行
·民间文学[经典]2010年第7期
·民间文学[经典]2010年第6期
·民间文学[经典]2010年第5期
·民间文学[经典]2010年第4期
·民间文学[经典]2010年第3期
·民间文学[经典]2010年第2期
·民间文学[经典]2010年第2期
·民间文学[经典]2010年第1期
 发表,查看评论  打印本页
<% Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("counter.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath SET Rs = Server.CreateObject("ADODB.Recordset") Rs.Open "Select * From counters" , conn,1,3 IF CSTR(Month(Rs("DATE"))) <> CSTR(Month(DATE())) THEN Rs("DATE") = DATE() Rs("YESTERDAY") = RS("TODAY") Rs("BMONTH") = Rs("MONTH") Rs("MONTH") = 1 Rs("TODAY") = 1 Rs.Update ELSE IF CSTR(Day(RS("DATE"))) <> CSTR(Day(DATE())) THEN Rs("DATE") = DATE() Rs("YESTERDAY") = Rs("TODAY") Rs("TODAY") = 1 Rs.Update END IF END IF Rs("TOTAL") = Rs("TOTAL") + 1 Rs("TODAY") = Rs("TODAY") + 1 Rs("MONTH") = Rs("MONTH") + 1 Rs.Update Response.write "访客量统计：" MyCounter( Rs("TOTAL") ) Response.write "
" %> <% Function MyCounter( counter ) Dim S, i, G S = CStr( counter ) For i = 1 to Len(S) G = G & "" Next Response.write G End Function %>
中国民间文艺家协会@2001-2008版权所有 技术支持：中国民俗网