Newsgroup: it.comp.appl.access
Titolo: [INFO] Frugator 0.9

Come in tutti progetti che si rispettano si parte per fare una cosa e se 
ne ottiene un'altra.
A questo indirizzo:
http://www.fileserve.com/file/GVdNeQF/Frugator.rar
si puo' trovare il Frugator di cui all'oggetto.
Cose': Come dice il nome, fruga in un mdb
Composizione: sono 2 db MDBAsp.mdb (front end) e MDEAsp.mde collegato al 
primo.
Corredo: C'e' un documento (frugator.doc) in uno stato molto draft e 
piuttosto ermetico che da alcune indicazioni sull'utilizzo.
Input: Un qualsiasi MDB compatibile (versione <= 2003)
Output: Tanta robaccia visibile (funzioni, forms/report, macros, query, 
tabelle) organizzate nei modi piu' improbabili. Per tutto il visibile, 
nei livelli e modi di visibilita', puo' essere generato un html (e 
quindi roba stampabile)
Versione 0.9 (non e' ancora degna di chiamarsi 1.0)
Sono alla ricerca di qualcuno che voglia avere la pazienza di provarlo e 
dirmi:
[ ] E' una schifezza, buttalo
[ ] Pero', e pieno di figurine
[ ] Questo non lo fa .........
[ ] Potabile
[ ] Azzzz...........
Come dicevo all'inizio il progetto doveva fare un'altra cosa e 
parzialmente gia' la fa (i.e. preparazione HTML in ambiente ASP) se 
qualcuno volesse povare anche quello, dandomi dei ritorni (errori e 
cosucce varie e/o suggerimenti) e' il benvenuto.
Ovviamente sul mio ambiente funziona.
Ringrazio, in advance, i "miei" gamma testers ;-{)
-- 
ac (x=y-1)

 ha scritto:
Io posso non prima di lun prox ;)

-- 
--------------------------------
Pablitomf
Napoli sempre nel "Q"uore!

 si puo' trovare il Frugator di cui all'oggetto.
non ho capito l'uso del mde
aperto l'mdb, seleziono un altro mdb, faccio getdb
mi carica gli oggetti dentro
le freccette vicino alle combo non funzionano, mi dice che non trova la 
funzione
ho poi provato a lanciare il tree
a parte che mi pare non ci sia modo di chiuderlo
se clicco sulla parte nera in alto mi da errore su evento mouse giu
boh
Antonio 

 ac (x=y-1)
Mentre sta caricando un mdb veramente corposo, alcune considerazioni:
FileServe non č il luogo migliore per depositare file, č lungo nella 
risposta, propone programmi e fa una collection di tutti i siti visitati.
L'mde č scritto in una versione superiore all'mdb costringendo ad usare 
almeno A2007.
Fine prima parte.
Ciao, Carlo 

 ac (x=y-1)
Quattro minuti per caricare un mdb veramente corposo (più di 53000 linee di 
codice, 135 maschere, più di 180 tabelle, ecc.), un tempo direi 
spettacolare, ottima la barra di progressione, aiuta non poco.
Molto bella e ordinata la tree, sia nel sommario che nel dettaglio. La 
renderei espandibile a piacere.
Fine seconda parte.
Ciao, Carlo 


-- 
ac (x=y-1)

 almeno A2007.
Per il momento va bene fileserve. Poi aspetto a vedere se il Facciuti o 
il Baraldi acconsentono a inserirla nei loro siti.
Strano per l'MDE io ho solo la versione 2003.
-- 
ac (x=y-1)

 se clicco sulla parte nera in alto mi da errore su evento mouse giu
Capitano tutte a te. Vedi se l'mde e' collegato correttamente (RTFM)
-- 
ac (x=y-1)

> a parte che mi pare non ci sia modo di chiuderlo
P.S. Non vedi la icona con la porticina e la scritta, in rosso, Exit?
-- 
ac (x=y-1)

 Strano per l'MDE io ho solo la versione 2003.
Il Facciuti acconsente :) invia su mail Pvt con testo descrizione 
articolo e lun/mar sara' on-line ;)



