Skip to content

C
core
Kaydet (Commit) f57502e7 authored tarafından Jean-Pierre Ledure's avatar Jean-Pierre Ledure
Dosyalara gözat
Seçenekler

Access2Base - 3 typos 

Change-Id: Ie501bc7190a8eccc2810ccac2dddaec52813f1a2
üst feed5f8a
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
wizards/source/access2base/Database.xba
Dosyayı görüntüle @ f57502e7
...@@ -483,17 +483,17 @@ Dim sObjects() As String, bFound As Boolean, oTables As Object, oQueries As Obje ...@@ -483,17 +483,17 @@ Dim sObjects() As String, bFound As Boolean, oTables As Object, oQueries As Obje
If IsMissing(pvType) Then If IsMissing(pvType) Then
pvType = cstNull pvType = cstNull
Else Else
If Not Utils._CheckArgument(pvType, 1, Utils._AddNumeric(), dbOpenForwardOnly) Then Goto Exit_Function If Not Utils._CheckArgument(pvType, 2, Utils._AddNumeric(), dbOpenForwardOnly) Then Goto Exit_Function
End If End If
If IsMissing(pvOptions) Then If IsMissing(pvOptions) Then
pvOptions = cstNull pvOptions = cstNull
Else Else
If Not Utils._CheckArgument(pvOptions, 2, Utils._AddNumeric(), dbSQLPassThrough) Then Goto Exit_Function If Not Utils._CheckArgument(pvOptions, 3, Utils._AddNumeric(), dbSQLPassThrough) Then Goto Exit_Function
End If End If
If IsMissing(pvLockEdit) Then If IsMissing(pvLockEdit) Then
pvLockEdit = cstNull pvLockEdit = cstNull
Else Else
If Not Utils._CheckArgument(pvLockEdit, 3, Utils._AddNumeric(), dbReadOnly) Then Goto Exit_Function If Not Utils._CheckArgument(pvLockEdit, 4, Utils._AddNumeric(), dbReadOnly) Then Goto Exit_Function
End If End If
sSource = Split(UCase(Trim(pvSource)), " ")(0) sSource = Split(UCase(Trim(pvSource)), " ")(0)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment