mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Verificare se esiste una tabella

Ho la necessita di verificare se una tabella esiste, prima di cancellarla.
In Access 2000 ho risolto il problema intercettando l'errore 7874 di tabella
inesistente, generato dall'istruzione DoCmd.DeleteObject, ma mi sono accorto
che non è portabile su  Access 97, il quale non intercetta tale errore.
Credo che la cosa sia risolvibile con una istruzione for ... each ... next,
ma non so come fare.
L'idea è scrivere qualcosa del genere...
      For Each tbl In Application.Table
           If tbl.TableName = "tbltemporanea" Then DoCmd.DeleteObject
acTable, "tblTemporanea"
      Next
Però il compilatore non riconosce l'oggetto Application.Table e poi non so
se occorre dichiarare tbl con un istruzione dim...
Grazie per qualunque aiuto!
giulia...@infinito.it

>Ho la necessita di verificare se una tabella esiste, prima di cancellarla.
mi pare che ci sia qualcosa sul sito comune, comunque le cose da fare
sono due.
o ti scorri l'elenco delle tabledefs o fai una query sulla tabella di
sistema MSysObject, che contiene l'elenco degli oggetti del db.  se la
apri puoi vedere che di ogni oggetto viene indicato, tra l'altro, il
nome e il tipo, quest'ultimo per mezzo di un valore numerico.  magari
più che per le tabelle è comodo usare MSysObjects per altri oggetti.
anzi, adesso che faccio mente locale, sul sito comune ci dovrebbe
proprio essere una funzione che verifica l'esistenza di una tabella in
qualsiasi db.  se il db non viene indicato la cerca sul db locale.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 ha scritto nel messaggio
news:92nth3$1pk$1...@lacerta.tiscalinet.it...

Oltre al suggerimento di Lbo, per soddisfare la tua curiosità puoi provare
con:
'----------------
Dim ctr As Container, doc As Document
Set ctr = CurrentDb.Containers!Tables
For Each doc In ctr.Documents
    Debug.Print doc.Name
Next
Set ctr = Nothing
Set doc = Nothing
'----------------
Ciao.

Newsgroup: it.comp.appl.access
Titolo: TAB in campo memo

uso un campo memo per far inserire all'utente delle note o dei dati
aggiuntivi da mettere soll'offerta da mandare al cliente.
a volte c'è la necessità di dare un TAB per allineare il contenuto d + righe
in modo da presentarlo meglio, solo che il tasto in questione sposta il
fuoco sul controllo successivo senza allineare il testo.
mi potete suggerire un'alternativa o una possibile soluzione?
grazie!
    paolo
--
+-----
| Paolo opg
| janickg ( at ) hotmail ( dot ) com
+-----

    paolo
devi intercettare il tasto tab ed modificarne l'azione con
l'inserimento si spazi
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Backup e ripristino record

Salve a tutti, volevo chiedervi una cosa...è possibile esportare tutte le 
tabelle (compresi i record) contenute in un database in un altro database 
che abbia come nome la data dell'esportazione. E in secondo luogo effettuare 
la procedura inversa importando le tabelle (compresi i record) da un 
database ad un altro...?
Praticamente una copia di backup dei dati con la possibilità di ripristino 
degli stessi.
Grazie. 

"Bit" <xx...@xxxx.xxxx> ha scritto nel messaggio
news:6yjte.43316$75.23...@news4.tin.it...

Buon divertimento
SunRex
Function BackUp()
Dim DirBackup As String
Dim DataBackup As String
Dim NomeFile As String
Dim StringaBackup As String
Dim strPathdb As String
intScelta = MsgBox("Effettuare il backup degli archivi?", vbApplicationModal
+ vbQuestion + vbYesNo, "Ciao")
If intScelta = vbNo Then
    Exit Function
Else
    If Dir("C:\TuaCartella\Backup\", vbDirectory) = "" Then
               MkDir ("C:\TuaCartella\Backup\")
    Else
    End If
        DirBackup = "C:\TuaCartella\Backup\"
        DataBackup = Format(Date, "dd-mm-yyyy")
        NomeFile = DataBackup & "-backup" & ".mdb"
        StringaBackup = DirBackup & NomeFile
        strPathdb = "C:\TuaCArtella\BackEnd\TuoDb.mdb"
        FileCopy strPathdb, StringaBackup
        MsgBox "Backup degli archivi completato.", vbApplicationModal +
vbInformation + vbOKOnly, "Ciao"
End If
End Function

Newsgroup: it.comp.appl.access
Titolo: On Error....

Su un pulsante ho la seguente routine:
Dim strInput As String, strmsg As String
strmsg = "Numero Progressivo (Progr) ?"
strInput = InputBox(Prompt:=strmsg, _
Title:="Richiesta Dato", XPos:=2000, YPos:=2000)
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.ControlType = acTextBox Then
ctl.ControlSource = ctl.Tag
End If
Next
Dim strSQL As String
strSQL = "SELECT * FROM [Automezzi_Costi] WHERE Progr =" & strInput
Forms!Automezzi_Costi.RecordSource = strSQL
End Sub
Dove devo mettere l'evento ON ERROR per far si che se nell'input box
non scrivo nulla, non mi dia messaggio d'errore ?
Grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie.
Credo che, visti i tuoi post precedenti il minimo
sarebbe ricambiare i toni delle tue risposte....!
Ma non serve, la punizione più giusta è quella
di lasciarti sbattere la testa con ACCESS, visto che
non ne azzecchi una.........!!!
P.S. Bella la battuta del ON Error per quello che devi fare,
     continua a postarne.......!!!
ZIK


 sarebbe ricambiare i toni delle tue risposte....!
Che risposte ha dato che non riesco a trovarle?
Sib

 Title:="Richiesta Dato", XPos:=2000, YPos:=2000)
CUT
Dove l'hai trovata questa sintassi?
Non era piu' facile scrivere:
strInput = InputBox(strmsg, "Richiesta Dato", 2000, 2000)
Sib
Newsgroup: it.comp.appl.access
Titolo: A97 ha una memoria di ferro ?

ho cambiato la posizione di alcuni mdb dalla cartella 'f:\access' ad
un'altra posizione,
ebbene ora quando apro uno di questi mdb compare questo avvertimento:
"Impossibile cambiare la cartella di lavoro in F:\Access"
la cosa succede con tutti gli mdb che ho spostato, ma nessuno di questi ha
tabelle collegate esternamente  o legami di alcun tipo
se creo una cartella anche vuota 'f:\access' allora il messaggio scompare
cosa cavolo c'entra il fatto che questi mdb siano stati per tanto tempo in
una certa cartella:
perchè se lo ricordano ?
grazie per i consigli
sergio

 se creo una cartella anche vuota 'f:\access' allora il messaggio
scompare...
Guarda cosa si trova nel menu Strumenti/Opzioni/Generale come
cartella di lavoro o cartella predefinita (o simile in italiano).
Non debb' essere una cartella che non esiste.
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 Non debb' essere una cartella che non esiste.
grazie, era proprio questo il problema
ciao sergio
Newsgroup: it.comp.appl.access
Titolo: Record cancellati

Salve a tutto il NG.
ho un piccolo problema da risolvere nel cancellare un record da un form con 
il pulsante creato con l'auto composizione.
la struttura della maschera è a schede e comprende mette in relazione n. tre 
tabelle Tbl_Anaper; tbl_DatPers; Tbl_Recaptel
Le tabelle sono in relazione "Tbl_Anaper" 1 a 1 "tbl_DatPers" mentre 
"Tbl_Anaper 1 a molti "Tbl_Recaptel" [cancella tutti i record correlati a 
catena]
Seleziono un record e poi lo cancello con il pulsante  "Cancella" mi dà il 
messaggio di eliminazione, confermo la eliminazione ma se vado in ricerca il 
nominativo non lo ha eliminato.
Ma, se entro nella tabella Tbl_Anaper e seleziono il codice da cancellare 
cancella il record e in più mi elimina tutti i record correlati a catena a 
quel codice
il codice generaro dall'autocomposizione del pulsante
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
grazie per l'aiuto
-- 
Il Caffé
da sempre la migliore bevanda 


