Pulsante per aprire database

6 Risposte

• 

  @Alex

  Super Famoso

  Iscritto da

  feb, 2012

  Messaggi

  8951

  14 lug 2015, 20:19

  Se lo devi semplicemente aprire basta usare la funzione FollowHyperlink che è ben documentata nella guida.
• /

  Anonimizzato17734

  Utente anonimizzato

  14 lug 2015, 21:21

  Grazie ora funziona finalmente. c'è solo un problema. la maschera di apertura del progetto che vado ad aprire non mi viene centrata nello schermo. hai la soluzione anche per questo? preciso che se apro normalmente l'altro progetto con doppio clic la maschera di apertura risulta essere correttamente al centro
• 

  @Alex

  Super Famoso

  Iscritto da

  feb, 2012

  Messaggi

  8951

  15 lug 2015, 07:59

  A parte predisporre la FORM in modo che si centri nello schermo... che potresti farlo...
  
  Prova questa variante:

  
  Function ShellEx(strSourceFile As String) As Boolean
      On Error Resume Next
      Dim lngPID              As Long
      lngPID = Shell(SysCmd(acSysCmdAccessDir) & "MsAccess.Exe " & _
                   """" & strSourceFile & """",vbMaximizedFocus)
      ShellEx= (Err = 0)
  End Function

  Lancial la [ShellEx] passando il Path del File MDB o quello che è...
• /

  Anonimizzato17734

  Utente anonimizzato

  15 lug 2015, 20:51

  La maschera è già impostata per aprirsi al centro dello schermo infatti come ho già detto se la apro normalmente con doppio clic funziona correttamente. non ho capito la tua proposta di soluzione, potresti essere più chiaro?
• 

  @Alex

  Super Famoso

  Iscritto da

  feb, 2012

  Messaggi

  8951

  15 lug 2015, 21:19

  Cosa hai bisogno di capire....? E' una funzione che devi richiamre al posto di FolowHyperlink passando il Path...
• /

  Anonimizzato17734

  Utente anonimizzato

  15 lug 2015, 21:43

  Ok ora funziona grazie