text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Ln958.18257$6e5.6...@twister2.libero.it...
>
> "antares" <
ant...@tiscali.it
> ha scritto nel messaggio
> news:a311kr$ek1$1...@pegasus.tiscalinet.it...
> >
> [CUT]
>
>
   [CUT]
> 1) A cosa ti serve sapere se la maschera dettagli nave č visibile o non
> visibile? Forse ti serve sapere se tale maschera č aperta oppure no?
Intanto grazie per aver risposto alla mia ,  e soprattutto per la pazienza
che hai avuto
nel leggere tutto ...
Ora cerco di spiegarti il motivo pecui sono dovuto ricorrere alla condizione
if form_FrmDettagliNave.Visible = True then .....
Praticamente si puň accedere alla maschera FrmArmatori sia dal pulsante
CmdApriArmatori posto nella maschera Menu
sia dal pulsante
CmdSchedaArmatori posto nella maschera FrmDettagliNave
quest'ultimo mi permette di aprire la Maschera Armatori dalla Maschera
DettagliNave
Per tagliare corto
Se apro la maschera armatori dal pulsante posto sulla Maschera Menu
quando la devo chiudere vorrei cliccare sul pulsante CmdChiudi
per chiudere la maschersa Armatori e riaprire la maschera Menu
viceversa se la apro la maschera Armatori dalla maschera DettagliNave
qunado la devo richiudere vorrei cliccare nello stesso pulsante CmdChiudi
e questa volta , in virtů del fatto cha la maschera DettagliNave č "APERTA",
vorrei tornare alla Maschera DettagliNave senza aprire nessuna maschera.
L'esigenza di tenere aperta la maschera dettaglinave qunado da essa apro
quella Armatori č perchč solo cosě posso , una volta aperta la maschera
Armatori , raggiungere il l'armatore corrispondente a quello selezionato
nella
ComboArmatori della maschera dettaglinave.
questa č la routine del pulsante CmdApriSchedaArmatori posto sulla Maschera
DettagliNave:
Private Sub CmdSchedaArmatori_Click()
'apre la scheda Armatori
If ComboArmatori.Value <> "" Then
DoCmd.OpenForm "FrmArmatori"
'va al record corrispondente a quello selezionato nella combo _
 della maschera Dettagli Nave
DoCmd.GoToControl ("IDA")
DoCmd.FindRecord Form_FrmDettagliNave.ComboArmatori
DoCmd.GoToControl ("txtArmatori")
Else
'messaggio di errore qunado si cerca di aprire la scheda di un Armatore
inesistente
MsgBox "Non č possibile aprire la scheda di un Armatore non esistente",
vbExclamation
If vbOK Then
ComboArmatori.SetFocus
End If
End If
End Sub
Fine della prima puntata .....
Bene Roberto , sempre con la preghiera di tener cura prima della tua salute,
penso di averti dato materiale a sufficienza per poter capire quello che stň
cercando di fare .... e che non funziona proprio come vorrei.
Credo sia palese dirti che č da poco che sto maneggiando VB e Access, ma
programmare non č il mio lavoro , io ho a che fare con tutt'altro mestiere
che
come avrai capito ha a che fare con le navi ... e per il quale stň cercando
di costruire
un gestionale .
Ti ringrazio anticipatamente per la tua estrema educazione e cortesia che
usi
nel rispondere a tutti nel NG
Ti saluto
Marco
ant...@tiscalinet.it


title: Maschere che si aprono e che si chiudono ... a loro piacimento !

author: Roberto da casa

text:
"antares" <
ant...@tiscali.it
> ha scritto nel messaggio
news:a33ktt$8bh$1...@lacerta.tiscalinet.it...
>
[CUT]
Ti propongo di cambiare alcune cose in alcune routine VBA che hai postato;
dome queste modifiche verificare se è cambiato qualcosa.
Come prima cosa memorizza in un modulo del tuo database la seguente
funzione, che servirà a verificare se una maschera è aperta:
Function IsLoaded(ByVal strFormName As String) As Integer
    Const conObjStateClosed = 0
    Const conDesignView = 0
    If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <>
conObjStateClosed Then
        If Forms(strFormName).CurrentView <> conDesignView Then
            IsLoaded = True
        End If
    End If
End Function
Modifica nel modo seguente la routine generata a fronte dell'evento "Su
clic" del pulsante CmdApriArmatori della maschera Menu:
Private Sub CmdApriArmatori_Click()
DoCmd.Close acForm, "Menu"
DoCmd.OpenForm "FrmArmatori"
End Sub
Modifica nel modo seguente la routine generata a fronte dell'evento "Su
clic" del pulsante CmdApriDettagliNave della maschera Menu:
Private Sub CmdApriDettagliNave_Click()
DoCmd.Close acForm, "Menu"
DoCmd.OpenForm "FrmDettagliNave"
End Sub
Modifica nel modo seguente la routine generata a fronte dell'evento "Su
clic" del pulsante CmdChiudi della maschera FrmArmatori:
Private Sub CmdChiudi_Click()
DoCmd.Close acForm, "FrmArmatori"
If Not IsLoaded("FrmDettagliNave") Then
    DoCmd.OpenForm "Menu"
End If
End Sub
Riduci all'essenziale nel modo seguente la routine generata a fronte
dell'evento "Su chiusura" della maschera FrmArmatori:
Private Sub Form_Close()
If IsLoaded ("FrmDettagliNave") Then
    Forms!FrmDettagliNave!ComboArmatori = Me![IDA]
    Forms!FrmDettagliNave!ComboArmatori.Requery
End If
End Sub
Prova a vedere se, dopo queste modifiche cambia qualcosa nel comportamento
del tuo database.



author: antares

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:6mu58.486$ue2....@twister1.libero.it...
>
> "antares" <
ant...@tiscali.it
> ha scritto nel messaggio
> news:a33ktt$8bh$1...@lacerta.tiscalinet.it...
> >
> [CUT]
>
> Ti propongo di cambiare alcune cose in alcune routine VBA che hai postato;
> dome queste modifiche verificare se è cambiato qualcosa.
[CUT]
Ciao Roberto
Prima di tutto scusa il ritardo nel risponderti , ma questi giorni non ho
potuto accedere al computer
perchè sono stato fuori per lavoro.
Poi ho appreso che tornerai in ospedale per dei controlli, in bocca al lupo
, e sappi che siamo
tutti con te !!!!!
Ti faccio tanti auguri !!!!!
Per quanto riguarda le routines che mi hai mandato, GRAZIE , mi hanno
aiutato a risolvere almeno
in parte buona parte del problema, o per meglio dire quel problema è stato
risolto ma perchè tutto
funzioni bene credo debba fare un pò di ordine e pulizia nel resto del
codice ... ti terrò informato
a tempo debito !!!!! Per ora concentrati sul tuo problema , e relax my
friend !!!!!
Ciao grazie ancora di tutto , ti aspettiamo presto!!!!!!
Marco
ant...@tiscali.it


text:
"antares" <
ant...@tiscali.it
> ha scritto nel messaggio
news:a3k2l1$f8g$1...@pegasus.tiscalinet.it...
>
[CUT]
>
> Ciao grazie ancora di tutto , ti aspettiamo presto!!!!!!
OK
>
> Marco
>
ant...@tiscali.it
Ciao
Roberto


title: Collegamento a immagine

author: Vittò

text:
Salve a tutti,
espongo il mio problema:
devo fare una tabella dove vengono descritti tanti articoli.
ad ogni articolo devo far associare un'immagine in formato gif (forse opto
per jpeg)
ho pensato di creare un campo olè dove manualmente l'operatore va ad
inserire l'immagine manualmente e la inserisce con l'opzione collegamento.
Il tutto funzionerebbe
Problema
1° - si ingrandisce in maniera spropositata il DB es. la foto in formato gif
da 90 Kb mi fa crescere il DB di 300 Kb, immagina te se ne metto 1000....
2° - l'opertatore è talmente imbranato che poi mi fa confusione.....
Ho pensato: faccio salvare le immagini sempre con una tipo di nome che
corrisponde al numero di codice dell'articolo es. 1220.gif nella cartella
C:\Documenti\Immagini
poi vorrei creare un controllo (Nome controllo es: Image) nella maschera
(maschera singola) che possa andare a confrontare il campo codice articolo
(Nome controllo es: CodArt)  dove troverà scritto 1220 e vada a visualizzare
il file grafico 1220.gif nella cartella C:\Documenti\Immagini
è possibile?
p.s. me disperato... non conosco un' H di codice
se gentilmente sapreste farmi eventualemte un piccolo esempio...
grazie infinite
Vittò


title: Collegamento a immagine

author: Massimiliano Amendola  kksrl

text:
"Vittò" <
v.bus...@timenet.it
> ha scritto nel messaggio
news:ah6379$57j$1...@fe2.cs.interbusiness.it...

che c'era di sbagliato con la precedente risposta?
MAssimiliano


title: Collegamento a immagine

author: Enrico Pietrobon

text:
"Vittò" <
v.bus...@timenet.it
> ha scritto nel messaggio
news:ah6379$57j$1...@fe2.cs.interbusiness.it...

Se non vuoi che il Db venga troppo grosso, ti conviene memorizzare il
percorso della foto, e poi andare a visualizzarla in un campo con
l'istruzione
Me![Immagine].Picture = Me![Path]
In questa maniera viene memorizzato solo il percorso della foto che poi
andrai a riaprire in una casella (nell esempio chiamata "immagine").
Enrico Pietrobon


title: Collegamento a immagine

text:
"Enrico Pietrobon" <
in...@softdream.it
> ha scritto nel messaggio
news:yMxZ8.79756$Jj7.2...@news1.tin.it...
> Se non vuoi che il Db venga troppo grosso, ti conviene memorizzare il
> percorso della foto, e poi andare a visualizzarla in un campo con
> l'istruzione
>
> Me![Immagine].Picture = Me![Path]
>
> In questa maniera viene memorizzato solo il percorso della foto che poi
> andrai a riaprire in una casella (nell esempio chiamata "immagine").
aggiungo.. scegli l'opzione che l'immagine debba essere collegata e non
incorporata


title: Collegamento a immagine

author: Emyr

text:
esempi su
sitocomune.com
come implementare un archivio immagini
Saluti.
Emanuele.


title: problema di sinconizzazione DB Microsoft SQL

text:
salve a tutti. è la prima volta che scrivo in questo gruppo. Passo
subito ad esporre il mio problema. Ho due database su due diversi
computer che fanno funzionare il gestionale della mia azienda. Uno dei
due computer è un portatile. Praticamente ho la necessità di
sincronizzare solo alcune delle tabelle del database. Mi serve di fare
un programmino che copia dal computer fisso i records della tabella
che mi interressa non ancora presenti nella tabella del computer
portatile. I record una volta copiati non verrannomai più modificati.
Comuneque se dovesse essere necessaria una modifica la posso fare
manualmente per evitare complicazioni. Cosa mi consigliate? Farei un
buon lavoro con Access collegando le tabelle via ODBC? Non sono un
grand programmatore quindi vi chiedo se in tutto ilmateriale presente
su sitocomune esiste qualcosa da usare come punto di partenza.
Garzie


title: Query con date e prezzi frazionati

author: Danielle

text:
Salve a tutti!

Mi trovo da diversi giorni alle prese con un enigma per una query che vorrei realizzare per delle statistiche.

Ho un database con una tabella in cui elenco le prenotazioni di un albergo.
Tra i campi ho la data del check-in, la data del check-out e il prezzo totale del soggiorno.

Sto cercando di estrapolare delle statistiche mensili con totali parziali degli incassi.

In pratica il risultato dei totali divisi per mese deve includere:

   prezzo_soggiorno / (data_check_in - data_check_out) * giorni_del_mese_selezionato

Il problema è appunto che le prenotazioni sono spesso a cavallo di due o più mesi.

Grazie fin d'ora a qualsiasi aiuto vogliate darmi!

Danielle


title: Query con date e prezzi frazionati

author: Pablitomf

text:
> Grazie fin d'ora a qualsiasi aiuto vogliate darmi!
>
> Danielle

spiega meglio

--
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.

TheSpaceCowboy :
Britos deve recuperare per arrivare in forma al prossimo
infortunio - 24/10/12


title: Query con date e prezzi frazionati

text:
> spiega meglio

Pablito,

Ogni record di prenotazione ha una campo con data di inizio (check-in) e uno con data di fine (check-out), inoltre ha un campo con il prezzo totale.

L'idea è creare una query che mi dia un risultato del genere

Gennaio 2011  TOT:1000
Febbraio 2011 TOT:1200
Marzo 2011    TOT:800
...           ...
Dicembre 2012 TOT:2300
Gennaio 2013  TOT:1900

Il problema è che alcuni record (prenotazioni) hanno una data di inizio in un mese e la data di fine in un altro (ES: check-in 21/11/2012; check-out 2/1/2013). In questi casi, il prezzo totale va diviso tra i giorni dei vari mesi (ES: prezzo totale €1200, Giorni di Dicembre 2012: 10; Giorni di Gennaio 2013: 2; Ergo ---> asssegnare a Dicembre 2012: €1000 e a Gennaio 2013: €200; questi risultati si devono sommare raggruppandoli per mese e anno)

Spero di essere stata più chiara.

Grazie!

Danielle


title: Query con date e prezzi frazionati

text:
> Spero di essere stata piï¿œ chiara.

mmmmm... un po' caotica la cosa... fatta a braccio (credo si possa migliorare)

Mi sono immaginato una tabella che ho chiamato "tbl_check_in_out"
con i campi:
1) id (chiave contatore)
2) check-in (data)
3) check-out (data)
4) prezzo (valuta)
e su questa ho basato tutto il resto.

