Newsgroup: it.comp.appl.access
Titolo: Impostare il n, record in maschere continue

Salve, in visualizzazione maschere continue è possibile stabilire quanti
record visualizzare, magari gestendo il n da una text?
Grazie
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

 --
 
Ni.
Sostanzialmente NO, ma puoi gestire l'altezza della Maschera sapendo
quanto è alto il CORPO+SEZIONI
Sapendo che il CORPO si ripete N Volte in base al Numero dei
Records... la cosa è facile da emulare.
 
@Alex

 Grazie
 
=======================================
Private Sub Form_Open(Cancel As Integer)
Dim n As Integer, RS As Recordset
n = 20
Set RS = Me.RecordsetClone
If RS.RecordCount = 0 Then Exit Sub
RunCommand acCmdRecordsGoToFirst
RunCommand acCmdRecordsGoToLast
If n > 1 Then
    DoCmd.GoToRecord acForm, Me.Name, acPrevious, n - 1
End If
RunCommand acCmdRecordsGoToNew
End Sub
========================================
 
Con qualche elementare modifica puoi gestire n
da un Button + TedxtBox.
 
Bruno
 
 

"Bruno Campanini"  ha scritto nel messaggio 
news:4ead54ef$0$1375$4faf...@reader2.news.tin.it...

_______________________Risposta:
Ciao Bruno
perché una volta che hai recordsetclone non usi quello e ti muovi sulla 
form?
rs.movefirst
rs.movelast etc..
MA
 
 
 
 

 MA
 
Perchï¿œ non lo fai tu e lo proponi come variazione?
 
Bruno
 
 

"fedele"  ha scritto nel messaggio news:j8h349$los$1...@news.newsland.it...
 
Salve, in visualizzazione maschere continue è possibile stabilire quanti
record visualizzare, magari gestendo il n da una text?
Grazie
 
___Risposta:
dim strSQL as string
 
strSQL = "SELECT TOP " & me.tuacasella & " * FROM Tuatabella"
ME.Form.Recordsource = strsql
MA
 
 

 MA
 
La domanda dell'OP è decisamente interpretabile... di certo se
intendesse effetto PAGING o paginazione come si fa con ASP usando ADO,
con risultati
pessimi dal punto di vista prestazionale, direi che saremmo tutti
fuori strada...
 
;-)
 
Speriamo che chiarisca meglio.
 
@Alex

 Grazie
 
Grazie x risposte ad una non chiara richiesta.
Mi interessava appunto visionare tutti i risultati di una query in una
form continua, (400-500 record), in blocchi da n record.
Quanto riportato da MA
dim strSQL as string
strSQL = "SELECT TOP " & me.tuacasella & " * FROM Tuatabella"
ME.Form.Recordsource = strsql
funziona perfettamente, ma poi avrei bisogno di potermi spostare ai
successivi/precedenti.
X il codice di Bruno ricevo un errore "impossibile passare al record
specificato" e si ferma su 
DoCmd.GoToRecord acForm, Me.Name, acPrevious, n - 1
Grazie 1000
fedele


 Grazie
 
In rete
http://lnx.accessgroup.it/community/forms/personalizzare-maschera-da-codice-vba.html
 
c'è questo esempio di pablitomf, ma se lo converto in 2k smette di
funzionare. Peccato


 Grazie
 
Grazie x risposte ad una non chiara richiesta.
Mi interessava appunto visionare tutti i risultati di una query in una
form continua, (400-500 record), in blocchi da n record.
Quanto riportato da MA
dim strSQL as string
strSQL = "SELECT TOP " & me.tuacasella & " * FROM Tuatabella"
ME.Form.Recordsource = strsql
funziona perfettamente, ma poi avrei bisogno di potermi spostare ai
successivi/precedenti.
X il codice di Bruno ricevo un errore "impossibile passare al record
specificato" e si ferma su
DoCmd.GoToRecord acForm, Me.Name, acPrevious, n - 1
Grazie 1000
fedele
 
______________Risposta:
Creati una variabile globale in cui ci metti l'id
 
strSQL = "SELECT TOP " & me.tuacasella & " * FROM Tuatabella WHERE tuoid>" & 
tuavariabile
 
MA
 
 
 
 
 
 

 DoCmd.GoToRecord acForm, Me.Name, acPrevious, n - 1
 
Ti confermo che funziona perfettamente
(Windows 7/Access 2010/64bit).
Che valore hai dato ad n?
 
Bruno