Novel security is crashing Access

  • Thread starter Thread starter Tom Olsen
  • Start date Start date
T

Tom Olsen

ALL,

We have created a restricted folder on a Novell server
giving the users read only rights. The reports created
using VBA modifing the Querydef Crash the app (Access
2000). I understood that the querydef was modifyied in
memory. Why would it Crash the application it shouldn't be
writing to the directory. We also tested it on a NT server
and it crashed as well..

The code is below



All Responses Appreciated

Tom


DoCmd.Close
acQuery, "RPT_Contract_ActiveContract_ActiveAmendment_Enter
BIO"


Dim db As DAO.Database
Dim qdf As DAO.QueryDef

Dim Varitem As Variant

Dim strcriteria As String
Dim strsql_orig As String
Dim strsql As String

Set db = CurrentDb()
Set qdf = db.QueryDefs("qrymultiselect")

strsql_orig = qdf.SQL
strsql = Left(strsql_orig, Len(strsql_orig) - 1)


For Each Varitem In Me!List1.ItemsSelected

If Len(strcriteria) <> 0 Then
strcriteria = strcriteria & "," & Chr(34) & _
Me!List1.ItemData(Varitem) & Chr(34)
Else
strcriteria = Chr(34) & Me!List1.ItemData(Varitem)
& Chr(34)
End If



Next Varitem

strsql = "select * from bios " & _
"where Bio in(" & strcriteria & ");"


If Len(strcriteria) = 0 Then


GoTo lastline
Else








qdf.SQL = strsql


DoCmd.OpenReport "RPT_Contract_ActiveContract_ActiveAmendme
nt_EnterBIO", acViewPreview

' Forms!form1!List1 = " "

Forms!form3!Form1!List1 = " "
End If

qdf.SQL = strsql_orig
lastline:



End Sub
 
Access requires full permissions (read/write/delete /execute?) on the folder
containing the database.

HTH,
TC
 
Back
Top