A sentimento da uno smanettone che non è neppure sicuro di aver
capito....
Proverei ad anteporre al tuo codice un setfocus sul campo che vuoi
cancellare.
"Se mi sono sbagliato voi mi corrigerete!"
F:

Newsgroup: it.comp.appl.access
Titolo: Allora non si può fare! era : campi multipli nei report

Riporto il messaggio, forse era Sabato, pioveva, il cielo era prorpio scuro,
ma č passato inosservato.
Salve Lista!
Ho un problema e spero che possiate aiutarmi.
Ho un elenco di prodotti che hanno in comune la descrizione generale e
varianti relativi alle finiture e prezzi.
Quando creo il report vorrei un elenco di questi prodotti omologhi e che la
descrizione sia dopo l'ultimo record del gruppo di codici, e non dopo il
primo come accade settando il controllo "nascondi duplicati" nelle
proprietą.
Se avete suggerimenti
Grazie

 proprietà.
Non hai spiegato bene... ma se ho capito devi fare un raggruppamento per
descrizione, poi metti un piè di raggruppamento e lì dentro ci metti il
campo descrizione. Nel corpo invece i vari prodotti con i valori diversi...
Antonio
Newsgroup: it.comp.appl.access
Titolo: Formattare campo memo

Salve a tutti,
in una tabella ho un campo memo, che implemento da una maschera, nella quale
c'č una casella di testo associata a tale campo.
Poichč le informazioni contenute in tale campo sono molteplici, mi
piacerebbe poter inserire alcune formattazioni, ma non a tutto il testo, ma
solo in alcune sue parti, tipo una parola sottolineata, o in grassetto, o in
colore diverso.
E' possibile ottenere ciň?
Uso Access 2003.
Grazie
Franco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Inviato via 
http://arianna.libero.it/usenet/
Dalla prossima versione di access, sarà possibile avere un controllo per
formattare i campi testo e memo.
fino a quel momento dovrai ingegnarti.
se non ricordo male sul sito di lebans (
www.lebans.com
) trovi un controllo
che consente di gestire i formati rtf.
Il formato rtf, è una "specie di linguaggio" che come html ed altri permette
la formattazione del testo attraverso appositi tag, o istruzioni.
Il controllo rtf salva nel campo della tabella il codice sorgente con gli
appositi tag, ma visualizza in forms o report il testo formattato. Non è uno
standard ma è molto diffuso.
ciao


Grazie, sono andato a guardare gli esempi, ma sono fuori dalla mia portata;
non riesco a decifrare quello che ho trovato.
Grazie ancora per l'interessamento.



Figurati!
questo è il link diretto, non ti nascondo che non è cosa facile.
Non saprei aiutarti altrimenti.
http://www.lebans.com/richtext.htm

 Franco
Quello segnalato da Matteo è il demo semplice, con l'OCX....!
Scherzi a parte l'uso dell'OCX è evidente dal Demo allegato, ovvio che
serve un minimo di
dimestichezza da parte tua in quanto se pensavi di trovare un sistema
che con la sola imposizione delle mani  facesse tutto..... era una
pretesa bella, ma tale rimaneva....
Ovvio che la formattazione del testo viene fatta via Codice, ma c'è
poco da inventare essendo tutto disponibile nel demo stesso.
L'importante è sapere che la formattazione è del tipo RTF con tutti i
pro e contro..., ma se rimane un'esigenza fine a se stessa direi che
con un minimo di impegno si risolve.
@Alex

Newsgroup: it.comp.appl.access
Titolo: Chiudere una query in automatico

E' una query di Unione, la quarta di 5 query che mi creano un report. Sono
riuscito a far chiudere le altre in automatico prima che mi apra il report
(erano query di creazione tabella) ma questa nn mi si chiude!
Devo per caso usare il comando Close? Se cosě fosse, quali parametri uso?
Grazie


Se ho capito bene dovresti utilizzare il metodo SelectObject e poi il
Close...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Automazione word bookmarks esempio sito Ccomune

ciao a tutti,
ho scaricato l'esempio di automazione di access con word con l'utilizzo dei 
segnalibri dal sito comune, l'ho provato e mi funziona correttamente, avrei 
però la necessità in fase di inserimento dei records anzichè inserirli in 
modo orizzontale come l'esempio scaricato, io dovrei inserirli in modo 
verticale, spiego meglio con un esempio:
l'esempio del sito comune in fase di inserimento del recordset, mi crea 
prima la riga con le intestazione di colonna:
Data       Prodotto                                        Um      Quantità 
Prezzo        Totale
e poi sotto elenca i vari records.
record1
record 2
ecc...
ame interesserebbe invece una struttura composta in questo modo:
Record 1:    Data            ......
                    Prodotto        ......
                    UM                ......
                    Quantità        ......
                    Prezzo            ......
                    Totale            ......
