Questione : Come può una base di dati di accesso essere aperta in una nuova finestra usando l'accesso VBA?

Ho questo: il

How può una base di dati di accesso essere aperto in una nuova finestra usando l'accesso VBA? il

Public che lo strDB secondario del

Dim di OpenDatabase (DatabaseName) come appAccess di String
Dim come strFilename di Access.Application
Dim come String
Dim PathIs come String

'** rileva il path
'PathIs = Application.CurrentProject.Path

DriveLetter = ha andato (Application.CurrentProject. Path, 1)
PathIs = DriveLetter & “: \„ & DatabaseName
strDB = PathIs & “\„ & di .accdb “& di DatabaseName " generano il nuovo caso della base di dati aperta dei appAccess di Microsoft Access.
Set = del

'** di CreateObject il

'** (“Access.Application„) nello strDB secondario aperto del

Dim del
End Sub
Public OpenDatabase (DatabaseName) del
dello strDB

'** AutoExec form.
appAccess.DoCmd.OpenForm “AutoExec " di Microsoft Access window.
appAccess.OpenCurrentDatabase come appAccess di String
Dim come strFilename di Access.Application
Dim mentre String
Dim PathIs come String

'** rileva il path
'PathIs = Application.CurrentProject.Path

DriveLetter = ha andato (Application.CurrentProject. Path, 1)
PathIs = DriveLetter &„: \ “& DatabaseName
strDB = PathIs &„ \ “& di .accdb„ & di DatabaseName " generano il nuovo caso della base di dati aperta dei appAccess di Microsoft Access.
Set = del

'** di CreateObject il

'** (“Access.Application„) nel
End Sub
del
dello strDB

'** AutoExec form.
appAccess.DoCmd.OpenForm “AutoExec " di Microsoft Access window.
appAccess.OpenCurrentDatabase class= del

Risposta : Come può una base di dati di accesso essere aperta in una nuova finestra usando l'accesso VBA?

Avete fatto avete fatto dei cambiamenti sul gallone?
se sì poteste avere bisogno di di aspettare la replica.
Altre soluzioni  
 
programming4us programming4us