mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: errore in aggiunta record in casella combinata

salve a tutti
ho preso da internet una procedura per inserire tramite codice un
nuovo record nella casella combinata.
Se alla domanda "vuoi aggiungere nuovo record" rispondo sì va tutto
bene,
ma se rispondo no mi compare questo messaggio di errore:
errore di run time '91' variabile oggetto o variabile del blocco with
non impostata
Qualcuno può aiutarmi a capire il perché?
il codice è questo:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strMsg As String
Private Sub cboAnnotazioni_NotInList(NewData As String, Response As
Integer)
    strMsg = "'" & NewData & "' nota non presente in elenco " & vbCrLf
& vbCrLf
    strMsg = strMsg & "Vuoi inserirla?"
    strMsg = strMsg & vbCrLf & vbCrLf & "Clicca Sì per aggiungere la
nota o No per annullare l'operazione."
    If MsgBox(strMsg, vbQuestion + vbYesNo, "Aggiungere la nota?") =
vbNo Then
        Response = acDataErrContinue
    Else
        Set db = CurrentDb
        Set rs = db.OpenRecordset("tblAnnotazione", dbOpenDynaset)
        On Error Resume Next
        rs.AddNew
            rs!Annotazione = NewData
        rs.Update
        If Err Then
            MsgBox "An error occurred. Please try again."
            Response = acDataErrContinue
        Else
            Response = acDataErrAdded
        End If
    End If
rs.Close
Set rs = Nothing
Set db = Nothing
End Sub
la riga che viene evidenziata è
rs.close
Grazie anticipatamente

>>>>>>>>>>>>
Ciao Elena,
se rispondi no il recordset non viene proprio aperto e quindi non pu� 
nemmeno essere chiuso, per evitare il problema puoi modificare cos�:
Private Sub cboAnnotazioni_NotInList(NewData As String, Response As
Integer)
    strMsg = "'" & NewData & "' nota non presente in elenco " & vbCrLf
& vbCrLf
    strMsg = strMsg & "Vuoi inserirla?"
    strMsg = strMsg & vbCrLf & vbCrLf & "Clicca S� per aggiungere la
nota o No per annullare l'operazione."
    If MsgBox(strMsg, vbQuestion + vbYesNo, "Aggiungere la nota?") =
vbNo Then
        Response = acDataErrContinue
    Else
        Set db = CurrentDb
        Set rs = db.OpenRecordset("tblAnnotazione", dbOpenDynaset)
        On Error Resume Next
        rs.AddNew
            rs!Annotazione = NewData
        rs.Update
        If Err Then
            MsgBox "An error occurred. Please try again."
            Response = acDataErrContinue
        Else
            Response = acDataErrAdded
        End If
'HO Spostato queste 3 righe
    rs.Close
    Set rs = Nothing
    Set db = Nothing
    End If
End Sub
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
http://accessdaziacin.spaces.live.com
---------------------------------------- 

     strMsg = strMsg & vbCrLf & vbCrLf & "Clicca Sì per aggiungere la

Grazie funziona perfettamente
Newsgroup: it.comp.appl.access
Titolo: Più versione versioni di Access nello stesso PC

Nei PC dove sono installate due versione di Access, ad esempio Access
2000 ed il RunTime di Access 97, capita che ogni volta che si apre una
versione di Access questa si riassegna le estensioni mdb e mde. Io
vorrei che una delle due versioni, cioè il run time, non lo facesse e
che le estensioni mdb ed mde siano sempre assegnate ad Access 2000.
Penso che si debba modificare qualche chiave di registro per impedire
al Run Time di modificare l'assegnazione delle estensione, sapete
quale? Oppure cosa si può fare?
Grazie BB

 ha scritto nel
messaggio
news:i7nqe098uehr9lr1b...@4ax.com...

Credo non si possa.
L'unica è crearsi un collegamento ai file e li
inserire il percorso anche del programma che lo
gestisce.
MAssimiliano

 ha scritto nel messaggio
news:i7nqe098uehr9lr1b...@4ax.com...

Io mi preparo dei collegamenti che lanciano l'mdb premettendo il file
msaccess.exe giusto con tutto il suo percorso...
Antonio


wrote:

Faccio anche io così ma il cliente si lamenta che quando apre i suoi
file Access 2000 questi vengano aperti con il run time di Access 97 se
non apre prima Access 2000. Ho provato un suggerimento della
Microsoft:
http://support.microsoft.com/default.aspx?kbid=248913
ma purtroppo non funziona.
BB

 non apre prima Access 2000
Non hai letto bene i consigli di Antonio e Massimiliano...

 ha scritto nel messaggio
news:fTdHc.42387$c_1.1...@twister1.libero.it...

Scusate se mi intrometto protresti farmi un esempio di collegamento, che in
automatico al momento dell'installazione del programma su un pc (ad esempio
usando Inno setup) si crei il collegamento sul dektop con all'interno il
percorso completo e possibilmente in automatico si associ una determinata
icona?
P.S. oltretutto quest'ultimo è un post che ho inserito alcuni minuti fa,
prima di leggere questo post.
Ciao Tommy



Si li ho letti. Forse non hai capito bene:
L'applicativo che ho installato dal cliente ha un bel link sul
descktop formato da link Run Time Access 97 + mio programma.
Il Cliente si lamenta quando apre i suoi database fatti in Access
2000, non sono sempre gli stessi, quindi non ha dei link che fanno
riferimento a questi db.
Hai suggerimenti migliori?
BB

 BB
Ci metti il path al runtime tuo e all'uscita lanci
e richiudi un'istanza di A2k
MAssimiliano

 ha scritto nel messaggio
news:GdkHc.43034$c_1.1...@twister1.libero.it...

Come farlo in autmoatico non lo so, ma il collegamento deve avere come riga
di comando
"C:\programmi\Office 97\msaccess.exe " "C:\applicativi\pippo.mdb"
Antonio
Newsgroup: it.comp.appl.access
Titolo: apertura più report con evento su click

Ciao a tutti, ho la necessita di stampare un report e per fare questo
utilizzo il codice consigliatomi da amorel avrei per la cessita che
cliccando il tasto no oltre a non stampare dovrebbe chiudere
l'anteprima
ok = MsgBox("Stampare Il Registro dei Biancosegni ?", vbYesNo)
If ok = vbYes Then DoCmd.OpenReport "biancosegni1", acViewNormal


