Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Opening Explorer inside an acccess form?

Status
Not open for further replies.

integritycare

Technical User
Mar 12, 2011
151
AU
Hello,
Would apppreciate some ideas on this one please. Our document management system uses this code to open forms from an Option Group

Code:
Private Sub PanelSelector_AfterUpdate()
On Error GoTo PanelSelector_AfterUpdate_error

Select Case Me![PanelSelector]
      Case 1 'NC
         Me![subformpanel].SourceObject = "CMS" ' Logo form
   End Select

PanelSelector_AfterUpdate_Exit:
Exit Sub

PanelSelector_AfterUpdate_error:
Select Case Err
   Case Else
      MsgBox Err & "-" & Error$, vbCritical + vbOKOnly, "Error in module PanelSelector_AfterUpdate"
      Resume PanelSelector_AfterUpdate_Exit
End Select

I have abbreviated some of the code.

I know that if windows explorer can be opened from an access command button by;
Code:
      Dim stAppName As String
      stAppName = "C:\WINdows\explorer.exe q:\QMS\Office Folders"
      Call Shell(stAppName, 1)

Is it possible to be able to open the office folders in the same manner as all the other access forms via the options group

Many thanks,

Integity











 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top