N.B.
Ho dato per scontato che le prenotazioni non superassero il mese tra entrata
e uscita (per prenotazioni superiori al mese questo sistema non funziona) -
chi e' che fa vacanze in albergo di oltre 1 mese? :D -

---------------

Crea una query e chiamala "Query1" e incolla quanto sotto:

SELECT
tbl_check_in_out.id
, tbl_check_in_out.[check-in],
IIf(Format([check-out],"yymm")<=Format([check-in],"yymm"),"",DateAdd("d",-1,CVDate("01/"
& Format(DateAdd("m",1,[check-in]),"mm/yy")))) AS [check-out_parz],
IIf([check-out_parz]<>"",DateDiff("d",[check-in],[check-out_parz])+1,"") AS
gg1, IIf([check-out_parz]<>"",[PrezzoGg]*[gg1],"") AS pr1,
IIf([check-out_parz]<>"",IIf([check-out_parz],DateAdd("d",1,[check-out_parz]),""),"")
AS [check-in_parz], tbl_check_in_out.[check-out],
IIf([check-out_parz]<>"",DateDiff("d",[check-in_parz],[check-out])+1,"") AS
gg2, IIf([check-out_parz]<>"",[PrezzoGg]*[gg2],"") AS pr2,
DateDiff("d",[check-in],[check-out])+1 AS gg, tbl_check_in_out.prezzo,
Round([prezzo]/[gg],2) AS PrezzoGg
FROM tbl_check_in_out;

---------------

Crea una query di unione per separare i risultati e chiamala "Query2" e
incolla questo:

SELECT Query1.id, Query1.[check-in], Query1.[check-out_parz], Query1.gg1,
Query1.pr1
FROM Query1
WHERE (((Query1.[check-out_parz])<>""))
UNION SELECT Query1.id, Query1.[check-in_parz], Query1.[check-out],
Query1.gg2, Query1.pr2
FROM Query1
WHERE (((Query1.[check-in_parz])<>""))
UNION SELECT Query1.id, Query1.[check-in], Query1.[check-out], Query1.gg,
Query1.prezzo
FROM Query1
WHERE (((Query1.[check-out_parz])=""));

---------------

Poi crei l'ultima query (che ï¿œ poi il risultato che ti aspetti), chiamala
"Query3" e incolla il codice sotto:

SELECT Format([check-in],"mmmm yy") AS Periodo, Query2.pr1
FROM Query2
ORDER BY Format([check-in],"yymm");

---------------

Fammi sapere.



title: Query con date e prezzi frazionati

text:
> Fammi sapere.

Grazie Pablito, l'ho provato e funziona... ma ahimè alcune prenotazioni sono superori a un mese! Dannati turisti!!! ;-)
Il risultato è molto vicino a quello reale ma ancora non ci siamo... forse pensavo che si potrebbe provare un approccio diverso mediante una query di creazione tabella che per ogni giorno dell'anno (a partire dalla data del primo check-in fino ad oggi) dica quanto è l'incasso giornaliero.

In seguito sarebbe possibile tramite una seconda query raggruppare per mese i risultati e sommare i prezzi giornalieri.

Ti sembra logico e fattibile? Fammi sapere cosa ne pensi...

Grazie ancora,

Danielle

PS: la tabella si chiama reservations e i campi interessati sono ID_reservation (contatore), checkin, checkout, price


title: Query con date e prezzi frazionati

author: vittorio

text:
<Il problema č appunto che le prenotazioni sono spesso a cavallo <di due o
piů mesi.

qui c'č la soluzione (in inglese, per sql server,ma adattabile facilmente ad
access ),bisogna creare una tabella di appoggio con le date di fine mese.

http://www.sqlservercentral.com/Forums/Topic589668-338-1.aspx


title: Query con date e prezzi frazionati

text:
"vittorio" <
si...@alice.it
> ha scritto nel messaggio
news:50e74e34$0$6841$5fc...@news.tiscali.it...
> <Il problema � appunto che le prenotazioni sono spesso a cavallo <di due o
> pi� mesi.
>
>
> qui c'� la soluzione (in inglese, per sql server,ma adattabile facilmente
> ad
> access ),bisogna creare una tabella di appoggio con le date di fine mese.
>
>
http://www.sqlservercentral.com/Forums/Topic589668-338-1.aspx

Funziona alla grande,spezza mese per mese anche  periodi a cavallo d'anno
oppure pi� lunghi di 12 mesi .

io ho usato il seguente codice generico,basta copiarlo su SQL studio ( usa
la nuova comoda sintassi sql 2008,esempio l'istruzione SELECT CASE dentro
una query,che dovresti poter sostituire con IIF in access):

if exists (select * from tempdb..sysobjects where type = 'U' and name like
'#Tally%')

drop table #Tally

Create table #Tally

(Numbers tinyint)

-- fill the tally-table with numeric range

INSERT INTO #Tally

SELECT 0 UNION ALL

SELECT 1 UNION ALL

SELECT 2 UNION ALL

SELECT 3 UNION ALL

SELECT 4 UNION ALL

SELECT 5 UNION ALL

SELECT 6 UNION ALL

SELECT 7 UNION ALL

SELECT 8 UNION ALL

SELECT 9 UNION ALL

SELECT 10 UNION ALL

SELECT 11 UNION ALL

SELECT 12 UNION ALL

SELECT 13 UNION ALL

SELECT 14

if exists (select * from tempdb..sysobjects where type = 'U' and name like
'#DatePeriod%')

drop table #DatePeriod

Create table #DatePeriod

(StartDate DateTime,

EndDate DateTime,

Units int)

-- create the sample data

INSERT INTO #DatePeriod

SELECT '20080308', '20090416', 3 UNION ALL

SELECT '20080417', '20080430', 5 UNION ALL

SELECT '20080501', '20080629', 1 UNION ALL

SELECT '20080630', '20080714', 4 UNION ALL

SELECT '20080715', '20080902', 1 UNION ALL

SELECT '20080903', '20080930', 8 UNION ALL

SELECT '20081001', '20081022', 3

-- select and calculate the periods

SELECT

StartDate AS OriginalStartDate

, EndDate AS OriginalEndDate

, CASE WHEN (DateAdd(Month, DateDiff(month, 0, StartDate) + Numbers ,0)) <=
StartDate

THEN StartDate

ELSE DateAdd(Month, DateDiff(month, 0, StartDate) + Numbers ,0)

END AS PeriodStart

, CASE WHEN (DateAdd(Day, -1, DateAdd(Month, DateDiff(month, 0, StartDate) +
Numbers + 1 ,0))) > EndDate

THEN EndDate

ELSE DateAdd(Day, -1, DateAdd(Month, DateDiff(month, 0, StartDate) + Numbers
+ 1 ,0))

END AS PeriodEnd

, Units

FROM

#DatePeriod, #Tally

WHERE

datediff(m, StartDate, EndDate) >= Numbers

ORDER BY StartDate, Numbers

DROP TABLE #DatePeriod

DROP TABLE #Tally


title: Query con date e prezzi frazionati

text:
Grazie mille Vittorio!
Sembra promettente! Lo proverò e ti farò sapere!
Danielle


title: Query con date e prezzi frazionati

text:
> Ti sembra logico e fattibile? Fammi sapere cosa ne pensi...
>
> Grazie ancora,
>
> Danielle
>
> PS: la tabella si chiama reservations e i campi interessati sono
ID_reservation (contatore), checkin, checkout, price

certo, si puo' fare...

la tabella di appoggio l'ho chiamata "reservation_day" e si compone di:
1) tbl_id (chiave contatore)
2) id (numerico)
3) gg (date)
4) price (valuta 10 cifre decimali)

questo e' il codice:

    Dim SQLstring As String

    DoCmd.SetWarnings False
        SQLstring = "Delete * from reservation_day"
        DoCmd.RunSQL SQLstring
    DoCmd.SetWarnings True

    Dim DateTemp As Date

    Dim db As Database
    Dim rs As DAO.Recordset

    Set db = CurrentDb
    Set rs = db.OpenRecordset("reservations")

        With rs
            .MoveFirst

            While Not rs.EOF
                 Dim GiorniPrenotazione As Integer
                 GiorniPrenotazione = DateDiff("d", !checkin, !checkout) + 1

                 Dim PrezzoGiornaliero As Double
                 PrezzoGiornaliero = !price / GiorniPrenotazione

                 For DateTemp = !checkin To !checkout
                    DoCmd.SetWarnings False
                        SQLstring = ""
                        SQLstring = SQLstring & "INSERT INTO reservation_day (
id, gg, price ) "
                        SQLstring = SQLstring & "SELECT " & !ID_reservation & "
AS Espr1, "
                        SQLstring = SQLstring & "'" & Format(CVDate(DateTemp),
"dd/mm/yy") & "' AS Espr2, "
                        SQLstring = SQLstring & PrezzoGiornaliero & " AS Espr3
FROM reservations "
                        SQLstring = SQLstring & "GROUP BY " & !ID_reservation &
", '" & Format(CVDate(DateTemp), "dd/mm/yy") & "', " & PrezzoGiornaliero & ";"

                        DoCmd.RunSQL SQLstring
                    DoCmd.SetWarnings True

                 Next DateTemp

                .MoveNext
            Wend

        End With

    Set rs = Nothing
    Set db = Nothing

Questo l'SQL di risultato:
SELECT Format([gg],"mmmm yyyy") AS Data, Sum(reservation_day.price) AS Importo
FROM reservation_day
GROUP BY Format([gg],"mmmm yyyy"), Format([gg],"yymm")
ORDER BY Format([gg],"yymm") DESC;

prova e fammi sapere



title: Report e totali

author: Il Giova

text:
Salve,
ho realizzato un programma per farmi le fatture.
Tramite l'istruzione page=pages ho fatto in modo che, in caso di fatture
piï¿œ lunghe di una pagina, mi riporti il totale solo nell'ultima pagina
del report, mentre metta nelle altre la parola "segue". E fin qui tutto ok.
Poi, tramite una casella di riepilogo agganciata ad una query di
selezione, mi posso stampare, mese per mese, tutte le fatture, una di
seguito all'altra, ma non riesco a trovare un modo per stampare il
totale a fine di ogni fattura e il "segue" in tutte le altre.
Chi mi da un suggerimento?
Grazie a tutti

Il Giova


title: Report e totali

text:
Il Giova" <
ilg...@libero.it
> ha scritto nel messaggio
news:50d6da79$0$17956$4faf...@reader1.news.tin.it...
> Salve,
> ho realizzato un programma per farmi le fatture.
> Tramite l'istruzione page=pages ho fatto in modo che, in caso di fatture
> pi� lunghe di una pagina, mi riporti il totale solo nell'ultima pagina del
> report, mentre metta nelle altre la parola "segue". E fin qui tutto ok.
> Poi, tramite una casella di riepilogo agganciata ad una query di
> selezione, mi posso stampare, mese per mese, tutte le fatture, una di
> seguito all'altra, ma non riesco a trovare un modo per stampare il totale
> a fine di ogni fattura e il "segue" in tutte le altre.

cio� la stampa ti funziona quando stampi una singola fattura,ma non ti
funziona quando stampi pi� fatture insieme?


title: Report e totali

text:
>
> cioï¿œ la stampa ti funziona quando stampi una singola fattura,ma non ti
> funziona quando stampi piï¿œ fatture insieme?
>
>
Si, esatto.
Avevo pensato di fare una routine sull'evento di apertura report che
scorresse tutte le pagine del report e scrivesse su una tabella
temporanea il numero della fattura e la pagina. Poi con una query
trovavo per ogni fattura la pagina piï¿œ alta e facevo comparire il totale
solo in corrispondenza di questi, ma mi sembra troppo macchinoso!
Grazie!


title: Report e totali

text:
"Il Giova" <
ilg...@libero.it
> ha scritto nel messaggio
news:50d9cafa$0$13277$4faf...@reader2.news.tin.it...
> >
>> cio� la stampa ti funziona quando stampi una singola fattura,ma non ti
>> funziona quando stampi pi� fatture insieme?
>>
>>
> Si, esatto.
> Avevo pensato di fare una routine sull'evento di apertura report che
> scorresse tutte le pagine del report e scrivesse su una tabella temporanea
> il numero della fattura e la pagina. Poi con una query trovavo per ogni
> fattura la pagina pi� alta e facevo comparire il totale solo in
> corrispondenza di questi, ma mi sembra troppo macchinoso!
> Grazie!

Immagino che il tuo report sia raggruppato per numero fattura, quindi invece
di stampare il totale nel pi� di pagina report stampalo nel pi� di pagina
del
gruppo che nel tuo caso � il numero fattura.
Quanto al numero di pagine, reimpostalo a 1 per ogni intestazione fattura.


title: Report e totali

text:
>
>
> Immagino che il tuo report sia raggruppato per numero fattura, quindi invece
> di stampare il totale nel piï¿œ di pagina report stampalo nel piï¿œ di pagina
> del
> gruppo che nel tuo caso ï¿œ il numero fattura.
> Quanto al numero di pagine, reimpostalo a 1 per ogni intestazione fattura.
>

Ok per il totale. Volevo perï¿œ mettere la parola "segue" al posto del
totale e non sapevo come fare.
Grazie al tuo suggerimento ho trovato poi questo :

http://support.microsoft.com/kb/131937/it

e ho risolto!
Grazie ancora!


title: La grande Guida di Access 7.0 in italiano

author: vuLCan Karayan