Ciao, ho fatto questa prova:
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
    Dim stDocName As String
    stDocName = "Tips"
    DoCmd.OpenReport stDocName, acPreview
  risp = MsgBox("stampare ?", vbYesNo)
    If risp = vbYes Then
    DoCmd.OpenReport stDocName
    Else
    DoCmd.Close acReport, stDocName
    End If
Exit_Comando5_Click:
    Exit Sub
Err_Comando5_Click:
    MsgBox Err.Description
    Resume Exit_Comando5_Click
End Sub
Vedi se è quello che volevi.
Ciao
Alberto


ciao Alberto,  però dovrei utilizzarlo per l'apertura contemporanea di
più report e poi scegliere singolarmente se stampare o meno quello
visualizzato questo mi sembra fatibile per singolo report, oppure
sbaglio?


Ciao Marco,
mi è capitato di farlo su più report, ripeti la sequenza a cascata.
Salvo che, alla fine, non risulti più comodo qualche pulsante in più.
Ciao
Alberto

 - Mostra testo citato -
ciao amorel scusa ma non ho capito


Ciao Marco,
vedi se va bene così:
DoCmd.OpenReport "report1", acViewPreview
risp = msgbx("Stampare ?", vbYesNo)
If risp = vbYes Then
DoCmd.OpenReport "report1", acNormal
Else
DoCmd.Close acReport, "Report1"
End If
DoCmd.OpenReport "report2", acViewPreview
risp = msgbx("Stampare ?", vbYesNo)
If risp = vbYes Then
DoCmd.OpenReport "report2", acNormal
Else
DoCmd.Close acReport, "Report2"
End If
ecc. ecc.
Ciao
Alberto

Ma non capisco se la voglia di complicarsi la vita è normale....!
Soluzione:
1) Fai una Combo nel Menù, o nella maschera, per selezionare il Report
da stampare prima, quindi apri solo quello che vuoi stampare.
2) Se hai una versione di Access<2007(di cui non conosco la
possibilità di creare MenùPopup) creati un MenùPopup con una voce che
richiama una funzione.
Nella Funzione dichiarata Public in un Modulo recuperi il nome del
Report Attivo con 
Screen.ActiveReport.Name
 e lo mandi in Stampa con la
Funzione Output in questo modo non
si chiude l'anteprima...!
Con Access2007 io farei una Macro chiamata AutoKeys che con F1 manda
in stampa sempre il Report Attivo...
Saluti.
@Alex
Newsgroup: it.comp.appl.access
Titolo: query di rimozione duplicati, lasciandone uno nella tabella

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

 ho guardato anche nella bibbia 
http://web.mclink.it/MC5884/
 ma niente
 
I duplicati sono tali con riferimento a:
     a - un solo campo,
     b - più campi,
     c - tutti i campi?
 
Se è vera la condizione a (ovvero b), qual è il criterio
che definisce chi deve restare e chi deve essere eliminato?
 
Bruno

 
 
i duplicati hanno *tutti* i campi uguali, sono una ventina (i campi, non i 
duplicati)
in altri casi il campo ID è uguale ma ci sono variazioni negli altri che ne 
permettono la distinzione
 
ad ogni buon conto la query che Access ha generato per trovarli (i 
duplicati) ne controlla una decina nel SELECT e nel GROUP e un paio in meno 
in HAVING e ORDER (non chiedetemi perché, ha fatto tutto il wizard)
 
SELECT x.a, x.b, x.c, x.d, x.e, x.f, x.g, x.h, x.i, x.j
FROM MyTable x
WHERE (((a) In (SELECT a FROM [MyTable] As Tmp GROUP BY x.a, x.b, x.c, x.d, 
x.e, x.f, x.g, x.h, x.i, x.j HAVING Count(*)>1  And b = x.b And c = x.c And 
d = x.d And e = x.e And f = x.f And g = x.g And h = x.h)))
ORDER BY x.a, x.b, x.c, x.d, x.e, x.f, x.g, x.h;
 
questa query me li elenca, ok, ma poi, con le mie competenze ci posso fare 
il brodo :/


 duplicati)
[...]
 
Se i duplicati hanno TUTTI i campi uguali risolvi il problema con poco:
SELECT LinkedTable.Venditore, LinkedTable.Compratore, 
LinkedTable.ID_Prodotto
FROM LinkedTable
GROUP BY LinkedTable.Venditore, LinkedTable.Compratore, 
LinkedTable.ID_Prodotto;
 
Naturalmente debbono essere elencati tutti i 20 campi perché con
l'opzione Totals (GROUP BY) non puoi usare il semplice " * ".
 
Bruno

 Se i duplicati hanno TUTTI i campi uguali risolvi il problema con poco
 
...e probabilmente è anche la soluzione indolore che cercavo, grazie.
 
devo anche dire che al momento questo "problema" è saltato fuori in una 
stampa statistica di Access che - appunto - non corrispondeva con la stessa 
stampa fatta direttamente da SQL Server; potrebbero essercene altre e non 
sono sicuro che la soluzione proposta possa andare sempre bene.
 
Vedremo.

Newsgroup: it.comp.appl.access
Titolo: query filtro data dal al

ho una query in cui vi è una colonna data
devo filtrare tutti i record con la data che vanno da datax a datax1
come fare?
l.
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie
Between [datax] and [datax1]
Un consiglio, cambia il nome al campo; "data" č, oltre al nome proprio di un androide, un termine riservato ad access...
Ciao.
-- 
Sergio MAZZA 

 Select * FROM Tabella where [data] BETWEEN [datax] AND [dataY]
grazie a te e a sergio mazza per per risposte!
luigi


 Ciao.
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

 ha scritto nel messaggio news:f62n8u$2cg$1...@tdi.cu.mi.it...
e Access Non li accetta???
ecco perchè SELECT C3PO FROM ... non mi funziona...
Grazie Sergio
[risposta]
Sarebbe stato il cavallo di battaglia del CISA 4... Boccaccia mia!!
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007
[risposta]
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Aiuto x CF...Help...