Record 2:    Data            ......
                    Prodotto        ......
                    UM                ......
                    Quantità        ......
                    Prezzo            ......
                    Totale            ......
e così via...
è realizzabile una struttura del genere?
grazie, Tommy

 ha scritto nel messaggio
news:G1%Pe.33425$HM1.9...@twister1.libero.it...

Si, modifichi il ciclo sul recordset e fai inserire per ogni campo
l'etichetta fissa più il valore del campo, magari separati da una
tabulazione (chr$(9)), per mantenere la leggibilità. Le posizioni delle
tabulazioni le devi impostare subito prima di esportare i record.
While Not .EOF
    Wrd.Selection.TypeText "Data:" & chr$(9) & !data & vbcrlf
    Wrd.Selection.TypeText "Prodotto:" & chr$(9) & !prodotto & vbcrlf
    Wrd.Selection.TypeText "Quantità:" & chr$(9) & !quantita & vbcrlf
    ...............
Ciao.
Namor
Newsgroup: it.comp.appl.access
Titolo: Conversione in Euro

Salve a tutti.
Vorrei chiedervi se esiste una funzione che posso utilizzare in un controllo
di una maschera o report che faccia la conversione in Euro. Ho provato con
EuroConvert([campo lire];ITL;EUR;2;2) ma non va, probabilmente č
utilizzabile solo da VB.
Grazie

--------------------------------------------------------------------------<
-- 
Posted from [212.141.54.103] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


La conversione della Lira in Euro deve rispondere alle specifiche emanate
dal parlamento europeo.
Il cambio è fisso: un Euro = a Lire 1936,27
La terza cifra decimale va arrotondata per eccesso o per difetto a seconda
del suo valore.
Ti propongo queste due funzioni.
La prima trasforma le lire in euro, la seconda arrotonda il valore euro.
Public Function LireToEuro(denaro As Currency) As Currency
On Error Resume Next
Dim Euro as Currency
Euro = 1936.27
LireToEuro = denaro / Euro
End Function
Public Function ArrotondaEuro(dblValore)
   'dblValore è il valore in euro precedentemente avuto
    dblValore = (dblValore * 100) + 0.5
    If InStr(CStr(dblValore), ",") <> 0 Then dblValore = Int(dblValore)
    ArrotondaEuro = dblValore / 100
End Function
ArrotondaEuro è il vero valore.
Metti questo valore in un campo numerico di tipo precisione singola o
doppia.
Ciao, Carlo


in db realizzati con access 97 ho risolto così
campi importo ed euro  tipo valuta con i relativi formati,
maschera : su dopo aggiornamento importo
euro = Fix("" & (importo / 1936.27) * (10 ^ 2) + Sgn(importo / 1936.27) *
0.5) / (10 ^ 2)
se nelle tabelle hai già dati caricati e vuoi aggiornare il campo euro puoi
usare la seguente query di aggiornamento del campo euro nella tabella
fondcass dove l'importo in lire si trova nel campo somma
Fix("" &
([fondcass]![somma]/1936,27)*(10^2)+Sgn([fondcass]![somma]/1936,27)*0,5)/(10
^2)
spero di esserti stato utile
P.S. la funzione di arrotondamento è una variante di quella presente sul
sito comune di Karl.. se non ricordo bene il nome non me ne voglia
--
lo...@tin.it
http://sicilia.cjb.net
http://bonavita.homepage.nu
http://space.tin.it/arte/loobo
http://www.geocities.com/bonavitao
Newsgroup: it.comp.appl.access
Titolo: Tasto che disabilita se stesso

Come puo'  il codice associato a un bottone di comando, disabilitare il
bottone di comando stesso?
mi da' errore 2164 e dice "impossibile disattivare il controllo che ha
attualmente lo stato attivo"
Spiego - ho una tastierina (gruppo di bottoni di comando) disegnata a video,
per ogni tasto che si preme viene incrementato un contatore.  Quando il
contatore arriva a 100, disabilito tutti i tasti  (per evitare che nella
foga l'utente prosegua l'immissione) e passo a fare dei calcoli.
il codice associato alla pressione del tasto Cmd_01 e'
Private Sub cmd01_Click()
    Let TOT = TOT + 1
    If TOT >= LIM Then concludi_conteggio
End Sub
Quando il contatore TOT arriva al valore limite di LIM, viene chiamata la
routine concludi_conteggio che dapprima disabilita i tasti e poi chiama a
sua volta la routine di calcolo
Private Sub concludi_conteggio()
    Me.Cmd_01.Enabled = False
    Me.Cmd_02.Enabled = False
    ...
    Effettua_calcoli
end sub
quando il tasto Cmd_01 cerca di forzare a falso l'attributo enabled di se
stesso, da' errore. E' anche ragionevole, ma come aggiro la situazione?
grazie
VA

 ha scritto nel messaggio 
news:g076rm$qt5$1...@tdi.cu.mi.it...

Prima di disabilitare tutti i controlli sposti il fuoco su un altro 
controllo...
Ciao.
-- 
Sergio MAZZA 

 controllo...
Funziona!
grazie

Newsgroup: it.comp.appl.access
Titolo: Aiuto

50 e viceversa.
Non ho altro da dire.
Grazie mille.
Alessia

 ha scritto nel messaggio
news:8mosva$9c1$1...@pc1.spin.it...

Se il valore da adoperarare come secondo fattore della moltiplicazione è
contenuto in un controllo di una maschera di nome Maschera1 e si chiama
Percentuale, prova a scrivere come espressione:
    Int(([nomecampo]*[Forms]![Maschera1]![Percentuale]+49)/100)+[nomecampo]
Roberto
Newsgroup: it.comp.appl.access
Titolo: Costruzione Report

