日前江西万年县的一场举报事件掀翻滂沱湍急【TCD-176】ニューハーフ逆アナル天国 日本VS海外8時間SP,将世东说念主卷入其中。 有照旧照旧表象无限的官员,如...
本站讯息,7月22日银微转债收盘高潮0.17%【NATR-050】理想のパンスト上司 長谷川舞,报107.32元/张,成交额782.21万元,转股溢价率57.2...
你读过金庸武侠演义吗?看过金庸武侠演义改编的影视剧吗?你最可爱金庸武侠中的哪个东说念主物?你想过为什么会可爱阿谁东说念主物吗?从热沈学的角度来说,你可爱的阿谁东...
当地时间7月31日【TCD-176】ニューハーフ逆アナル天国 日本VS海外8時間SP,针对巴勒斯坦伊斯兰抗拒清爽(哈马斯)政事局引导东说念主哈尼亚在德黑兰遇袭身...
字据35位业内媒体的各方面分析【TCD-176】ニューハーフ逆アナル天国 日本VS海外8時間SP,2024年媒体眼中的待爆艺东说念主名单簇新出炉,快和小编一说念...
骨子摘要91porn y WPS诱导Access数据库 Access数据库引擎:Access Database Engine 2010人人好91porn y,我是冷水沏茶。前段时期,咱们共享过一个案例【采购明细汇总:WPS数据库诱导字符串】,那是在给客户优化一个进销存运用中际遇的问题。客户需要使用WPS,而我其时莫得筹商到这样档子事,胜利在Excel中遴选ADO数据库诱导来操作数据,哪知说念在WPS下无法运转!于是在网上搜索惩处决策,恶果说WPS只相沿低版块(2003及过去)的数据库诱导: strCnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbs & ";Extended Properties='Excel 8.0;HDR=Yes;IMEX=1';"但问题是咱们莫得方针把柄Office的版块号来判断,因为现在WPS的版块号是12,也即是Office 2007版,诱导字符串是这样的: strCnn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dbs & ";Extended Properties='Excel 12.0;HDR=Yes;IMEX=2';"是以,其后遴选了一个容错语句,在WPS中凑合运转。前两天, 客户罕见向要把这个进销存从头筹整齐下。他蓝本的运用即是一个Excel文献,所少见据王人存在这一个文献内部,在录入数据的经过中,还常常时地报错,数据安全性存在很大的隐患。基本决策很浅近,把操作端与数据端分开,咱们共享过许多Access的案例王人是这种模式。可是,我没敢贸然接活,主要原因是他们要使用WPS,而关于WPS能否诱导Access数据库,我还莫得真确的把抓,已经先试一下再说吧。今天,我试着用WPS VBA诱导Access数据库,不出不测地莫得得手: 图片 黑皮猪搞了半天,也不知啥原因。抱着碰侥幸的口头,到网上搜“WPS VBA诱导Access数据库”,在ExcelHome论坛上找到一个帖子: https://club.excelhome.net/thread-1572190-2-1.html有东说念主说要下载一个32位的Access数据库引擎:accessdatabaseengine,于是迅速又搜了一下,看到一个官网下载连合,可是没下得手,它给我来一个: We're sorry, this download is no longer available.于是,在“系统之家”下载站找到一个: https://www.xitongzhijia.net/soft/243207.html下载,装配32位版块的,再测试,得手了,诱导Excel、Access王人莫得问题!我写了一个缔造诱导字符串的自界说函数,分辩Excel文献与Access文献缔造不同的诱导字符串: Function GetStrCnn(ByVal DbFile As String, Optional ByVal Psw As String = "")'赢得数据库诱导字符串Dim fileType As StringfileType = GetExtn(DbFile)If InStr(fileType, "accdb") ThenGetStrCnn = "Provider=Microsoft.ACE.OLEDB.12.0;Jet OLEDB:Database Password=" & Psw & ";Data Source=" & DbFileElseIf InStr(fileType, "xl") ThenGetStrCnn = "Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Excel 12.0;Data Source=" & DbFileEnd IfEnd Function Function GetExtn(fileName)'赢得文献后缀名GetExtn = Right(fileName, Len(fileName) - InStrRev(fileName, ".") + 1)End Function本来我是很少筹商与WPS的兼容性问题的,因为我我方一直在用Office,可是,有些付费筹划的客户在用WPS,这也莫得方针,只须尽量快活。 归来:在WPS下使用数据库诱导处理数据,不错参考以下容貌: 1、要是是诱导刻下责任簿中的责任表,要是莫得装配Access Database Engine,不错试试Microsoft.Jet.OLEDB.4.0数据库引擎,要是需要与Excel同期使用,不错参考【采购明细汇总:WPS数据库诱导字符串】中的设施,使用容错语句来惩处;要是装配了Access Database Engine,那么应该不错跟Excel兼容,胜利使用Microsoft.ACE.OLEDB.12.0数据库引擎(这点莫得测试)。2、要是要诱导Access数据库无意其他Excel文献,咱们就需要装配Access Database Engine,然后就不错使用Microsoft.ACE.OLEDB.12.0数据库引擎来诱导数据库了。 好,今天就到这,咱们下期相遇。~~~~~~End~~~~~~ 本站仅提供存储管事,总计骨子均由用户发布,如发现存害或侵权骨子,请点击举报。 |