salve giovani...
chi sarebbe cosě gentile da postarmi in email... un Db con i dati essenziali
di inserimento x il calcolo del Codice fiscale...
con una tabella che si aggiorna ???  Grazie 1 milione di ?uro  !!!
Cl@udio

 ha scritto nel messaggio

Hai violato "'na pocu" (una certa quantita') di regole di netiquette.
Te le elenco:
Non si richiedono db
Tanto meno in e-mail (vietatissimo)
Con per di piu' delle specifiche caratteristiche (neanche un db che gia' uno
magari si trova).
Ciononostante ti do un suggerimento, vai sul sito comune che trovi quello
che ti serve (link qui sotto)
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

Newsgroup: it.comp.appl.access
Titolo: Barra Menu Acc2000

Il Problema che mi si presenta è il seguente:
Creando una barra del menu mi appare sul lato destro una casella combinata 
di sistema dove dice di Digitare una Domanda.
Come faccio ad evitare che ciò accada.
Ringrazio in Anticipo


hai inserito qalche query che lanci???
altrimenti non dovrebbe
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Info:  
www.donkarl.com/it

 in Realtà lancia in automatico una Maschera


> Giugno 2005 Info:  
www.donkarl.com/it
-- 


>> in Realtŕ lancia in automatico una Maschera

Newsgroup: it.comp.appl.access
Titolo: VBA: loop infinito...

Salve a tutti,
è possibile interrompere l'esecuzione
del codice se ci si rende conto di essere entrati
in un loop infinito? :-(
grazie!
ringo

 in un loop infinito? :-(
Ctrl+Break
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:b2b1q3$1b4mnv$1...@ID-46617.news.dfncis.de...

grazie!

...

Devi premere Ctrl-(Pausa/interr) ti apparirà la finestra di Debug e da lì termini
ciao

Newsgroup: it.comp.appl.access
Titolo: errore nella stampa maschera

ciao
da poco uso access, ho appena creato una maschera, no ho modificato la
grandezza,e quando provo a stamparla mi dice che l'immaggine e' piu' grande
della pagina etc...e mi stampa solo l'intestazione, il corpo ed il resto
nisba.....ho smanettato nelle opzioni pagina ma nulla....
help!!
buon lavoro e grazie
Antonio

 nisba.....ho smanettato nelle opzioni pagina ma nulla....
Esiste in Access uno strumento apposito x fare le stampe: si chiama
report...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: database in rete..

ciao a tutti qualcuno mi consiglia, se possibile, un sistema veloce per
avere un db aggiornato anche non in tempo reale, tramite internet? mi spiego
meglio, ho quattro o cinque uffici che utilizzano un db in locale, vorrei
avere aggiornato i dati in uno di questi uffici almeno una volta al giorno.
grazie per l'attenzione

pietro wrote:

Acquista un servizio di Hosting PHP/MySQL, crea il DB in MySQL, 
utilizza MySQL ODBC ed utilizzalo da sponda per l'aggiornamento. 
Se in tutti gli uffici disponi dell'ADSL o comunque di un accesso 
broadband puoi utilizzare Ms Access come FE e MySQL come NE senza 
problemi di sorta, cose' avresti tutto aggiornato in tempo reale.
Saluti

 ha scritto nel messaggio
news:ub2Ma.136383$lK4.3...@twister1.libero.it...

no non posso restare connesso dagli uffici 24 su 24, mi basterebbe poter
aggiornare il db una volta sola la sera, i dati dei db dei vari uffici
devono restare separati, non potrei creare un ftp con le varie cartelle e
tenere aggiornati i dati inviandone una copia? sto dicendo un'assurdità?

 ha scritto nel messaggio
news:rI2Ma.280474$g92.6...@news2.tin.it...

fai l'upload dei dati che ti servono su un sito internet e fai il download
la sera
semplice ed economico
ciao, AEOM

Newsgroup: it.comp.appl.access
Titolo: Somme parziali

Ho una tabella con
treno:numerico
stazione: testo
Saliti: Numerico
Scesi: Numerico
vorrei tramite query calcolare le persone a bordo (somme parziali) per ogni
id.
quello che sono riuscito a fare fino ad ora č calcolare sě le somme
parziali, ma senza riuscire a distinguerle per treno.
in poche parole vorrei che la somma ricominciasse ad ogni cambio di treno.
Potete aiutarmi  ??
Grazie

 in poche parole vorrei che la somma ricominciasse ad ogni cambio di treno.
Che tecnica hai usato per calcolare le somme parziali nella query?
Ciao. Claudio.

 Ho usato il Dsum



una query di raggruppamento?
Saluti.
Emanuele.

ho usato Dsum
Newsgroup: it.comp.appl.access
Titolo: Tabelle collegate

Ho la necessità di lavorare su dei file txt contenenti dei dati.
Ho importato in access i file con dei collegamenti ma sulle tabelle che
access mi crea non posso creare delle relazioni. Ho quindi creato una query
di creazione tabella ma quando vado a rieseguirla per aggiornare i dati
delle tabelle mi dice che non la può eliminare perchè facente parte di una
relazione.
Come posso fare senza eliminare tutte le volte le relazioni tra le tabelle
???
Grazie

 prova con una query di eliminazione e successivamente una query di
accodamento
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.appl.access
Titolo: The Evils of Lookup Fields in Tables

Ho trovato questo in 
http://www.mvps.org/access/lookupfields.htm
, ma non 
riesco a capirne il senso (forse perchè sono una frana in inglese?) Per 
piacere c'è qualcuno che mi spiega il concetto di fondo? Poi provo a 
rileggere!

 wrote in message
news:43f455ef$0$29113$
5fc...@news.tiscali.it

Il concetto di base è che nelle query grazie alle relazioni è 
disponibile l'AUTOLOOKUP quindi puoi gestire anche Campi delle
altre tabelle semplicemente inserendoli nella query per dar modo
ad esempio all'ordinamento per Nome invece che per ID(Numerico)...!
Ecc...!
La cosa da capire è l'AutoLookUp che è data per scontata da molti
ma estremamente efficace e comoda.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Alessandro Baraldi ha scritto:

Grazie! Mitico!

 Grazie! Mitico!
Se fossi Galeazzi non sarebbe molto carino...!!!
;-)


 Grazie! Mitico!
Se fossi Galeazzi non sarebbe molto carino...!!!
;-)
@Alex