Ho un report basato su una query che resituisce un recordset con la seguente
struttura:
PROPRIETARIO1 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO1 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO1 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
PROPRIETARIO2 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO2 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO2 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
PROPRIETARIO3 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO3 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO3 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
Dove x, y e z sono proprietà del singolo oggetto.
Non riesco a costruire il report in modo tale che presenti nell'Intestazione
di Pagina i dati relativi al singolo PROPRIETARIO e nel Corpo tutti gli
oggetti di quel proprietario indipendentemente dal loro numero.
In sostanza, ho bisogno che l'intestazione di pagina si ripeta per ciascun
nuovo PROPRIETARIO solamente quando tutti gli oggetti di quello precedente
sono stati stampati.
Grazie per qualsiasi aiuto.

 Grazie per qualsiasi aiuto.
Prego, Buon Natale ed un Felice 2006
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


Funge :)
Grazie ancora.
Ciao

 Ciao

Newsgroup: it.comp.appl.access
Titolo: Mettere Nome tabelle in Casella Riepilogo

Ciao a tutti
Non sono un esperto, gradirei sapere come si fa a mettere i nomi
delle tabelle presenti nell'mdb in una casella di riepilogo,
cos� da poter scegliere su quale tabella lavorare.
Grazie.
Antonio 
 

 cosě da poter scegliere su quale tabella lavorare.
 
Puoi usare questo come "Origine riga" della combo:
 
SELECT MSysObjects.Name
FROM MSysObjects
WHERE MSysObjects.Name Not Like "MSys*"
      AND MSysObjects.Type In (1,4,6)
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 
 
"Karl Donaubauer"  ha scritto nel messaggio 
news:aier2c...@mid.individual.net...

Grazie Karl
Dove posso andare a studiare/capire quello che mi hai gentilmente scritto ?
Antonio
 
 


ciao Karl
e per aprire la tb corrispondente qual'č il codice da inserire sull'evento 
clic?
 
 
 
 


ciao Karl
e per aprire la tb corrispondente qual'� il codice da inserire sull'evento
clic?
 
per non scomodare il Gran Maestro:
 
Private Sub miaCasellaCombinata_Click()
DoCmd.OpenTable Me.miaCasellaCombinata
End Sub
 
saluti
Thomas.az
 
 


grazie Thomas 
 
 

 ?
 
Le tabelle di sistema non sono buon documentate.
 
MSysObjects č una tabella di sistema che contiene tutti oggetti
del database. In versioni <2007 puoi vederla con
Strumenti - Opzioni - Oggetti di sistema,
in >=2007 l'opzione si trova tra le opzioni del riquadro di spostamento.
 
Il campo "Name" contiene il nome dell'oggetto,
Il campo Type 1 = tabella locale, 4 = tabella ODBC, 6 = tabella collegata
Not Like "MSys" dice che non vuoi vedere le tabelle di sistema.
In versioni >=2007 puoi anche aggiungere:
And MSysObjects.Name Not Like "f_*"
per non vedere le tabelle per i nuovi tipi di dati (allegato, MVF ecc).


 ?
 
Le tabelle di sistema non sono buon documentate.
 
MSysObjects è una tabella di sistema che contiene tutti oggetti
del database. In versioni <2007 puoi vederla con
Strumenti - Opzioni - Oggetti di sistema,
in >=2007 l'opzione si trova tra le opzioni del riquadro di spostamento.
 
Il campo "Name" contiene il nome dell'oggetto,
Il campo Type 1 = tabella locale, 4 = tabella ODBC, 6 = tabella collegata
Not Like "MSys" dice che non vuoi vedere le tabelle di sistema.
In versioni >=2007 puoi anche aggiungere:
And MSysObjects.Name Not Like "f_*"
per non vedere le tabelle per i nuovi tipi di dati (allegato, MVF ecc).
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
Grazie di cuore
Antonio
Newsgroup: it.comp.appl.access
Titolo: Curiosità su DISTINCT

In Access 97 non è possibile utilizzare la seguente istruzione
nonostante sia standar SQL-2:
SELECT Count(DISTINCT NomeCampo) FROM NomeTabella
nelle versioni successive (2000 e 2002) è possibile usarla?
Ciao BB

 ha scritto:

No.
Ma ci sono possibilità per ricevere lo stesso risultato con Jet-SQL.
in A00 e AX puoi usare:
SELECT Count(*)
FROM (SELECT DISTINCT NomeCampo FROM NomeTabella)
o p.e. con due Alias:
SELECT Count(*) AS Foo
FROM (SELECT DISTINCT NomeCampo FROM NomeTabella) As Bar
In A97 invece per la stessa cosa si debbe usare una strana
(e non documentata) sintassi:
SELECT Count(*) AS Foo
FROM [SELECT DISTINCT NomeCampo FROM NomeTabella]. AS Bar
Questo sintassi funzione anche in A00 e AX.
Per di più anche A00 e AX cambiano lo statements che ho
scritto sopra automagically a la sintassi con "[ ]."se la query viene
salvata. Alora dopo A97 MS solo ha aggiunto una traduzione per
la sintassi più logica con ( ).
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com



Incredibile!!!! Non sapevo che anche Access 97 potesse fare select
annidate! Grazie 1000!!!!!
Ciao BB :-)))
Newsgroup: it.comp.appl.access
Titolo: ODBC call failed... eppur si muove

Ho qui un vecchio portatile per le demo sul quale c'è Access Runtime 
2013
Il driver SQL era la versione 2013, adesso aggiornato a 2017
 
quando (ri)configuro la parte ODBC arrivo fino in fondo senza errori, 
anche il test della connessione è positivo
 
però, all'atto pratico, avviando l'applicazione che deve accedere al 
server, si ferma subito con l'errore in oggetto.
 
Domanda uno: perché? il messaggio di errore, come al solito, non 
riporta nessun codice o spiegazione
 
Domanda due: posso fare qualcosa da runtime o devo tornare in ambiente 
di sviluppo e modificare qualcos'altro?
 
grazie
 
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


per capire cosa ha scatenato l'errore 3146 puoi scorrere la collection Errors
vedi: 
https://learn.microsoft.com/en-us/office/client-developer/access/desktop-database-reference/error-object-dao
 
 
Ciao
Giorgio Rancati

 
 
 
Per 'driver sql era la versione 2013' intendi il driver odbc?
E di che db stai parlando?
Potresti provare ad accedere, via odbc, allo stesso db, usando un altro 
programma, anche Excel ad esempio
 

 per capire cosa ha scatenato l'errore 3146 puoi scorrere la collection Errors
 