text:
Salve a tutti.
Ho trovato un asta su eBay molto interessante... eh eh eh:
http://cgi.ebay.it/ws/eBayISAPI.dll?ViewItem&item=3634062108&category=182&rd
=1
Ciao
vuLCan


text:
"vuLCan Karayan" <
vulcankar...@hotmail.com
> ha scritto nel messaggio
news:17ymb.351680$R32.11...@news2.tin.it...

Visto che si riferisce ad Access 95 (versione non molto usata), penso che
abbia solo un valore per un collezionista. ;-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Id numerici e autoincremento in sottomaschere.

author: Gomez

text:
Dopo aver dato un occhio al sito comune ho scaricato il file che
spiega il funzionamento dell'autoincremento negli ID numerici.
Vengo subito al punto, ho una maschera  che visualizza i dati del
cliente ed una sottomaschera correlata in formato tabella dati che
"riepiloga" tutte le pratiche a nome del singolo cliente.
Dovendo utilizzare un campo numerico con autoincremento nella
sottomaschera ho impostato il campo  valore predefinito come risultato
della funzione CalcolaIdnumerico():
Function CalcolaIdnumerico() As Long
  Dim RS As Recordset

    Set RS = CurrentDb.OpenRecordset("SELECT Pratiche.CodPratica FROM
Pratiche ORDER BY Pratiche.CodPratica;")

    If RS.EOF Then
          CalcolaIDnumerico = 1
    Else
          RS.MoveLast
          CalcolaIDnumerico = RS!CodPratica + 1
    End If

  RS.Close
  End Function
Il problema è che una volta aperta la maschera, nella sottomaschera
correlata il primo valore mi viene presentato in maniera corretta,
inserita una nuova pratica il valore della  successiva dovrebbe
incrementarsi ma cio' non avviene, il valore è ancora il primo
proposto.
Per farla breve credo che il problema risieda nel fatto che la tabella
Pratiche viene aggiornata solo alla chiusura della maschera.
Spero che la mia domanda non sia banale, grazie per l'attenzione.


author: Basjlico

text:
Nel lontato Tue, 22 Feb 2000 08:37:44 +0100 d.C., il simpatico Gomez
<mis2ndg...@ANTISPAMyahoo.com> ebbe a scrivere:

Non va bene un semplice
CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
L'unico problema che ti si pone è alla prima pratica, dove dmax
dovrebbe restituirti un errore comunque inercettabile
if err.number = [NonMiRicodoMòCosìSuDuePiedi] then
 CalcoloNumerico = 1
else
 Msgobox err.number & vbnewline & err.desription
end if

Ciao
Basjlico


text:
>Non va bene un semplice
>CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
>L'unico problema che ti si pone è alla prima pratica, dove dmax
>dovrebbe restituirti un errore comunque inercettabile
Il problema rimane poichè quando vado ad inserire una pratica nella
sottomaschera,  la tupla che comincio ad inserire contiene il
progressivo di pratica corretto, subito pero' mi viene proposto anche
il codice della pratica successiva (sbagliato perchè il calcolo
dovrebbe considerare anche la tupla che è in inserimento) che ha come
codice lo stesso della pratica in inserimento.
Grazie per l'attenzione.


author: Ditta Cerri (Sib)

text:
Gomez <mis2ndg...@ANTISPAMyahoo.com> wrote in message
3rd4bskf1i67c3crl...@4ax.com...
> Dopo aver dato un occhio al sito comune ho scaricato il file che
> spiega il funzionamento dell'autoincremento negli ID numerici.
>
> Vengo subito al punto, ho una maschera  che visualizza i dati del
> cliente ed una sottomaschera correlata in formato tabella dati che
> "riepiloga" tutte le pratiche a nome del singolo cliente.
>
> Dovendo utilizzare un campo numerico con autoincremento nella
> sottomaschera ho impostato il campo  valore predefinito come risultato
> della funzione CalcolaIdnumerico():
>
> Function CalcolaIdnumerico() As Long
>   Dim RS As Recordset
>
>     Set RS = CurrentDb.OpenRecordset("SELECT Pratiche.CodPratica FROM
> Pratiche ORDER BY Pratiche.CodPratica;")
>
>     If RS.EOF Then
>           CalcolaIDnumerico = 1
>     Else
>           RS.MoveLast
>           CalcolaIDnumerico = RS!CodPratica + 1
>     End If
>
>   RS.Close
>
>   End Function
>
> Il problema è che una volta aperta la maschera, nella sottomaschera
> correlata il primo valore mi viene presentato in maniera corretta,
> inserita una nuova pratica il valore della  successiva dovrebbe
Per nuova pratica intendi un nuovo record della maschera o della
sottomaschera?
> incrementarsi ma cio' non avviene, il valore è ancora il primo
> proposto.
> Per farla breve credo che il problema risieda nel fatto che la tabella
> Pratiche viene aggiornata solo alla chiusura della maschera.
In tutto questo hai dimenticato di specificare *DOVE* hai messo la funzione
che ti calcola l'ID.
Ciao, Sib


author: Lorenzo Coronati

text:
Scrisse Basjlico <
basj...@tin.it
>:
>CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
>L'unico problema che ti si pone è alla prima pratica, dove dmax
>dovrebbe restituirti un errore comunque inercettabile
C'e' sempre il buon vecchio nz
CalcoloNumerico = nz(dmax("CodPratica","Pratiche"),0) +1

--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


text:
Gomez <mis2ndg...@ANTISPAMyahoo.com> wrote in message
lfl5bss5u0qn2jqst...@4ax.com...
>
> >Non va bene un semplice
> >CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
> >L'unico problema che ti si pone è alla prima pratica, dove dmax
> >dovrebbe restituirti un errore comunque inercettabile
>
> Il problema rimane poichè quando vado ad inserire una pratica nella
> sottomaschera,  la tupla che comincio ad inserire contiene il
La TUPLA??! Che e' la tupla?
> progressivo di pratica corretto, subito pero' mi viene proposto anche
> il codice della pratica successiva (sbagliato perchè il calcolo
> dovrebbe considerare anche la tupla che è in inserimento) che ha come
> codice lo stesso della pratica in inserimento.
>
> Grazie per l'attenzione.
Prego, ma hai letto il mio post di prima? Forse no, quindi ti ripeto la
domanda (che ovviamente NON era retorica NE' critica)
DOVE hai messo il codice o la formula che ti calcola l'ID?
Ciao, Sib


text:
Nel lontato Tue, 22 Feb 2000 19:44:48 +0100 d.C., il simpatico Gomez
<mis2ndg...@ANTISPAMyahoo.com> ebbe a scrivere:
>
>>Non va bene un semplice
>>CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
>>L'unico problema che ti si pone è alla prima pratica, dove dmax
>>dovrebbe restituirti un errore comunque inercettabile
>
>Il problema rimane poichè quando vado ad inserire una pratica nella
>sottomaschera,  la tupla che comincio ad inserire contiene il
>progressivo di pratica corretto, subito pero' mi viene proposto anche
>il codice della pratica successiva (sbagliato perchè il calcolo
>dovrebbe considerare anche la tupla che è in inserimento) che ha come
>codice lo stesso della pratica in inserimento.
>
>Grazie per l'attenzione.
>
Sorry, non ho capito una mazza. Che è la tupla?
Ciao
Basjlico


author: Antonio Biso

text:
Ditta Cerri (Sib) ha scritto nel messaggio
<890s8j$ua6$
3...@lacerta.tiscalinet.it
>...
>
>Gomez <mis2ndg...@ANTISPAMyahoo.com> wrote in message
>lfl5bss5u0qn2jqst...@4ax.com...
>>
>> >Non va bene un semplice
>> >CalcoloNumerico = (dmax("CodPratica","Pratiche")) +1?
>> >L'unico problema che ti si pone è alla prima pratica, dove dmax
>> >dovrebbe restituirti un errore comunque inercettabile
>>
>> Il problema rimane poichè quando vado ad inserire una pratica nella
>> sottomaschera,  la tupla che comincio ad inserire contiene il
>
>La TUPLA??! Che e' la tupla?
E' come una ennupla, però più fica!
Antonio


text:
>> Il problema è che una volta aperta la maschera, nella sottomaschera
>> correlata il primo valore mi viene presentato in maniera corretta,
>> inserita una nuova pratica il valore della  successiva dovrebbe
>
>Per nuova pratica intendi un nuovo record della maschera o della
>sottomaschera?
Hai ragione scusa, non sono stato chiaro,  intendevo nuovo record
della sottomaschera, la maschera principale infatti visualizza i dati
del cliente, la sottomaschera le pratiche a suo carico.
>> incrementarsi ma cio' non avviene, il valore è ancora il primo
>> proposto.
>> Per farla breve credo che il problema risieda nel fatto che la tabella
>> Pratiche viene aggiornata solo alla chiusura della maschera.
>
>In tutto questo hai dimenticato di specificare *DOVE* hai messo la funzione
>che ti calcola l'ID.
La funzione è stata messa come valore predefinito del campo CodPratica
nella sottomaschera, tale campo ha come Origine controllo l'omonimo
campo nella tabella Pratiche.
Grazie per l'attenzione


text:
>La TUPLA??! Che e' la tupla?
>
E' una riga di una tabella.
Se si rappresentano le relazioni con tabelle, gli elementi
appartanenti alla relazione sono identificati da una riga della
tabella.
Un riga di Pratiche:
#CodPratica,CodCliente,Descrizione,InizioLavori,FineLavori
Quando inserisco una riga nella sottomaschera inserisco una tubla
nella tabella Pratiche.
Effettivamente se scrivessi come mangio non avrei certo problemi con
Access.  ;- )
P.s. Scusate eventuali inesattezze nella definizone.
>Prego, ma hai letto il mio post di prima? Forse no, quindi ti ripeto la
>domanda (che ovviamente NON era retorica NE' critica)
>DOVE hai messo il codice o la formula che ti calcola l'ID?
No, l'ho letto adesso dopo aver letto questo (li ho scaricati
insieme)....
La risposta l'ho postata in coda al tuo primo messaggio.
Grazie a tutti.


text:
> La TUPLA??! Che e' la tupla?
Una relazione puo' essere vista come una tabella le cui righe sono dette
tuple.
Ogni tupla rappresenta un elemento della relazione.
Ogni riga della tabella Pratiche rappresenta una pratica.
Scusate eventuali inesattezze... E' tardi e copio male dal libro... ! ;)
> Prego, ma hai letto il mio post di prima? Forse no, quindi ti ripeto la
> domanda (che ovviamente NON era retorica NE' critica)
> DOVE hai messo il codice o la formula che ti calcola l'ID?
No, non l'avevo ancora letto, scusa.
1-Per nuova pratica intendo un nuovo record nella sottomaschera pratiche.
2-La funzione che calcola l'ID è messa come valore predefinito del campo
CodPratica
   nella sottomaschera Pratiche. Tale campo ha come origine controllo il
campo
   CodPratica  della tabella Pratiche.


author: AntoGal

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
8915vc$445$3...@pegasus.tiscalinet.it...
> >La TUPLA??! Che e' la tupla?
>
> E' come una ennupla, però più fica!
Ah, ecco perchè analizzandola con la funzione SoundEx, mi suggerisce Topa...
;-)
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


text:
Gomez <
mis...@yahoo.com
> wrote in message 891uhq$lgh$1...@nslave1.tin.it...
> > La TUPLA??! Che e' la tupla?
>

Ecco l'errore (è il motivo per cui ti ho fatto la domanda)
Mettendo il codice che calcola l'ID nella sottomaschera questo ti incrementa
di 1 l'ID ogni volta che aggiungi un record alla sottomaschera.
Il codice che calcola l'ID deve stare solo nella maschera principale, il
valore predefinito dell'ID della sottomaschera deve essere il valore
corrente dell'ID della maschera principale.
Ciao, Sib


text:
> Ecco l'errore (è il motivo per cui ti ho fatto la domanda)
> Mettendo il codice che calcola l'ID nella sottomaschera questo ti
incrementa
> di 1 l'ID ogni volta che aggiungi un record alla sottomaschera.
> Il codice che calcola l'ID deve stare solo nella maschera principale, il
> valore predefinito dell'ID della sottomaschera deve essere il valore
> corrente dell'ID della maschera principale.
Ho risolto il problema mettendo la chiamata alla funzione Ricalcola dopo
l'Evento aggiornamento del campo descrizione nella sottomaschera.
La funzione Ricalcola()  contiene solo una riga di codice.
Me.Recalc
Grazie mille a tutti!


title: Select Case!!

author: bizio

text:
Ciao a tutti,
ho questa Routine sull'apertura di una maschera per autenticare
l'accesso:
Private Sub Form_Open(Cancel As Integer)
Dim nome
nome = InputBox("Inserisci la tua password per l'autenticazione
Utente:")
Select Case nome
Case "mario"
MsgBox ("Ciao, " & nome & " sei autorizzato ad accedere alla
maschera")
Case "giovanni"
MsgBox ("Ciao, " & nome & " sei autorizzato ad accedere alla
maschera")
End Select
End Sub
Cosi però ho 2 problemi che dovrei risolvere:
1-Non so con la Case come specificare che gli altri nomi non possono
accedere (ovvero come si scrive la parte "else")
2-Con la inputbox ho i pulsanti OK e Annulla e quando apro la maschera
se l'utente preme "annulla" la maschera si apre ugualmente
"bypassando" i controlli specificati nella routine!
Potete aiutarmi?
Via ringrazio


title: Select Case!!

author: MA

text:
"bizio" <
fabriz...@libero.it
> ha scritto nel messaggio news:1181904676....@u2g2000hsc.googlegroups.com...


Potete aiutarmi?
Via ringrazio
___
case else
cancel = true


title: Select Case!!

text:
On 15 Giu, 13:14, "MA" <
mas...@massimilianoamendola.it
> wrote:
> "bizio" <
fabriziol...@libero.it
> ha scritto nel messaggionews:1181904676....@u2g2000hsc.googlegroups.com...

grazie perfetto buona giornata a tutti


title: per togliere i pulsanti di access in alto a destra "Riduci a icona" Rirpistina e Chiudi "X"

text:
nel modulo ho dichiarato le seguanti
----------------------------------------------------
Private Const GWL_STYLE = -16
Private Const WS_SYSMENU = &H80000
Private Const WS_MINIMIZEBOX = &H20000
Private Const WS_MAXIMIZEBOX = &H10000
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As
Long
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Public Sub LockAppWindow(fForm As Form)
    ModifyAppWind fForm.hwnd
End Sub
Private Sub ModifyAppWind(wChildWnd)
End Sub
----------------------------------------------------------------------------
--
nel codice utilizzo
LockAppWindow Screen.ActiveForm
ma di da il seguente errore
la finestra deve essere la finestra attiva
mi sapreste aiutare? grazie.


author: BiBi

text:
On Mon, 08 Jul 2002 18:59:54 GMT, "@----- Pinco --@-- Pallino -----@"
<
tos...@libero.it
> wrote:
[cut]
>
>nel codice utilizzo
>
>LockAppWindow Screen.ActiveForm
>
>ma di da il seguente errore
>
>la finestra deve essere la finestra attiva
>
>mi sapreste aiutare? grazie.
>
>
>
Un esempio per togliere i pulsanti della maschera di access con
l'utilizzo delle API lo puoi trovare sul sito Comune
(
http://www.sitocomune.com
) , nella Sezione General "Eliminare i
Pulsanti di Controllo di MSAccess, utilizzando le API."
Ciao BB


text:
"BiBi" <
bb...@gostec.it
> ha scritto nel messaggio
news:3d2a9d4b...@powernews.infostrada.it...

infatti proprio quello utilizzo, booo! ora lo riscarico e riprovo, si vede
che ho fatto qualche errore. grazie.


title: Problema copia e contenuto db con windows vista

author: Ivan

text:
Salve a tutti, vi espongo il mio problema: circa un anno fa ho trasferito un
programma di magazzino da un pc con Windows XP e runtime 2003 in un nuovo
notebook con Windows Vista e runtime 2003. Il programma gira perfettamente.
A un anno di distanza volevo copiare l' mdb in un nuovo pc con xp ma con mia
sorpresa nel db vedo solo i dati presenti sino al momento del passaggio da
xp a vista (2008), ma non quelli "nuovi", mentre dal programma vedi
perfettamente tutti i dati. Ho fatto alcune prove e ho notato che
disabilitando l'UAC anche dal pc con vista non vedo + i nuovi dati,
riabilitando l'UAC vedo nuovamente tutto. Come posso copiare il database con
tutti i dati aggiornati? Come � possibile che nella tabella non vi siano i
dati di quest'anno?
Grazie 1000


title: Problemi con il collegamento delle tabelle.

author: Rita

text:
Salve!
Scusate, ma non capisco perchè quando vado a cliccare sulle tabelle
collegate oppure quando voglio cancellarle mi dà il solito errore della
Microsoft:....non inviare..ecc.
Il DB si chiude all'improvviso.
Sto lavorando sul Db, ma niente di strano,boh......perchè questo errore?
Ho il BE ed il FE, mai problemi con il collegamento e questa volta sì.
Ho provato a ricopiare tutto in un Db nuovo, ma si verifica sempre lo stesso
errore.
Potete dirmi qualcosa...?
Grazie
Ciao
Rita


title: Come 'attaccarsi' a db diversi senza ricollegare le tabelle ?

author: RobertoA

text:
Scenario => Access 200/2003 + odbc + db server
Per usare lo stesso gestionale con db diversi (multiazienda) all'interno
dello stesso ufficio, dispongo di una procedura che, dopo aver selezionato
la fonte dati odbc desiderata mi ricollega alle tabelle del db stesso
Va tutto bene eccetto la velocita di ricollegamento, infatti per circa
duecento tabelle ci mette una ventina di secondi, forse ci mette meno ma
comunque mi sembra tempo buttato via
Vorrei diminuire velocita' di ricollegamento tabelle o meglio ancora
eliminarla del tutto
Pensavo di usare un unico front-end con le form, moduli, report ed un
secondo mdb/mde solamente con le tabelle collegate al dsn corretto
Un unico mdb/mde col programma e tanti mdb/mde con i link ai dati veri e
propri, per cambiare azienda basterebbe dire al programma "desso usa el
PINCO_DATI.MDB come link ai dati" oppure "desso dopra el PALLINO_DATI.MDB
come link ai dati"
Pensate sia possibile ?
Quali contro ha una soluzione di questo tipo ?
Potete suggerirmi un modo migliore di affrontare questo problema ?
Ciao e grazie
RobertoA


author: Alessandro Baraldi

text:

Come si farebbe da VB6 ....
Prova a leggere in merito all'Oggetto Connection(DAO) nel caso in cui
tu voglia usare DAO oppure per ADO anche...
@Alex


text:

Ora uso Dao
Non capisco cosa intendi con "..come si farebbe con VB6.."
E come si farebbe ?
Ciao e grazie
RobertoA


author: Oscar Manfredini

text:
"RobertoA" <
> Scenario => Access 200/2003 + odbc + db server
> Per usare lo stesso gestionale con db diversi (multiazienda) all'interno
> dello stesso ufficio, dispongo di una procedura che, dopo aver selezionato
> la fonte dati odbc desiderata mi ricollega alle tabelle del db stesso
> Va tutto bene eccetto la velocita di ricollegamento, infatti per circa
> duecento tabelle ci mette una ventina di secondi, forse ci mette meno ma
> comunque mi sembra tempo buttato via
> Vorrei diminuire velocita' di ricollegamento tabelle o meglio ancora
> eliminarla del tutto
> Pensavo di usare un unico front-end con le form, moduli, report ed un
> secondo mdb/mde solamente con le tabelle collegate al dsn corretto
> Un unico mdb/mde col programma e tanti mdb/mde con i link ai dati veri e
> propri, per cambiare azienda basterebbe dire al programma "desso usa el
> PINCO_DATI.MDB come link ai dati" oppure "desso dopra el PALLINO_DATI.MDB
> come link ai dati"
> Pensate sia possibile ?
>
Mi sono perso qualcosa: se non vuoi riscrivere la procedura (senza linked
tables) avresti bisogno comunque di 'collegare' le tabelle al db con le tab
'collegate'.
Ammesso che funzioni; mai provato una cosa simile.
Non sarebbe più semplice creare varie copie del tuo Front-End, collegate
(solo la prima volta) alle fonti dati diverse?
A seconda delle necessità si avvia un FE piuttosto che un altro...


text:

Scusa ma ho completamente frainteso il senso...!
Leggendo la risposta di Oscar mi è sorto il dubbio... non avevo capito
una Mazza...
@Alex


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4948d26f$0$1114$4faf...@reader3.news.tin.it...

No non sarebe piu' semplice perche' ogni volta che aggiorno il front-end
dovrei inviar n-font-end tutti uguali, solamente col collegamento a tabelle
diverse
E non posso farlo neanche farlo io il collegamento, lo deve fare il cliente
sulle sue postazioni perche' il percorso db e' diverso dalle nostre
postazioni di sviluppo
Quindi ad ogni aggiornamento, il cliente dovrebbe ciucciarsi
n-ricollegamenti
Studio professionale con 50 clienti diversi -->> 50 db diversi -->> 50
ricollegamenti -->> telefonate assistenza "..ou senti qua, passame n'attimo
el paron che devo dirghe guatro baroline..."
Quello che volevo sapere e' se mettendo un 'qualcosa' in mezzo tra programma
e dati, potessi switchare piu' rapidamente
Cioe' se dal programma, facessi riferimento alle tabelle contenute in un
mdb/mde esterno, basterebbe avere tanti di questi mdb/mde esterni e da
programma scegliere l'uno o l'altro
Nel mdb/mde esterno ci dovrebbero essere le tabelle collegate ad database
corretto
Mi sembra un po' pastrocchiata la cosa, certo che se ci fose un'alternativa
migliore, potrei preferire l'alternativa
Ciao
RobertoA


text:
"RobertoA" <
> Mi sembra un po' pastrocchiata la cosa, certo che se ci fose
> un'alternativa migliore, potrei preferire l'alternativa
Certo che è pastrocchiata: la cosa migliore è che aspettino quei venti
secondi (e che diavolo...)
Resta il fatto che la soluzione che t'ho proposto è perfettamente
implementabile, con un minimo di gestione.
Ho già notato che tu fai sorbire alla clientela la fase di riconnessione al
Back-end, dopo un aggiornamento, mentre si può facilmente automatizzare.
N Front-Ends tutti uguali, ognuno in una cartella diversa, ognuno punta a un
diverso DB.
- UPDATE del FE (nuova versione scaricata da tuo sito web) in un path
stabilito
- L'utente esegue un .BAT opportunamente predisposto che copia il FE in
tutte le altre cartelle.
- Viene avviato uno dei FE, da una qualunque cartella
- Su avvio procedura si testa la presenza della Base Dati
      - Se viene restituito errore di Runtime (base dati non trovata) apre
nello stesso Path del FE un file .TXT che contiene la stringa DSN di
collegamento
              - Esegui riconnessione automatica al DB
Ciao: Oscar


text:
On 18 Dic, 16:15, "Oscar Manfredini" <
oscar.manfred...@libero.it
>
wrote:

Ne sai una più del diavolo pur di non lavorare....
;-)
@Alex


text:
"Alessandro Baraldi" <
Ne sai una più del diavolo pur di non lavorare....
;-)
>
Ah, ma a non aver voglia di lavorare sono i maledetti utenti  ;)
Ciao: Oscar


title: Come ci si dovrebbe comportare in un newsgroup, ovvero 'Istruzioni per l'uso' (g)

author: Roberto dalla campagna

text:
Ecco alcune regole pubblicate sul nostro Sito Comune e che è auspicabile
vengano rispettate da tutti i frequentatori di questo NG.
==============================================
Anche i newsgroups, come tutte le comunita' di esseri umani, hanno delle
regole la cui conoscenza e rispetto permette un proficuo utilizzo del ng da
parte di tutti i partecipanti evitando incomprensioni, malintesi ed inutili
polemiche.
Alcune regole sono generali e di elementare educazione, altre proprie di
questo gruppo di discussione cresciute e consolidate nel tempo soprattutto
con il contributo dei frequentatori piu' anziani.
Premesso che
il ng e' gestito da 'volontari' che mettono a disposizione gratuitamente il
proprio tempo, le proprie conoscenze e la loro professionalita' per aiutare
chiunque, persone che spesso non conoscono e che dalle quali non riceveranno
alcun compenso, per cui qualsiasi forma di pretesa o obbligo da parte di chi
scrive sono decisamente fuori luogo:
- prima di inviare la propria richiesta provate a verificare se nei messaggi
dei giorni precedenti non siano gia' presenti delle soluzioni al quesito che
si vuole porre.
Non e' il massimo delle figure fare una domanda a cui e' gia' stata data
ampia ed esauriente risposta magari il giorno prima, di sicuro poi
l'eventuale replica difficilmente potra' essere piu' completa.
Si possono effettuare delle ricerche nell'archivio storico del Sito Comune.
- provate anche a verificare che i vostri dubbi e le relative soluzioni non
siano gia' presenti sul Sito Comune di questo newsgroup:
http://www.sitocomune.com
Se si decide comunque di scrivere al ng sarebbe bene tenere presente:
Il SUBJECT
-------------------
Nello scrivere l'oggetto del messaggio si dovrebbe dare maggiore importanza
perche' contribuisce ad identificare immediatamente l'argomento e il tipo
diproblema, attirando subito l'attenzione di chi legge.
Si sconsiglia di inserire subject insignificanti come:
'AIUTO','URGENTE','PROBLEMA ACCESS', 'SOLO PER ESPERTI' 'SONO PRINCIPIANTE',
'SONO DEFICIENTE', 'come si fa...' ECC.,
nel marasma generale dei messaggi perdono visibilita'.
Ecco invece alcuni esempi da considerarsi corretti:
- Gestire il tasto Applica Filtro/Rimuovi Filtro
- Sincronizzare repliche via Internet con Access 2000
- Formattazione diversa per il solo record selezionato
- Come ricercare in una casella combinata
- Formato Numerico Nelle query
- Copia e incolla di piu' dati nello stesso campo
TESTO DEL MESSAGGIO
-------------------
Anche qui, soprattutto nell'interesse di chi posta il messaggio, il suo
contenuto dovrebbe essere pensato e redatto con attenzione al fine di
evitare la spedizione di messaggi incomprensibili, che non potranno avere
risposte immediate soddisfacenti.
E' consigliabile indicare la versione di MSAccess a cui ci si riferisce ed
il sistema operativo utilizzato (A2/W95, A95/W98, A97/NT4, A00/W00).
Se dopo aver inviato un messaggio non si dovessero ricevere risposte si puo'
provare a riformularlo evitando pero' di assumere un tono polemico del tipo
'Possibile che nessuno sappia come ...', 'Perche' non mi volete rispondere'
I motivi per cui certi messaggi non ricevono risposte possono essere i
piu'svariati, dalla domanda mal posta, al fatto che nessuno effettivamente
abbia una risposta da dare.
*Alcuni consigli per chi risponde*
- Scrivere dopo il quoting
Quando si replica (risponde) ad un messaggio si dovrebbe iniziare a scrivere
sempre dopo il testo del precedente.
Lasciare il contenuto del testo originario se breve, oppure riassumere il
contenuto tagliando le parti meno significative, lasciando quelle
piu'interessanti per la comprensione del discorso.
- Non farsi coinvolgere in polemiche con altri partecipanti ed eventuali
disaccordie sarebbe meglio proseguirle in e-mail private.
Alcune richieste o comportamenti *sicuramente* non graditi in questo ng:
- chiedere di programmi per 'sproteggere' database e quindi presumibilmente
il lavoro di altre persone.
Oltre a non essere moralmente corretto, e' illegale, inoltre, considerando
che in questo ng possono esserci persone che si guadagnano la pagnotta
sviluppando programmi con Access, non ci sembra corretto contribuire a
diffondere questo tipo di informazioni;
- richiedere risposte personalizzate al proprio indirizzo e-mail e' contro
lo spirito di questo ng in cui si presuppone che tutte le domande e tutte le
risposte debbano essere visibili perche' potrebbero interessare a tutti;
- contattare direttamente altri frequentatori del ng inviando richieste di
informazioni via e-mail, magari a quelli che sembrano piu' bravi e piu'
disponibili di tutti ad aiutare gli altri;
- chiedere del compilatore di access, semplicemente perche' non esiste, lo
sanno anche i bambini ormai;
- chiedere l'invio di programmi gia' fatti con la scusa di dover imparare,
vedere, bla bla bla;
- inviare messaggi con pubblicita' commerciale anche se riferita all'oggetto
del ng. (ben vengano segnalazioni di siti o iniziative free che parlano di
Access, anche se personali, ma il tutto deve sempre essere senza scopo di
lucro;
Alcune regole legate invece alla netiquette, dove con il termine netiquette
'retichetta', si intende l'insieme di regole nate col tempo per autoregolare
il comportamento degli utenti delle news.
- EVITARE DI SCRIVERE IN MAIUSCOLO sia gli oggetti e soprattutto il testo
dei messaggi che nelle regole equivale ad urlare;
- Scrivere in formato testo e non in HTLM (quindi con formattazioni varie),
questo perche' non tutti i lettori di messaggi (newsreader) visualizzano
correttamente questo formato;
- Evitate le polemiche personali con gli altri partecipanti.
Se proprio non potete farne a meno cercate di trasferirle in privato.
Alcuni link per chi volesse approfondire:
The Net: Guida per l'utente e Netiquette, di Arlene Rinaldi
http://www.inferentia.it/netiquette/
Etica e norme di buon uso dei servizi di rete
http://web.tiscalinet.it/enterprise_videotext/itamidi/netiquette/netiquetteit.htm
ATTENZIONE
I successivi sono testi carichi d'ironia, cioe' sono suggerimenti da
EVITARE!
GALAMAILEO di John of the Homepage
http://www.mamofaq.usenet.eu.org/FAQ-galamalileo.txt
Cara Emily Postnews...
http://uniper.unimo.it/uniper/cara_emily_postnews.htm
Grazie per la collaborazione
Questo documento e' stato redatto da Carlo VE
----------------------------------------------------------------------------
Alcune utili abbreviazioni (acronimi)
AFAIK As Far As I Know
BTW By The Way
CU See You
CUL8R See You Later
CUT Taglio (quando non si riporta tutto il testo a cui si risponde)
HTH Hope This Helps
IMO In My Opinion
IMHO In My Humble Opinion
LOL Laughing out loud
NEWBIE Nuovo arrivato, persona nuova per il NG
NG Newsgroup
OT Off-Topic: fuori argomento
ROTFL Rolling on the floor laughing
ROTFLASTC Rolling on the floor laughing and scaring the cat
ROTFLMAO Rolling on the floor laughing my ass off
RTFM Read the fuckin' manual
SPAM Messaggio pubblicitario fortemente OT, sui NG è assolutamente vietato
TIA Thanks In Advance
TROLL Persona che vuole solo creare disturbo e scompiglio
Ce ne sono tanti altri, li trovate qui:
http://www.acronymfinder.com


title: riferimento controllo

author: Giuseppe

text:
Salve a tutto l'NG.
Nelle mie maschere di inserimento, per selezionare il codice cliente o
fornitore, utilizzo una maschera di ricerca che viene aperta su evento
keydown del controllo o su click di un pulsante con il codice
DoCmd.OpenForm "RicercaAnagrafica", , , , , , Me.Name
Dopo aver selezionato il  codice o premendo invio o il pulsante
conferma con il codice
Forms(Me.OpenArgs).idanagrafica = Forms!RicercaAnagrafica!
Elenconominativi
chiudo la maschera di ricerca e in automatico mi viene digitato il
codice cliente o fornitore.
Il problema nasce nella maschera di inserimento protocollo, dove ho
previsto che possa inviare una corrispondenza che abbia fino a 5
anagrafiche diverse (per conoscenza) e quindi ho creato nella tabella
Protocollo i campi Idanagrafica2, Idanagrafica3, Idanagrafica4 e
Idanagrafica5.
Come faccio a far riconoscere alla maschera di ricerca oltre alla
maschera chiamante anche il controllo che esegue la ricerca?
Spero di essere stato chiaro e ringrazio in anticipo per le risposte.
Ciao.
Giuseppe.


title: riferimento controllo

author: Carlo Costarella

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto nel messaggio
news:fd0d3582-42ee-40fb...@d36g2000prf.googlegroups.com...

Per esempio creando una variabile globale che valorizzi al click del
controllo.
Ciao, Carlo


title: riferimento controllo

text:
On 19 Nov, 07:49, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "Giuseppe" <
gcardas...@tin.it
> ha scritto nel messaggionews:fd0d3582-42ee-40fb...@d36g2000prf.googlegroups.com...

Grazie Carlo per la risposta.
Non essendo molto esperto nella creazione di variabili, e sapendo di
non poter chiedere ed avere la pappa pronta, chiedo almeno di fornirmi
indicazioni dove trovare degli esempi o riferimenti a siti per
approfondire la soluzione e adattarla al mio quesito.
Grazie anticipate.
Ciao.
Giuseppe.


title: riferimento controllo

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto nel messaggio
news:56adba36-cfd5-4eac...@f37g2000pri.googlegroups.com...


-------------------
Cosě, al volo:
crea una variabile globale di tipo stringa in un modulo pubblico:
Dim MioNomeControllo as string
Poi al click di un pulsante:
Private Sub Comando0_Click()
MioNomeControllo  =
Screen.ActiveControl.Name
End Sub
Ora andando a leggere la variabile ottieni il nome del controllo:
Public Function DimmiNomeControllo()as String
DimmiNomeControllo = NZ(MioNomeControllo ,"")
End Function
Ciao, Carlo


title: riferimento controllo

text:
On 20 Nov, 09:53, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "Giuseppe" <
gcardas...@tin.it
> ha scritto nel messaggionews:56adba36-cfd5-4eac...@f37g2000pri.googlegroups.com...

> Così, al volo:
> crea una variabile globale di tipo stringa in un modulo pubblico:
> Dim MioNomeControllo as string
> Poi al click di un pulsante:
> Private Sub Comando0_Click()
> MioNomeControllo  =
Screen.ActiveControl.Name
> End Sub
>
> Ora andando a leggere la variabile ottieni il nome del controllo:
> Public Function DimmiNomeControllo()as String
> DimmiNomeControllo = NZ(MioNomeControllo ,"")
> End Function
>
> Ciao, Carlo
Grazie Carlo per la risposta.
Abbi pazienza ci sto provando.
Ho fatto così:
in un modulo ho scritto:
Option Compare Database
Dim MioNomeControllo As String
-------------------------------------------------------------------------------------------
Public Function DimmiNomeControllo() As String
DimmiNomeControllo = Nz(MioNomeControllo, "")
End Function
e l'ho salvato come "Riferimento Controllo"
poi nella maschera frmProtocollo ho creato un pulsante (Comando128) e
su evento click ho messo:
MioNomeControllo =
Screen.ActiveControl.Name
ovviamente non succede nulla.
Ho già sbagliato qualcosa? Cosa devo cambiare. Scusami, ma sulle
variabili sono molto indietro.
Magari potessi studiarli o con delle guide o con degli esempi.
Mi puoi aiutare, per favore nell'apprendimento?
Grazie Carlo.
Giuseppe.


title: riferimento controllo

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto nel messaggio
news:bbe690fa-686e-4f80...@v13g2000yqm.googlegroups.com...






-----------------------------------------
E cosa doveva succedere?
Hai riempito la variabile....ti ho scritto che a questo punto puoi ricavarla
dalla funzione
DimmiNomeControllo e farne quello che vuoi.
Per esempio:
msgbox "Il nome del controllo che esegue la ricerca è: " &
DimmiNomeControllo
Ciao, Carlo


title: riferimento controllo

text:
On 20 Nov, 18:56, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "Giuseppe" <
gcardas...@tin.it
> ha scritto nel messaggionews:bbe690fa-686e-4f80...@v13g2000yqm.googlegroups.com...

Scusa Carlo, so che è snervante comunicare con uno che non parla la
stessa lingua, ma ripeto voglio capire il funzionamento delle
variabili e non avere questa soluzione già pronta e poi ritrovarmi a
dover creare un'altra senza saper procedere.
Ricapitolando:
MODULO:
Option Compare Database
 Dim MioNomeControllo As String
e lo salvo come "Riferimento Controllo"
nella maschera frmProtocollo su evento keydown dei controlli
IdAnagrafica2, 3 4 e 5 metto:
MioNomeControllo =
Screen.ActiveControl.Name
If KeyCode = vbKeyF2 Then
DoCmd.OpenForm "RicercaAnagrafica", , , , , , Me.Name
End If
DimmiNomeControllo = Nz(MioNomeControllo, "")
dove lo metto?
E su conferma del record selezionato nella maschera di ricerca devo
cambiare
Forms(Me.OpenArgs).idanagrafica = Forms!RicercaAnagrafica!
Elenconominativi?
Non ti innervosire, purtroppo non è facile trovare questa soluzione
leggendo i post degli altri.
Se mi indichi siti o esempi per la creazione di variabili e la loro
applicabilità nelle maschere, me li stampo e me li studio.
Già altre volte, problemi risolvibili solo con le variabili, ho dovuto
abbandonarli perchè non sono riuscito a capire la procedura delle
variabili e non ho più avuto aiuto da chi mi rispondeva.
Scusami ancora.
Ciao.
Giuseppe.


title: riferimento controllo

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto nel messaggio
news:b4900cae-36f4-4233...@g38g2000yqd.googlegroups.com...







--------------------------------------
Qui non si tratta di innervosirsi...ci mancherebbe...ci siamo passati tutti.
Questa la tua domanda:
"Come faccio a far riconoscere alla maschera di ricerca oltre alla
maschera chiamante anche il controllo che esegue la ricerca?"
A questa domanda ti ho risposto, credo, in modo esauriente.
Ti pongo io una domanda:
dove avresti messo il nome del controllo che esegue la ricerca?
Temo non sia questo quello che ti serve...e per capirlo bisognerebbe vedere
il db o capire (spiegare) meglio cosa intenti fare, quale risultato
ottenere.
Per me è difficile anche dirti dove puoi trovare delle spiegazioni,
semplicemente perchè non è chiaro quello che vuoi fare.
Per quanto riguarda l'uso delle variabili trovi ampio materiale prima di
tutto nella guida.
In sintesi: esistono almeno due tipi di variabili, locali e globali (private
o pubbliche);
La variabile può essere di tipo "variant" quando non sai a priori che tipo
di dati gli assegnerai, oppure di tipo numerico, stringa, ecc. quando sai
bene che il tipo di dato da assegnare è un numero o una stringa di testo.
La variabile proprio come dice il nome è "variabile" nel senso che il valore
potrebbe variare, al contrario di una variabile di tipo static.
Ciao, Carlo


title: riferimento controllo

text:
On 21 Nov, 12:57, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "Giuseppe" <
gcardas...@tin.it
> ha scritto nel messaggionews:b4900cae-36f4-4233...@g38g2000yqd.googlegroups.com...

Ciao Carlo, scusami se non sono stato chiaro nel spiegare cosa voglio
fare.
Ho una tabella tblAnagrafica con campi IdAnagrafica (numerico) e
ragione sociale (testo).
Poi ho una tabella tblProtocollo con IdProtocollo (numerico),
DataProtocollo, IdAnagrafica (numerico), IdAnagrafica2 (numerico),
IdAnagrafica3 (numerico), IdAnagrafica4 (numerico), IdAnagrafica5
(numerico), e IdModSpedizione (numerico) ecc...
Nella maschera di inserimento frmProtocollo quando devo inserire
l'IdAnagrafica, attraverso un pulsante o su evento keydown del
controllo idanagrafica con il codice
DoCmd.OpenForm "RicercaAnagrafica", , , , , , Me.Name
apro una maschera di ricerca (possibilità di ricerca per codice, per
nome, per p.iva e per c.f.) e una volta selezionato dalla casella di
riepilogo il mittente o il destinatario della registrazione del
protocollo tramite il codice
Forms(Me.OpenArgs).idanagrafica = Forms!RicercaAnagrafica!
su clik del pulsante "conferma" chiudo la maschera di ricerca e
memorizzo direttamente l'idAnagrafica nel controllo IdAnagrafica.
Altrettanto avviene per le altre maschere di inserimento documenti; e
funziona.
In questo tipo di inserimento ho il problema che posso spedire una
corrispondenza a più destinatari con lo stesso Nprotocollo; per cui ho
inserito nella tabella l'IdAnagrafica2, 3, 4 e 5.
Se utilizzo lo stesso sistema, quando chiudo la maschera di ricerca e
confermo l'idanagrafica scelto me lo inserisce nel campo idanagrafica
e non in quello da cui è partita l'apertura della ricerca.
Quindi così come indico alla maschera di ricerca qual'è la form che fa
la ricerca e il controllo in cui deve essere memorizzato il valore,
così vorrei fare per far capire alla maschera che il controllo non è
sempre IdAnagrafica ma può essere IdAnagrafica2 o 3 o 4 o 5.
Spero di essere stato chiaro. Trattasi quindi di una variabile
numerica.
Ciao.
Giuseppe.


title: riferimento controllo

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto
cut

-------------------------------------------
Mi devi scusare ma ci ho capito poco o nulla.
Fai prima a mandarmi il db che, se posso, gli do un'occhiata.
Ciao, Carlo


title: Ottenere lo USER NAME COMPLETO

author: Carlo.

text:
Salve a tutti ragazzi/e
ho visto l'aggiornamento del SITO COMUNE, ed ho trovato interessante le
informazioni del cap. 6.171 WMI - SystemInfo (Informazioni sul Sistema
Operativo).
Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello User
(in particolare lo User Name completo [FullName]), sempre utilizzando
WIN32, o tramite altre strade?!
Grazie e complimenti per gli ultimi aggiornamenti del SITO COMUNE,
puntuali e precisi!!
Ciao,
Carlo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Ottenere lo USER NAME COMPLETO

author: Karl Donaubauer

text:
Carlo. wrote:
> ho visto l'aggiornamento del SITO COMUNE, ed ho trovato interessante
> le informazioni del cap. 6.171 WMI - SystemInfo (Informazioni sul
> Sistema Operativo).
>
> Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello
> User (in particolare lo User Name completo [FullName]), sempre
> utilizzando WIN32, o tramite altre strade?!
http://www.mvps.org/access/api/api0066.htm
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + CISA1, Arezzo, 4+5/6/2005
la prima Conferenza Italiana per Sviluppatori di Access


title: Ottenere lo USER NAME COMPLETO

text:
Karl Donaubauer ha scritto:
> Carlo. wrote:
> > ho visto l'aggiornamento del SITO COMUNE, ed ho trovato interessante
> > le informazioni del cap. 6.171 WMI - SystemInfo (Informazioni sul
> > Sistema Operativo).
> >
> > Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello
> > User (in particolare lo User Name completo [FullName]), sempre
> > utilizzando WIN32, o tramite altre strade?!
>
http://www.mvps.org/access/api/api0066.htm
Interessante Karl, ma nelle note dice che funziona solo per NT/2000:
Function fGetFullNameOfLoggedUser(Optional strUserName As String) As String
'
' Returns the full name for a given UserID
'   NT/2000 only
' Omitting the strUserName argument will try and
' retrieve the full name for the currently logged on user
Infatti non mi funziona perchè ho WIN XP.
Ci sono altre soluzioni?!
Grazie 1000



title: Ottenere lo USER NAME COMPLETO

author: Gaspare

text:
"Carlo." <N...@Spam.com> ha scritto nel messaggio
news:d2h7uu$jmn$1...@news.newsland.it...

Ciao Carlo,
vedi che funziona il codice di Karl...le librerie sono presenti anche in
windows xp...basta che copi ed incolli tutto quanto all'interno del frm e
poi per verificae puoi aggiungere un pulsante e quindi all'interno del click
ret = fGetFullNameOfLoggedUser
MsgBox ret
Gaspare


title: Ottenere lo USER NAME COMPLETO

text:
Gaspare ha scritto:



> Gaspare
Provato,
funziona egregiamente!
Grazie Karl!
Grazie Gaspare!
Carlo



title: Ottenere lo USER NAME COMPLETO

text:
Gaspare wrote:
> "Carlo ha scritto:
>> Karl Donaubauer ha scritto:
>>>> ...
>>>> Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello
>>>> User (in particolare lo User Name completo [FullName]), sempre
>>>> utilizzando WIN32, o tramite altre strade?!
>>
>>>
http://www.mvps.org/access/api/api0066.htm
>>
>> Interessante Karl, ma nelle note dice che funziona solo per NT/2000:
> ... vedi che funziona il codice...le librerie sono presenti anche
> in windows xp...
Sě, l'articolo č piů vecchio che WinXP. Ho scritto a Dev e Arvin
di aggiornare il commento.
--
cu



title: Ottenere lo USER NAME COMPLETO

text:
Karl Donaubauer wrote:
> Gaspare wrote:
>> "Carlo ha scritto:
>>> ...
>>>>
http://www.mvps.org/access/api/api0066.htm
>>>
>>> Interessante Karl, ma nelle note dice che funziona solo per NT/2000:
>> ... vedi che funziona il codice...le librerie sono presenti anche
>> in windows xp...
>
> Sì, l'articolo è più vecchio che WinXP. Ho scritto a Dev e Arvin
> di aggiornare il commento.
...e Arvin l'ha fatto.



title: Ottenere lo USER NAME COMPLETO

author: Bruno Campanini

text:
"Carlo." <N...@Spam.com> wrote in message
news:d2h73p$goh$1...@news.newsland.it...
>
> Salve a tutti ragazzi/e
> ho visto l'aggiornamento del SITO COMUNE, ed ho trovato interessante le
> informazioni del cap. 6.171 WMI - SystemInfo (Informazioni sul Sistema
> Operativo).
>
> Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello User
> (in particolare lo User Name completo [FullName]), sempre utilizzando
> WIN32, o tramite altre strade?!
>
> Grazie e complimenti per gli ultimi aggiornamenti del SITO COMUNE,
> puntuali e precisi!!
>
> Ciao,
> Carlo
In un modulo di classe:
-------------------------------------------
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA"
(ByVal lpBuffer As String, nSize As Long) As Long
-------------------------------------------
In OnClick di un Button:
---------------------------------
Dim nomeutente As String
Dim strBuffer As String
Dim lSize As Long
Dim lRetVal As Long
     strBuffer = String$(255, 0)
    lSize = Len(strBuffer)
    lRetVal = GetUserName(strBuffer, lSize)
    nomeutente = Left$(strBuffer, lSize - 1)
MsgBox nomeutente
----------------------------------
Non è farina del mio sacco e non ne ricordo l'autore.
Bruno


title: Ottenere lo USER NAME COMPLETO

text:
Karl Donaubauer ha scritto:
> Gaspare wrote:
> > "Carlo ha scritto:
> >> Karl Donaubauer ha scritto:
> >>>> ...
> >>>> Qualcuno di voi sa aiutarmi nel rintracciare le informazione dello
> >>>> User (in particolare lo User Name completo [FullName]), sempre
> >>>> utilizzando WIN32, o tramite altre strade?!
> >>
> >>>
http://www.mvps.org/access/api/api0066.htm
> >>
> >> Interessante Karl, ma nelle note dice che funziona solo per NT/2000:
> > ... vedi che funziona il codice...le librerie sono presenti anche
> > in windows xp...
> Sě, l'articolo č piů vecchio che WinXP. Ho scritto a Dev e Arvin
> di aggiornare il commento.
Ok Karl, Grazie !
Carlo.



title: Ottenere lo USER NAME COMPLETO

text:
Bruno Campanini ha scritto:




> Bruno
Grazie per la segnalazione Bruno, ma con GetUserNameA restituisce solo il
nome dello user (che di solito è abbreviato) e non il nome completo
(nome+cognome)



title: Funzione Format

author: Greg

text:
Ho un mdb versione 2000, dove provo a fare l'autocmposizione di quna query a campi incrociati, ma quando la chiudo e
mando in esecuzione mi errore: Funzione Format non definita nell'espressione. Da cosa può dipendere?

Questo è il risultato che ha scritto nell'sql:
PIVOT "Trim " & Format([Data],"q");

--
Greg


title: Funzione Format

text:
Il 06/05/18 10:35:44 Greg ha scritto:

Aggiungo che non dipende da una cattiva installazione di Access in quanto su altri files mdb la Format fa il suo lavoro
correttamente. Ho già compattato e ripristinato ma il poblema persiste. Cos'altro potrei controllare? Grazie

--
Greg


title: Funzione Format

author: ogrn

text:
> Ho un mdb versione 2000, dove provo a fare l'autocmposizione di quna query
> a campi incrociati, ma quando la chiudo e mando in esecuzione mi errore:
> Funzione Format non definita nell'espressione. Da cosa può dipendere?
> Questo è il risultato che ha scritto nell'sql:
> PIVOT "Trim " & Format([Data],"q");

Provato a mettere punto-e-virgola al posto di virgola?


title: Funzione Format

text:
Salve,

Greg:

http://www.donkarl.com/it?FAQ7.1

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


title: Funzione Format

text:
Il 07/05/18 09:50:50 Karl Donaubauer ha scritto:
> Salve,
>
> Greg:
>> Ho un mdb versione 2000, dove provo a fare l'autocmposizione di quna query a campi incrociati, ma quando la chiudo
>> e mando in esecuzione mi errore: Funzione Format non definita nell'espressione. Da cosa può dipendere?
>>
>> Questo è il risultato che ha scritto nell'sql:
>> PIVOT "Trim " & Format([Data],"q");
>>
>
>
http://www.donkarl.com/it?FAQ7.1

Come sempre, grazie :)

--
Greg


title: Evitare il messaggio "L'azione Open Report è stata annullata"

author: Michele

text:
Come da oggetto quando si intercetta l'evento Report_Nodata e si imposta
cancel=true.
Grazie


author: Alex

text:
"Michele" <
m.m...@mondoesa.com
> wrote in message
news:YdDB7.90228$1H1.9...@news.infostrada.it...
> Come da oggetto quando si intercetta l'evento Report_Nodata e si imposta
> cancel=true.
>
> Grazie
Hai provato con: DoCmd.SetWarnings False
@Alex
--
Posted from  [62.98.108.1]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Antonio Biso

text:
Michele <
m.m...@mondoesa.com
> wrote in message
YdDB7.90228$1H1.9...@news.infostrada.it...
> Come da oggetto quando si intercetta l'evento Report_Nodata e si imposta
> cancel=true.
>
> Grazie
Prima del comando docmd.openreport scriverai
on error goto next per far sě che su errore vada semplicemente avanti
e dopo il comando openreport
on error goto 0 per ristabilire la gestione degli errori
Antonio


text:
Alex <
ik2...@libero.it
> wrote in message
ccd1a4c63a3173ea5d...@mygate.mailgate.org...
> "Michele" <
m.m...@mondoesa.com
> wrote in message
> news:YdDB7.90228$1H1.9...@news.infostrada.it...
>
> > Come da oggetto quando si intercetta l'evento Report_Nodata e si imposta
> > cancel=true.
> >
> > Grazie
>
>
> Hai provato con: DoCmd.SetWarnings False
> @Alex
Occhio Alex- Disabilitare i warnings equivale a premere ok automaticamente
ogni qual volta c'è una msgbox di sistema che chiede conferma.
Nel caso in esame invece si parla di gestione degli errori!!!
Antonio


author: Alex.

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:aTGB7.92838$1H1.9...@news.infostrada.it...
> > > Come da oggetto quando si intercetta l'evento Report_Nodata e si imposta
> > > cancel=true.
> > >
> > > Grazie
> >
> >
> > Hai provato con: DoCmd.SetWarnings False
> > @Alex
>
> Occhio Alex- Disabilitare i warnings equivale a premere ok automaticamente
> ogni qual volta c'č una msgbox di sistema che chiede conferma.
> Nel caso in esame invece si parla di gestione degli errori!!!
>
> Antonio
YES....!!
Hai ragione, ma nel caso in questione mi pareva che il semplice NoData potesse
essere considerato piů che unavera gestione errori un'intercettazione
all'apertura
che anche senza Warning poteva andare....!
Ho dimenticato qualche considerazione.....???
Grazie ciao Antonio.
@Alex
--
Posted from  [146.133.1.30]



text:
Alex. <
ik2...@libero.it
> wrote in message
0e259cb947a1334b63...@mygate.mailgate.org...
> > Occhio Alex- Disabilitare i warnings equivale a premere ok
automaticamente
> > ogni qual volta c'č una msgbox di sistema che chiede conferma.
> > Nel caso in esame invece si parla di gestione degli errori!!!
> >
> > Antonio
>
> YES....!!
> Hai ragione, ma nel caso in questione mi pareva che il semplice NoData
potesse
> essere considerato piů che unavera gestione errori un'intercettazione
> all'apertura
> che anche senza Warning poteva andare....!
> Ho dimenticato qualche considerazione.....???
Sě. Che l'evento no_data di per sč non genera errori, lo genera quando tu
hai aperto il report non premendo il pulsante anteprima, ma quando lo fai da
codice, con il docmd.openreport.
In quel caso, fare il cancel per no_data genera un errore che puoi gestire
in maniera trasparente come avevo scritto.
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:SPPB7.94522$1H1.9...@news.infostrada.it...
>
> Sě. Che l'evento no_data di per sč non genera errori, lo genera quando tu
> hai aperto il report non premendo il pulsante anteprima, ma quando lo fai da
> codice, con il docmd.openreport.
> In quel caso, fare il cancel per no_data genera un errore che puoi gestire
> in maniera trasparente come avevo scritto.
>
> Antonio
Si, hai ragione, non mi era mai capitato, e quindi davo per scontato
la cosa....
Ti ringrazio per la chiarissima spiegazione.



author: SR

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:eac609c075e59ca3e7...@mygate.mailgate.org...
> "Antonio Biso" <
ch...@etruria.net
> wrote in message
> news:SPPB7.94522$1H1.9...@news.infostrada.it...
>
> >
> > Sě. Che l'evento no_data di per sč non genera errori, lo genera quando
tu
> > hai aperto il report non premendo il pulsante anteprima, ma quando lo
fai da
> > codice, con il docmd.openreport.
> > In quel caso, fare il cancel per no_data genera un errore che puoi
gestire
> > in maniera trasparente come avevo scritto.
Giustissimo. Se invece vuoi evitare di impostare i warnings a false, con i
rischi che Antonio ti indica, gestisci l'errore con "on error goto" ed
intercetta l'errore annullamento.


title: A me il Requery non convince...

author: david

text:
ma scusate un attimo perchè il Requery su una Form non funzica un
tubo????
ho la mia bella form di riepilogo record e ha un pulsantone con su
AGGIUNGI
lo schiaccio mi si apre la Form di inserimento nuovo record
poi chiudo e dico alla form di riepilogo Su Attivazione esegui
Me.Requery
e la form non si smuove di una virgola....
ma se la chiudo e la riapro allora gh'è tus cos (c'è tutto)
cazzolina ma perchè mi sono studiato e ristudiato tutto il SitoComune
ma un tubazzzz
chnnedite?
ciao
a
tutti
e grazie
david


title: A me il Requery non convince...

author: stwe

text:
"david" <
de...@agemobilitambiente.it
> ha scritto nel messaggio
news:3ba8d3a5...@News.CIS.DFN.DE...

è vero anche io ho avuto un problema analogo, ho fatto in modo non troppo
elegante per il vero: chiudi la maschera corrente e apri la maschera di
inserimento. Chiudi la maschera di inserimento e apri la maschera di prima.
by
stwe


title: A me il Requery non convince...

text:
david <
de...@agemobilitambiente.it
> wrote in message
3ba8d3a5...@News.CIS.DFN.DE...
> ma scusate un attimo perchè il Requery su una Form non funzica un
> tubo????
>
> ho la mia bella form di riepilogo record e ha un pulsantone con su
> AGGIUNGI
> lo schiaccio mi si apre la Form di inserimento nuovo record
> poi chiudo e dico alla form di riepilogo Su Attivazione esegui
> Me.Requery
> e la form non si smuove di una virgola....
> ma se la chiudo e la riapro allora gh'è tus cos (c'è tutto)
Prova a fare la requery sull'evento chiusura della maschera di inserimento,
chiaramente usando la sintassi
forms("maschera riepilogo").requery
e dopo aver effettivamente salvato il nuovo record
Antonio


