<% Dim strSQL,rs,id,whichpage whichpage=Trim(Request.QueryString("id")) set adocon=server.CreateObject("ADODB.Connection") strSQL = "select*from chengyuan where id="& whichpage adocon.open "Driver={Microsoft Access Driver (*.mdb)};dbq="&_ Server.MapPath("ado/db1.mdb") set rs=server.CreateObject("ADODB.Recordset") rs.open strSQL,adocon,1,1 %>
　

设置首页

加入收藏

诚聘精英







周易首页
联会简介
章程制度
通知通告
政策法规
周易案例
城市规划
国学会刊
公益活动
监督反馈
周易名人
周易会员
专家领导
周易视频
周易照片
最新动态
风水文化
企业顾问
光盘专著
周易新闻
风水考察
吉祥物品

首 届“国际周易风水文化节” 暨《风水天下》纪录片开拍 活 动 指 南

 

 

 

首　届

“国际周易风水文化节”

暨《风水天下》纪录片开拍

活 动 指 南

 

主办单位：中国国际周易联合会　支持单位：江西兴国县人民政府

 

 

第1页
第2页
第3页
第4页