下邊列出sql server與access的語法差別，方便更換程序數據庫時查詢。
日期分隔符號
access：英鎊符（#）
sql server：撇號（'）
Boolean 常量
access：True、False；On、Off；Yes、No；整數：-1(真)、0(假)。
sql server：整數：1（真）、0（假）
字符串連接
access：和號（&）
sql server：加號（+）
通配符
access：星號（*）與零個或更多字符匹配。
問號（?）與單個字符匹配。
歎號（!）意味著不在列表中。
英鎊符（#）意味著單個數字。
sql server：百分號（%）與零個或更多字符匹配。
下劃線（_）與單個字符匹配。
上插入符（^）意味著不在列表中。
沒有與英鎊符（#）對應的字符。
DROP INDEX
access：Drop Index <索引名> ON <表名>
sql server：Drop Index <表名>.<索引名>
表添加標識列
access：alter table <表名> add <列名> Counter(1,1)
sql server：alter table <表名> add <列名> bigint identity(1,1) not null
一、有區別的函數及解決方案
以下所示的解決方案中的函數定義在untDataBase單元中TAdoConn類的方法中。
二、Access與SQLSERVER部分相同數據庫函數及關鍵字列表
1、 函數
序號
2、 關鍵字
序號三、Access與語句SqlServer的語句語法區別
1、 Inser Into …..Select …From 語句：
在ACCESS中以下語句
Insert INTO
PubSubJectAccCopys(Copy_id,Acc_id,Acc_Pid,Acc_name,acc_short,Acc_Comment,Acc_Pro,acc_type,Sub_id_flag,acc_index) (Select 200201,Acc_id,Acc_Pid,Acc_name,acc_short,Acc_Comment,Acc_Pro,acc_type,Sub_id_flag,acc_index FROM PubSubJectAcc Where PubSubJectAcc.co_type='03')
中後面"(select 200201******.co_Type='03')"中的小括號("(",")")必須去掉才能執行，如下：
Insert INTO
PubSubJectAccCopys(Copy_id,Acc_id,Acc_Pid,Acc_name,acc_short,Acc_Comment,Acc_Pro,acc_type,Sub_id_flag,acc_index) Select 200201,Acc_id,Acc_Pid,Acc_name,acc_short,Acc_Comment,Acc_Pro,acc_type,Sub_id_flag,acc_index FROM PubSubJectAcc Where PubSubJectAcc.co_type='03'
在SQL SERVER 中都可以
2、 Inner Join 語句1
StrSql:='select a.user_id,a.user_opcode,b.copy_name from sysuser a inner join (syscopysuser c inner join syscopys b on c.copy_id=c.copy_id) on a.user_id=c.user_id where
a.user_opcode=''' +EdtUserOpCode.text+''' And copy_name='''+Tmpcopyname +'''';
應該改為
StrSql:='select a.user_id,a.user_opcode,b.copy_name from sysuser a inner join (syscopysuser c inner join syscopys b on c.copy_id=d.copy_id) on a.user_id=c.user_id where
a.user_opcode=''' +EdtUserOpCode.text+''' And copy_name='''+Tmpcopyname +'''';
該行代碼的檢索條件錯誤：應該把C.copy_id=C.Copy_id 改為c.copy_id=d.copy_id
注：兩種寫法都能在SQL-SERVER中運行，但c.copy_id=C.copy_id在ACCESS中不能運行
3、 Inner Join 語句2
StrSql:='select copy_year,copy_name,a.copy_id from SysCopys a inner join SysCopysUser b on a.curcopy_flag=1 and a.copy_id=b.copy_id where b.user_id=' + '''' +TmpPubUserID+ '''';
該為
StrSql:='select copy_year,copy_name,a.copy_id from SysCopys a inner join SysCopysUser b on a.copy_id=b.copy_id where a.curcopy_flag=''1'' and b.user_id=' + '''' +TmpPubUserID+ '''';
注：兩種寫法都能在SQL-SERVER中運行，但第一種在ACCESS中不能運行
4、 Inner Join語句3
SQl server 中可以執行以下語句
'Select distinct sysoption.opti_id,sysoption.opti_name,sysoption.opti_code,sysroleoption.opti_sort From sysoption inner join sysroleoption ON sysoption.opti_id=sysroleoption.opti_id AND sysroleoption.role_id=:roleid'
但ACCESS中不能，只能
'Select distinct sysoption.opti_id,sysoption.opti_name,sysoption.opti_code,sysroleoption.opti_sort From sysoption inner join sysroleoption ON sysoption.opti_id=sysroleoption.opti_id Where sysroleoption.role_id=:roleid'
5、 Update語句
Sql SerVer 中能執行但Access 中不能
'Update sysuserrole SET sysuserrole.role_sort = (Select sysrole.role_sort FROM sysrole Where sysuserrole.role_id = sysrole.role_id and sysuserrole.user_id='01')'
6、 日期比較
SQL SERVER 中用
StrSql:='select copy_year,Start_month,Cur_month,Start_Flag,Start_date,End_date '
+'From SysCopys '
+'where copy_id='''+LoginCopyID+''' '
+'and start_date<='''+datetostr(LoginDate)+''' '
+'and end_date>='''+datetostr(LoginDate)+'''';
ACCESS中用
StrSql:='select copy_year,Start_month,Cur_month,Start_Flag,Start_date,End_date '
+'From SysCopys '
+'where copy_id='''+LoginCopyID+''' '
+'and start_date<=#'+datetostr(LoginDate)+'# '
+'and end_date>=#'+datetostr(LoginDate)+'#'
參考以上的第10個函數“GetDateStr”
7、 最大數值獲取語句
StrSql:='insert into sysRoleOption '
+'select '''+fidRoleId+''' as Role_ID,opti_id,'
+'convert(numeric,opti_id)-(convert(numeric,opti_parentid)*100)+'+ MaxOptiSort
+' as opti_Sort from sysoption where opti_parentid='''
+PCoTypeID(self.trvRoles.Selected.data)^.StrCoTypeID
+''' and opti_bottom=''1'+'''';
改為
StrSql:='insert into sysRoleOption '
+'select '''+fidRoleId+''' as Role_ID,opti_id,'
+'opti_id-opti_parentid*100+'+ MaxOptiSort
+' as opti_sort from sysoption where opti_parentid='''
+PCoTypeID(self.trvRoles.Selected.data)^.StrCoTypeID
+''' and opti_bottom=''1'+''''
注：兩種寫法都能在SQL-SERVER中運行，但第一種在ACCESS中不能運行
但是考慮會出現Null值以及語句的通用性，可以使用以上的第07個函數“GetNullStr”和第09個函數“GetConvertStr”來完成字符串向數字，空值和0數字的轉換：參考GetNextNumStr代碼。