title: A me il Requery non convince...

author: Sib dall'ufficio

text:
"david" <
de...@agemobilitambiente.it
> ha scritto nel messaggio
news:3ba8d3a5...@News.CIS.DFN.DE...
> ma scusate un attimo perchè il Requery su una Form non funzica un
> tubo????
>
> ho la mia bella form di riepilogo record e ha un pulsantone con su
> AGGIUNGI
> lo schiaccio mi si apre la Form di inserimento nuovo record
> poi chiudo e dico alla form di riepilogo Su Attivazione esegui
> Me.Requery
> e la form non si smuove di una virgola....
CUT
Come sottointende Antonio, puo' capitare che l'evento Attivazione della
maschera si verifiche prima che la maschera di inserimento abbia il tempo si
salvare il record inserito. Prova anche a forzare il salvataggio del record
inserito prima di chiudere la maschera di inserimento.
Sib


title: A me il Requery non convince...

text:


si questo l'ho fatto già, in effetti ho notato una differenza notevole
a fare come dice antonio...sembra che funzichi...devo sistemare un
paio di elementi ancora e confermo....
grazie a tutti
david


title: A me il Requery non convince...

text:
david <
de...@agemobilitambiente.it
> wrote in message
3bac297...@News.CIS.DFN.DE...


Apò, "sembra che funzichi..."
E certo che funziona!!!!
Anvedi....
Antonio


