mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: help su runtime di XP developer

Ciao a tutti,
se faccio il pacchetto di installazione usando office xp dev tutto funziona
e quando apro il db messo sul pacchetto non ci sono problemi.
Se poi però provo ad aprire un altro db (ad esempio in versione acc200)
perchè sul pc ho installato office 2000, mi succede che li si apre usando il
runtime di xp.... c'è modo di dire a quel faccione di runtime di non aprire
tutti i db ma solo quello che ho distribuito?
Ciao e grazie,
Alessio

 ha scritto nel messaggio
news:b3vssj$71i$1...@newsfeed.cineca.it...

Non vorrei sbagliare ma ormai dovrai prima aprire Access 2000 e poi aprire
da esso il file mdb o mde.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


E si! Mi capita proprio questo... Speravo si potesse evitare...
Visto che lo devo distribuire a circa 300 persone con cultura informatica da
buona a nulla.... potrebbe essere un problema ....
Ciao e grazie,
Ale

 buona a nulla.... potrebbe essere un problema ....
Io e i miei soci ci siamo posti gli stessi problemi tre anni fa col 2000.
Tuttavia all'atto pratico capita molto di rado Access venga utilizzato
dall'utenza aziendale, quindi il problema non si pone.
Diversamente puoi creare sul Desk una stringa di connessione che punta
all'eseguibile di Access desiderato per evitare che debbano preventivamente
aprire il programma:
"C:\Programmi\Office\msaccess.exe" <Percorso .mdb>
Ciao.

Newsgroup: it.comp.appl.access
Titolo: Trasferimento Dati

Ciao a tutti,
ho creato un db contente anagrafica di molti clienti (circa 12.000) questa
anagrafica deve essere, una volta l'anno esportata come file di testo e
consegnata presso un ufficio centrale, qui il problema:
come faccio a dirgli che quando il dischetto da 1.4 Mb č pieno deve
richederne un altro e continuare a esportare sul secondo .. e cosě via fino
alla fine ?
(Non sono masochista ma devo esportare necessariamente su dischetti e non
posso usare zip)
Grazie in anticipo.
Paolo

alla fine ?
Se il file esportato e' a larghezza fissa dovresti poter
sapere quanti record ci stanno in 1.4M.
A codice ti gestisci la generazione di n file che poi copi
uno alla volta sui floppy.
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--

 wrote in message
3923b0d1...@news.libero.it...

Il file č a larghezza fissa ma non ho idea di come potergli dire quanti
inviarne per volta.


Ma come lo crei il file ?

inviarne per volta.
Beh, ci sono <> modi
Uno potrebbe essere, senza codice:
1) crei una tab temporanea
2) select top n ... into t
3) esporti t
4) delete * from tab inner join t on 
tab.id
 = 
t.id
riprendi da 2 finche' ci sono record

Newsgroup: it.comp.appl.access
Titolo: Esegui applicazione

Un caro saluto a Voi tutti e grazie a chi ha creato e mantiene questo
"newsgroup" è la prima volta che richiedo un aiuto anche se più volte ho
letto e trovato soluzioni ai miei problemi. Per questo ultimo problema che
mi si è presentato ho trovato una soluzione parziale da parte di Carlo ma
oltre a non riuscire a farla funzionare correttamente non credo che sia la
soluzione che sto cercando. Utilizzo Access97 su piattaforma Win98
ver.4.10.2222 A, il mio problema mi sembra molto banale sul piano della
logica ma non sono riuscito a trovare la soluzione ed è questo:
ho applicazioni diverse da me realizzate, ognuna svolge un proprio ruolo e
di esse è stata creata la copia MDE, il mio nuovo obiettivo è quello di
creare un nuova applicazione fatta di una sola maskera menù che attraverso
tasti, lanci le varie applicazioni. A scanso di equivoci preciso che non
voglio creare una mega applicazione che li contenga tutte. Ma vorrei
continuare ad avere applicazioni separate, con maskere proprie e tabelle
proprie, semplicemente lanciate da un Menù generale, unico punto d'ingresso
a tutte le applicazioni.
In questo momento ho fatto due prove:
a) ho creato una macro collegata ad un pulsante che contiene l'istruzione
"Esegui applicazione", risultato: "Impossibile richiamare l'applicazione
utilizzando l'Azione "Esegui applicazione" (credo che sia perché non è un
*.exe infatti se al percorso sostituisco "Calc.exe" funziona benissimo)
b) seguendo le istruzioni di Carlo (e della guida in linea) ho inserito una
delle mie applicazioni nei riferimenti, risultato: non sono riuscito a
vedere le maskere dell'applicazione (forse ho commesso qualche errore) ma mi
sembra che la logica di base è di lanciare la maskera "non compilata" cioè
non in formato MDE, come dicevo prima l'ottica mi sembra di una unica grande
applicazione.
Qualcuno ha già affrontato questo problema e può darmi qualche utile
consiglio?
p.s. nell'attesa farò una prova con l'istruzione "doppio Click" sbirciando
su VB.
Grazie in anticipo a chi mi leggerà.
per contatti
____________________________________________________________________________
________________________
Maurizio VOLPE
tel. casa 011 / 38 57 631
tel. mobile 338 / 21 03 184
E-Mail
vol.ma...@tiscali.it

 ha
scritto nel messaggio
news:c491s9$diu$1...@lacerta.tiscalinet.it...

HyperlInkAddress
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Da maschera ricerca codice in tabella

Sto cercando di creare un programma in access che mi tenga il controllo i 
movimenti di tutti gli articoli situati in un magazzino,ho creato la tabella 
dove verranno inseriti i dati delle varie transazioni (carichi e scarichi),
pero adesso da una maschera vorrei che in un punto si possa inserire il codice
dell'articolo e tramite query,access mi faccia vedere tutti i movimenti che
questo ha fatto.
I campi della tabella sono i seguenti:
    DATA TRANSAZIONE
    ORA TRANSAZIONE
    ITEM_ID  CODICE ARTICOLO
    QUANTITA  QUANTITA SCARICO/CARICO
    UBICAZIONE  NUMERO SCAFALE DOVE L'ARTICOLO E' UBICATO
So che per voi dovrebbe essere una stupidata a risolvere il problema,ma vi
posso assicurare che per un principiante come me e' gia tanto avere creato
la tabella e una maschera.
Un'ultima cosa,vorrei fare i complimenti a Roberto dal portatile, sempre pronto
ad aiutare quasi tutti.
Ciao. 
-- 
Posted from 
host66-158.lan-ls.imaginet.fr
 [195.68.66.158] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG




Ci sono diversw soluzioni al tuo problema.
Fossi in te comincerei a leggere sull'help ricercando Query di selezione e
quanto serve ad impostare i criteri di una query di selezione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Istruzioni in inglese

Salve.
Ho scritto un'applicazione in cui sono contenuti i seguenti metodi:
Application.SetOption "Conferma query di comando", False
Application.SetOption "Esegui correzione automatica nome", False
Ora, nella mia azienda ci sono versioni di Access in lingue diverse, e i
suddetti metodi funzionano solo con le versioni in italiano.
Mi servirebbe l'esatta grafia in inglese di "Conferma query di comando" e
"Esegui correzione automatica nome", che, a quanto leggo sul manuale,
funzionano indipendentemente dalla lingua.
Sono, tanto per ricordare velocemente, due opzioni che si trovano nella
scheda Modifica/Trova (la prima) e nella scheda Generale (la seconda) del
sottomenu Opzioni del menu Strumenti.
Un grazie a chi mi potrŕ aiutare.
Claudio Debortoli

 comando" e "Esegui correzione automatica nome"...
"Confirm Action Queries"
"Perform Name AutoCorrect"
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 Claudio Debortoli
Penso che, invece di distribuire un database in formato .MDB lo distribuisci
nel formato .MDE, non dovresti avere problemi di ligua, visto che il codice
VBA viene compilato ed il sorgente viene eliminato dal database.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 VBA viene compilato ed il sorgente viene eliminato dal database.
Appunto.
Si tratta di un'applicazione tipo front-end / back-end scritta in VBA,
di cui il back-end (il db coi dati) risiede su un server aziendale, e
il front-end viene copiato sulle singole workstation. Quest'ultimo č
in effetti un file MDE, solo che il codice compilato passa i comandi
ad Access nella lingua in cui sono stati scritti. Per le versioni in
italiano, nessun problema. Errore fatale con le versioni in tedesco.
Soluzione: comandi in inglese, che tutte le versioni internazionali di
Access riconoscono.
Ciň fatto, la cosa sembra funzionare. Il che mi preoccupa ancora di
piů. ;)
Ciao
Claudio

 "Perform Name AutoCorrect"
Herztlichen Dank.
Anscheinend funktioniert es gut.
Grüße
Claudio
Newsgroup: it.comp.appl.access
Titolo: "Cambiare il titolo della finestra di MSAccess, usando le API" di Antonio Biso

Tempo fa avevo utilizzato l'esempio
"Cambiare il titolo della finestra di MSAccess, usando le API "di Antonio
Biso
Tutto funzionava a meraviglia fino ad oggi che ho trasferito l'applicazione
su un pc Win XP.
Succede che quando viene richiamata la funzione ChangeAccessTitle la
funzione termina in errore richiamando la funzione GetActiveWindow di User32
e mi viene emesso il seguente messaggio:
"Errore di run-time '6': Overflow
Per caso la funzione è impostata in modo diverso in User32.dll di Win XP?
Grazie
Ciao
Eugenio

 Per caso la funzione č impostata in modo diverso in User32.dll di Win XP?
Mi sa proprio di sě, ma non so come modificarla...
Antonio
P.S.
XP... Sigh...