Newsgroup: it.comp.appl.access
Titolo: operazioni su record corrente e record precedente in report

dovrei calcolare un interesse nel listato dei record di un report
quindi dovrei su ogni record fare al differenza dell'importo in euro
con il record precedente e in base al fatto se è positivo o negativo
devo calcolare gli interessi sulla differenza come avviene in un
normale estratto conto bancario
qualcuno ha idea di come potrei fare? grazie. 

 ha scritto nel messaggio
news:42e48e76$0$318$5fc...@news.tiscali.it...

La cosa migliore è effettuare il computo in un campo calcolato di una query;
per come fare riferimento in una query al valore di un campo del record
precedente o successivo, vai al seguente link:
http://support.microsoft.com/default.aspx?id=101081
Ti consiglio di NON usare la soluzione che usa la DLookup in quanto
presuppone che la query sia ordinata per la chiave primaria, cosa che nel
tuo caso non credo sia vera (dovrebbe essere ordinata per data e per qualche
cos'altro): usa la soluzione che richiama una funzione VBA, così prescindi
da come la query è ordinata: dovrai però fornire nel richiamo della funzione
il nome della query stessa e non il nome della tabella su cui è basata.
Se vai sul Sito Comune (link qui sotto) nella Sezione Queries trovi un
esempio di quello che ti serve nel database allegato alla FAQ intitolata
"2.6 Esempi di utilizzo e creazione di queries in Access 97"; l'esempio si
visualizza scegliendo il topic intitolatao Referring to a Field in the
Previous or Next Record.
Se usi una versione di Access successiva ad Access 97 prova a vedere il
database allegato alla FAQ intitolata "2.18 Esempi di creazione ed utilizzo
delle queries per Access 2000 e versioni di Access successive".
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Aiuto! Cosa strana con access 97

Ciao a tutti, ho creato un database con access 97 che mi deve aiutare a
tenere una serie di scadenze ed informazioni
Il tutto č creato con una maschera su cui č presente una struttura a schede.
Tutto funziona bene, tranne nel momento in cui applico un qualsiasi filtro.
In una dell 5 schede non mi compaiono piů le righe con i dati!!
Cosa ho sbagliato?
Cosa posso fare?
Grazie a tutti!!
Ciao ciao
Marco


A occhio e croce il filtro č sbagliato.
Saluti.
Michele

 ha scritto nel messaggio
news:X7x9d.8348$b5.3...@news3.tin.it...

Grazie al tuo suggerimento ho trovato la soluzione
Nella sottomaschera della scheda c'era impostato un filtro!!!
Grazie mille!!

 ha scritto nel messaggio
news:XRw9d.93141$35.43...@news4.tin.it...
[CUT]
Forse sei nuovo del NG, quindi mi sembra giuso informarti che in questo NG
di norma non si risponde a messaggi che non usino un Subject pertinente con
il quesito posto.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Chiedo scusa se non ho usato un subject non pertinente, ma non sapevo come
riuscire a specificare il problema in poche parole!!
Grazie comunque a chi, anche se non c'era un subject pertinente, ha risposto
lo stesso!!
Marco

Newsgroup: it.comp.appl.access
Titolo: Leggere dati da un file grafico

Saluti al Nwsgrp,
cerco informazioni (siti, consigli, ecc..) su come fare leggere ad una
applicazione access dei dati da un file grafico.
Tanto per intenderci come fa la macchina delle schedine del lotto dal
ricevitore.
Mi serve per poter utilizzare un form di carta precostituito con sezioni da
annerire e caricare in automatico i dati nel DB.
Grazie in anticipo
Gian

 ha scritto nel messaggio
news:8vehhk$59k$1...@nslave3.tin.it...

Tecnicamente non conosco il lettore di schedine ma credo sia un 'semplice'
scanner con un software che legge i pixel bianchi e neri; probabilmente
tenendo conto dei neri.
Tecnicamente non dovrebbe essere difficile realizzare una routine che legge
un bmp in bianco e nero rilevando le differenze di colore, la routine sul
sito comune potrebbe essere un punto di partenza; l'unico ostacolo è la
grandezza del file bmp e la velocità di elaborazione del pc...
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Query ricerca comuni

Per cortesia un aiuto.
Ho una maschera dove inserisco dei dati anagrafici e rispettivi comuni di
residenza. Ho creato una Query di ricerca comuni ma il risultato mi
visualizza anche dei doppioni.(il comune di Brescia potrebbe essere presente
più volte).
Domanda:
Come fare per avere una Query che mi dia un risultato con il solo comune
Brescia ? Per esempio se Brescia è inserito 10 volte in tabella, come fare
nella Qry per farlo risultare una sola volta? Idem per gli altri
La Query deve selezionarmi tutti i nomi dei Comuni presenti in tabella  ma
una sola volta.
Grazie 1000
Saluti Giorgio

 ha scritto nel messaggio
news:Sw92d.259810$OR2.11...@news3.tin.it...

Ciao Giorgio
in visualizzazione struttura della query dal menù visualizza seleziona
Totali, questo ti permette di Raggruppare i vari campi. La stessa operazione
la puoi fare utilizzando il pulsante "Sommatoria" quello con la lettera
greca che assomoglia ad una "E".
Ciao, Carlo

 ha scritto nel messaggio
news:Sw92d.259810$OR2.11...@news3.tin.it...

Apri la struttura della query e visualizza l'sql, dopo SELECT inserisci
DISTINCT e vedrai che ogni comune ti comparirà una sola volta, a patto che
tu stia eseguendo la query solo sul campo comune.
-- 
strano...mavero
Bisogna essere soli per viaggiare: se si va con altri, tutto finisce in
parole.
Freya Stark

 Grazie 1000 a tutti voi

Newsgroup: it.comp.appl.access
Titolo: Tasto destro del mouse...

Ciao a tutti,
Dopo anni che sviluppo in access, un cliente mi ha fatto notare che con il
tasto destro del mouse, non compaiono i soliti comandi, copia, incolla,
taglia, applica filtro, importa immagine ecc. ecc.
Il problema esiste solo dai clienti e quindi utilizzando il runtime.
Ho cercato nell'help ma non ho trovato nessuna informazione.
Grazie per eventuali dritte.
Gaetano.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Gaetano.
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 Ti basta settare PopUp come tipo di menu
Grazie Mille funziona che è una meraviglia.!!


 Grazie Mille funziona che è una meraviglia.!!
Considera però che se vuoi modificarlo non puoi accedere da
Strumenti
Personalizza...
ma dovrai rendo visibile dalla collection Commandbar

Newsgroup: it.comp.appl.access
Titolo: Aiuto ru report

volevo chiedere se ci fosse qualcuno disposto ad aiutarmi in questo
problema:
Ho una applicazione che funziona benissimo, ma volevo migliorare una
funzione.
Il problema e nel fatto che richiamando dei clienti, li accodo con una query
di acc. , e sucessivamente stampo delle etichette, ( una per ogni cliente
richiamato )  .
Perň succede che a volte debbo stampare piů etichette della stessa persona e
allora tutte le volte debbo accodare piů volte la stessa persona.
Volevo sapere questo: ho aggiunto un campo nella form chiamandolo " numero
copie " come posso far si che immettendo un valore tipo 3 ( che indichi 3
copie ) successivamente in stampa delle etichette mi stampi 3 etichette con
lo stesso indirizzo ?
Saluti a tutti.
Massimo

 wrote in message