title: Access - Numero max di record

author: Tikida

text:
Scusate se pongo una domanda alla quale forse qualcun altro ha già risposto,
ma è la prima volta che mi affaccio su questo ng.
C'è una limitazione max di records per Access97 o è solo un problema di
spazio disco?
grazie


title: Access - Numero max di record

author: lbo dal portatile

text:
>C'è una limitazione max di records per Access97 o è solo un problema di
>spazio disco?
la limitazione e' sulla dimensione del file mdb.  un singolo file mdb
non puo' essere piu' grande di 1 giga per access 97 e 2 giga per
access 2000.  se questo limite viene superato si genera un errore.
all'interno di questo limite puoi avere quanti record vuoi.
ovviamente, come gia' osservato altrove, siccome un record almeno un
byte lo dovra' pur occupare, i limiti numerici sono un miliardo circa
e due miliardi circa di record.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: diverse prestazioni docmd.runsql e recordset

author: mario rossi

text:
Buongiorno a tutti,

qualcuno sa spiegarmi perché docmd.runsql è molto meno prestante dell'utilizzo di un recorset?

Grazie.


author: RobertoA

text:

Magari se metti due esempi che ti danno le notevoli differenze di
prestazioni, qualche analisi si potra' fare
Ma senza nessuna indicazione, l'e' fadiga