ohibò Giorgio, e da dove hai tirato fuori quel codice 3146?


 programma, anche Excel ad esempio
 
non posso provare, il pc non ha office installato
potrei mettere il runtime di excel, sempre che esista ancora: ho giusto 
preparato una tabella pivot che prende i dati al volo dal server (su un 
altro pc, ovvio)
 
farò la prova domani o lunedì
 
grazie per l'idea



3146 è il codice dell'errore ODBC call failed che hai messo in oggetto.
 
Ciao
Giorgio Rancati
Newsgroup: it.comp.appl.access
Titolo: DB magazzino con gestione dei lotti

Salve ragazzi, ho bisogno di un vs aiuto.
 
Devo costruire un DB con access per la gestione del magazzino con prodotti che possiedono il n. di lotto.
Vi spiego meglio vorrei che questo DB avesse una tabella dove inserisco la descrizione, il prezzo, l'iva di tutti i prodotti;
una maschera/tabella dove inserisco i movimenti (carico e scarico) e dove posso inserire il numero di lotto vicino ad ogni prodotto (naturalmente la descrizione la, il prezzo la prendo dalla tabella prodotti);
Vorrei poi avere la possibilità di riepilogare il magazzino ordinandolo sia per lotto che per codice prodotto in modo da evidenziare i lotti disponibili per ogni prodotto.
 
Il problema è che non so come debba essere strutturato. Potete darmi qualche aiuto? avete qualche esempio da cui posso prendere spunto? come posso fare?
 
Aiutatemi vi prego
Grazie a tutti ancipatamente
Saluti
Paoli

> Il problema è che non so come debba essere strutturato. Potete darmi
qualche aiuto? avete qualche esempio da cui posso prendere spunto? come
posso fare?
 
cioe' sei stato cosi' specifico e non sai come strutturarlo? :D quello che
hai scritto e' la struttura... cos'e' che non ti e' chiaro?
 
-- 
------------
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
 

Per esempio vorrei inserire anche questa funzione ovvero quando faccio il CARICo di un prodotto, inserisco la descrizione e la qtà e inserisco il numero di LOTTO; adesso quando vado a fare lo SCARICO vorrei che dopo aver inserito il codice del prodotto con la descrizione, nella casella lotto mi uscissero solo i n. di lotto di quel prodotto ancora disponibili.....si può fare? questo per esempio non so proprio da dv partire per strutturare tale funzione. Potete aiutarmi anche con 
qualche piccolo esempio giusto per capire come devo strutturare le tabelle e i collegamenti?
 
Grazie mille a tutti
"chiedo scusa per la duplicazione del post"
Newsgroup: it.comp.appl.access
Titolo: inserimento linea codice da vba

ciao a tutti
una domanda spero facile.Devo inserire una riga di codice nella 
proprietà di molte schede e report e precisamente nella call apertura 
pagina. Dato il numero eleveto delle schede d'aprire e modificare vorrei 
sapere se è possibile tramite una procedura in vba inserire 
automaticamente questa riga. grazie

 ha scritto nel messaggio 
news:9n1Mj.6718$o06....@tornado.fastwebnet.it...

Forse è possibile ma veramente da professionisti e con tutti i rischi legati 
alla corretta posizione della stringa.
La via più semplice è questa:
apri il modulo di una maschera qualsiasi; sulla sinistra trovi l'elenco di 
tutte le maschere nel formato "Form_NomeMaschera"; doppio click su ciascuna 
maschera e a destra scrivi (incolli dopo averla copiata) la stringa e nella 
giusta posizione.
Alla fine salvi tutto o meglio chiudendo l'editor vba, Access ti propone di 
salvare il tutto. Rispondi Sì.
Ciao, Carlo 

Carlo Costarella ha scritto:

Ti ringrazio per la risposta. Cmq so che è possibile anche se come dici 
tu un pochino complessoio sono riuscito da vba a modificare le proprietà 
delle maschere ora vorrei riuscire anche a modificare i loro moduli.
ciao
Ginfry

 ha scritto nel messaggio 
news:p52Mj.6763$o06....@tornado.fastwebnet.it...

Certo che si può, lavorando sulla classe "Module" e "Modules". Imparando 
"InsertLines" e molti ecc. ecc.
Buon lavoro.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: inviare mail con allegati tramite il programma predefinito di windows

Ciao a tutti
ho spulciato sugli ng italiani ed esteri per capire un pò come poter
inviare mail con allegati utilizzando il programma predefiinto di
posta elettronica in uso sul pc qualsiasi esso sia (msoutlook,
windowslive, outlook express, thinderbird o altro)
In giro per la rete ho trovato esempi che utilizzavano programmi
specifici (in particolare msoutlook ed outlook express) utilizzando le
librerie di questi,  ma non esempi generici che richiamano il
programma predefinito...
avete idee o suggerimenti su materiale che potrei consultare per
cavarne qualcosa?
grazie 1000
Nicola

 Nicola
Il problema č che i CLIENT di cui parli hanno interfacce troppo diverse,
non esiste un GENERICO.
L'unico modo che puoi provare č di usare MAPI:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=248
Ciao
@Alex
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:518bfb39-115c-4fb7...@r2g2000vbj.googlegroups.com...
Ciao a tutti
ho spulciato sugli ng italiani ed esteri per capire un p� come poter
inviare mail con allegati utilizzando il programma predefiinto di
posta elettronica in uso sul pc qualsiasi esso sia (msoutlook,
windowslive, outlook express, thinderbird o altro)
In giro per la rete ho trovato esempi che utilizzavano programmi
specifici (in particolare msoutlook ed outlook express) utilizzando le
librerie di questi,  ma non esempi generici che richiamano il
programma predefinito...
avete idee o suggerimenti su materiale che potrei consultare per
cavarne qualcosa?
grazie 1000
Nicola
---------------------------
Anch'io inizialmente ho tentato di usare il client predefinito
Purtroppo ce ne sono parecchi, ognuno con versioni diverse, ed ognuno con 
caratteristiche diverse
Non c'e', che io sappia, un modo generico di pilotare il client di posta 
predefinito
Ti posso consigliare di usare Blat, cosi' ti svincoli per sempre dalle rogne 
dei client di posta
Lo lanci da riga comando, lo puoi usare anche per inviare allegati, e' 
gratuito e facilmente utilizzabile, puo' lasciare un file di log per ogni 
invio cosi' se qualcosa non parte sai dire al cliente anche il motivo
Ma soprattutto funziona SEMPRE, una volta configurato il server di posta in 
uscita, utente, password, sei a posto
Ciao
RobertoA