Hai detto bene XP... Sigh...
Sono due giorni che divento matto fra Access e connessioni di rete.
Scegli Microsoft e sarai premiato :-((((
Dovrebbero darmi il titolo MVP della sfiga per la mia capacità di attirare
problemi Microsoft.
Grazie Antonio
Ciao
Eugenio
p.s. :  ho provato la soluzione di Alessandro Baraldi, che ho trovato in un
thread precedente, e in XP funziona.

Newsgroup: it.comp.appl.access
Titolo: nomi file

ciao a tutti!!! :-)
Dunque ho una query che vorrei esportare all'interno di una directory,
però in modo tale che il nome della su detta query cambi di volta in
volta, vale a dire che se nella prima sessioen di lavoro esporto il file
questo venga salvato con ( ad es. ) domande1 e nella seconda sessione di
lavoro domande 2 e così via...
La query in realtà raccoglie delle domande. Una volta compilata la
maschera associata alla query questa viene esportata. Io desidero che le
varie domande vengano esportate in file con nomi diversi e non
sovrascritto....grazie a tutti
ciao
mike
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

mike
Ciao
--
Alberto
No alle guerre
Newsgroup: it.comp.appl.access
Titolo: correlazione tra dati variabili e dati fissi

ho un problema che mi affligge da un po' di giorni.
devo creare una tabella avente diversi campi:
idrecord
data
veterinario
glucosio
creatinina
.
.
.
unita di misura
range accettabilità.
I valori variabili sono i primi , mentre unità di misura e range sono sempre
gli stessi.
Come posso creare questa tabella dove a valori variabili  vengano associati
valori fissi.
ANALITA       DATO     UNITA'    RANGE
glucosio            115             mg/dl       70 - 110
.
.
.
ect.
 In definitiva devo avere una tabella in cui inserisco solo il dato e non
devo ogni volta inserire anche l'unità di misura  e il range , che però da
analita ad analita variano.
Grazie della collaborazione .
r.regazzo


Se quelli che chiami dati fissi sono veramente immutabili nel tempo,
potresti metterli in una tabella a parte e recuperarli quando ti servono con
un DLookUp, oppure metterli in costanti globali x averli sempre a
disposizione quando ti servono.
Se invece sono quasi sempre quelli, ma potrebbero, almeno una volta, essere
differenti, lasciali nella tua tabella e usa il valore predefinito.
Inoltre, quando hai mandato un messaggio, direi che è sufficiente...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 analita ad analita variano.
Utilizzi due tabelle: nella prima metti tutto tranne range e unita' di
misura, nella seconda metti solo analita (chiave primaria), range e
U.M.
Poi crei una relazione tra le tabelle e basi tutte le tue form e i
report su una query che collega le due tabelle.
Cia' 
max
Newsgroup: it.comp.appl.access
Titolo: Access: come restringere i criteri di ricerca su due campi in una query - Help!

Salve a tutti.
Ho una query access che per la mole di dati non riesce a restituirmi
l'output (essendo
linkata a tabelle Oracle via ODBC mi viene restituito il timeout 01013 user
requested cancel
of....).
L'unica soluzione valida è quella di restringere i criteri di ricerca,
cosicché mi sono reso
conto che la query catturava dalla tabella linkata anche dei record che non
mi servono,
ovvero record che hanno due campi entrambi a valore 0.
Ad esempio ho una tabella simile:
DATA ORA DEVICEID SESSIONIN SESSIONOUT
27/09/08 00:00 RM1 0 0
27/09/08 00:15 RM1 0 1
27/09/08 00:30 RM1 0 0
27/09/08 00:45 RM1 3 0
27/09/08 01:00 RM1 1 2
Ora vorrei gentilmente sapere, da qualcuno di voi più esperto di me, come
potrei eliminare i
record dove entrambi i campi sono a valore 0 (nell'esempio sopra, solo il
record
corrispondente alle 00:00 e quello 00:30)
La query attuale è di questo tipo e cerco di rappresentarla nella classica
struttura di
creazione query di Access (spero si capisca):
Campo --> DATA DEVICEID SumOfSESSIONIN SumofSESSIONOUT
Tabella --> pippo pippo pippo pippo
Formula --> Raggr. Raggr. Somma Somma
Ordinamento -->
Mostra --> x x x x
Criteri --> >=27/09/08 Like "*RM*
Ho già provato ad eliminare il flag sul timeout dell'ODBC come consigliato
per gli errori
01013 ma non mi cambia nulla.
Ho già verificato che si tratta di un problema di mole di dati troppo lunga
(più di 100.000
record da elaborare)... infatti se restringo il criterio del campo DEVICEID
da Like "*RM*" a
Like "*RM1*" la query gira tranquillamente.
Grazie infinite a chi riuscirà ad aiutarmi (sono nel panico + totale)
Ermete
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


vai nelle proprietà della query e setta 0 il timeout
così non scade
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Newsgroup: it.comp.appl.access
Titolo: posizione sottoreport

 
buongiorno  a tutti,
sto creando una etichetta nel cui corpo c'è un sottoreport, il problema è 
che il sottoreport mi sposta parte dei campi allungando l'altezza 
dell'etichetta.
Suggerimenti su come si possa procedere?
 
Grazie
Akery 
 
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 Akery 
 
 
Tra le proprietà del sottoreport nella scheda Formato c'è 'Espandibile', impostala a 'No'.
Nei casi in cui i dati sono tanti (quando ti spostava in giù i campi) potresti perderne una parte perchè non stanno nel sottoreport e quindi non vengono stampati.
Ciao.
-Marco-

Newsgroup: it.comp.appl.access
Titolo: Sottomaschera : Assegnare Valore ad un controllo.

Salve a tutti.
Ho cercato invano di assegnare un valore ad un controllo di una
sottomaschera dalla maschera principale,
il metodo setfocus ancora non mi e' chiaro.
Come si assegna un valore ad un controllo in una sottomaschera in funzione
di un
altro valore inserito nella maschera Principale?
faccio un esempio:
Nella maschera principale ho il controllo [data inizio] e il controllo [data
fine];
nella sottomaschera che si chiama "DiffMesi" ho il controllo [Gen] che deve
essere aggiornato
quando inserisco la [data fine] alla differenza tra quest'ultimo e la [data
inizio] ;
ci provo sull' evento dopo aggiornamento del controllo [data fine] ma ahime
va in debug.
Spero di essere stato chiaro.
Grazie in anticipo.
--
-----------------------------------------------------------
Mar&mar
-----------------------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
-----------------------------------------------------------

 Grazie in anticipo.
Se da un controllo di una maschera vuoi puntare uno di una sottomaschera
riferisciti cosě
tuaform!tuasottomaschera.setfocus
tuaform!tuasottomaschera!tuocontrollo.setfocus
tuaform!tuasottomaschera!tuocontrollo = tuovalore
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 Inviato via 
http://usenet.libero.it
Questo č il listato che ho scritto ma adesso ha cambiato messaggio d'errore
:
"errore di run-time necessario oggetto (errore 424)"
segue codice
 Private Sub data_fine_AfterUpdate()
 Anagrafico!data.SetFocus
 Anagrafico!data!gen.SetFocus
 Anagrafico!data!gen = 2
End Sub
AIUTO.
Newsgroup: it.comp.appl.access
Titolo: [Re}Testare se riga in elenco è selezionata!

Ciao!Ho già mandato la domanda alcuni messaggi fa, ma la risposta non è
quella che cercavo! Facendo il controllo "If Me.Elenco2.ItemsSelected.Count
= 0 Then" testo se cè qualche riga selezionata nel mio elenco..Ma essendo il
mio elenco a selezione multipla, posso avere altre righe selezionate come
no, non è il controllo che voglio fare!..Il controllo che ho bisogno di fare
è : "questa riga selezionata è selezionata o deselezionata?", perchè se
selezionata lancio la stampa della riga, se no la lascio deselezionata
perchè all'utente non serve..Capito ora?Grazie molte anticipatamente!

 ha scritto nel messaggio 
news:cnn5nf$6i1$1...@carabinieri.cs.interbusiness.it...

Dal codice che ti ho spedito è possibile fare quello che tu vuoi, 
aggiungendo
lo spezzone di codice che verifica se vi sono record selezionati:
Dim varItm As Variant
For Each varItm In TuaCasellaRiepilogo.ItemsSelected
'scrivi qui quello che vuoi fare
Next varItm
In pratica con il primo codice che ti ho mandato "conti" i record 
selezionati;
è evidente che se non ci sono record selezionati esci dalla funzione.
Con l'integrazione di cui sopra, "scannerizzi" tutti i record selezionati e 
per ogni record compi l'azione che ti serve.
Un consiglio è quello di leggerti bene il FONDAMENTALE file della guida, 
ricco di spiegazioni, esempi e trucchi.
Ciao, Carlo 

 ha scritto nel messaggio
news:cnn5nf$6i1$1...@carabinieri.cs.interbusiness.it...

Devi testare la proprietà selected della listbox utilizzando la proprietà
listindex. Ad es:
Private Sub TuaListbox_Click()
    Dim NumRiga As Long
    NumRiga = Me.TuaListbox.ListIndex
    If Me.TuaListbox.Selected(NumRiga) Then
        MsgBox "vuoi stampare?"
    End If
End Sub
Ancora una cosa: è preferibile continuare il thread originario anzichè
aprirne un altro a così breve distanza di tempo.
Ciao
--
Galliano.
Newsgroup: it.comp.appl.access
Titolo: unire più query

Buongiorno,
uso A03 ed ho creato due query che estraggono gli stessi campi da più tabelle ma con criteri diversi, per es. estraggono cognome, nome, dta_nascita, numero_ordine.
Per visualizzareil risultato devo aprirli singolarmente, ma se volessi vedere il risultato in un unico foglio dati, visto che sto lavorando sugli stessi campi, potrei in qualche modo unire le due query?
Grazie e saluti.
 
Remigio


Mi rispondo da solo:
ho creato delle query di accodamento che versano i dati in una tabella temporanea.
Saluti.
 
Remigio

 ho creato delle query di accodamento che versano i dati in una tabella
temporanea.
 
Un'alternativa potrebbe essere scrivere una query di unione:
SELECT ...il testo della prima query...
UNION SELECT ...il testo della seconda query
a patto che le due query abbiano gli stessi campi.
Ciao
Riccardo Baldinotti
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
Ottimo, grazie Riccardo.
Senti un'altra domanda, in VBA dovrei dire ad un controllo che deve averela data sempre impostata a 31/12/annocorrente. 
Ho provato a usare miocampo.value = #31-12-year(date)# ma non funziona, sapreste come fare per favore?
Grazie ancora e saluti.
 
Remigio

 > > > uso A03 ed ho creato due query che estraggono gli stessi campi da piů

Prova cosě:
    miocampo.value = "#31-12-" & year(date) & "#"
cioč costruendo la stringa. Oppure:
    Dim giorno As Date
    giorno = DateSerial(Year(Date), 12, 31)
    miocampo.Value = giorno
o piů velocemente
    miocampo.Value = DateSerial(Year(Date), 12, 31)
Perň ti consiglio di non usare, come nomi, le parole "date" o "data" e
nemmeno "descrizione" perché Access le interpreta a modo suo.


 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
Ciao Riccardo,
ho provato con 
 
    miocampo.value = "#31-12-" & year(date) & "#" 
 
ma restituisce un errore e non sono stato capace di capire perchè, mentre 
 
    miocampo.Value = DateSerial(Year(Date), 12, 31)
 
funziona.
Ti ringrazio molto per l'aiuto.
Un saluto.
 
Remigio

Newsgroup: it.comp.appl.access
Titolo: Lunghezza Corpo Report

Scusate di nuovo ma sono proprio arenato su questo punto e non riesco a
proseguire.
Secondo Voi esiste un modo per far si che il corpo non abbia una lunghezza
massina di 55,83 ?
Mi mancano almeno altri 20 per poter ultimare il mio programma :-((( sigh !!
Grazie e scusate se ho ripostato un msg simile.
Luigi

Scusate nel frattempo ho ricevuto la risposta.
Non si può :-((((( sigh !!!!!
Grazie
Newsgroup: it.comp.appl.access
Titolo: valore true nelle select count

Chi mi dice come posso utilizzare, nel criterio di una select count, il
valore true?
premesso che il campo su cui si esegue la ricerca è di tipo true/false
Codice generato:
dim rec as recordset
set recordset = currentdb.openrecordset ("select count tabella.campo as
numero where tabella.campo = true")
questa select funziona perfettamente se si testa un campo non di tipo
true/false e nel criterio si utilizza una stringa o un valore numero, come
mai non funziona se applicata su un campo true/false e non vede il criterio
true?
Grazie a tutti

 ha scritto nel messaggio
news:NjZQ7.273569$sq5.13...@news.infostrada.it...

E se scrivi
("SELECT Count(*) As numero From Tabella where Tabella.campo = True")
cosa succede?
Fra l'altro, per quello che so io, il predicato FROM in una istruzione
SELECT è obbligatorio e non opzionale.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:NjZQ7.273569$sq5.13...@news.infostrada.it...

Oltre al suggerimento di Roberto prova anche:
'-------------
"SELECT Count(*) As numero From Tabella where Tabella.campo = -1"
'-------------
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -

Newsgroup: it.comp.appl.access
Titolo: Librerie DAO e ADO

avrei bisogno di aprire un altro database con accesso esclusivo.
Con la libreria DAO c'è il metodo OPENDATABASE con il quale è possibile
aprire in modalità esclusiva.
Nella libreria ADO il metodo OPEN non porta questa opzione. Come fare ?
Non credo che se ne siano diemnticati, ma dov'è ???

 ha scritto nel messaggio
news:athd77$puv$1...@lacerta.tiscalinet.it...

Devi impostarti prima di aprire il recordset la connection string
tipo:
Dim Cnn As ADODB.Connection
 dim Rs as ADOBD.Recordset
 dim Source as String
Set Cnn = New ADODB.Connection
Source = "C:\..... \.mdb"
 Cnn.ConnectionString = _
    "Provider=Microsoft.jet.OLEDB.4.0;" & _
    "Data Source=" & _ source dove source e la directory completa
   Cnn.Open                            dove si trova il mdb.
set rs = new adobd.recordset
rs.open "Tabella", cnn , adOpenStatic, adLockOptimistic
etc.
Saluti
Mak

Newsgroup: it.comp.appl.access
Titolo: Messaggio Input Mask

Salve a tutti, è possibile gestire il messaggio che genera il
controllo dell' InputMask o no?

Ciao
INPUTMASK_VIOLATION = 2279
Intercetta un'input diverso dal formato richiesto
DATAVALUE_VIOLATION = 2113
Intercetta una data errata, numero troppo grande, testo in numero
LIMITTOLIST_VIOLATION = 2237
Intercetta un valore non il lista
VALIDATION_VIOLATION = 2107
Intercatta la validazione del dato (Valido se)
Esempio
   Sub Form_Error (DataErr As Integer, Response As Integer)
      Const INPUTMASK_VIOLATION = 2279
      If DataErr = INPUTMASK_VIOLATION Then
         MsgBox "Hai scritto una boiata! Puoi scrivere solo bla bla
bla o tic ta toe"
         Response = DATA_ERRCONTINUE
      End If
   End Sub
Ciao
Alex


Perfetto! Grazie Mille!
Newsgroup: it.comp.appl.access
Titolo: Sottomaschera disattivata finché...

Ciao a tutti,
c'è la possibilità di avere una sottomaschera disattivata (e visibile in
grigio) finchè sulla maschera principale non viene scelto un record su una
casella di riepilogo. quindi si attivi per il data editing.
attualmente devo mettere visibile a no e renderla visibile con l'evento
click sulla casella di riepilogo e la cosa è molto brutta da vedersi.
saluti
Giuseppe

 ha scritto nel messaggio
news:e3lV8.111781$Kt3.2...@twister2.libero.it...

di default imposti la proprietà abilitato della sottomaschera a NO
poi su evento "dopo aggiornamento" della casella di riepilogo metti il
seguente codice
forms![nomemaschera]![nomesottomaschera].enabled=true
ciao

 forms![nomemaschera]![nomesottomaschera].enabled=true
    forms![nomemaschera]![nomecontrollosottomaschera].enabled=true
Scusate la pignoleria.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: file corrotto

Mi si e' danneggiato un database di acces, non esiste una qualche
utility che mi permetta di recuperarlo? Le sue dimensioni sono rimaste
intatte ma non mi riesce piu' di aprirlo.
Ciao e grazie.
-- 
OrsoBruno

 intatte ma non mi riesce piu' di aprirlo.
Prova e seguire i consigli di questo documento microsoft (link segnalato da
Roberto in un precedente thread):
http://support.microsoft.com/default.aspx?scid=kb;it;I109953
Però, una piccola ricerca sui messaggi vecchi (diciamo una settimana) potevi
farla... o no?
Ciao. Claudio.

 Mi si e' danneggiato un database di acces, non esiste una qualche

Una prova da fare:
fai un nuovo DB vuoto...
file/importa/carica dati esterni/selezioni il vecchio db danneggiato
e ti apre una finestra a schede...selezioni giu tutto e importi :)
Vedi se funziona
Ciao :)

Vi ringrazio tutti, ma purtroppo il recupero non e' riuscito, in acces
riesco a ripristinare il database che da 10,5 mbe diventa 9,7 ma poi
il programmino che ne fa uso non lo riconosce. Ho paura che saro'
costretto a rinserire molti dati, ho un backup ma puiuttosto
vecchiotto.



Avresti dovuto precisare la versione.
cmq dal sito comune (Utility) trovi il link al Jet Compact Utility
dovrebbe funzionare per A97 e A2000
prova 
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------

 prova
Federico proporrei una sezione del sito "Tastiere pulite" per risolvere
tutti questi problemi di corruzione....
Anche se sarebbe una patch che fa casino e stringi stringi ritornerebbe
tutto peggio di prima.....
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 il programmino che ne fa uso non lo riconosce. Ho paura che saro'
hai per caso usato differenti versioni per convertire/importare/usare il
database?
Access 97 non legge il formato Access2000/XP...
Access XP legge tutto
Ciao :)


Ho usato Acces2000 ma non so con cosa e' stato creato, comunque mi da
sempre un errore che non trova il file system.mdw
Ciao

Newsgroup: it.comp.appl.access
Titolo: visione del mese corrente

Ciao a tutti, qualcuno mi può spiegare come fare all'apertura di un for  in
campo  stabilito visualizzare solo il il mese dell'anno corrente.
Grazie anticipatamente.

 ha scritto nel messaggio
news:3Jkbb.335114$Ny5.10...@twister2.libero.it...

Se lo devi avere ad ogni inserimento di un record, metti nella proprietà
'valore predefinito' del controllo associato al campo che ti interessa la
formula:
=Month(Date())
Se viceversa lo vuoi avere solo in apertura della maschera, metti nella
routine evento 'su apertura' della maschera l'istruzione:
Me![Nome_Controllo] = Month(Date())
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Contatori e inserimento record

Ciao a tutti,
io voglio inserire un record in mezzo ad una tabella in modo che a tale
record venga assegnato un contatore opportuno, e che tutti i contatori dei
record che vengono dopo vengano incrementati di 1.
E' possibile fare questo in modo semplice?
In alternativa posso farlo mediante codice, ma con rs.update è possibile
modificare il campo contatore? Se non è possibile, l'unica soluzione che
vedo è quella di generare, sempre da codice, un'altra tabella.
Grazie!
         GS
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

          GS
Non puoi modificare il valore di un contatore in un record già esistente.
Puoi inserire record da codice o da query assegnando al contatore il
valore che vuoi. (vedi 
www.sitocomune.com
 sez. Tables)
I record che inserisci dopo saranno incrementati di 1 solo se il contatore
che hai inserito è il numero più grande presente in tabella, tenendo conto
anche dei record eliminati:
se eri arrivato fino a 10 coi contatori, inserisci per esempio un 13 e il
prossimo record prenderà il valore 14;
se eri arrivato fino a 15 e hai cancellato i record da 11 a 15 il valore
più alto che hai in tabella è il 10, inserisci un 13 e il prossimo record
sarà comunque il 16, non il 14, perchè 14 e 15 erano già stati usati,
anche se eliminati. Se invece compatti il database i record eliminati
scompaiono definitivamente e questo comportamento non si verifica.
Namor
-- 
namor at inwind punto it



Non sono sicuro di aver capito il tuo problema, però prova ad andare sul
Sito Comune (link qui sotto) e nella Sezione Tables vedi se può esserti
utile la FAQ di Marco Pizzamiglio (namor) intitolata "E' possibile riempire
i "buchi" lasciati dalle eliminazioni di record nei campi contatore
incrementali?".
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: errore: 3170 couldn't find installable ISAM

Salve a tutti.
Sto cercando di fare una query di accodamento utilizzando i dati 
inseriti in un foglio di excel. (Una cosa simile alla faq 2.21 del sito 
comune). Purtroppo però continua a verificarsi l'errore riportato in 
oggetto. Sono andato a vedere sul sito della Microsoft nel quale di 
fatto consigliano di rifare l'installazione dei driver ISAM, ho seguito 
le istruzioni ma non ne vuole sapere di funzionare.
C'è qualcuno che ha qualche consiglio da darmi?
Grazie
Paolo

 C'è qualcuno che ha qualche consiglio da darmi?
Fai una copia del file .mdb, e prova a lavorare su quella. A volte l'errore
(...misticamente...)sparisce. Hth. Ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

PabloDapatas ha scritto:

Prova a vedere se le istruzioni di Microsoft che hai letto tu sono le
stesse citate su 
http://www.donkarl.com/it/
  faq 7.10.
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

yronium ha scritto:

niente da fare..............
............qualche altra idea?
..........se puo' essere d'aiuto la mia versione di office è la xp 
developer.

 
E' la correzione che ho visto io. Ho provato ad eseguirla in tutti i 
metodi suggeriti ma nulla da fare.
Grazie comunque

PabloDapatas ha scritto:




Non so che dire. Io ho avuto lo stesso problema tempo fa su A97, e
seguendo le istruzioni Microsoft l'ho risolto.


 ha scritto nel messaggio 
news:T63Vd.57081$lB4.1...@twister1.libero.it...

Io ho avuto lo stesso problema con una connessione ad Outlook. Si trattava 
di un quasi invisibile errore di sintassi nella query.
Avevo controllato più volte, mi sembrava tutto corretto, ma l'errorino 
c'era.
Prova un po'...
vtt
Newsgroup: it.comp.appl.access
Titolo: [OT] Virus

Da qualche giorno mi arrivano mail _molto anonime_ con in attach il file
'OFPACCOF.EXE' o 'LANLDKLA.EXE' contenente il virus 'W95.Hibris.gen', credo sia
un worm, non ho indagato.
Se le mail sono inviate automaticamente dal 'virus', controllate le vostre
macchine.
Se qualcuno, invece, si sta divertendo, e' il caso che la smetta in quanto non
c'e' nulla di divertente.
Scusate l'ot
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 un worm, non ho indagato.
Ho ricevuto anch'io una e-mail (credo uguale a quella che hai ricevuto tu)
senza oggetto, mittente ne' destinatario (personalmente non ho ancora capito
come fanno e-mail senza destinatario a viaggiare ed arrivare) con il file
OFPACCOE.EXE.
Ho subito supposto che si trattasse di un virus, ma facendo la scansione con
l'ultima versione di PandaAntivirus, non viene rilevato, e si' che ho anche
eseguito la scansione specifica della posta.
Sib


 eseguito la scansione specifica della posta.
Io uso NAV, e l'ha beccato immediatamente.



Proprio oggi mi sono arrivati due messaggi con mittente/oggetto sconosciuti
con allegato un file exe MMGFDEMM.EXE.
Bloccato da NAV.
Occio!
Ciao.

 Ciao.
Si credo sia lo stesso
A giudicare dai molti msg su vari ng, credo ci sia un invasione.
Controllate i vostri picci, potreste essere voi ad inviarli.



Se è lo stesso non lo so ma sono sicuro di non essere infettato perché è
arrivato per posta (come dicevo prima) nella casella postale dell'ufficio;
ma non puntava direttamente al mio indirizzo, mi ha "trovato" perché faccio
parte (da pochissimo) di due liste "tecniche" e il server di posta è
iscritto nella lista nera della polizia. Io chiaramente ho cannato le e-mail
(sono due identiche) e ho girato il problema ai componenti delle liste
tecniche.
Ciao.
Newsgroup: it.comp.appl.access
Titolo: salto righe su report

buona sere a tutti  eco il mio problema
 
devo stampare la tessera ai miei donatori  lo stampato e già predefinito  e 
unico per tutta Italia
ho creato un report  con i campi posizionati al loro posto centrando la 
posizione nello stampato e mi  stampa la parte anagrafica ( dal db Avis)
 
quito sotto di seguito  riesco a stampare tutte le donazioni (dal db 
Donazion)
centrandole sulle caselle predisposte
qui c'è il problema devo stampare solo 12 record (db Donazion)  saltare 
alcune righe ( non Salto Pagina)
e riprendere di seguito le altre donazioni per 12 volte
 
es
       nome      cognome
 
 
 donazion 1
 donazion 2
 donazio   3 (fino a 12)
 salto riga
salto riga
donazion 13
donazion 14   Fino a 24
 
Intanto i ringrazio per l'attenzione e se mi aiutate vi ringrazio due volte
ciao
 
 

Avis Caorle ha scritto:

Lo puoi fare lavorando con le proprietà MoveLayout, NextRecord e
PrintSection del report.
Vedi help <F1>.
Ciao.
-Marco-
 
 
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

Avis Caorle ha scritto:



Newsgroup: it.comp.appl.access
Titolo: SQL Server sul CD di office developer

Ciao a tutti,
una informazione,
posso installare liberamente sui computer dei clienti i tool per sql server
presenti sul cd sql server 2000 presente sul pacchetto Office Developer XP,
es query analizer e Enterprice Manager?
Ciao, AEOM



No.

"All Eyez On me" <in...@FUCK-LAMERbfsistemi.com> ha scritto nel messaggio
news:9peNa.23343$HU3.6...@news2.tin.it...

No, ma Andrea Montanari su
http://www.asql.biz/DbaMgr.shtm
montanar...@virgilio.it
ha relizzato un tool free
ciao MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Aprire Internet Explorer all'interno di una maschera.

Buon giorno a tutti,
volevo sapere se era possibile aprire all'interno di una maschera di access 
Internet Explorer,
e continuare la navigazione da access stesso.
Se mi date delle dritte anche su come fare.
Grazie
  Old-Jack 

 ha scritto nel messaggio
news:dujimk$bih$1...@nnrp-beta.newsland.it...

Ciao OldJack,
Devi aggiungere il controllo WebBrowser alla maschera e poi con il metodo
Navigate dell'oggetto visualizzi le pagine che vuoi.
-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
--------------------------------------->

 ha scritto nel messaggio 
news:440d67bf$0$29107$5fc...@news.tiscali.it...

Grazie per l'aiuto, ma ti chiedo se potresti postare un esempio di codice 
per la gestire dll Metodo.
Non sono molto esperto di VBA, perciň non dar nulla per sontato. :-)
Grazie.

Per l'uso di questo controllo serve essere esperti, è il controllo
più complesso
del parco OCX(MS), ma trovi codice in tutto il WEB anche se dedicato a
VB
è facilmente riadattabile.
Ciao
@Alex

 ha scritto nel messaggio 
news:1141729919.3...@p10g2000cwp.googlegroups.com...

Grazie Alex, infatti ho trovato molto materiale anche alcuni vecchi post di 
Cinzia su questo newsgroup,
molti utili.
Sono riuscito a far visualizzare la pagina nella maschera però senza i menu 
di internet explorer,
vi chiedo se è possibile visualizzare almeno quelli e come.
Grazie.
Old-Jack 

 ha scritto nel messaggio
news:dujr2r$hto$1...@nnrp-beta.newsland.it...

Ciao OldJack,
se non ricordo male ci deve essere una proprietà Toolbar o ShowToolbar da
impostare a vero.


 ha scritto nel messaggio 
news:440deba7$0$29101$5fc...@news.tiscali.it...

Grazie mille ora provo, vediamo se riesco a capirci qualcosina.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: Stampante predefinita

Ciao a tutti
Come posso inserire in automatico all'interno di una casella di testo il
nome della stampante predefinita nel sistema?
Fabrizio

 il nome della stampante predefinita nel sistema?
Dipende dalla versione di Access che certo non hai rivelato.
Per AX e A03 e semplice. p.e. basta come origine controllo
della casella: =Application.Printer.DeviceName
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:c11vf0$1dpm1e$1...@ID-46617.news.uni-berlin.de...

Scusa hai ragione uso AX.
Grazie

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





Ciao sono Paolo e ho bisogno di un 
aiuto.


Ho costruito un piccolo db con access e 
praticamente dopo aver selezionato in una maschera una ventina  di record 
su 10.000, vorrei cambiare su questi il valore di un campo testo da "lavorazione 
"a "magazzino" con un semplice pulsante come su
 
File Maker con il comando sostittuisci.


Grazie.



"gianriccardo" ha scritto nel messaggio <

CTRL+H.
Cmq l'opzione "sostituisci" la trovi anche nei menů...
Ciao, warp





come fare un comando search


ax...@tin.it
Newsgroup: it.comp.appl.access
Titolo: Verifica esistenza record

Come  verificare l'esistenza di eventuali
duplicati in base a campo "Data" e "IDNome"
in una Form partendo dalla immissione della data?
Grazie.
RinoŽ 

 in una Form partendo dalla immissione della data?
www.donkarl.com/it
 FAQ 4.25 Evitare duplicati
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + CISA1, Arezzo, 4+5/6/2005
la prima Conferenza Italiana per Sviluppatori di Access 

Come  verificare l'esistenza di eventuali
duplicati in base a campo "Data" e "IDNome"
in una Form partendo dalla immissione della data?
Grazie.
RinoŽ 

 wrote in message
news:xwD_d.671687$
b5.30...@news3.tin.it

Credo serva precisare come viene effettuata o gestita
la PrimaryKey.
Se hai invece una PK Counter allora sfrutta Dcount
sull'origine dati della Form ed associa nel criterio
la data e l'IDNome:
DCount("*", _
       Me.Recordsource, _
       "[Data]=" & cDbl(Me.ControlloData) & _
       "[IDNome]=" & chr(34) & me.ControlloIdNome & chr(34))
Se il risultato di DCOUNT>0 ---->Duplicato
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Ciao Alex preciso a dire che l' IDNome non e un dato univucuo
quindi possibilità duplicati Si , ma l'unione di IDNome e Datalo sono .
Ps.
La stringa da te proposta  non sono riuscito ad impostarla ne modulo
per far si che possa restituirmi il risultato.

 per far si che possa restituirmi il risultato.
Avevo mancato un pezzo, il conatenamento dei criteri:
Se [IDNome] è di tipo Testo:
DCount("*", _
       Me.Recordsource, _
       "[Data]=" & cDbl(Me.ControlloData) & " AND " & _
       "[IDNome]=" & chr(34) & me.ControlloIdNome & chr(34))
Se [IDNome] è di tipo Numerico o Counter:
DCount("*", _
       Me.Recordsource, _
       "[Data]=" & cDbl(Me.ControlloData) & " AND " & _
       "[IDNome]=" & me.ControlloIdNome)
Vedi così se funziona.


Newsgroup: it.comp.appl.access
Titolo: Developer Toolkit

Scusatemi se sono un po' OT, ma cerco disperatamente "Access Developer
Toolkit"
Grazie di cuore a chi vorrą aiutarmi!
RRS

Newsgroup: it.comp.appl.access
Titolo: info su istruzione

Se ho una funzione,ad esempio :
 
Public Function OrderThis(strISBN As String) As Integer
  'segue il codice della funzione....
  OrderThis = True
End Function
 
Cioè è possibile sintatticamente l'assegnazione OrderThis = True ?
 
Grazie e saluti
 
 
 


Non capisco la domanda... quello che scrivi già realizza quello che
chiedi...!!!
 
@Alex


Ritorna -1. E' un Integer, se questo era il dubbio.
E poi access non e' famoso per avere assegnazioni "strict", anche se 
qualche volta tende ad inalberarsi se il tipo non e' coerente.
-- 
 
ac (x=y-1)
Newsgroup: it.comp.appl.access
Titolo: un codice con più clienti e più prezzi

Ciao a tutti
Dovrei fare un piccolo database che ha come univocità il codice prodotto che
però può essere venduto a più clienti con prezzi diversi.
Come dovrei impostare le tabelle e le relazioni?
Ciao e grazie
        Cele

TABELLA CLIENTI
IDCliente
Ragione Sociale
ecc.
TABELLA PRODOTTI
IDProdotto
Prodotto
ecc.
TABELLA PRODOTTI PER CLIENTE
IDProdotto Cliente
IDProdotto (Legato qui MOLTI ed a UNO nella tabella PRODOTTI)
Costo
ecc.
TABELLA ORDINI
IDOrdine
IDCliente (Legato con la tabella CLIENTI)
IDPagamento
IDBanca
ecc
TABELLA COMMESSE
IDCommessa
IDOrdine (legato con tabella ORDINI)
IDProdotto Cliente (fa vedere solo i prodotti che hai inserito per quel
cliente e naturalmante il prezzo)
ecc.
CIAO E FAMMI SAPERE SE TI VA BENE
Graziano

 wrote in message
zMTs4.1531$qv.1...@news.infostrada.it...

CLIENTI: IDCliente, Nome, IDListino.....
PRODOTTI: IDprodotto, Descrizione....
LISTINI: IDListino, IDProdotto, Prezzo...
(se il prezzo è legato alla quantità ovviamente
il listino andrà sviluppato in testata-righe)
Sarebbe bene definire un listino "base"
in modo che tutti i prodotti abbiano un prezzo di default
e si possa permettere all' utente di trascrivere sul listino
cliente solo gli scostamenti dal listino "base".
Bye, Ste
Newsgroup: it.comp.appl.access
Titolo: Date a cadenza mensile

Salve, avrei bisogno di creare uno scadenziario le cui date sono crescenti per mese, in modo automatico. 
Per esempio
01/11/2022
01/12/2022
01/01/2023
01/02/2023 ... a prescindere dai 30 o dai 31 giorni
La routine Do... Loop che aggiunge i record delle scadenze è già funzionante
Mi manca solo di gestire il formato data in modo da essere crescente per mese.  
 
per esempio:
Do
    rsPagamenti.AddNew
    rsPagamenti!Data = MiaData + mese crescente   ' è ciò che mi manca
    rsPagamenti!Rata = Me.ImportoRata
    rsPagamenti.Update
Loop  Until ...(fino al numero di rate stabilito)
 
Potreste darmi qualche indicazione?


meseZero = DatePart("m", MiaData)
annoZero = DatePart("yyyy", MiaData)
n = 0
do
   meseN = (meseZero + n +1) mod 12
   if meseN = 0 then meseN = 12
   annoN = int( (meseZero + n ) /12 ) + annoZero
   rsPagamenti!Data = dateserial(annoN, meseN, 1)
   n = n+1
loop until n < numRate

Il giorno mercoledì 23 novembre 2022 alle 20:08:14 UTC+1 Marco ha scritto:

Il primo del MESE
rsPagamenti!Data= DateAdd("m", 1, MiaData) - DatePart("d", DateAdd("m", 1, MiaData)) + 1
 
Saluti
FG

Private Sub ImpostaRate()
Dim intCiclo As Integer
Dim intRate As Integer
Dim datPrimaRata As Date
Dim datCicloRata As Date
    datPrimaRata = CDate("01/03/2022")
    intRate = 6
    For intCiclo = 1 To intRate
        If intCiclo = 1 Then
            datCicloRata = datPrimaRata
        Else
            datCicloRata = CDate("1/" & Format(DateAdd("m", 1, datCicloRata), "mm/yyyy"))
        End If
        Debug.Print datCicloRata
    Next
End Sub


Ciao
scusami, ma togliendo la seconda parte dell'espressione '  - DatePart("d", DateAdd("m", 1, MiaData)) + 1 
il risultato non cambia. Aumenta comunque di un mese. A che serve la seconda parte.
Grazie cmq, perchè funziona!


GRAZIE a tutti. Conservo tutti gli esempi forniti. Grazie ancora. 

in passato quando ho fatto dei calcoli con le date con altri linguaggi ho notato che dateadd faceva un po' di casini.
ad esempio quando aggiungevo varie migliaia di giorni a una data, non considerava gli anni bisestili.
quindi quando voglio essere sicuro al 100% lo evito.
a voi non ha dato mai problemi?


Personalmente non ho mai avuto alcun problema usando il DateAdd anche in cicli pesanti di generazione di GANTT e Calendari.
Se puoi fare un esempio proviamo a replicarlo, il DateAdd è indicato proprio per evitare quello che hai "ipoitizzato".
Quindi personalmente prima di prendere la tua considerazione per corretta o plausibile devo testarla su esempi concreti.
 
@Alex

Marco expressed precisely :

Prova questa:
===========================================
Public Sub Mensilità()
Dim i As Integer
For i = 1 To 30
    MsgBox DateAdd("m", i, "01/11/2022")
Next
End Sub
==========================================
 
Bruno


sto parlando di almeno 10 anni fa e di php.. mi fido della tua esperienza se mi dici che funziona bene

maynard00 formulated the question :

Funziona bene... funziona bene!
C'era già nell'Access Basic della versione 1.0 dello 07/01/93.
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: chiudere una maschera dopo che se ne è aperta un'altra...

Nel mio prg esiste una form per l'immissione di una password che permette
l'apertura di un'altra maschera per la modifica o cancellazione dei dati.
Sotto c'č il codice che sta sotto l'unico pulsante di comando.
la routine cosě com'č (lo so non č un granchč ma per chi č destinata č piů
che sufficiente...) funziona ma...
... la maschera stessa ( č una pop up) rimane aperta anche se sopra s'č
aperta la form Correzioni...
La riga A l'ho aggiunta dopo, ma neanche cosě funziona.
Mi date una mano per risolvere il problema?
grazie
BC
Private Sub cmdPassword_Click()
Dim A As String
Dim stDocName As String
Dim stLinkCriteria As String
   If Me.PWD_CHIARO = "xxx" Then
      Me.PWD_CHIARO = ""
      stDocName = "FrmCorrezioni"
      DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close <----------------------------------------------- A
    Else
      A = MsgBox("La password č errata! ", vbCritical, "Password")
      DoCmd.Close
   End If
 End Sub

  End Sub
INvece di quello che hai scritto prova questo:
Docmd.Close acForm,Me.Name
Altrimenti prova ad usare questa:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=162
@Alex

 
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=162
Sarebbe, inoltre, il caso che scrivesse in formato testo finche' esiste 
questa regola.
Io la prima volta che ho scritto su un NG mi sono andato a leggere le 
regole. Non capisco perche' la stragrande maggioranza dei nuovi non lo 
fa mai. E se glielo chiedi si incazzano pure. Sono anarchico ma non fino 
a questo punto.
--
ac

Alessandro Cara wrote:
P.S. Scusami ho confuso il 3D
--
ac

Newsgroup: it.comp.appl.access
Titolo: Chiarimento MOD

Ciao a tutti!!!
volevo sapere se per distribuire le applicazioni Access2000 č necessario
tutto il pacchetto Microsoft Office Developer edition (circa 2milioni di
lire) oppure se esiste una versione ridotta per far ciň.
GRAZIE
DAMIANO

 Per quanto mi risulta no
ho dovuto acquistare addirittura tutta la suit della versione Premium.
Rino

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

Ho una query di aggiornamento da eseguire tra due tabelle di cui una con 2 
milioni di record e l'altra di circa 80000 record.
Putroppo arrivata quasi alla fine la query mi da il messaggio di memoria 
insufficiente o HD pieno.
Ho 512 Mb ram e spazio su hd a morire.
Mi potete dare indicazioni su cosa cambiare per proseguire nella query....
grazie lisa 

[CUT]
http://www.donkarl.com/it/index.htm?/it/FAQ/FAQ7Bug.htm
 ->7.13 Memoria 
insufficiente