text:

in pratica leggo un file di testo con 17000 righe

nel ciclo while che scorre le righe
se c'è docmd.runsql (INSERT INTO ..... ci mette anche un minuto
se c'è l'utilizzo del recorset con rs.assnew è praticamente istantaneo


text:

https://www.access-programmers.co.uk/forums/threads/fast-code-sample.327019/

Discussione che potrebbe aiutare, anche a migliorare il ciclo col recordset

Magari per i test usa quelle funzioni tipo MicroTimer cosi' hai delle
misure precise sui tempi, perche' "praticamente istantaneo" vuol dire niente


author: PhilCattivocarattere

text:
Il giorno lunedì 31 luglio 2023 alle 18:19:39 UTC+2 mario rossi ha scritto:

> in pratica leggo un file di testo con 17000 righe
> nel ciclo while che scorre le righe
> se c'è docmd.runsql (INSERT INTO ..... ci mette anche un minuto

Che di così affascinante RunSQL da essere usato spesso e volentieri al posto del metodo Execute di un oggetto Database?
Non lo capirò mai. Execute è "perfetto", non ci sono warnings da disattivare-riattivare, lo si inserisce in una transaction e con il parametro dbFailOnError in caso di errore è tranquillamente reversibile.

Come ha detto RobertoA "l'è fàdiga" darti qualche suggerimento. Per prima cosa servirebbe il codice "completo" per vedere un po' tutto.


