Sql server 在具有嵌套子窗体的Access子窗体上创建主搜索窗体
我有一个表单-EmployeeDataForm-有多个子表单-LockerSubForm、CurrentAssignmentSubForm等-在选项卡控件上分成不同的页面 完全按照本视频中的说明进行操作: 我创建了一个附加表单-员工搜索,并将EmployeeDataForm添加为子表单 现在,打开员工搜索表单会自动显示预期的所有记录。但在搜索栏中输入任何内容并搜索会减少所有字段的数量 这是我的密码Sql server 在具有嵌套子窗体的Access子窗体上创建主搜索窗体,sql-server,ms-access,vba,ms-access-2013,Sql Server,Ms Access,Vba,Ms Access 2013,我有一个表单-EmployeeDataForm-有多个子表单-LockerSubForm、CurrentAssignmentSubForm等-在选项卡控件上分成不同的页面 完全按照本视频中的说明进行操作: 我创建了一个附加表单-员工搜索,并将EmployeeDataForm添加为子表单 现在,打开员工搜索表单会自动显示预期的所有记录。但在搜索栏中输入任何内容并搜索会减少所有字段的数量 这是我的密码 Option Compare Database Option Explicit Private
Option Compare Database
Option Explicit
Private Sub btnSearch_Click()
Dim SQL As String
SQL = "SELECT [Current Employee].[Last Name], [Current Employee].[First Name], " _
& "[Current Employee].[Employee ID], [Current Employee].[Badge ID#], [Current Employee].Email, " _
& "[Current Employee].DOB, [Current Employee].Insurance, [Current Employee].[Health Assessment], " _
& "[Current Employee].[TX Zone], [Current Employee].[Hire Date], [Current Employee].Shirts, " _
& "[Current Employee].Pants, [Current Employee].Jackets " _
& "FROM [Current Employee] " _
& "WHERE [Last Name] = '*" & Me.txtKeywords & "*' " _
& "ORDER BY [Current Employee].[Last Name];"
Me.subEmployeeData.Form.RecordSource = SQL
Me.subEmployeeData.Requery
End Sub
与设置RecordSource不同,我更喜欢设置Filter和FilterOn属性。在参数中使用通配符时,请使用LIKE而不是=sign。正是这样。错过了它,我感到很傻。谢谢这里要小心…这对sql注入是完全开放的。我不知道为什么要用sql server标记它,因为这似乎是100%的访问情况。我一定是在尝试执行sql查询时误读或指手画脚了。我的错!