Newsgroup: it.comp.appl.access
Titolo: db fatturazione e magazzino di rino ferrari

Salve a tutti e complimenti a Ferrari per il db in oggetto...Ho provato a
utilizzarlo per la mia modesta attività, ma pur facendo al caso mio, non
riesco ad eliminare uno sfarfallio della sottomaschera form fatture nel
momento del riepilogo delle DDT emesse. Inserisce i valori in modo corretto
ma la sottomaschera sfarfalla senza sosta fino a quando non, per esempio
seleziono l'icona dell'applicazione sulla barra in basso dello schermo.
Tutto questo succede se intendo inserire tutte le ddt relative ad un
cliente, se invece ne inserisco una alla volta tutto procede bene. Ora, ho
provato ad inserire nel codice vari stop o oltro, ma niente di fatto. Vorrei
sapere se qualcuno ha riscontrato lo stesso problema e come è stao
risolto...
Grazie in anticipo per l'aiuto.
Francesco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:151Z58Z16Z97Y1...@usenet.libero.it...

Installato il VBruntime?
Ciao
-- 
Roberto da Parma 


Salve, VBruntime? Ho Access 2003 e ho eseguito il file autoinstallante di
rino ferrari......spiegami maglio..
Grazie per la risposta



Alcuni controlli Activex non sono presenti in access ma messi a disposizione 
degli sviluppatori con i vari visual ... io non ho visto il programma di 
rino (e lui ti potrà dare più spiegazioni di me) ma se solamente fai una 
ricerca su google scrivendo VBruntime noterai che è un pacchetto di file 
.... se rino ha usato ocx ne hai bisogno...sempre che non gli abbia già 
distribuiti nel pacchetto...
Ah controlla anche di avere l'SP aggiornato all'ultima versione...



Grazie per la risposta.....
si ho installato quanto mi hai detto e access 2003 è aggiornato....ma niente
di nuovo, non saprei come contattare Rino per delucidazioni.......in ogni
caso non mi segnala che manca qualche "Riferimento".....va tutto
benissimo....solo questo sfarfallio della sottomaschera quando procede
all'inserimento del contenuto delle ddt....come ho detto, poi i dati sono
inseriti regolarmente, ma non ferma l'elaborazione se non si interviene
selezionando altre cose.....è come se quando va a nuovo record della
sottomaschera, cerca un nuovo dato, non lo trova e ricerca ancora......



Il codice su click è questo:
Private Sub Raggruppa1_Click()
    Dim strTitle As String
    Dim lResponse As Long
    Dim Cancel As Integer
    Dim strMessage As String
    Dim strMessage1 As String
    Dim strMessage2 As String
    Dim stDocName As String
    Dim stDocName1 As String
    Dim Err1 As Long, Err2 As Long
        strTitle = "Gestione Facile III"
        strMessage = "Verrànno ripilogati nella Fattura tutti i DDT selezionati " &
vbCr _
        & " Continuare?"
        strMessage1 = "DDT inseriti con successo in Fattura"""
 
    lResponse = MsgBox(strMessage, vbYesNo, strTitle)
        If lResponse = vbYes Then
 
        DoCmd.SetWarnings False
 
        'qryAggiornaDettaglioTipo"DDT"
        DoCmd.RunSQL "UPDATE tblDettagliOrdini SET tblDettagliOrdini." _
        & "Tipo = " & Chr$(34) & "DDT" & Chr$(34) & ";" _
        & vbNewLine
 
        'qryAccodaDDTaFatturaTotali
        DoCmd.RunSQL "INSERT INTO tblDettagliFatture ( Codice, PrezUn, Quantità,
IVA, Scont, Um, Descrizione, TipoDocumento, RiferimentoOrdine, Del,
IDFattura, Scaricato, Magazzino, Numero )" & vbNewLine _
                      & "SELECT tblDettagliOrdini.Codice, tblDettagliOrdini.PrezUn,
tblDettagliOrdini.Quantità, tblDettagliOrdini.IVA, tblDettagliOrdini.Scont,
tblDettagliOrdini.Um, tblDettagliOrdini.Descrizione, tblDettag" _
                      & "liOrdini.Tipo, tblDettagliOrdini.RiferimentoOrdine, tblOrdini.DataOrdine,
Forms!frmFatture!IDFattura AS NumeroID, tblDettagliOrdini.Scaricato,
tblDettagliOrdini.Magazzino, tblOrdini.IDOrdine" _
                      & vbNewLine & "FROM tblOrdini INNER JOIN tblDettagliOrdini ON
tblOrdini.IDOrdine = tblDettagliOrdini.IDOrdine" & vbNewLine _
                      & "WHERE (((tblOrdini.IDCliente)=[Forms]![FrmDDTnonFatturati]![IDCliente])
AND ((tblOrdini.Fatturato)=False) AND ((tblOrdini.[FatturaSi/No])=True));" &
vbNewLine
 
        'qryAggiornamentoOrdiniTotali
        DoCmd.RunSQL "UPDATE tblOrdini SET tblOrdini.Fatturato = True" _
                      & vbNewLine _
                      & "WHERE (((tblOrdini.IDCliente)=[Forms]![frmDDTn" _
                      & "onFatturati]![IDCliente]) AND ((tblOrdini.[Fat" _
                      & "turaSi/No])=True));" & vbNewLine
 
         lResponse = MsgBox(strMessage1, , strTitle)
 
 
 
 
    End If
    Me.Form.Requery
    DoCmd.SetWarnings True
    DoCmd.RunCommand acCmdCloseWindow
End Sub
Ora proverò ad agire sulla sottomaschera della form fatturazione......


 > Inviato viahttp://
arianna.libero.it/usenet/

Scusate, potreste mettere il link da dove scaricare l'esempio di Rino
Ferrari.
Grazie.
Giuseppe


http://www.accessgroup.it/HomeArgomenti.asp?ID=194&Oggetto2=DEMO%20COMPLETO:%20Gestionale%20Magazzino%20e%20Fatturazione



Non è questione di codice....succede quando non viene distribuito l'ocx...ma 
di solito se uno ha access installato non dovrebbe accadere.
La libreria dovrebbe essere MSComctlLib...ma ripeto dovrebbe distribuirla 
chi compila in progetto...prova a vedere se riesci a scaricarla da qualche 
parte e poi ricordati di registrarla.



Ok....provo a trovarla e ti faccio sapere...
Grazie per adesso



Nulla di fatto, trovato l'OCX, installato, aggiornato i riferimenti, ma
niente.....ho installato anche altri riferimenti o aggiornato e
registrato....il problema resta......sono demoralizzato.......



Mai darsi per vinti!!
E' capitato anche a me questo sfarfallio....devo solo trovare il cassettino 
giusto nella mia memoria...
Ti faccio sapere....intanto....
Rinoooooooooooooo dove cavolo sei?????????? :-)))


 Ti faccio sapere....intanto....
Tagliare un po' di righe no,  ehhh?
Ho la rotella del mouse elettrizzata da tanto lavoro  ;-{)
--
ac

 ha scritto nel messaggio 
news:2Nyil.20171$8Z.1...@tornado.fastwebnet.it...

:-))) hai ragione!!Colpa mia!
Dai se pigi perň la rotella centrale vai piů forte no??!!



Grazie...obbligato...aspetto...
