下午好,
我目前通过一些PostgreSQL代码工作和翻译过来到SQL(最如果它是非常简单的),但我碰到的情况下,声明是在它的数组,并不能找出正确的语法,因为我从来没有见过一个之前以这种方式使用的case语句.
我已经快速举例说明了我正在尝试做什么,但它仍然会抛出语法错误:
Select field3, field 4,
Case
When field in (1, 3, 7) then 1
When field in (2, 4, 6) then 2
When field in (5, 9) then 3
When field is null or ' ' then 4
Else
Case
When field2 = x then 1
When field2 = y then 2
Else End
End as fieldname
Run Code Online (Sandbox Code Playgroud)
这是原始代码,所以你可以看到我正在编辑的内容.案例陈述是(据我之前提到的,我从未使用过这种方式的案例),使用2个字段来获得所需的结果.请注意我最初没有写这个,只是将它从postgresql移植到t-sql.
CASE
WHEN rank IN (1,7,9) THEN '1'
WHEN rank IN (2,5,10) THEN '2'
WHEN rank IN (3,6) THEN '3'
WHEN …Run Code Online (Sandbox Code Playgroud) 我正在尝试使用一些简单的VBA代码将Excel电子表格导入Access.我遇到的问题是Excel文件中有2个工作表,我需要导入第2个工作表.是否可以在VBA代码中指定所需的工作表?
Private Sub Command0_Click()
Dim dlg As FileDialog
Set dlg = Application.FileDialog(msoFileDialogFilePicker)
With dlg
.Title = "Select the Excel file to import"
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add "Excel Files", "*.xls", 1
.Filters.Add "All Files", "*.*", 2
If .Show = -1 Then
StrFileName = .SelectedItems(1)
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "COR Daily", StrFileName, True
Else
Exit Sub
End If
End With
End Sub
Run Code Online (Sandbox Code Playgroud)
我应该将StrFileName设置为'StrFileName'&'.Worksheetname'?这是适当的命名方案吗?
就像是:
StrFileName = StrFileName & ".WorkSheetName"
Run Code Online (Sandbox Code Playgroud)