Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Dim sql As String
sql = "SELECT 用户名," & _
"switch(权限='1','管理员',权限='0','普通用户') " & _
"AS 用户权限 FROM 用户表"
rs.Open sql, cn, adOpenDynamic, adLockOptimistic, adCmdText错误信息:
-2147217900[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax near '='.
Set rs = New ADODB.Recordset
Dim sql As String
sql = "SELECT 用户名," & _
"switch(权限='1','管理员',权限='0','普通用户') " & _
"AS 用户权限 FROM 用户表"
rs.Open sql, cn, adOpenDynamic, adLockOptimistic, adCmdText错误信息:
-2147217900[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax near '='.
(case 权限 when '1' then '管理员' when '0' '普通用户') AS 用户权限 ---sql server
iif(权限=1,'管理员','普通用户') AS 用户权限 ---access
使用case when吧
(case 权限 when '1' then '管理员' when '0' '普通用户' end) AS 用户权限 ---sql server
iif(权限=1,'管理员','普通用户') AS 用户权限 ---access