text:
Il 31/07/2023 18:19, mario rossi ha scritto:

Ai fini miglioramento prestazioni, un tentativo anche inserendo Il
BeginTransaction/CommitTransaction lo farei, giusto per curiosita


text:

Certo! se solo sapessi di cosa si tratta? O_O
Indagherò


text:

ah metodo execute, cercherò qualche esempio, grazie.
ma quanti metodi ci sono per scrivere in un database? tanti a quanto vedo?


text:
Il giorno martedì 1 agosto 2023 alle 19:29:13 UTC+2 mario rossi ha scritto:
> ah metodo execute, cercherò qualche esempio, grazie.

Per il metodo Execute il primo riferimento è sempre la guida Microsoft.
https://learn.microsoft.com/en-us/office/client-developer/access/desktop-database-reference/database-execute-method-dao

Lì si fa cenno anche alla transazione/Transaction con il Commit se tutto è andato bene o il Rollback se ci sono stati errori. Ridotta all'osso ma la spiegazione c'è.

> ma quanti metodi ci sono per scrivere in un database? tanti a quanto vedo?
Beh... fondamentalmente 2:
1) agire sul recordset in modifica o inserimento, un record alla volta; è quello che avviene ad esempio quando si compila una maschera in inserimento, modifica o cancellazione;
2) usare una action query, che sia di accodamento, creazione, aggiornamento o cancellazione. Poi ci sono più modo per eseguire la query (sia essa salvata come oggetto in quanto tale sia come stringa SQL in VBA). Quando si tratta di una action query però io trovo in tutti i modi diversi da Execute solo difetti e mancanze rispetto ad Execute: esempio tipico ma non solo è la gestione dei Warnings... perché doverlo fare quando c'è un modo che non li disturba? Restituisce anche il numero dei record interessati dalla query, che gli altri modi di eseguire una action query non hanno. Insomma... fa tutto, di più e meglio ed è perfetto per essere inserito in una Transaction. Execute tutta la vita.

Se vuoi dare un'occhiata ai vari sistemi qui trovi un breve confronto:
https://www.fmsinc.com/microsoftaccess/query/action-queries/SuppressWarningMessages.htm


text:

Grazie per la risposta molto completa.


title: Affidabilità e dimensioni di un db

author: Royan

text:
Ciao a tutti!
Volevo un'informazione riguardo l'affidabilità per un'azienda di avere un
database che gestisca sia i dati dell'ufficio commerciale che dell'ufficio
tecnico.
Access può supportare tutte le informazioni? La dimensione per singolo DB
è 4 GB?
Altrimenti come mi consigliate di muovermi?
Grazie mille!
Royan
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Affidabilità e dimensioni di un db

author: MA