8gs9nu$hm7$1...@fe2.cs.interbusiness.it...

Massimo, conosci il Sito Comune ( 
http://members.xoom.it/it_db_access/
 ) ???
nelle Faq c'č la risposta per quello che ti serve e molto altro.
Cioa Marco

 ha scritto nel messaggio
news:8gt2vc$iqi$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.appl.access
Titolo: Utilizzare la Funzione Replace con più variabili

Ciao a tutti e grazie in anticipo a chi mi risponderà,
Sicuramente per diversi di voi il quesito che pongo sarà banale. ma io non ne riesco ad "uscire".
Per eliminare i caratteri accentati e i caratteri speciali all'interno del codice che ho realizzato(per la gestione della fatturazione elettronica) voglio utilizzare la funzione Replace. Esempio :
 
'Print #1, "<Nome>" & Replace(Me.Nome, "à", "a") & "</Nome>";
 
Mi piacerebbe abbinare se fosse possibile alla stessa stringa più caratteri accentati da sostituire, oppure inserire più stringhe associate fra loro .Vi faccio un altro esempio :
'Print #1, "<Nome>" & Replace(Me.Nome, "à", "a") & "</Nome>";
'Print #1, "<Nome>" & Replace(Me.Nome, "ò", "o") & "</Nome>";
'Print #1, "<Nome>" & Replace(Me.Nome, "ù", "u") & "</Nome>";
 
Aspetto preziose vostre in merito......

Salve,
 
Dino:

Puoi usare una variabile:
 
Dim strNome As String
 
strNome = Me!Nome
 
strNome = Replace(strNome, "à", "a")
strNome = Replace(strNome, "ò", "o")
strNome = Replace(strNome, "ù", "u")
 
Print #1, "<Nome>" & strNome & "</Nome>";
 
Karl
*********
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it
 

Grazie mille Karl, provo e ti faccio sapere.


Tutto OK Karl funziona benissino.
Grazie ancora

Newsgroup: it.comp.appl.access
Titolo: chiamare Ribbon da form e vba  (non usando onAction)

Ciao a tutti e buon anno. Dato un ribbon funzionante, se da un pulsante di una form generica volessi richiamare sue funzionalità in maniera generica, come devo agire? Con Commandbar riesco a navigare il ribbon ma execute non funziona, chiamando genericamente MyFunction(IRibbonControl) non so come passargli l'argomento IRibbonControl. Ovviamente MyFunction("NomeIRibbonControl") non funziona. Ho googolato parecchio ma sembra che solo io abbia questa esigenza. Idee? Grazie

 Ciao a tutti e buon anno. Dato un ribbon funzionante, se da un pulsante di una form generica volessi richiamare sue funzionalità in maniera generica, come devo agire? Con Commandbar riesco a navigare il ribbon ma execute non funziona, chiamando genericamente MyFunction(IRibbonControl) non so come passargli l'argomento IRibbonControl. Ovviamente MyFunction("NomeIRibbonControl") non funziona. Ho googolato parecchio ma sembra che solo io abbia questa esigenza. Idee? Grazie
 
Bon, sembra non si possa. L'unica maniera sembra essere quella di scrivere 2 funzioni pubbliche, una che faccia riferimento al Ribbon (con IRibboncontrol x individuare il chiamante) che chiami a sua volta una funzione con i comandi veri e proprio, tramite String come argomento. E' quindi utilizzabile da ogni punto del programma. Mi sembra una minchiata enorme, ma se non si può fare altro....

Newsgroup: it.comp.appl.access
Titolo: Un consiglio

Ciao a tutti,
Dovrei creare un report per stampare i movimenti di cassa, nel quale
indicare in una casella di testo il saldo iniziale ad una certa data e
successivamente per ogni movimentazione vorrei calcolare la somma
progressiva fino ad arrivare ad un saldo finale.
Per fare questo ho creato una casella di testo "SOMM_INIZ",  nella quale,
mediante la funzione dsum, ho calcolato il saldo iniziale;
nella sezione corpo, ho creato un'altra casella "DIFFERENZA", impostando il
valore somma parziale a "su tutti", nella quale effettuare la differenza tra
i movimenti dare e avere;
in fine, sempre nella sezione corpo un'altra casella di testo per calcolare
la somma matematica tra la prima casella "SOMM_INIZ" e la seconda
"DIFFERENZA", riscontrando i seguenti errori:
- Nel caso in cui la differenza tra dare e avere sia negativa, tale
risultato viene in ogni caso sommato alla casella "SOMM_INIZ"
- A partire dalla seconda riga in poi, della sezione corpo, il saldo
iniziale viene  considerato più volte.
Come posso fare?
Ciao

 Ciao
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Data (intervallo di tempo)