Ho risolto utilizzando le librerie di Microsoft.CDO realizzando una
maschera che ricostruisce un pò quella di Outlook express per  l'invio
email in cui i campi vengno compilati in automatico con possibilità di
modificarli...
ho poi creato un indirizzo email che sarà comune per tutti in modo che
anche chi non è in possesso di indirizzi mail possa inviare senza
problemi
l'unico peccato è che in assenza di connessione internet il messaggio
non possa essere salvato...
Nicola
Newsgroup: it.comp.appl.access
Titolo: non si aggiorna piu lo schermo.

ho un codice che lavora per molto tempo,
e per vedere cosa sta facendo faccio scrivere det. codici in una maschera.
tutto funziona a dovere fino a quando cambio
programma (mettiamo che mentre access lavora, io vada avanti a scrivere
in word...)
quando ritorno in access, la form non si aggiorna più anche se il processo
continua a lavorare.
ho provato a mettere dei repaint, ma non cambia nulla.
c'è una soluzione?
uso access 97.
grazie.
Lenny

 ho provato a mettere dei repaint, ma non cambia nulla.
Che intendi il processo continua a lavorare?
Se hai lanciato una query molto pesante, è normale che non ti aggiorni,
perchè il controllo lo prende tutto il motore database e solo alla fine ti
refresha.
Se invece hai del codice che lavora per un bel po', magari con dei cicli,
prova a mettere al termine di ogni iterazione un doevents (vedi help)
Antonio

 prova a mettere al termine di ogni iterazione un doevents (vedi help)
ora provo.
ciao

 > prova a mettere al termine di ogni iterazione un doevents (vedi help)
con doevents va alla grande.
grazie.
CIAO!!
lenny
Newsgroup: it.comp.appl.access
Titolo: Popolare 2 tabelle

Buon giorno a tutto il n.g.
Posto nuovamente il quesito. Ho la necessità per non ripetere due volte
alcuni dati, di trovare un sistema che mi dia modo di inserire alcuni dati
uguali ma che andranno "a popolare" due tabelle diverse. So che il discorso 
è
un pò intricato ma spero di essere abbastanza comprensibile.
Per esempio, poniamo che abbia due tabelle dove in entrambi vada inserito il
nome ed il cognome, poi in una la data di nascita e nell'altra l'età. Vorrei
poter creare una query di inserimento che comprenda questi quattro parametri
(cognome, nome, data di nascita ed età) e che inserisca nome e cognome in
entrambi le tabelle mentre data di nascita nella tabella A ed età nella
tabella B.
Ovviamente questo è un esempio ma che sintetizza alla perfezione cosa vorrei
fare con un database che sto costruendo da tempo. Ho provato con la query di
accodamento ma i dati quelli già immessi precedentemente tendono a
duplicarsi e non va bene.
Grazie per l'attenzione.
Roberto

 Roberto
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

"Roberto da casa"  ha scritto nel messaggio ...

Grazie Roberto per aver risposto al mio post.
Forse ho utilizzato un esempio banale ed inapropriato, quello che voglio 
fare è più complesso ma ora proverò a farne una sintesi.
Ho creato un database per la gestione aziendale grazie anche alla tua 
collaborazione e del news group, Dove all'interno ho varie tabelle; dal 
memorandum per le cose o pagamenti da fare, alla gestione delle scadenze 
fornitori, al conto corrente, alla gestione prezzi d'acquisto etc. etc.
Quello che sto tentando di fare mi servirebbe per poter inserire una sola 
volta l'assegno X od il pagamento X che faccio per saldare la fattura al 
fornitore X. Ora come ora, quando faccio un assegno per pagare il fornitore 
X dapprima vado nello scadenziario, richiamando la fattura desiderata del 
fornitore desiderato. Inserisco data del pagamento, importo, modalità 
(Assegno, bonifico, contanti etc. etc), n. assegno, istituto ed eventuali 
annotazioni.
Dopodichè passo al conto corrente e ridigito:
Istituto, data operazione, descrizione operazione n. assegno e movimento 
dare, oltre ad altri dati che non sono simili a quelli sopra citati.
Come potrai notare gli inserimenti che faccio sia sullo scadenziario che sul 
conto corrente sono simili, ma attualmente li ripeto due volte.
Il mio intento come dicevo sopra, sarebbe quello di automatizzare la 
procedura facendo un solo inserimento. Il conto corrente e lo scadenziario 
hanno due tabelle distinte e non sono in relazione tra di loro.


 Grazie per l'attenzione.
Prego

Newsgroup: it.comp.appl.access
Titolo: Specifiche tecniche

Ciao a tutti,
sto realizzando con access un'applicazione per la gestione relativa alla 
normativa antiriciclaggio, che deve rispettare determinate specifiche 
tecniche.
In particolare per un campo denominato IMPORTO, devo rispettare il formato 
9(15), dove, se non sbaglio, 9 indica che si tratta di un campo numerico e 
15 il numero di byte utilizzabili.
A questo punto, però, come posso impostare il campo affinchè accetti solo 
numeri fino a 9.999.999.999.999,99?
I separatori di migliaia e la virgola per i centesimi di euro non vanno ad 
occupare spazio all'interno del campo giusto?
Ciao e grazie

 occupare spazio all'interno del campo giusto?
No.
ciao,
Panathos

Newsgroup: it.comp.appl.access
Titolo: Query: Ottenere la parte decimale di un valore.

Salve a tutti,
in una query ho un campo che contiene un valore decimale in formato Standard
es.: 19,82....19,50....In un altro campo vorrei visualizzare la parte
decimale del numero es.: 82....50.
Ho provato con Right([Valore];2) ma se il centesimo è 0 mi restituisce per
19,50 => ,5. Esiste una funzione tipo Int ma per la parte decimale?
Grazie Luca


