Newsgroup: it.comp.appl.access
Titolo: 2 form

è possibile aprire contemporaneamente lo stesso Form (naturalmente in
visualizzazione singolo record) gestendo due record diversi?
mi servirebbe per poterli vedere ad esempio affiancati o per
copiar/incollare dei dati da un record all'altro...

 copiar/incollare dei dati da un record all'altro...
Prova con:
Docmd.OpenForm "primaForm"
Docmd.OpenForm "secondaForm",,,"id<>" & forms!primaForm!id
Ciao.
-- 
Sergio MAZZA 

 Docmd.OpenForm "secondaForm",,,"id<>" & forms!primaForm!id
ma io vorrei aprire lo stesso form su 2 record diversi... una cosa del tipo:
DoCmd.OpenForm "Machera", , , "[Cod]=0001", acFormEdit,,
DoCmd.OpenForm "Machera", , , "[Cod]=0002", acFormEdit,,
ma in questo modo ovviamente la seconda mi apre la maschera nella stessa
finestra delle prima.


Ciao,
In dinamico puoi sempre clonare la tua maschera principale,
in realta' l'oggetto clonato non esiste fisicamente ovvero la
sua esistenza e' temporanea ma puo' venire spostato su un
record diverso dalla maschera matrice.
Questo un esempio del metodo, comandato da un pulsante:
Dim newmaschera As New Collection
Private Sub clona_Click()
    Dim nuova_maschera As Form_TUA_MASCHERA_PRINCIPALE
    Set nuova_maschera = New Form_TUA_MASCHERA_PRINCIPALE
    nuova_maschera .Visible = True
    newmaschera.Add nuova_maschera
End Sub
Ciao
Lorenzo

 ha scritto nel messaggio
news:_e9Od.22784$lB4.6...@twister1.libero.it...

Mi permetto di Aggiungere un pezzetto a quanto già chiaro:
Aperta la Sessione della Form puoi imporre l'uso della proprietà
Filter sulla NuovaSessione in modo da limitare il Record a quello
desiderato.
[Dal codice di Lorenzo]
Dim newmaschera As New Collection
 Private Sub NuovaIstanza(optional Criterio as string=vbnullstring)
     Dim nuova_maschera As Form_TUA_MASCHERA_PRINCIPALE
     Set nuova_maschera = New Form_TUA_MASCHERA_PRINCIPALE
     nuova_maschera .Visible = True
     If Criterio<>vbNullstring then
          nuova_maschera.Filter=criterio
          nuova_maschera .FilterOn=True
     End if
     newmaschera.Add nuova_maschera
 End Sub
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

  End Sub
perfetto...
chiedo solo un'altra cosa: con questo metodo è possible passare anche degli
argomenti (OpenArgs) alla nuova maschera, come si fa con OpenForm?
se non è possibile come posso farlo in altro modo??
grazie

 grazie
Non con quel metodo, ma se dichiari delle Variabili Public nella Form
puoi accedere tranquillamente a quelle dell'istanza.


 puoi accedere tranquillamente a quelle dell'istanza.
come?


Riprendendo l'ultima parte di codice:
Private Sub NuovaIstanza(optional Criterio as string=vbnullstring)
     Dim nuova_maschera As Form_TUA_MASCHERA_PRINCIPALE
     Set nuova_maschera = New Form_TUA_MASCHERA_PRINCIPALE
     nuova_maschera .Visible = True
     If Criterio<>vbNullstring then
          nuova_maschera.Filter=criterio
          nuova_maschera .FilterOn=True
     End if
     newmaschera.Add nuova_maschera
 End Sub
Come vedi Alessandro ha usato
          nuova_maschera.Filter=criterio
          nuova_maschera .FilterOn=True
Quindi ha definito alcune proprieta' dell'istanza. In modo
analogo puoi definirne altre.
Se la dichiarazione
Dim nuova_maschera As Form_TUA_MASCHERA_PRINCIPALE
La porti al di fuori della routine, l'oggetto e' richiamabile da
altre routine all'interno del modulo maschera dopo che ovviamente
e' stata inizializzata dalla Sub di cui sopra.
Ciao
Lorenzo