Grazie.
Ma vorrei aspettare un po' per capire, se ci sara' qualche ritorno, cosa 
deve essere assolutamente sistemato. Per esempio quel fiorellino di 
Biso, spero che prima o poi riesca a farlo funzionare e mi spieghi 
dov'e' il problema. Anche Carlo ha segnalato una cosa che, al momento, 
mi e' difficile comprendere (la non corretta gestione dell'mde con la 
versione 2003).
Diciamo che, quando finalmente sara' degno di fregiarsi di Vers. 1.0, 
sara' fatto.
E poi non comprare a scatola chiusa che magari si rimedia qualche brocco 
neanche buono a fare il "raccattapalle" ;-{)
-- 
ac (x=y-1)

 neanche buono a fare il "raccattapalle" ;-{)
Ma tu non sei "a scatola chiusa";)


>>>>  
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........


-- 
ac (x=y-1)

Il 19/08/2011 12.06, Alessandro Cara ha scritto:
P.S. Da un'occhiata al "time" del PC mi sembra leggermente sfasato.
-- 
ac (x=y-1)

>>>>> >>>>>    
http://www.bb2002.it
  :)   <<<<<
Figlie? Orgoglioso ehhhhh?
-- 
ac (x=y-1)

 
è il server delle news, il mio pc segna mezzogiorno e mezzo (di fuoco)
dhrfgn bffreinmvbar yn evprib fcrffb r qv fbyvgb evfcbaqb pur ibv svav 
bffreingbev aba qbierfgr arzzrab crafner pur vb cbffn nirer vy cp pba 
y'benevb fontyvngb dhnaqb p'è vy freivmvb qv fvapebavmmnmvbar qryy'ben 
nggvib qv qrsnhyg fh cengvpnzragr ghggv v pbzchgre (ary zvb pnfb pba 
gvzr.jvaqbjf.pbz) ;)


 gvzr.jvaqbjf.pbz) ;)
Uhm gli e' impazzita la keyboard... :)


> Capitano tutte a te. Vedi se l'mde e' collegato correttamente (RTFM)
Provato al volo...
stessa roba di Antonio... pari pari... tra i rif. c'e' l'mde (nel quale
avrai messo la funzione suddetta)...
aggiornaci. 


 aggiornaci.
Uhmmm.... Se per funzione suddetta intendi il mousedown sta su Pannello 
Tree (*) e l'unico motivo per cui puo' andare in  errore e se non esiste 
l'oggetto oAdo.
Oggetto che dovrebbe esistere se correttamente aperto il Sincro.
Comunque e' una sitiuazione da dover "catturare".
(*) verifica
-- 
ac (x=y-1)

 Il 21/08/2011 12.50, Pablitomf ha scritto:
P.S. Confusione
Il mousedown a cui riferisce Biso e' un altro che chiama questa 
funzione, nulla di che
Private Const HTCAPTION = 2
Private Const WM_NCLBUTTONDOWN = &HA1
Private Declare Function ReleaseCapture Lib "User32" () As Long
Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" _
    (ByVal Hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _
    ByVal lParam As Long) As Long
Public Function dragForm(Button As Integer, idForm)
     If Button = 1 Then
         Dim ReturnVal As Long
         Dim z
         z = ReleaseCapture()
         ReturnVal = SendMessage(idForm, WM_NCLBUTTONDOWN, HTCAPTION, 0)
     End If
End Function
chiama le classiche API per poter spostare il form
-- 
ac (x=y-1)

> chiama le classiche API per poter spostare il form
*tutte* le problematiche espresse da Antonio accadono anche a me, non solo
questa... le freccette alla dx delle combo vanno in errore come da lui
descritto, lo spostamento che hai indicato, idem, il web non funge, il liv di
printing a 0 non va, e superiore a 0 dice che non c'e' nodo da risolvere... 