E se sottrai il valore con i decimali meno la parte intrera ottenuta
con l'Int()?
Oppure, ma forse ho capito male, puoi usare la funzione mod che ti
"divide" il tuo numero in questo modo:
19,50Mod19 --> 19    50
Ciao. Giancarlo


No, scusa. Con mod non ottieni quello che ho scritto sopra. scusa per
l'errore.

 wrote in message 
news:AHN3k.2482$HX4...@tornado.fastwebnet.it...

Mid([Valore],InStr(1,[Valore],",")+1)
Bruno

 ha scritto nel messaggio
news:484fc476$0$40306$4faf...@reader5.news.tin.it...

Mi genera un errore.....operando o operatore mancante....??
Grazie

 Mi genera un errore.....operando o operatore mancante....??
Prova con:
iif(instr([Campo];",")>0;mid([Campo];instr([Campo];",")+1))
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


La strada è buona, solo che invece di Mod che da il resto di una divisione usa il banalissimo meno
TuaCifra-Int(Tuacifra)
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Newsgroup: it.comp.appl.access
Titolo: dove saglio in questo SQL..

ciao a tutti.. ho 2 tabelle.. una dove ci sono i dati specifici dei
macchinari che chiamerò A ( t_c_battente ) ed una tabella d'appoggio
sulla quale semplicemnte collego altri macchinari B .. io vorrei che
quando i macchinari A non hanno + altri macchinari correlati ( B )
venissero automaticmante eliminati........
DELETE T_c_battente.*, T_c_battente_m.lnk_id_c_battente
FROM T_c_battente LEFT JOIN T_c_battente_m ON
T_c_battente.ID_c_battente = T_c_battente_m.lnk_id_c_battente
WHERE (((T_c_battente_m.lnk_id_c_battente) Is Null));
Grazie a tutti

 ha scritto nel messaggio
news:751eea91.04030...@posting.google.com...

Prova con:
DELETE * From t_c_battente Where ID_c_battente Not In (Select
lnk_id_c_battente From T_c_battente_m);
Ciao.
--
Sergio MAZZA

 lnk_id_c_battente From T_c_battente_m);
Teoricamente perň in questo modo esegue due interrogazioni...
Formalmente dovrebbe essere piů veloce l'altro modo e non vedo perchč non
vada...
Anzi no, forse lo so:
NON deve risultare "spuntato" il campo su cui si mette il criterio Is Null
Antonio


Ok se MITICO.. ma coriositą... dove sbagliavo nella mia sintassi ????
"Bisogna sempre imparare dai propi sbagli.. altrimenti non si procede :D "
Saluti Cristian

 Ok se MITICO.. ma coriositą... dove sbagliavo nella mia sintassi ????
Vedi mio suggerimento in altro post
Antonio


Scusa ma non ho analizzato la tua istruzione SQL; ti ho proposto
un'alternativa. Leggi la risposta di Antonio (lui è più pignoletto)
sicuramente la soluzione è li...
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Numero campi tabella

Per conoscere il numero di campi di una tabella
esiste qualcosa di piu' semplice rispetto a:
    Dim NumFields as Integer
    Dim db As Database
    Set db = OpenDatabase(CurrentDb.Name)
    NumFileds = db.TableDefs("tblProva").Fields.Count
Grazie
---
leo_duca

 ha scritto nel messaggio
news:n%qx9.113383$%M1.29...@twister2.libero.it...

Dim QuantiCampi
QuantiCampi= "select count(*) from nometabella"
MsgBox "La tabella contiene" & " " & QuantiCampi &" "&"."
credo vada bene
Ciao  :)


 Dim QuanteRighe
 QuanteRighe= "select count(*) from nometabella"
 MsgBox "La tabella contiene" & " " & QuanteRighe &" "&"."
 
 credo vada bene
 
 Ciao  :)
--
a.cara

 Ciao  :)
Attenzione: In questo modo conti i record presenti nella tabella e non il
numero dei campi.
Ciao, Antonio.


Puoi ottenere lo stesso risultato con un'unica istruzione.
NumFields = CurrentDB.TableDefs("tblProva").Fields.Count
Antonio.

 ha scritto nel messaggio
news:aq5fml$6o84o$1...@ID-162989.news.dfncis.de...

Per questa cosa qui' mi son gia' martellato le dita
due secondi dopo aver postato il messaggio. :)
Grazie cmq
---
leo_duca
Newsgroup: it.comp.appl.access
Titolo: Routine eventi in form

Buongiorno,
quando sono in struttura maschera, se inserisco un pulsante o altro, me 
lo crea con la macro. Io vorrei che fosse creato con la routine eventi.
Sono andato nelle opzioni e in progettazione oggetti, ho flaggato il 
campo "usa sempre routine evento" dopo di che, ho chiuso e riavviato il 
file access.
Nonostante questo, se inserisco un pulsante, me lo crea sempre con con 
la macro incorporata.
Dimentico qualcosa?
Grazie mille.
 
-- 
Questa email è stata esaminata alla ricerca di virus dal software antivirus Avast.
www.avast.com
 


Ciao, non so se sono riuscito a capire il problema.
stai dicendo che, quando scegli da Struttura Modulo un pulsante, la procedura Creazioni guidate ti genera sempre una macro?
Togli il visto a Usa creazioni guidate e scrivi tu il codice che ti serve direttamente in VBA.
Se non ho capito, spiegalo meglio.
Grazie

 Dimentico qualcosa?
 
È cosò da 16 anni, perché con Access 2007 Microsoft ha cambiato le 
procedure guidate da VBA a macro. L'unica cosa che puoi provare è di 
dopo convertire le macro in VBA:
 
https://support.microsoft.com/it-it/office/introduzione-alla-programmazione-in-access-92eb616b-3204-4121-9277-70649e33be4f#bmlearnaboutvba
 
 
L'opzione "usa sempre routine evento" non ha nulla a che fare con 
questo, ma serve solo a garantire che quando fai clic sui 3 punti 
dell'editore accanto a una proprietà evento, non ottieni la selezione 
macro/espressione/VBA, ma finisci direttamente nell'editore VBA.
 
-- 
Ciao
Karl
*********
Access Bugs: 
https://AccessForever.org
 
Access News: 
https://youtu.be/XMOHBSudo-U
 
Access DevCon: 
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Totali in reports

Qualcuno sa come inserire un totale in un report di valori presi da tabelle
di Access


