风讯3.2sp1最新版access改sql方法
广告投放★自助友情CMS落伍广告联盟晒乐广告联盟脉动广告联盟品味广告联盟
广告位可自定样式联系QQ:4285248个文字广告月20元广告联系QQ:428524广告位可自定样式
8个文字广告月20元黄金广告位每月20元广告位可自定样式联系QQ:428524广告位可自定样式
左旋肉碱、全国包邮
买二送一、无效退款

文章浏览→编程相关Access→风讯3.2sp1最新版access改sql方法

风讯3.2sp1最新版access改sql方法
风讯3.2sp1最新版access改sql方法
风讯3.2sp1最新版access改sql方法呵,风讯6月2日发布了免费风讯3.2sp1的access版,我简单的介绍下如果修改成sql版吧。纯粹给新手看,呵呵,老鸟就不要来了,别丢鸡蛋啊

1.下载:去风讯官方下载最新风讯3.2sp1 access版,www.foosun.cn,解压缩到本地文件夹。

2.打开sqlserver企业管理器,新建立数据库,名字自己取吧,我假设为:foosun

2.工具---数据转换服务---导入数据,点“下一步”,“数据源”选择“MicrosoftAccess”,文件名选择风讯的access数据库文件,在风讯文件夹的foosun_data目录下foosun_data.mdb,选择确定后,按“下一步”按钮,这里的“目的(T)”不用选择了,默认的sql的驱动,直接选择最下面的数据库,选择“foosun”(如果你取的名字不一样,请选择你刚刚建立的数据库),点“下一步”,再点“下一步”,出现“选择源表和视图”的页面,点“全选”按纽后“下一步”,再点“下一步”,点“完成”,等待数据导入,有错误不用管,不影响使用。

3.用同样的方法导入风讯的用户表,在foosun_data目录下的fooSun_User.mdb。

到这里,初步修改工程基本完工了。下面就是程序和数据库的修改了。

4.打开刚建立的数据库“foosun”,选择表,在右边视图里点一下“所有者”,让用户名排在最上面,以方便我们挨个修改。

修改原因:从access导入sqlserver,最容易出问题的两个地方:1个是自动编号的列,另一个是时间列。

在表名上点鼠标右键,选择“设计表”,foosun第一列一般都是自动标号的列,看列名,如果是自动编号列,就把最下面列属性里的“标识”值改为1。如果你不清楚,可以打开原access数据库查看是否自动编号列。找到时间列:access里自动获得时间函数为:now()和date(),而在sqlserver为:getdate(),把自动获取时间的列默认值改为:getdate().

重复以上操作,直到把所有的用户表修改完毕。

5.程序修改,首先修改inc文件夹里的const.asp文件,ConstDataBaseConnectStr ="/FooSun_Data/FooSun_Data.mdb"把这句改为:Const DataBaseConnectStr= "Server=(local);UserID=saassword=你设置的sa密码;Database=你的数据库名"。

接着修改inc目录里的cls_db.asp,在最顶上加入一句:ConstIsSqlDataBase=1,设置默认数据库为sql server。找到“'' 类初始化”,把这里的“Private Sub Class_initialize()
ConnStr = "DBQ=" + Server.MapPath(DataBaseConnectStr) +";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
StrSqlDate = "Date()"
End Sub ”,替换为:“Private Sub Class_initialize()
If IsSqlDataBase=0 then
ConnStr = "DBQ=" + Server.MapPath(DataBaseConnectStr) +";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
StrSqlDate = "Date()"
Else
ConnStr = "rovider=SQLOLEDB.1ersist SecurityInfo=False;"&DataBaseConnectStr &";"
StrSqlDate = "GetDate()"
End If
End Sub ”,这样,设置为0时使用acc数据库,为1时使用sqlserver数据库。

6.批量替换。把所有文件里的“DBC.ConnStr = "DBQ=" +Server.MapPath(UserDBConnectStr) + ";DefaultDir=;DRIVER={MicrosoftAccess Driver (*.mdb)};"”替换为:“'DBC.ConnStr = "DBQ=" +Server.MapPath(UserDBConnectStr) + ";DefaultDir=;DRIVER={MicrosoftAccess Driver (*.mdb)};"”,也就是把这句注释掉。

7.差不多了,到现在为止,基本修改完成了,我测试还没出现错误。呵呵。大家测试下,有错误在这里留言。
所属分类:编程相关Access    作者:新浪博客    时间:2010-11-20 0:00:00

文章导航