Microsoft Access 응용프로그램용 VBA에서 매개변수를 효과적으로 사용하려면 어떻게 해야 합니까?

Microsoft Access의 다양한 상황에서 VBA 매개변수 사용

소개

SQL 주입을 방지하고 Access 애플리케이션의 데이터 무결성을 보장하려면 VBA(Visual Basic for Application)에서 매개변수를 사용하는 것이 중요합니다. 이 문서에서는 양식 및 보고서 값, TempVars, 사용자 지정 함수, DAO 및 ADO 개체 사용을 포함하여 다양한 컨텍스트에서 VBA 매개 변수를 효과적으로 사용하는 방법에 대한 포괄적인 예제와 지침을 제공합니다.

양식 및 보고서의 값을 매개변수로 사용

Access는 SQL 코드에서 직접 폼과 보고서 컨트롤의 현재 값에 액세스할 수 있는 편리한 방법을 제공하므로 명시적인 매개 변수가 필요하지 않습니다. 매개변수로서의 참조 제어는 DoCmd.RunSQL, 양식/보고서 레코드 소스 및 필터, 도메인 집계에 유용합니다.

<code>DoCmd.RunSQL "INSERT INTO Table1(Field1) SELECT Forms!MyForm!MyTextbox" '插入单个值</code>

TempVars를 매개변수로 사용

TempVars는 VBA 또는 매크로를 사용하여 값을 할당할 수 있는 전역적으로 액세스 가능한 변수입니다. 여러 쿼리에 재사용할 수 있으며 원본 개체가 닫혀도 지속되므로 매개 변수가 있는 양식/보고서에 적합합니다.

<code>TempVars!MyTempVar = Me.MyTextbox.Value
DoCmd.RunSQL "INSERT INTO Table1(Field1) SELECT Field1 FROM Table2 WHERE ID = TempVars!MyTempVar"</code>

맞춤 함수(UDF)를 매개변수로 사용

사용자 정의 함수와 정적 변수를 사용하여 매개변수 값을 저장하고 검색할 수 있습니다. 이 접근 방식은 유연성을 제공하고 선택적 매개변수의 사용을 허용합니다.

<code>Public Function GetThisDate() As Date
    If ThisDate = #12:00:00 AM# Then
        ' 设置默认值。
        ThisDate = Date
    End If 
    GetThisDate = ThisDate
End Function</code>

DoCmd.SetParameter 사용

DoCmd.SetParameter는 양식 및 보고서 열기와 같은 특정 DoCmd 작업의 매개 변수화를 허용하지만 DoCmd.RunSQL 또는 DAO/ADO에서는 작동하지 않습니다.

<code>DoCmd.SetParameter "MyParameter", Me.MyTextbox
DoCmd.OpenForm "MyForm",,, "ID = MyParameter"</code>

DAO 사용

DAO는 포괄적인 매개변수 처리 기능을 제공합니다. QueryDef 개체는 직접 실행하거나 레코드 집합을 여는 데 사용할 수 있는 매개 변수가 있는 쿼리를 만드는 데 사용됩니다.

<code>With CurrentDb.CreateQueryDef("", "INSERT INTO Table1(Field1) SELECT Field1 FROM Table2 WHERE Field1 = ?p1 And Field2 = ?p2")
    .Parameters(0) = Me.Field1
    .Parameters(1) = Me.Field2
    .Execute
End With</code>

ADO 사용

ADO는 Command 개체를 통해 매개변수 처리를 제공합니다. 매개변수는 쿼리 실행 중에 명시적으로 생성되거나 배열로 전달될 수 있습니다.

<code>Set cmd = New ADODB.Command
With cmd
    Set .ActiveConnection = CurrentProject.Connection '使用与当前数据库的连接
    .CommandText = "INSERT INTO Table1(Field1) SELECT Field1 FROM Table2 WHERE Field1 = ? And Field2 = ?"
    .Parameters.Append .CreateParameter(, adVarWChar, adParamInput, Len(Me.Field1), Me.Field1) 'adVarWChar 用于可能包含 Unicode 的文本框
    .Parameters.Append .CreateParameter(, adInteger, adParamInput, 8, Me.Field2) 'adInteger 用于整数（长整数或整数）
    .Execute
End With</code>

Access 개발자는 VBA에서 매개변수화 기술을 사용하여 애플리케이션의 보안과 견고성을 크게 향상시킬 수 있습니다.

위 내용은 Microsoft Access 응용프로그램용 VBA에서 매개변수를 효과적으로 사용하려면 어떻게 해야 합니까?의 상세 내용입니다. 자세한 내용은 PHP 중국어 웹사이트의 기타 관련 기사를 참조하세요!