Ciao a tutto il ng,
sono un neofita di Access e per esigenze di lavoro mi sono avvicinato,
adesso sono avanti ad un problema a cui non riesco a ttrovare
soluzione
ho creato un db che mi gestisce degli impianti luci per il nolegggio,
fin qui tutto ok, ho messo tutti i dati che mi interessano ect ect
ora però io vorrei inserire un campo dove poter inserire il periodo di
tempo in cui l'impianto non è in magazzino, ma è noleggiato, e poter
comunque aggiornarlo per prenotazioni durante tutto il corso
dell'anno.
Potete indirizzarmi su qualche guida che faccia al caso mio? oppure
potete aiutarmi con qualche dritta 
a dimenticavo vorrei anche poter stampare un report dove mi dice
quell'impianto quando è libero durante l'anno
Spero di non aver detto troppe storture informatiche :-))
grazie a tutti coloro che mi risponderanno

Eracle ha scritto:

Usa una seconda tabella in cui salverai, per ogni impianto, i periodi in
cui sono prenotati. La metti in relazione uno a molti con la tabella
impianti.
Es:
impianto: 2 
prenotato dal: 12/12/2004
prenotato al: 18/12/2004
cliente: 23
dove impianto è il codice dell'impianto che avrai nella tabella impianti,
cliente è il codice del cliente che l'ha prenotato (che troverai nella
tabella clienti) e le due date indicano il periodo.
Quando avrai realizzato una struttura così sarà facile gestire il tutto e
verificare i periodi liberi/impegnati per ciascun impianto.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it



Ciao Namor,
innanzi tutto grazie per il suggerimento, ho realizzato una struttura
come da te indicatomi, ho creato una maschera dove vado ad inserirmi
il numero impianto le due date e il cliente, e le tabelle sono in
relazione uno a molti, ora come faccio per interrogare il db e sapere
cosa ho libero in una determinata data?
Grazie Fabio

Eracle ha scritto:




Come prima cosa individua i codici degli impianti impegnati, con una query
in cui selezioni il codice impianto ed un campo calcolato Giornata:
[Inserisci la giornata] su cui imposterai un criterio del tipo Between
[Data inizio] And [Data fine]. Il campo Giornata ti serve solo per
impostare il criterio, puoi togliere la spunta alla caselle 'Mostra'.
Salva la query col nome 'Codici impianti impegnati'.
Poi fai un'altra query in cui prenderai dalla tabella impianti tutti i
campi che ti interessa vedere ed imposti sotto al codice impianto il
criterio Not In (SELECT [codice impianto] FROM [Codici impianti
impegnati]).
Quando apri la seconda query verrà in automatico eseguita anche la prima,
ti verrà chiesto di inserire una data e verranno mostrati tutti gli
impianti che in quella data non sono impegnati.


namor ha scritto:







Dimenticavo: vai sulle proprietà della prima query e imposta 'Valori
univoci: Sì', o vai sul codice SQL ed aggiungi a mano un DISTINCT dopo il
SELECT. (funziona comunque anche senza, ma così è concettualmente più
corretto, e dovrebbe essere anche più veloce).

Newsgroup: it.comp.appl.access
Titolo: Trovare i record senza corrispondente in un'altra tabella

Buonpomeriggio
Devo filtrare i record di una tabella selezionando solo quelli che *NON* 
hanno un corrispondente in un'altra tabella, possibilmente con una query :P
Suggerimenti?
-- 
ABC

 hanno un corrispondente in un'altra tabella, possibilmente con una query :P
(select chiave from altratabella)
-- 
ac
y-1=x

 
ho adottato/adattato il suggerimento 2.14 del sito comune :)
-- 
ABC

Newsgroup: it.comp.appl.access
Titolo: Scrittura in campo Ole

Qualcuno mi può aituare per favore ?
In una tabella Access ho dichiarato un campo di tipo Ole, per potervi
inserire delle immagini.
Devo scrivere il codice che, conoscendo il nome del file jpg che devo
inserire, vada ad inserire la corrispondente immagine nel campo Ole.
Ripeto: io conosco il nome del file immagine, e devo inserire l'immagine nel
campo Ole.
Brancolo nel buio.
Qualcuno mi può aiutare ? Grazie, Manlio

 ha scritto nel messaggio
news:bc23pr$ibq$1...@fata.cs.interbusiness.it...

Perché usi un campo di tipo OLE per memorizzare un immagine, fra l'altro
facendo crescere a dismisura le dimensioni del database?
Memorizzati in un campo testo della tabella il path completo (unità + nome +
extention) del file di testo, quindi visualizza l'immagine in una maschera
e/o un report usando un controllo Immagine, impostando la sua proprietà
Picture con il path dell file immagine:
Me!TuaFoto.Picture = Me!Path
Per maggiori chiarimenti su questa tecnica vai sul Sito Comune (link qui
sotto) e nella Sezione General leggi queste tre FAQ:
1) Come implementare correttamente un archivio di immagini di Stefano
Bettini.
2) Implementare un archivio di immagini di  Silvio Savoldi.
3) Archiviazione immagini di Franco Cappellaro
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------




Pur nn lavorando all'Enel ti consiglio di leggere 3 articoli su
www.sitocomune.com
In sostanza ti suggeriranno di non inserire le immagini nel campo Ole e ti
indicheranno come richiamarle.
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: weekday in una query (o escluderere sabati e domeniche)