text:
Royan wrote:
> Ciao a tutti!
> Volevo un'informazione riguardo l'affidabilità per un'azienda di
> avere un database che gestisca sia i dati dell'ufficio commerciale
> che dell'ufficio tecnico.
> Access può supportare tutte le informazioni? La dimensione per
> singolo DB è 4 GB?
> Altrimenti come mi consigliate di muovermi?
>
> Grazie mille!
> Royan
Un solo DB non gestisce 4Gb, ma cmq anche dividendolo per più db, ti
consiglio di considerare SQLServer (anche l'express 2005) come backend e
Access come frontEnd
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Affidabilità e dimensioni di un db

author: Davide (Sib)

text:
"Royan" <
royan...@yahoo.it
> ha scritto nel messaggio
> Volevo un'informazione riguardo l'affidabilità per un'azienda di avere un
> database che gestisca sia i dati dell'ufficio commerciale che dell'ufficio
> tecnico.
> Access può supportare tutte le informazioni? La dimensione per singolo DB
> è 4 GB?
> Altrimenti come mi consigliate di muovermi?
Come già ti ha detto MA, Access (come anche SQL Server e quasi tutti i
motori di database) non gestiscono singoli database di 4Gb (ma gestisci i
movimenti annuali del gruppo auchan?)
la massima dimensione di un singolo database è di 2Gb.
Nulla toglie però di utilizzare, anche contemporaneamente, svariate basi di
dati col risultato che le dimensioni complessive sono ben al di sopra dei
4Gb.
In termini di prestazioni, sicurezza e affidabilità della base dati si può
dare un 7,5 ad Access da solo e un 9 a SQL Server (10 per principio non lo
dò mai)
La soluzione tramite SQL è più sicura perchè gli utenti non hanno accesso al
file che contiene il db, ma solo ai dati contenuti e secondo gli specifici
criteri di protezione, inoltre un problema di crash della rete può mettere
in crisi un db access ma certamente non un db SQL il quale non condivide
file in rete ma riceve istruzioni e restituisce risultati e quindi il file è
sempre fermo sul server.
Qualunque base dati tu intenda adottare, Access è probabilmente (ma in
realtà penso "sicuramente") il migliore front-end attualmente esistente sul
mercato e mi sento di conscigliarlo in tutta coscienza.
Davide
--
www.gestionedati.com


title: espressione digitata non correttamente e oggetto non valido o non impostato

author: Franco dellavalle

text:
Ciao a tutti

ho una query dinamica, è in questo punto...
IIf(strCtrl = "Fornitore", " Or Id" & strCtrl & " Like " & strFiltro & strCtrl & "Fatt", "")
se sostituisco Like con "=" in questo modo...
IIf(strCtrl = "Fornitore", " Or Id" & strCtrl & " = Nz(" & strFiltro & strCtrl & "Fatt, 0)", "")

ho questi errori:
errore 3071:
espressione digitata non correttamente o troppo complessa per essere valutata ecc. ecc.
e l'errore 3420:
oggetto non valido o non impostato

Chissà perchè?
Grazie per la spiegazione


text:

Gli SPAZZI... mancano...? [Domanda retorica... mancano]

@Alex


text:

grazie Alex
per quanto ho cercato non ho trovato spazi.

questo è il codice in questione
se puoi prova a darci un'occhiata
ancora grazie

  Dim strSql As String
  Dim CmpEmail As String
  Dim strForm As String
  Dim Opzione As String
  Dim NomeTabella As String
  Dim strFiltro As String
  Dim strCod As String, strCod1 As String
  Dim strCod2 As String, strCod3 As String

'-----------------------------------
  CmpEmail = fctCampiEmail(frm)
  strForm = Split(CmpEmail, "|")(0)
  Opzione = Split(CmpEmail, "|")(1)
'-----------------------------------
  NomeTabella = "TbEmail" & Left(strCtrl, Len(strCtrl) - 1) & IIf(strCtrl = "Agenzia", "e", "i")
  strFiltro = "Forms!" & frm.Name & "!Id"

  strCod = ""
  strCod1 = ""
  strCod2 = ""
  strCod3 = ""

  If strCtrl = "Cliente" Or strCtrl = "Fornitore" Then
    strCod = "EmailAgenzia & "
    strCod1 = "RIGHT JOIN (TbEmailAgenzie RIGHT JOIN TbInvioEmail ON TbEmailAgenzie.IdEmailAgenzia = TbInvioEmail.IdEmailAgenzia)"
    strCod2 = IIf(strCtrl = "Fornitore", " Or Id" & strCtrl & " Like " & strFiltro & strCtrl & "Fatt", "")
    strCod3 = " Or IdAgenzia = " & strFiltro & "Agenzia And OpzCliente_Fornitore" & IIf(strCtrl = "Cliente", " <> 0", " = 0")
  Else
    strCod1 = "INNER JOIN TbInvioEmail"

  End If

  strSql = "SELECT Id" & strCtrl & ", " & strCod & "Email" & strCtrl & " As Email, " & strForm & " " & "As InvioDoc," _
    & " Inv" & Opzione & " " & "As InvA" _
    & " FROM " & NomeTabella _
    & " " & strCod1 & " ON " & NomeTabella & ".IdEmail" & strCtrl & " = TbInvioEmail.IdEmail" & strCtrl _
    & " WHERE " & NomeTabella & ".Id" & strCtrl & " = " & strFiltro & strCtrl & strCod2 & strCod3 _
    & " ORDER BY Email" & strCtrl & ";"

  DBEngine(0)(0).QueryDefs("Qry_Email").SQL = strSql


text:
Fai un DEBUG.PRINT strSql prima dell'assegnazione alla Query, poi vai nella finestra immediata(CTRL+G da VBA-Editor) e leggi il predicato analizzandolo BENE...

Questi metodi di DEBUG sono indispensabili, mi chiedo se li usi...

Eventualmente posta per intero quanto rilevi nella Finestra Immediata del Debug.

@Alex


text:

grazie Alex


title: supporto esterno 1

author: max

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:9vNMb.2331$nC1...@news.edisontel.com...
>
> "max" <
mas...@inwind.it
> ha scritto nel messaggio
> news:ooNMb.253026$e6.99...@twister2.libero.it...
> > Buongiorno........
> >
> > Ho un database su disco fisso:
> > Ho un database su disco estraibile:
> > Sul database del disco fisso ho creato una query che mi legge i dati del
> > database che si trova su disco estraibile:
> >
> > Come faccio a dire al database del disco fisso che se in presenza del
> > supporto estraibile mi esegua unoperazione o in mancanza del disco
> > estraibile mi esegua un'altra operazione?
> >
> > Ho provato diverse routin ma niente da fare vado sempre in errore.......
> >
> > Mi date una soluzione con un esempio?
> >
> > Grazie
> > Massimo
>
> Se il tuo file ha questo percorso:    d:\pippo.mdb
>
> if dir("d:\pippo.mdb")<>"" then
> else
> end if
> MAssimiliano
>
>
>
Grazie Massimiliano.......
Purtroppo appena eseguo la routin senza il supporto estraibile mi ritorna un
errore......"nome onumero di file errato"
Come faccio?


title: supporto esterno 1

text:
Non aprire altri 3d
MAssimiliano


title: supporto esterno 1

text:
"max" <
mas...@inwind.it
> ha scritto nel messaggio
news:OINMb.247132$vO5.10...@twister1.libero.it...
> Grazie Massimiliano.......
> Purtroppo appena eseguo la routin senza il supporto estraibile mi ritorna
un
> errore......"nome onumero di file errato"
Perchè hai aperto un altro thread invece di continuare nell'altro
scusa?!!?!?!?!?
Antonio


title: mail outlook con firma

author: tasso

text:
ho il seguente codice per inviare una mail con office 2007:
Public Function InvioMAilMSO_non_express(a As String, Oggetto As String,
Corpo As String, Optional array_elenco_file As Variant)
 On Error Resume Next
 Dim objOU As Object
 Set objOU = CreateObject("outlook.Application")
 Dim objNewMail As Object
 Dim i As Integer
 Dim conoscenza, nascosto
 Dim blnResolveSuccess As Boolean
 'Dim olMailItem As Object
 Set objNewMail = objOU.CreateItem(olMailItem)
 With objNewMail
    If Not IsMissing(array_elenco_file) Then
      .Attachments.Add CStr(array_elenco_file), , , "allegato"
      '.Attachments.Add CStr("C:Documents and
Settingszmbgcm68h03d150kDesktop16922_0002.doc"), , , "allegato"
    End If

    .To = a
    '.CC = conoscenza
    '.BCC = nascosto
    .Subject = Oggetto
    .Body = Corpo
    .Display 'Visualizza il messaggio
    '.Send 'ISTRUZIONE EVENTUALE PER SPEDIRE IL MESSAGGIO

 End With
 Set objNewMail = Nothing
End Function
funziona tutto bene ma non mi mette la firma preimpostata in outlook nel
messaggio che crea
è possibile fare in modo che invece lo inserisca?
magari senza doverlo mettere nella variabile corpo della funzione?
ciao a tutti e buona giornata
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: mail outlook con firma

text:
tasso ha scritto:








è un problema irrisolvibile oppure capita solo a me...
magari non sono stato chiaro?



title: mail outlook con firma

author: geppo

text:

Mi sa che non è possibile inserire da codice la firma di Microsoft Outlook.
Ma perchè non l'aggiungi alla variable corpo?
--
Ciao
Geppo


title: mail outlook con firma

text:
geppo ha scritto:



perchè è una firma abbastanza complessa con una immagine ecc. che è
predefinita dalla azienda
è una cosa un pò strana però che outlook non capisca che è un messaggio
nuovo e che quindi debba inserire la firma... non mi pare un gran che
questa cosa
ciao grazie comunque della risposta



title: Numerazione fattura

author: Michele

text:
Ciao a tutti,
 mi sono ritrovato con il seguente problema:
1) Devo realizzare un database con access 2000 di fatturazione, ho
inserito la seguente funzione:
 ="" & Format(IIf(IsNull(DMax("[N_Fattura]";"[Tab_Fatture]";"[N_Fattura]
like '???/" & Format(Date();"aa") &
 "'"));1;Mid(DMax("[N_Fattura]";"[Tab_Fatture]";"[N_Fattura] like
'???/" & Format(Date();"aa") & "'"); 1;3)+1);"000") & "/" &
Format(Date();"aa")
funziona perfettamente, il mio quesito è :
E' possibile inserire davanti al N° Fattura una Lettera "A" o "V"
scelta da una casella opzioni, utilizzando la funzione sopra
 descritta. Le lettere "A" e "V" devono apparire davanti
al numero della fattura, ma ognuno deve avere una numerazione
progressiva indipendente.
ES. A001/03 - A002/03 ---- V001/03 - V002/03
 Grazie a tutti
 Michele


title: Numerazione fattura

text:
"Michele" <
mike...@tiscali.it
> ha scritto nel messaggio
news:803dba50.03060...@posting.google.com...

Si è possibile, ma occorre riscrivere la Funzione di Calcolo, in quanto
dovrebbe distinguere il DMAX(......) in modo Dipendente dalla 1°Lettera.
La cosa si complica un pochetto, ma è fattibile.
Tieni conto di inserire nella condizione DMAX oltre che quella esistente il
vincolo
alla prima Lettera del dato Left$(........)="A" oppure "V".
@Alex.


title: Numerazione fattura

text:
"@Alex" <
ik2...@libero.it
> wrote in message news:<66QCa.55787$
Ny5.1...@twister2.libero.it
>...

E qualcuno sapremme dirmi come impostare la formula che @Alex mi ha
proposto, o altra soluzione per il mio problema. Vi ringrazio
anticipamene.
Ciao Michele


title: Numerazione fattura

author: Roberto da casa

text:
"Michele" <
mike...@tiscali.it
> ha scritto nel messaggio
news:803dba50.03060...@posting.google.com...

Se il tuo Gruppo di opzioni si chiama TuaOpzione ed assume il valore 1 se
vuoi usare la lettera A ed il valore 2 se vuoi usare la lettera B, nel
valore predefinito del controllo N_Fatture prova a scrivere:
=IIf([TuaOpzione]=1; "A"; "B") & Format(IIf(IsNull( DMax("[N_Fattura]";
"[Tab_Fatture]"; "[N_Fattura] like '" & IIf([TuaOpzione]=1; "A"; "B") &
"???/" & Format(Date(); "aa") & "'")); 1; Mid(DMax("[N_Fattura]";
"[Tab_Fatture]"; "[N_Fattura] like '" & IIf([TuaOpzione]=1; "A"; "B") &
"???/" & Format(Date(); "aa") & "'"); 2; 3) + 1);"000") & "/" &
Format(Date(); "aa")
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Numerazione fattura

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message news:<ItZCa.56266$
Ny5.1...@twister2.libero.it
>...

Tante grazie Roberto, e a tutto il NG per la risoluzione del mio
probblema spero di contracambiare in futuro.
Ciao Michele


title: Menu a tendina completamento istruzione

author: Gra

text:
Salve, come da oggetto, quando scrivo del codice ad esempio: DOCMD.
(all'inserimento del punto appare il menu a tendina con i vari comandi) non
capisco come, ma da un paio di giorni nella mia macchina questo menu appare
un secondo dopodichč scompare. Sapete come risolvere il problema???
Grazie


title: Menu a tendina completamento istruzione

text:
"Gra" <
grazian...@elcotrony.it
> ha scritto nel messaggio
news:ce2kgu$aev$1...@balena.cs.interbusiness.it...
> Salve, come da oggetto, quando scrivo del codice ad esempio: DOCMD.
> (all'inserimento del punto appare il menu a tendina con i vari comandi)
non
> capisco come, ma da un paio di giorni nella mia macchina questo menu
appare
> un secondo dopodichè scompare. Sapete come risolvere il problema???
> Grazie
>
Risolto, ho fatto un po di pulizia, Grazie.


title: Hanno aperto un NG pubblico access

author: Cristiano

text:
ragazzi, stamattina...
microsoft.public.it.office.access
Ciao


title: Hanno aperto un NG pubblico access

author: ringo

text:
"Cristiano" <
cristianopor...@tiscalinet.it
> ha scritto nel
messaggio news:ObUha.34987$Jg1.8...@news1.tin.it...
> ragazzi, stamattina...
> microsoft.public.it.office.access
>
> Ciao
>
scusa della domanda ma che differenza c'è
tra questo NG e quello pubblico?
grazie!
ringo


title: Hanno aperto un NG pubblico access

author: Karl Donaubauer

text:
ringo ha scritto:
> "Cristiano" <
cristianopor...@tiscalinet.it
> ha scritto:
>> ragazzi, stamattina...
>> microsoft.public.it.office.access
> ...
> scusa della domanda ma che differenza c'è
> tra questo NG e quello pubblico?
Questa discussione l'abbiamo già fatto qualche mese fa.
Leggi p.e. il thread che inizia con
http://groups.google.com/groups?&selm=iAof9.6233%24Oz2.120291%40twister2.libero.it
Ha scoprito l'acqua calda e postato un "primo" messaggio nel
altro NG che contiene un mille di post per la gente che usano
un altro server.
--
cu
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Hanno aperto un NG pubblico access

text:
Karl Donaubauer ha scritto:
>...la gente che usano un altro server.
Brutto sbaglio, forse: ...che usa un server diverso


title: Hanno aperto un NG pubblico access

author: Antonio Biso

text:
"Cristiano" <
cristianopor...@tiscalinet.it
> ha scritto nel
messaggio news:ObUha.34987$Jg1.8...@news1.tin.it...
> ragazzi, stamattina...
> microsoft.public.it.office.access
MECOJONS
Antonio


title: Hanno aperto un NG pubblico access

text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:b696ap$2ql6e$1...@ID-46617.news.dfncis.de...
> Karl Donaubauer ha scritto:
> >...la gente che usano un altro server.
>
> Brutto sbaglio, forse: ...che usa un server diverso
Fosse solo questo lo sbaglio....!!!
"Ha scoprito l'acqua calda e postato un ......" (dal POST incriminato...)
SCOPERTO non scoprito........!!!  ;-)
Va beh, sapessi io il Tedesco come tu sai l'Italiano.......!!!!
Vedo però che migliori sempre, ora anche la cognugazione dei Verbi è
quasi perfetta......!!!
Ciao buona giornata....!
@Alex.


title: Hanno aperto un NG pubblico access

text:
"Cristiano" <
cristianopor...@tiscalinet.it
> ha scritto nel
messaggio news:ObUha.34987$Jg1.8...@news1.tin.it...
> ragazzi, stamattina...
> microsoft.public.it.office.access
>
> Ciao
Ti sei accorto un po' tardino dell'apertura di questo NG; è stato aperto
qualche mese fa.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Hanno aperto un NG pubblico access

author: Sergio MAZZA

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:ij%ha.521$nD4....@twister1.libero.it...

Quindi niente rinfresco...
Ciao.
--
Sergio MAZZA


title: Hanno aperto un NG pubblico access

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:b6bq1p$2av$1...@canarie.caspur.it...
[CUT]
>
> Quindi niente rinfresco...
>
> Ciao.
>
> --
> Sergio MAZZA
Per questa volta niente rinfresco per l'inaugurazione. :-)



title: record vuoto

author: Franco

text:
salve!

su scaricamento della maschera "Fatture3" ho iserito questo codice:
    Dim rs
    Set rs = Me![DETTAGLIO FATTURE Sottomaschera].Form.RecordsetClone
    Me![DETTAGLIO FATTURE Sottomaschera].Form.Requery
    If rs.RecordCount = 0 Then
       Me!MiaFattura = Null
    End If

per far si che chiudendo la maschera (con il numero impostato nel controllo
"MiaFattura") senza alcun dettaglio nella
sottomaschera, il record nella testata della fattura non si crei.

Ma in questo modo ho il record nella tb "Fatture" vuoto.
Come posso fare perchè non si creii affatto?
Grazie