Andiamo per ordine
1) le freccette alla dx delle combo vanno in errore come da lui
descritto
Questa e' la proprieta' su onclick dell'immagine (per *tutte* le 
immagini, cambia solo il cbxxx di riferimento sulla proprieta' onclick):
=transferSource([Form];[cbtab])
questa e' la funzione:
Public Function transferSource(oMe, oCb)
oMe!lBox.RowSource = oCb.RowSource
oMe!etPicker.Caption = "Picker: " & Mid(oCb.Name, 3)
End Function
vedo pochi motivi per cui possa andare in errore
Qual'e' l'errore segnalato?
Vorrei capire la sequenza delle operazioni. Evidentemente puo' avere 
questo comportamento (due casi fanno quasi una prova) ma, al momento, 
non lo ho mai verificato.
2)lo spostamento che hai indicato:
che tipo di errore?
3)il web non funge
cioe'?
4)il liv di printing a 0 non va
aricioe'?
Non genera l'Html? (guarda su sottocartella new o sul browser)
5)e superiore a 0 dice che non c'e' nodo da risolvere...
cioe? hai prima fatto click su un qualsiasi nodo del tree e *poi* fatto 
*dohtml*  (comunque e' un punto da rendere esplicito) e comunque e' 
strano poiche' dovrebbe prendere il nodo principale (da verificare).
Questa e' l'istruzione incriminata:
         If oAdo.exist("_PrintNode") Then
   		....blabla
	else
		msgbox ".....node to solve..."
	end if
e "_PrintNode" viene messo su dal click sul NodeTree
(visibile nel codice dell'mdb, nodeclick di Pannello Tree)
-- 
ac (x=y-1)

 (visibile nel codice dell'mdb, nodeclick di Pannello Tree)
vedi sopra...


 ha scritto:
inoltre non mi ï¿œ chiaro a cosa serve LOCAL, TIMERSTART e TIMERSTOP nell'economia
del DB


 Napoli sempre nel "Q"uore!
Ciao Alessandro,
veramente bello; complimenti per il super lavoro, anche se ... con un
mde di mezzo!!!
Allora, il primo errore che ho incontrato si verifica nel momento in
cui una volta caricato un db e si implementa Local (?):
Private Sub bEsito_Click()
    DoCmd.Hourglass True
    mainLine "" & tSection.Value, tPath.Value
    DoCmd.Hourglass False
End Sub
si fa clic su un qualsiasi pulsante Load.
Ciao Vladimiro.


Lo avevo scritto nel post iniziale.
Quei tre bottoni fanno parte di quello che era "inizialmente" l'affare, 
che doveva fare un'altra cosa e non ci entrano nulla con il "frugator".
Local serve a far produrre un HTML a partire da un "modello", comunque 
mi sa che non hai letto il Fucked Manual  ( si fa per dire "manual") 
alle voci HTML asincono e sincrono ;-{) li ho lasciati perche', di 
fatto, funzionano.
Tornando al problema dell'MDE, e' un guaio e a questo punto dovrebbe 
avere a che fare anche con quanto segnalato da Carlo C. che scriveva di 
aver dovuto utilizzare la versione 2007 per far funzionare il tutto.
La particolarita' di transferSource e l'utilizzo di due API per il resto 
e' una banalissima e semplice funzione pubblica che ho messo sull'mde 
piu' per comodita' che per necessita'.
-- 
ac (x=y-1)

 Ciao Vladimiro.
Ciao Vladimiro.
I pulsanti local, timer e stop timer non ci "azzeccano" con il frugator.
Fanno parte di un'altra linea di sviluppo (che era quella originale) che 
serve a produrre pagine HTML a partire da un modello ed utilizzando i 
marker di mia "invenzione" per la definizione di cicli e condizioni.
Ho deciso infatti di nasconderli nella versione "frugator"
-- 
ac (x=y-1)


Quindi hai attivato fmsincr, (mi sembra di aver messo lo "show" di 
sincro in automatico) ed hai martellato subito "doHtml", tu non sei un 
napoletano verace, vai troppo di fretta.
Pero' ho messo tre "bei" messaggi ;-{)
-- 
ac (x=y-1)

 Pero' ho messo tre "bei" messaggi ;-{)
In inglese!!! Se li mettevi in napoletano forse ci arrivavo! :)


 piu' per comodita' che per necessita'.
Mettile nel db ed elimina l'mde...


 Pablitomf
Bella Pa': e che cavolo!!!
:-)
Vladimiro