Ciao,
mi servirebbe la sintassi per scrivere in una query la funzione weekday
che mi restituisca il numero del giorno di una settimana
(in breve vorrei filtrare le date registrate in un campo data in modo da
escludere i sabati e le domeniche...
uso access 2003
sarà banale ma non ci riesco
ciao
vie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 uso access 2003
Nella query aggiungi una colonna:
Weekday([TuoCampoData];2)
come criterio usa:
<6
-- 
Ciao
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 <6
Grazie...
nel frattempo io avevo fatto cosě:
Weekday[TuoCampoData]
e come criterio ho messo
(not 7) and (not 1)
che automaticamente č diventato salvando:
<>7 And <>1
funzionare funziona... incorro in guai particolari?


 funzionare funziona... incorro in guai particolari?
No. Solo che a me non piace il sistema americano con la domenica
come primo giorno della settimana (=valore predefinito). Preferisco di
impostare il lunedě (2 nel parametro, v.a. <F1> per Weekday).
Come vedi, cosě anche il criterio diventa un po' piů semplice.


 Come vedi, cos� anche il criterio diventa un po' pi� semplice.
In effetti sei stato un lampo... non so davvero come facciate ad essere
cos� rapidi... 
in effetti far� come mi hai detto tu... per� ho scoperto che posso mettere
due criteri in and e suppongo anche or nella stessa riga... non lo sapevo
(ma essendo pricipiante...)

Newsgroup: it.comp.appl.access
Titolo: [ACCESS] problemi con evento mousewheel

Ciao, ho un problema con la gestione dell'evento mousewheel; sto utilizzando 
il seguente codice:
// ----------------------------------------------------------------------------------------------------
// ----------------------------------------------------------------------------------------------------
Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
On Error GoTo Err
        If Count > 0 Then
            DoCmd.GoToRecord , , acNext
            Calcolo
            Me.NrRelativo = Me.NrRelativo + 1
        Else
            If (Me.NrRelativo - 1) > 0 Then
                DoCmd.GoToRecord , , acPrevious
                Calcolo
                Me.NrRelativo = Me.NrRelativo - 1
            End If
       End If
    Exit Sub
Err:
    Exit Sub
End Sub
// ----------------------------------------------------------------------------------------------------
// ----------------------------------------------------------------------------------------------------
il problema č questo: quando apro la maschera per la prima volta e cerco di 
scorrere i record con la rotellina, bypassando la gestione dell'errore, mi 
viene fuori
questo errore: "impossibile passare al record specificato" e come stringa di 
errore mi viene segnalata quella del DoCmd.GotoRecord ...
se perň clicco sul pulsante apposito, il cui codice č:
// ----------------------------------------------------------------------------------------------------
// ----------------------------------------------------------------------------------------------------
Private Sub Comando56_Click()
On Error GoTo Err_Comando56_Click
    If (Me.NrRelativo + 1) <= Me.NrElementi Then
        DoCmd.GoToRecord , , acNext
        Calcolo
        Me.NrRelativo = Me.NrRelativo + 1
    End If
Exit_Comando56_Click:
    Exit Sub
Err_Comando56_Click:
    MsgBox Err.Description
    Resume Exit_Comando56_Click
End Sub
// ----------------------------------------------------------------------------------------------------
// ----------------------------------------------------------------------------------------------------
il record si sposta E NON SOLO infatti inizia a funzionare regolarmente 
anche la rilevazione della rotellina, senza dare alcun tipo di errore.
da cosa dipende questa "anomalia" ?
Grazie
Antonio

 se però clicco sul pulsante apposito, il cui codice è:

Newsgroup: it.comp.appl.access
Titolo: curiosita su access ?

Sarei curioso di sapere se è possibile cambiare il soli  triste sfondo
grigio di access con uno colorato fatto da me ?
Chi lo sà scaglia la prima pietra
ciao e grazie comunque

Newsgroup: it.comp.appl.access
Titolo: progettazione database condiviso in postazioni differenti

Buongiorno a tutti
avrei bisogno di un aiuto per il seguente problema:
devo realizzare un nuovo programma che avrà principalmente 2 settori di 
lavoro e ogni settore lavorerà su due sedi (fisiche) diverse, vorrei 
però mantenere la tabella anagrafica comune.
Pertanto i dubbi sono:
per la tabella uso la tecnica dbmaster e dbsecondario?
e poi
come chiave primaria è meglio usare un campo numerico o uso il codice 
fiscale?
Grazie per le dritte
ciao
Nick

Nick

 jhtml&sommario=4532.jhtml&arg=4533.jhtml&area=
Il problema dell'omocodia ESISTE in fase di CALCOLO del codice fiscale.
Il problema dell'omocodia NON ESISTE in fase di attribuzione del codice fiscale 
ad un soggetto fiscale.
Ho letto proprio l'articolo di cui hai riportato il link e, come riportato, 
i casi di omocodia rilevati in fase di calcolo del codice fiscale vengono 
risolti dall'Agenzia delle Entrate mediante l'attribuzione di due differenti 
codici fiscali nuovi ad entrambi i soggetti coinvolti nell'omocodia.
Il problema dell'omocodia NON ESISTE per chi deve memorizzare un codice fiscale 
in una tabella di Access: qui è univoco (anche se non consiglierei a nessuno 
di prenderlo come chiave primaria).
Il problema dell'omocodia ESISTE in fase di attribuzione del codice fiscale 
da parte dell'Agenzia delle Entrate, ma viene risolto come ho specificato 
poco sopra.
Quello che non è bene fare, da Access, è prendere per oro colato il calcolo 
del codice fiscale tramite una procedura automatizzata, visto che solo l'Agenzia 
delle Entrate ha l'autorità per risolvere i casi di omocodia.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution

delle Entrate ha l'autorità per risolvere i casi di omocodia.
Appunto, quindi per esperienza preferisco non fidarmi.
Le chiavi primarie sono mie e le gestisco io !
Vincenzo Turturro
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400
http://www.faq400.com/
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Problema con le date!!!!!!!!!!!!!!!!!!!

Salve
vorrei sapere se è possibile creare(e se si come) un'interrogazione che
avverta con un certo anticipo (circa 30gg prima, in automatico) che il tale
giorno sarà il compleanno di una persona.
vi prego aiutatemi!!!!!!!!!!!!

 tale giorno sarà il compleanno di una persona.
    Molto dipende da *quando* vuoi ottenere l'avviso.
    Per esempio:
        . all'accensione del pc?
        . all'avvio di una applicazione access?
        . in qualsiasi momento?
        . ...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

vorrei che partisse all'avvio dell'applicazione...sto impazzendo!!!!!

 vorrei che partisse all'avvio dell'applicazione...sto impazzendo!!!!!
    Calmati e raccontaci cosa vuoi che parta all'avvio dell'applicazione...
Da questo tuo post non si capisce!...
    ;-)
    Scherzi (seri) a parte, tu vuoi che all'avvio dell'applicazione venga
mostrata una maschera con la lista dei soggetti che nei prossimi 30 giorni
compiranno gli anni. Giusto?
    Dovrai avere quindi una tabella con i campi... Ce l'hai?
    Dovrai sapere come lanciare una maschera all'avvio dell'applicazione...