Nella Sezione "Piè di Pagina Report "
Metti una TextBox "=Somma([NomeCampodaTotalizzare])"
;-) >   Mrok

Newsgroup: it.comp.appl.access
Titolo: Cosa mettere nei riferimenti in VBA per usare ADO ?

Ho copiato il seguente codice per accedere al mio DB tramite ADO, ma come al
solito mi da' errore dice che manca il provider e probabilmente e'
installato male.
Dopo molti consigli, leggi qua' e la', ancora non sono riuscito ad accedere
ad DB in modalita' ADO o DAO.
C'e' qualcuno che puo' spendere 5 minuti del suo tempo per spiegarmi qual'e'
il codice da usare e quali riferimenti mettere? uso ACCESS XP ma posso anche
cambiare...
Set cnAdoTutor = New ADODB.Connection
cnAdoTutor.CursorLocation = adUseServer
cnAdoTutor.Open "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=prova.mdb"
resto del codice...

 ha scritto nel messaggio
news:ar7nkp$gef$1...@newsreader.mailgate.org...

In realtà tutto mi fa pensare che usi l'interfaccia OLEDB sbagliata.....!!
Prova ad usare questo al posto della tua :
cnAdoTutor.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=prova.mdb"
@Alex.

 @Alex.
Grazie mille, funziona.
Newsgroup: it.comp.appl.access
Titolo: scrivere stringa correttamente

buongiorno,
ho scritto il seguente codice che parte alla chiusura della maschera:
 
Private Sub Form_Close()
Dim GetDBPath As String
Dim nomedb As String
Dim subfold As String
Dim fso As Object
 
GetDBPath = CurrentProject.Path & "\"
nomedb = CurrentProject.Name
subfold = "backup\" & Year(Date) & Month(Date) & Day(Date) & "\"
 
If Len(Dir(GetDBPath & subfold, vbDirectory)) = 0 Then
MkDir GetDBPath & subfold
End If
 
   Set fso = CreateObject("Scripting.FileSystemObject")
 
  ---------------------------- > fso.CopyFile "getDBpath & nomedb", 
"getDBpath & subfold & nomedb" <---------------------------- 
 
   Set fso = Nothing
 
End Sub
 
però quando lo eseguo mi da errore 53 sulla riga tra le frecce, facendo il 
debug i percorsi sono indicati in modo corretto, infatti, scrivendo il nome 
del percorso per intero funziona.
 
cosa c'è che non va?
 
grazie
Akery 
 

Non va proprio quella riga che hai evidenziato...!!!
 
Gli APICI definiscono una Stringa e vanificano il valore della VARIABILE...!
 
Tiglili....
 
fso.CopyFile getDBpath & nomedb, getDBpath & subfold & nomedb
 
@Alex
 

 ...
 
Lascia perdere le virgolette che altrimenti fanno delle stringhe fisse 
dalle variabili:
 
fso.CopyFile getDBpath & nomedb...
 
Poi se non fai cose complicate lascia perdere FSO perché per le azioni 
basali bastano le funzioni interne di VBA. In questo caso:
 
FileCopy getDBpath & nomedb, getDBpath & subfold & nomedb
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 

della serie: come perdersi in un bicchiere d'acqua!!!
grazie ora funziona
 
"@Alex"  ha scritto nel messaggio 
news:3a943491-143c-4a66...@googlegroups.com...



Con questa soluzione ho avuto difficoltà, grazie per il consiglio

Newsgroup: it.comp.appl.access
Titolo: Record non presente in tabella

Dopo la seguente istruzione
    set rst=CurrentDb.OpenRecordset("Select * From MiaTabella Where
[ID]=" & NumID)
cosa mi ritrovo in rst se il valore di NumID non trova corrispondenze in
MiaTabella?
Credevo che rst.NoMatch = True ma a quanto pare non č cosě!
Come faccio ad accorgermene??
Grazie
---
Leo_duca


Per sapere se nel recordset non c'è corrispondenza devi testare la proprietà
recordcount così:
if rst.RecordCount = 0 Then
    MsgBox "Non ci sono Record"
end if
La proprietà NoMatch è il risultato dei metodi Find e Seek.
Ciao Roberto - Syd


Dopo la select è disponibile :
rst.RecordCount
Ciao, Marco

 ha scritto nel messaggio
news:9oaib0$c7pag$1...@ID-98670.news.dfncis.de...

Grazie ad antrambi! :)
--
Leo_duca
Newsgroup: it.comp.appl.access
Titolo: conversione numero in formato ora

Ciao a tutti,
in una tabella di un MDB access2000 ho trovato 2 campi di tipo data/ora e
un'altro numerico (Ora1, Ora2 e Ore)
Tramite una form si inserisco i 2 orari e automaticamente viene valorizzato
il campo Ore che indica la differenza in tempo in formato Ora 24H.
Il campo Ore, essendo numerico, nel database contiene valori numerici (ad
esempio 1:30 è 0,0625)
Il mio problema è che in un report non riesco a mostrare totali che superano
le 24 ore.
Come posso convertire il campo numerico Ore in un formato ora ?
grazie
Rick

 Rick
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


Sul sito comune ci ero già andato e ho visto la faq, ma non è la soluzione o
forse non l'ho applicata correttamente.
Diciamo che nel report a dettaglio stampo il campo Ore, che è numerico ma
che mostro in formato Ora Breve 24H
Il campo di totale somma il campo Ore e se lo mostro in formato Ora Breve
24H funziona se sotto le 24 ore, mentre mostra valori assurdi se la somma
supera le 24 ore.
In pratica il mio totale è numerico e solo il layout è in formato Ora Breve.
Come dovrei applicare il tuo consiglio ?
Grazie
Rick

Newsgroup: it.comp.appl.access
Titolo: Esportare tutti i record da maschera in word

Ciao,
il mio problema è che vorrei esportare tutti i record caricati nella
maschera in word senza usare l'automazione presente da access. ho trovato
sul sito codice per esportare il record corrente e eventuali sue
sottomaschere attraverso un modlello, ma non so come fare per espoortare
tutti i record filtarati visualizzati sulla maschera attiva.
Qualcuno sa darmi una mano?
Grazie
Tz
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie
esporta la query cui la maschera sottende.
Davide
-- 
www.gestionedati,com