<% 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 %>
设置首页
加入收藏
诚聘精英
周易首页
联会简介
章程制度
通知通告
政策法规
周易案例
城市规划
国学会刊
公益活动
监督反馈
周易名人
周易会员
专家领导
周易视频
周易照片
最新动态
风水文化
企业顾问
光盘专著
周易新闻
风水考察
吉祥物品
《风水天下》大型传统文化纪录片 投资方案
《风水天下》
大型传统文化纪录片
投资方案
中 国 国 际 周 易 联 合 会
2006年9月
第1页
第2页
第3页
第4页