Lo sai come?
    Dovrai avere una query che selezioni i soggetti della tabella di cui
sopra... Ce l'hai?...
    E cosi' via.
    Scrivo questo per farti capire, spero, che ci devi dire cosa hai e cosa
sai fare e cosa invece ti occorre sapere. Altrimenti non sappiamo da dove
incominciare a darti una mano.


vorrei che la query si eseguisse all'apertura del database
(alle brutte mi accontento di farla partire manualmente dal pannello di
comando!)
Newsgroup: it.comp.appl.access
Titolo: Maschera e sottomaschera associate :

Ciao a tutti,
finalmente sono riuscito a mettere in piedi un qualcosa di decente che
riguarda l'inserimento di una bolla , con maschera e sottomaschera per
l'inserimento degli articoli e qtà.
Va tutto bene tranne una cosa che vorrei evitare e vi chiedo se è possibile
:
La maschera di testata è associata alla testata bolle, la sottomaschera al
dettaglio , quando sono in fase di inserimento presento come campi di
testata la data bolla e il numero come default value, in questo caso anche
se esco senza inserire nulla, non viene scritta la testata.
Poi ho il campo cliente che è una casella combo associata all'anagrafica
cli. , quando scelgo il cliente , automaticamente viene scritta la testata
della bolla anche se io non inserisco nessun articolo ed esco dalla
maschera.
Ciò non mi piace xchè posso avere delle testate senza righe, la domanda è :
posso capire se chiudo la maschera che non ho inserito nessun articolo ma
solo il cliente??? In questo caso annullare l'inserimento nella tabella
testata bolla ???
Voi come fareste?
Grazie mille a tutti
Ronny.
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:194Z130Z244Z250...@usenet.libero.it...

Vai sul Sito Comune e nella Sezione Forms leggi la FAQ di Federico Luciani
intitolata "Confermare il salvataggio dei dati". Dovrebbe esserti utile per
dare soluzione al tuo problema.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:194Z130Z244Z250...@usenet.libero.it...

Inserisci una casella di testo, TxtControllo, non visibile, nella maschera
con riferimento ad un controllo della tua sottomaschera mettendo nell'
origine controllo:
=[NomeTuaSottomaschera].Form!NomeTuoControlloSottomaschera
Su Scaricamento della maschera principale:
Private Sub Form_Unload(Cancel As Integer)
Dim SQL As String
If IsNull(Me.TxtControllo) Then
    If MsgBox("Vuoi chiudere la Fattura, senza i particolari?", vbYesNo) =
vbYes Then
    DoCmd.SetWarnings False
    DoCmd.RunSQL "DELETE tblFattureVendite.IDFatturaVendite FROM
tblFattureVendite  WHERE
(((tblFattureVendite.IDFatturaVendite)=Forms!mFatturaVendita![IDFatturaVendi
te]));", 0
        DoCmd.SetWarnings True
           Exit Sub
    Else
        Cancel = True
   End If
End If
    End Sub
Naturalmente cambiando i nomi delle tabelle e della maschere.
Spero ti sia utile
Saluti Daniele
---
Newsgroup: it.comp.appl.access
Titolo: verificare connessione odbc

Buongiorno, 
ho un database con alcune tabelle collegate tramite odbc a sql server.
A volte il server viene spento, ma questo non deve pregiudicare il mio db, quindi prima di eseguire delle query sulle tabelle collegate, vorrei verificare se la connessione è attiva.
Il problema è che se apro un recordset e imposto On error goto... per ignorare l'eventuale errore, comunque il codice si interrompe.
Può essere che questo comportamento sia dovuto al fatto che il codice viene richiamato da una macro?
 
Grazie mille!
M


se ti basta controllare che il server sia raggiungibile (acceso) 
potresti pingarlo
 
'non ricordo la fonte della funzione ma funziona benone
 
Function SystemOnline(ByVal ComputerName As String)
Dim oShell, oExec As Variant
Dim strText, strCmd As String
strText = ""
strCmd = "ping -n 3 -w 1000 " & ComputerName
Set oShell = CreateObject("WScript.Shell")
Set oExec = oShell.Exec(strCmd)
Do While Not oExec.StdOut.AtEndOfStream
strText = oExec.StdOut.ReadLine()
If InStr(strText, "Risposta da") > 0 Then
SystemOnline = True
Exit Do
End If
Loop
End Function
 
 
ovvio che se acceso ma sqlserver non in esecuzione non va bene al tuo scopo
 
ciao
BFS
 
 
 


 grazie!

Newsgroup: it.comp.appl.access
Titolo: access e memoria insufficiente

Ho sviluppato un piccolo programma in Access di dietologia con routine in 
visual basic e graficamente piuttosto ricco con immagini in background e 
non.
Quando lo faccio girare in windows 98 (e gira bene)  spesso si blocca e 
appare il messaggio "memoria esaurita".
Trovo questo abbastanza strano poichè possiedo un Athlon 1200 con 256 MB 
di Ram.
Come posso evitare questi continui blocchi ?
Ringrazio
Ciao



 ha scritto nel messaggio
news:MPG.15a3dc3c4...@News.CIS.DFN.DE...

E' un problema noto; dovresti togliere le immagini di sfondo dalle
maschere...
Ciao.

 Ciao.
Mille grazie
Ciao
Mauri 

 di Ram.
Prova a convertirle tutte in .bmp e dovresti risolvere.
Togliendole del tutto risolvi di sicuro.
Ciao, Simone

 wrote in
news:MPG.15a3db28b...@News.CIS.DFN.DE
: 

Togli le immagini dalle maschere
PdA

 maschere...
Perchč? Sono in formato bitmap?

Newsgroup: it.comp.appl.access
Titolo: Maschera continua

Ho una maschera continua per l'inserimento di dati, quando li inserisco
pero' access mi apre gia' al di sotto di dove digito il corpo della
mascherasuccessiva per il nuovo inserimento. Vorrei che questa non apparisse
fino a che non digito l'ultimo parametro o ancora meglio sarebbe fino a che
non premo un determinato pulsante. Come faccio?
Grazie


mah. Puoi provare a gurdarti sull'help la proprieta' allowadditions?
-- 
Alessandro Cara