title: aprire una query da codice.

text:
BC wrote:
> ...
> funziona con DCount("*", "QryContaGiorniTer")
>
> Non so se esiste un sistema migliore per contare dei raggruppamenti..
> cioè
> Data una tbl così
> 21/12/2011 aspirina
> 21/12/2011 aspro
> 22/12/2011 guttalax gocce
> 23/12/2011 cicuta gtt
> 23/12/2011 piramidone supp
>
> voglio sapere quanti sono i giorni di terapia
> risultato TRE e non come se facessi un count 5

No, ma se già usi DCount() puoi lasciare perdere il Count() nella query.



title: aprire una query da codice.

author: BC

text:
Il 28/12/2011 14:06, Karl Donaubauer ha scritto:
> BC wrote:
>> ...
>> funziona con DCount("*", "QryContaGiorniTer")
>>
>> Non so se esiste un sistema migliore per contare dei raggruppamenti..
>> cioè
>> Data una tbl così
>> 21/12/2011 aspirina
>> 21/12/2011 aspro
>> 22/12/2011 guttalax gocce
>> 23/12/2011 cicuta gtt
>> 23/12/2011 piramidone supp
>>
>> voglio sapere quanti sono i giorni di terapia
>> risultato TRE e non come se facessi un count 5
>
> No, ma se già usi DCount() puoi lasciare perdere il Count() nella query.
>
Ringrazio  "con la faccia sotto i vostri piedi" per l'illuminazione fornita

Grazie ancora e auguri

BC

... a proposito: cosa si mangia di buono a Vienna per capodanno?


title: aprire una query da codice.

author: Karl Donaubauer

text:
BC wrote:
> ... cosa si mangia di buono a Vienna per capodanno?

Hmm, buona domanda... credo che non esiste il piatto tipico.

Peró io di solito dev'essere presente a una famiglia italiana
ed è triste perché zampone/cotechino a me non piacciono e
solo mangio alcune lenticchie. ;-)



title: Fw: Funzione Date() impossbile trovare la libreria !!!!!

author: norica

text:
----- Original Message -----
From: "norica" <
nor...@libero.it
>
To: <
it.comp.a...@mailgate.org
>
Sent: Wednesday, May 16, 2001 2:10 PM
Subject: Funzione Date() impossbile trovare la libreria !!!!!
> Ho costruito un db in Access2000 sotto WIN98......
> In una maschera, in una casella di testo la sua orgine č impostata a: =
> Date() (cosě in automatico mi mette la data di oggi)
> Aprendo lo stesso db in WIN2000 (sempre con ACCESS2000) qualsiasi campo
(di
> maschera o query) che abbia la funzione Date() non viene riconosciuto
dando
> errore "impossibile trovare il membro, libreria mancante..." BE ???????
>
>
>
--
Posted from
smtp1.libero.it
 [193.70.192.51]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Daniele Fasoli

text:
>
> > In una maschera, in una casella di testo la sua orgine č impostata a: =
> > Date() (cosě in automatico mi mette la data di oggi)
> > errore "impossibile trovare il membro, libreria mancante..." BE ???????
Sicuramente sull' Access del W2000 dove riscontri il problema esiste un
riferimento mancante del vba
entra nell editor di vba clicka su riferimenti e correggi il problema
Daniele "Antares" Fasoli
fas...@easy1.easynet.it


title: conversione formato access

text:
Ciao a tutti
esiste un modo per convertire un db Access 97 in access 2000 senza avere
access installato?
conosco visual basic e potrei scrivere un programma per fare la
conversione, ma prima vorrei un vostro parere in merito.
si tratta di un db con sole tabelle (con indici e relazioni) e query,
niente maschere report ecc...
grazie a tutti
Stefano


title: conversione formato access

author: Marco Pizzamiglio

text:
@Ste ha scritto:

Non so se si può fare una conversione diretta. Prova. Dopo aver fatto una
copia di sicurezza, ovviamente.
Altrimenti credo ti basti creare un nuovo database vuoto in formato 2000,
collegarti da VB sia al vecchio che al nuovo e travasare le tabelle, per
esempio con delle query di creazione tabella.
Facci sapere come hai risolto.
Ciao.
-Marco-
--
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


title: conversione formato access

author: Roberto dal portatile

text:
"@Ste" <
piletti...@libero.it
> ha scritto nel messaggio
news:8apZg.1513$fE3...@tornado.fastwebnet.it...

La conversione viene fatta da Access 2000 o successivi   viene loro chiesto
di aprire il database Access 97; penso proprio che senza installare Access
la cosa non sia possibile.
Naturalmente mi piacerebbe essere smentito.
> grazie a tutti
Prego
> Stefano
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: conversione formato access

author: cidi

text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:eh5n35$rk8$1...@news.newsland.it...
> @Ste ha scritto:
>
>> Ciao a tutti
>> esiste un modo per convertire un db Access 97 in access 2000 senza avere
>> access installato?
>> conosco visual basic e potrei scrivere un programma per fare la
>> conversione, ma prima vorrei un vostro parere in merito.
>> si tratta di un db con sole tabelle (con indici e relazioni) e query,
>> niente maschere report ecc...
>> grazie a tutti
>> Stefano
>
>
> Non so se si può fare una conversione diretta. Prova. Dopo aver fatto una
> copia di sicurezza, ovviamente.
> Altrimenti credo ti basti creare un nuovo database vuoto in formato 2000,
> collegarti da VB sia al vecchio che al nuovo e travasare le tabelle, per
> esempio con delle query di creazione tabella.
> Facci sapere come hai risolto.
> Ciao.
> -Marco-
>
>
> --
> namor at inwind punto it
>
Ciao Marco
hai ricevuto le foto? .... hai mandato le tue?   :<)
Daniele


title: conversione formato access

text:
cidi ha scritto:
> Ciao Marco
> hai ricevuto le foto?
Si, grazie, gentilissimo.
> .... hai mandato le tue?   :<)
Non ancora, perchè mi serve un po' di tempo per prepararti le miniature,
altrimenti te le mando tutte, saranno un 200 Mb.
Ciao!
-Marco-
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito



title: conversione formato access

text:

Per un db con solo tabelle è possibile con il CompactDatabase
di DAO o JRO. Puo darsi che le query creano problemi perché
oggetti di Access (in contrario a JET) non vengono convertiti
e poi il db non si lascia più aprire.
Con VB e DAO installato puoi provarlo con:
DAO.DBEngine.CompactDatabase _
     "c:\...\vecchio.mdb", "c:\...\nuovo.mdb, , DAO.dbVersion40
Un altro modo è ADO + JRO:
http://support.microsoft.com/?kbid=230501
Leggi le note sul parametro "Type". Per JET4 (A00) è 5.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: conversione formato access

text:
> Per un db con solo tabelle è possibile con il CompactDatabase
> di DAO o JRO. Puo darsi che le query creano problemi perché
> oggetti di Access (in contrario a JET) non vengono convertiti
> e poi il db non si lascia più aprire.
> Con VB e DAO installato puoi provarlo con:
> DAO.DBEngine.CompactDatabase _
>     "c:\...\vecchio.mdb", "c:\...\nuovo.mdb, , DAO.dbVersion40
>
> Un altro modo è ADO + JRO:
>
http://support.microsoft.com/?kbid=230501
> Leggi le note sul parametro "Type". Per JET4 (A00) è 5.
sia la compattazione con DAO e JRO creano un database che non si riesce
più ad aprire...
sto provando a scrivere un programma VB che esegue la copia di tutti gli
oggetti dal db in formato 97 ad un altro db in formato 2000, ma al
momento di copiare le relazioni mi si blocca con questo errore:
the cascading options for the new reference conflict with existing
reference 'nome di ua FK'
che cosa significa?
Ste


title: gestione fatturazione

author: Clic!

text:
Ciao a tutti
Qualcuno sà indicarmi un link dove scaricare
un esempio di gestione fatturazione in access.
Solo a titolo di studio.


title: gestione fatturazione

author: Roberto La Forgia

text:
"Clic!" <
cl...@clicinformatica.it
> wrote in message
news:op.sqxkhzh313fgdl@pc-assistenza

Vai su Google ... e ti appariranno un bel pò di link come il seguente:
http://www.microsoft.com/italy/pmi/comefare/gestioneimpresa/fatture/article/article4.mspx
Poi ci sono parecchie offerte di download gratuito (a scopo di test) ...
Cyà,
Roberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: come gestire al meglio la cancellazione record già registrato con dati obbligatori ORA forzati a mancanti ?

author: GiorgioDaPrato

text:
utilizzo Access 2003, ma credo cha la cosa non cambi per le versioni recenti

il record è, ad esempio, uno di quelli intermedi in una form di tipo continuo,

l'utente si posiziona su di esso, cancella anche il contenuto di un campo obbligatorio e poi preme il pulsante cancella Riga, presente in tutte le righe della form, per cancellare definitivamente il record.
(nell' evento BeforeUpdate c'è il controllo dei valori nulli per i dati obbligatori)

Cosa è da impiegare perché la cancellazione vada a buon fine senza intoppi ?
-il comando sql:
DoCmd.RunSQL "delete * from miaTabella where idNum =" & me.txtIdNum

-oppure il comando
DoCmd.RunCommand acCmdDeleteRecord

(setWarning è impostato correttamente, prima a falso, poi a vero)

considerando che non si vuol far vedere #Record Eliminato
(e quindi, per quanto ne so, occorre utilizzare Me.Requery),
e ci si vuol riposizionare sopra il record eliminato
(per questo scopo si memorizza il numero posizionale del record che verrà eliminato, prima di procedere alla sua cancellazione)

ma vedo, seguendo il codice passo passo, che queste due azioni forzano il ritorno all'evento BeforeUpdate, e scatta un errore che appare NON intercettabile se si utilizza DoCmd.RunSQL ...


title: [SitoComune] Aggiornamento

author: Federico Luciani

text:
Le novita' sono:
FAQ
Query protetta da password. (Sib)
Cosa sono e come funzionano le transazioni? (Sib)
Come evitare che l'utente chiuda l'applicativo tramite Alt-F4? (Dario da PD)
DOWN
Stampare un numero N costante di righe per pagina (Federico Luciani)
Inviare e-mail con MSAccess utilizzando il winsock (Paolo Beltrame)
Inviare e-mail con MSAccess utilizzando la libreria mapi32.dll (Carlo
Costarella)
Implementare un archivio di immagini. (Silvio Savoldi)
Formattazione Condizionale nelle maschere continue. (Silvio Savoldi)
NEWSGROUP
Agosto 2000
Luglio 2000
LINK
Microsoft Access in pratica
--
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
--------------------------------------


title: accessi contemporanei

author: NotaDoppia

text: Quanti accessi contemporanei può supportare un database access ????


title: accessi contemporanei

author: Roberto

text:
"NotaDoppia" <
abiasc...@inwind.it
> ha scritto nel messaggio
news:9kukrc$tpm$1...@nreadA.inwind.it...
> Quanti accessi contemporanei può supportare un database access ????
>
>
>
Microsoft consiglia di non usare più di 5 Utenti che accedono
contemporaneamente sullo stesso DB. Io finora ho fatto applicazioni che al
massimo venivano usate da 4 Utenti e tutto funzionava bene.
Ciao Roberto


title: accessi contemporanei

text:
> Microsoft consiglia di non usare più di 5 Utenti che accedono
> contemporaneamente sullo stesso DB. Io finora ho fatto applicazioni che al
> massimo venivano usate da 4 Utenti e tutto funzionava bene.
Io sono arrivato a lavorare con 6 utenti e fino ad ora non ha dato problemi
;) incrociamo le dita!! :)
Altra informazione il db BE pesa 200Mb e il FE circa 7MB
Ciao
Roberto


title: accessi contemporanei

text:

se voi due Roberto non siete la stessa persona (almeno cosi' sembra),
potreste essere cosi' gentili da cambiarvi il nick in modo da non
generare confusione con i nick uguali? Grazie
--
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
----------------------------------


title: accessi contemporanei

author: warp

text:
NotaDoppia ha scritto nel messaggio <9kukrc$tpm$
1...@nreadA.inwind.it
>...
>Quanti accessi contemporanei può supportare un database access ????
Dipende da fattori di programmazione, dall'hardware e dalla complessità del database.
Configurazioni hardware instabili (soprattutto cavi e schede di rete) creano danni anche con 2 PC
concorrenti sulla stessa tabella.
Diversamente, superate le 10-12 postazioni di lavoro gli .mdb tendono a diventare lenti ma non danno
particolari problemi d'affidabilità.
Fermo restando che con il modello file-sharing la sicurezza sull'integrità dei dati non può essere
elevata.
Per la cronaca, mi è capitato d'incontrare installazioni con .mdb condivisi tra decine di clients
(!) ... ma questi sono fondamentalismi :-)
Ciao, warp


title: accessi contemporanei

text:

ehm!! ;-)



title: accessi contemporanei

author: Roberto - Syd

text:
"Federico Luciani" <
fluc...@sitocomune.com
> ha scritto nel messaggio
news:3B73AD30...@sitocomune.com...

Hai pienamente ragione, infatti io l'ho cambiato Ciao Roberto - Syd


title: accessi contemporanei

text:
"Federico Luciani"
> > Per la cronaca, mi è capitato d'incontrare installazioni con .mdb
condivisi tra decine di clients
> > (!) ... ma questi sono fondamentalismi :-)
> > Ciao, warp
> ehm!! ;-)
Quindi sei uno di quelli!
E fino a quanti clients ti sei spinto? (visto che sei tu ti promuovo a
temerario)


title: accessi contemporanei

text:

;-)
devo dirla tutta...
ho un paio di installazioni su 15 client, da circa 5 anni; in realta'
credo non lavorino su piu' di 7/8 client contemporanemente.
naturalmente il sistema non e' una scheggia, ma va...
all'inizio quasi non ci dormivo la notte; fanno un backup tutte le sere
e ad oggi non ho avuto nessun problema riguardante msaccess.
gli unici problemi riscontrati sono stati quelli delle schede di rete,
li ho obbligati a comprarne delle altre, e da allora nessun problema.
naturalmente ho proposto loro di passare a qualcosa di diverso, ma per
il momento non vogliono spendere soldi.



title: accessi contemporanei

text:
"Federico Luciani"
> >
> > Quindi sei uno di quelli!
> > E fino a quanti clients ti sei spinto? (visto che sei tu ti promuovo a
> > temerario)
> devo dirla tutta...
> ho un paio di installazioni su 15 client, da circa 5 anni; in realta'
> credo non lavorino su piu' di 7/8 client contemporanemente.
E'  normale: se installi un prodotto su X postazioni di lavoro, quelle
realmente concorrenti in genere sono X/2 ... meglio così va :-)
Comunque puoi dormire relativamente tranquillo: c'è chi si spinge molto,
molto oltre...
In un paio di circostanze mi sono imbattuto in aziende (reggetevi alla
sedia) con una cinquantina di clients attaccati a un solo, povero, indifeso
.mdb!!
Ipotizziamo 25 clients sistematicamente concorrenti ...
Ciao, warp


title: accessi contemporanei

author: Nicola Feretti

text:
"NotaDoppia" <
abiasc...@inwind.it
> ha scritto nel messaggio
news:9kukrc$tpm$1...@nreadA.inwind.it...
> Quanti accessi contemporanei può supportare un database access ????
Microsoft parla di 255 utenti massimi teorici... per me ce ne sono 250 di
troppo!!! :-)
Nicola


title: accessi contemporanei

text:

cacchio, e' da pazzi...
e poi, che diavolo di prestazioni hanno?



title: accessi contemporanei

text:
"Federico Luciani" <
> > In un paio di circostanze mi sono imbattuto in aziende (reggetevi alla
> > sedia) con una cinquantina di clients attaccati a un solo, povero,
indifeso
> > .mdb!!
> > Ipotizziamo 25 clients sistematicamente concorrenti ...
> > Ciao, warp
> cacchio, e' da pazzi...
> e poi, che diavolo di prestazioni hanno?
In effetti è da pazzi.
Una delle gestioni "doveva" essere passata su un server sql, ma a forza
d'implementazioni e personalizzazioni dopo due anni era ancora su base JET
(molto più semplice in fase di sviluppo).
Il vero problema non erano le prestazioni ma l'affidabilità: ripristinavano
il db almeno una volta al giorno!
Oltretutto l'hardware e le schede di rete facevano schifo :-)
Ciao, warp


title: accessi contemporanei

author: MS

text:
Scusate l'intromissione,
io ho creato un mdb, copiato su 10 postazioni, contenente collegamenti a
tabelle su server SQL oltre a query report e maschere; siccome sono uno
sbarbatello in materia, ho fatto bene o male?
Grazie, Massimiliano


title: accessi contemporanei

text:
MS ha scritto nel messaggio

Tranquillo, qui si discuteva dell'opportunità di condividere tra parecchi Client un .mdb e non un
server SQL.
Ciao, warp


title: accessi contemporanei

author: Cooperativa Master

text:
Ciao ! io condivido un mdb di 10 mega di BE e di 2 il FE tra 14 postazioni .
Se passassi a Mysql o ad altri db opensource... visti i costi del bel SQl
server andrei meglio ?
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:9l8tu6$qbi$1...@fe2.cs.interbusiness.it...



title: accessi contemporanei

author: Antonio Biso

text:
Cooperativa Master <
coopm...@libero.it
> wrote in message
dL3f7.2707$lM2.1...@news.infostrada.it...
> Ciao ! io condivido un mdb di 10 mega di BE e di 2 il FE tra 14 postazioni
.
> Se passassi a Mysql o ad altri db opensource... visti i costi del bel SQl
> server andrei meglio ?
Sicuramente andresti meglio se scrivessi DOPO il quoting!!!
Antonio


title: Query da eseguire come Sql via codice

author: bande

text:
Un'altra richiesta ma sono incasinato...
Ho questa query di raggruppamento con due parametri che funziona salvandola
come query.
---
SELECT T_Dett_Lav_Codificata.Cod_Manodopera,
Sum([Costo_Unitario_man]*[Quantita]) AS Tot_Costo,
Sum([Prezzo_Unitario_man]*[Quantita]) AS Tot_Prezzo
FROM T_Dett_Lav_Codificata INNER JOIN T_Manodopera ON
T_Dett_Lav_Codificata.Cod_Manodopera = T_Manodopera.Cod_manodopera
WHERE (((T_Dett_Lav_Codificata.Cod_Art_Composto)=[Cod_Articolo]) AND
((T_Manodopera.Cod_Val_Def)=[Cod_Valuta]))
GROUP BY T_Dett_Lav_Codificata.Cod_Manodopera;
---
Vorrei eseguirla via codice con sql ma non mi ritorna nessun valore.
E strutturalmente corrett il codice sotto?
Come la scrivereste la stringa SQL, non basta mettere i doppio apici in
testa ed in coda?
---
dim db as database
dim qdf_lav_cod as querydef
dim rst_lav_cod as recordset
Set qdf_lav_cod = db.CreateQueryDef("")
With qdf_lav_cod
    .SQL = ...sql della query come espressione stringa cioe' "SELECT...."
    .Parameters![codice_articolo] = Cod_Articolo
    .Parameters![codice_valuta] = Cod_Valuta
     Set rst_lav_cod = .OpenRecordset(strSQL, dbOpenDynaset)
 End With
---
Grazie di nuovo
--
Andrea


title: Query da eseguire come Sql via codice

text:
"bande" <
raggi...@mail.ru
> ha scritto nel messaggio
news:9p9vlj$hash4$1...@ID-65136.news.dfncis.de...

ops! la stringa sql ha in testa: "PARAMETERS codice_articolo string,
codice_valuta string;" & "SELECT.."
--
Andrea


title: Query da eseguire come Sql via codice

text:
"bande" <
raggi...@mail.ru
> ha scritto nel messaggio
news:9p9vlj$hash4$1...@ID-65136.news.dfncis.de...

No non basta mettere le virgolette prima e dopo l'istruzione SQL ma va
composta come si deve per es. cosě:
strSQL= "SELECT T_Dett_Lav_Codificata.Cod_Manodopera,
Sum([Costo_Unitario_man]*[Quantita]) AS Tot_Costo,
Sum([Prezzo_Unitario_man]*[Quantita]) AS Tot_Prezzo FROM
T_Dett_Lav_Codificata INNER JOIN T_Manodopera ON
 T_Dett_Lav_Codificata.Cod_Manodopera = T_Manodopera.Cod_manodopera WHERE
(((T_Dett_Lav_Codificata.Cod_Art_Composto)='" & Cod_Articolo] & "' AND
((T_Manodopera.Cod_Val_Def)='" & Cod_Valuta & "'))
 GROUP BY T_Dett_Lav_Codificata.Cod_Manodopera"
Inoltre prima di usare dei parametri prima li devi creare guarda lo help
alla voce parameter.
Naturalmente la query funziona se i valori sono di tipo testo.
Ciao Roberto - Syd


title: query di aggiornamento

text:
Ho una tabella tab1 con una relazione una a molti con la tabella tab2, i
campi associati si chiamano in entrambi le tabelle cod_prim.
Vorrei creare una query di aggiornamento che copi i dati dalla tab2 campox
nella tab1 campoy, ovviamente il campo di controllo deve essere cod_prim.
Spero di essermi fatto capire.
Marco


title: query di aggiornamento

text:
"maga58" <
mag...@libero.it
> ha scritto nel messaggio
news:7Ptf8.45145$fa5.1...@twister2.libero.it...

Embè?
Query di aggiornamento, fai il join sul campo chiave e metti sotto il campoy
[campox]
Ovviamente questa query ha senso se a parità di codice gli n record di tab2
hanno lo stesso valore di campox
Antonio


title: query di aggiornamento

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:0Fuf8.41760$v7.15...@twister1.libero.it...

In effetti vorrei che in tab1.[campoy] vi sia la somma di quanto contenuto
nella tab2.[campox]
nalla tab1 infatti c'è un unico valore di cod_prim mentre sulla tab2 ce ne
sono molti uguali.
Ho provato a scrivere somma([campox]) ma non funziona.
Marco


title: disabilitare avvisi di protezione dei collegamenti ipertestuali

author: Marco

text:
Salve,
Su Win7 (Access 2010) ho provato di tutto per non far aprire questi fastidiosi messaggi!
Andando su Impostazioni Centro Protezione > Percorsi attendibili e selezionando la cartella in cui si trovano i file da aprire...
Ho tolto i segni di spunta dalle varie voci che indicano una protezione...
non so più che fare....
avete trovato un modo ?


text:
Ho fatto un giro sul web.... pare che l'unico modo sia quello di andare a modificare il Registro di windows...ma è una follia se si pensa di doverlo fare in giro per vari Pc con diversi sistemi operativi.

Ho scritto invece questo codice :
Private Sub CmdApriWord_Click()
On Error GoTo Err_CmdApriWord_Click

Dim Applicazione As Object
Dim wrdDoc

Set Applicazione = CreateObject("Word.Application")
Set wrdDoc = Applicazione.Documents.Open("C:\prova.docx")
Applicazione.Visible = True
wrdDoc.Visible = True

Exit_CmdApriWord_Click:
Exit Sub

Err_CmdApriWord_Click:

End sub
Ma ci sono alcuni dettagli che non vanno...
1) Il Documento si apre in modalità lettura. (E se si volesse editare?)
2) In realtà io volevo stamparlo direttamente
3) Per visualizzarlo devo premere l'icona Word. Come fare per Minimizzare la finestra del Database e maximizzare quella del documento ?


title: Access 2016 - cambiare nome al file allegato alla mail con sendobject

author: mario rossi

text:
mi spiego meglio,

con il comando
DoCmd.OutputTo acOutputReport, "Fattura", acFormatPDF, PercorsoFinale & nomefile
genero un file pdf in c:\fatture\001_2019.pdf

poi con il comando
DoCmd.SendObject acSendReport, "fattura", "PDFFormat(*.pdf)", Me.Email, , , oggetto, testo, True

invio il report di nome "Fattura" in formato pdf alla mail del cliente, ma l'allegato si chiama "fattura.pdf" che è il nome del report

----------------
la mia domanda è
----------------
si può inviare come allegato il file creato con il comando DoCmd.OutputTo che si chiamerà correttamente "001_2019.pdf" oppure si può cambiare nome da codice vba al file che viene generato e allegato con il comando sendobject?

grazie a tutti.


text:
Domanda molto strana...
Il file che alleghi deve esistere quello che inserisci è il Path del file che verrà passato alla codifica MIME.
Quindi certo che puoi cambiare nome, ma non alla variabile, ma direttamente al file prima di inviarlo ovviamente.

@Alex


author: Karl Donaubauer

text:
Mario Rossi ha scritto:
>
> con il comando
> DoCmd.OutputTo acOutputReport, "Fattura", acFormatPDF, PercorsoFinale & nomefile
> genero un file pdf in c:\fatture\001_2019.pdf
>
> poi con il comando
> DoCmd.SendObject acSendReport, "fattura", "PDFFormat(*.pdf)", Me.Email, , , oggetto, testo, True
>
> invio il report di nome "Fattura" in formato pdf alla mail del cliente, ma l'allegato si chiama "fattura.pdf" che è il nome del report
>
> si può inviare come allegato il file creato con il comando DoCmd.OutputTo che si chiamerà correttamente "001_2019.pdf" oppure si può cambiare nome da codice vba al file che viene generato e allegato con il comando sendobject?

Il tuo codice non manda come allegato il file che salvi ma direttamente
il report di Access. Non è possibile di mandare un file salvato con
SendObject. Dovresti usare un codice diverso di automazione di Outlook o
diversi altri metodi di mandare e-mail.

Se invece vuoi solo cambiare il nome del file allegato basta cambiare la
proprietà Caption del report, p.e.

Dim strRptName As String, strPDFName As String

strRptName = "Fattura"
strPDFName = "001_2019" 'o la variabile nomefile ma senza ".pdf"

DoCmd.OpenReport strRptName, acViewDesign, , , acHidden
Reports(strRptName).Caption = strPDFName
DoCmd.Close acReport, strRptName, acSaveYes

DoCmd.SendObject acSendReport, strRptName, acFormatPDF, Me!Email, , ,
Oggetto, Testo, True

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

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


text:

chiarissimo grazie mille


text:

provato e funziona grazie ancora.


text:

mi è venuto un dubbio, se devo distribuire il file formato accde ce non prevede l'apertura in modalità struttura di un report per cambiarne la proprietà caption, esiste un altro modo per il file accde?

Grazie.


text:
Salve,

Mario Rossi ha scritto:
>>> Karl Donaubauer ha scritto:
>>>> ...
>>>> Se invece vuoi solo cambiare il nome del file allegato basta cambiare la
>>>> proprietà Caption del report, p.e.
>>>>
>>>> Dim strRptName As String, strPDFName As String
>>>>
>>>> strRptName = "Fattura"
>>>> strPDFName = "001_2019" 'o la variabile nomefile ma senza ".pdf"
>>>>
>>>> DoCmd.OpenReport strRptName, acViewDesign, , , acHidden
>>>> Reports(strRptName).Caption = strPDFName
>>>> DoCmd.Close acReport, strRptName, acSaveYes
>>>>
>>>> DoCmd.SendObject acSendReport, strRptName, acFormatPDF, Me!Email, , ,
>>>> Oggetto, Testo, True
>>
>> provato e funziona grazie ancora.
>
> mi è venuto un dubbio, se devo distribuire il file formato accde ce non prevede l'apertura in modalità struttura di un report per cambiarne la proprietà caption, esiste un altro modo per il file accde?
> ...

Usa la vis. anteprima di stampa invece di struttura:

...

DoCmd.OpenReport strRptName, acViewPreview, , , acHidden
Reports(strRptName).Caption = strPDFName

DoCmd.SendObject ...

DoCmd.Close acReport, strRptName, acSaveYes



text:

ok grazie.


text:

con acViewPreview non funziona mantiene nome report precedentemente creato


title: Update su recordset

author: Carmelo Di Rosa

text:
Salve ho un problema che mi fa impazzire. In un,operazione banale di
modifica di un campo di un recorset in fase di update mi modifica un'latro
record in un'altro campo e non capisco il perchè. Vi riassumo il codice
sotto:
    StrRs = "SELECT Pagamenti.* FROM Pagamenti " & _
     "WHERE (((Pagamenti.IDP) = " & ID & ")) " & _
     "ORDER BY Pagamenti.AC, Pagamenti.DV;"
    RsPF.Open StrRs, CDB, adOpenStatic, adLockPessimistic
    RsPA.Open "SysIRP", CDB, adOpenDynamic, adLockPessimistic, 2
    RsPA.MoveFirst
    RsPF.MoveFirst
    If RsPA!DAP > 0 And (RsPF!IR - RsPA!DAP) > 0 And (RsPF!IR - RsPA!DAP) <
RsPA!TAC Then
     'Correzione dell'importo corrente
     IDI = RsPF!IDI
     DV = RsPF!DV
     TP = RsPF!TP
     In questo caso vado a salvare nel campo importo un dato sostituendolo
al precedente
     RsPF!IR = RsPF!IR - RsPA!DAP
     RsPF.Update
    Dopo l'update mi modifica un'altro record nel campo data, inserendo la
data del record precedente
Record di partenza
Data            Importo    Anno
01/12/04     100          2003
02/12/04     200          2003
03/12/04     300          2004 Record prese in esame da cui modifica
l'importo e poi ne crea uno nuovo
Risultato
Data            Importo    Anno
03/12/04     100          2003 Record a cui cambia il valore della data e lo
cambia con l'ultimo inserito
02/12/04     200          2003
03/12/04     100          2003 recor esistente modificato
03/12/04     100          2004 record nuovo


title: trovare record con casella di riepilogo

author: Laura

text:
Può essere giusto e sufficiente questo codice per trovare i record gia
filtrati da una query corrisponenti alla selezione in una casella di
riepilogo? Non riesco a farlo funzionare
    rs.Find "[CategoriaFinale] = " & str(Nz(Me!CategorieFinali, 0)), 0,
adSearchForward, 1
grazie


title: trovare record con casella di riepilogo

author: Alessandro Baraldi

text:

Hai provato a generare la COMBO con l'autocomposizione, facendo
attenzione alle opzioni che propone....??????
Guarda bene perchè tra quelle offerte c'è proprio "Trova i record...."
Il codice che hai scritto in se non dice nulla... non sapendo a che
Recordset si riferisca... pertanto potrebbe essere errata... oltre che
usare ADO quindi anche non il massimo per JET-Access.
@Alex


title: Annulla le immissioni in maschera

author: ACCESS

text:
Salve,
non sono un utente esperto di Access come capirete dalla mia domanda.
Come posso fare per costruire un pulsante che annulli un form in immissione?
Vorrei ottenere una specie di ESC e Chiudi.
Ho bisogno da codice VBA.
Vi ringrazio per la collaborazione.
Luca


title: Annulla le immissioni in maschera

author: MA

text:
"ACCESS" <
lucape...@hotmail.com
> ha scritto nel messaggio
news:cohvme$3jl$1...@lacerta.tiscalinet.it...

cancel = true
docmd.close
MAssimiliano


title: Annulla le immissioni in maschera

author: Visir

text:
Ti ringrazio, le cose che mi servono evidentemente sono le più semplici!
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fx%qd.36678$B06....@news.edisontel.com...



title: Annulla le immissioni in maschera

text:
Ho provato ma con Option Explicit mi dice variabile non definita e non ne
vuol sapere.
AIUTO! :-)
Private Sub Annulla_Click()
cancel = True
DoCmd.Close
End Sub
"ACCESS" <
lucape...@hotmail.com
> ha scritto nel messaggio
news:cohvme$3jl$1...@lacerta.tiscalinet.it...



title: Annulla le immissioni in maschera

text:
"Visir" <
vi...@freemail.it
> ha scritto nel messaggio
news:cois8i$v46$1...@lacerta.tiscalinet.it...
> Ho provato ma con Option Explicit mi dice variabile non definita e non ne
> vuol sapere.
> AIUTO! :-)
>
> Private Sub Annulla_Click()
> cancel = True
> DoCmd.Close
> End Sub
>
Ops, su Pulsante?
allora me.undo
MAssimiliano


title: File vbs per copiare file e lanciare access

author: ciroteo

text:
Ciao a tutti, vorrei attraverso questo script copiare l'ulitma
versione del front end da una risorsa di rete, copiarlo in locale,
attendere qualche secondo e lanciare il file.
Sembra che non dia errori ma il file non lo copia.
Ho cercato nella guida msdn di vbscript ma non trovo l'errore. Dove
sbaglio?
'-----
Dim WshShellCopy, oExecCopy
Set WshShellCopy = CreateObject("WScript.Shell")
Set oExecCopy=WshShellCopy.Exec("c:\windows\system32\xcopy.exe s:
\Business Development General\GestGov\GestGov_FE1.mdb c:\ /y")
dim i
i=6000
Wscript.Sleep(i)
WScript.Echo "Ho atteso secondi :" & i/1000
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("C:\Programmi\Microsoft Office
\Office11\msaccess.exe C:\GestGov_FE1.mdb")
'---- se serve puoi controllare la chiusura dell'applicazione
Do While oExec.Status = 0
     WScript.Sleep 100
Loop
WScript.Echo "Uscita Applicazione"
'-----


author: Fabrizio Conti (Panathos)

text:
On 26 Mar, 10:30, ciroteo <
matteo.ci...@gmail.com
> wrote:
> Set oExecCopy=WshShellCopy.Exec("c:\windows\system32\xcopy.exe s:
> \Business Development General\GestGov\GestGov_FE1.mdb c:\ /y")
Nel nome file origine c'è uno spazio, puoi risolvere con due
virgolette doppie:
Set oExecCopy=WshShellCopy.Exec("c:\windows\system32\xcopy.exe ""s:
\Business Development General\GestGov\GestGov_FE1.mdb"" c:\ /y")
P.S.: ma perché chiami xcopy.exe invece di usare il metodo CopyFile di
FileSystemObject?
ciao,
Panathos


text:
On 26 Mar, 12:32, "Fabrizio Conti (Panathos)" <
panat...@gmail.com
>
wrote:

ciao panathos! lo chiamo perchè ne ignoravo l'esistenza.
Sto provando a creare questo piccolo file vbscrip per togliere un
vecchio file batch dos che lanciavo in esecuzione automatica all'avvio
del sistema per caricare l'ultima versione del front end.
In questo modo vorrei che ogni volta che l'utente apre il file apre
comunque l'ultima versione che rilascio nella cartella condivisa.
Intanto grazie, cercherò nella guida la sintassi corretta per
copyfile, se non mi arrangio ... ehm ... ti disturberò!
:-)


text:
On 26 Mar, 12:53, ciroteo <
matteo.ci...@gmail.com
> wrote:
> > P.S.: ma perché chiami xcopy.exe invece di usare il metodo CopyFile di
> > FileSystemObject?
> ciao panathos! lo chiamo perchè ne ignoravo l'esistenza.
Credevo ci fossero motivi più oscuri :-D
> Sto provando a creare questo piccolo file vbscrip per togliere un
> vecchio file batch dos che lanciavo in esecuzione automatica all'avvio
LOL! Io genero batch anche da dentro Access, sono proprio il soggetto
adatto per dare consigli di questo genere :-D
> In questo modo vorrei che ogni volta che l'utente apre il file apre
> comunque l'ultima versione che rilascio nella cartella condivisa.
> Intanto grazie, cercherò nella guida la sintassi corretta per
> copyfile, se non mi arrangio ... ehm ... ti disturberò!
Nessun disturbo, se posso rispondo volentieri.
ciao,
Panathos


text:
On 26 Mar, 17:44, "Fabrizio Conti (Panathos)" <
panat...@gmail.com
>
wrote:

Ecco allora ti disturbo.
Non ho trovato nella guida il comando che indichi. La guida è msdn
sezione vbscript.
Comunque ho notato un paio di problemini ...
1) il diverso percorso del file eseguibile di access ... e li dovrei
intercettare la versione e condizionare il percorso.
2) il percorso del file xcopy.exe nelle versioni win2k e winxp.
(fortunatamente non abbiamo macchine vista sennò suppongo che sia
ancora diverso.)
Il secondo punto potrei risolverlo se mi indicassi sommariamente la
sintassi cosi non devo riferirmi all'xcopy ...!
Però se tu ritieni più utile usare un file batch io ti ascolto
volentieri!
M..


author: Nick

text:
Ciao Ciroteo
.. mi vengono in mente giusto 2 suggerimenti:
1) xcopy puoi darlo senza percorso perchè genralmente è inserito nella
path (o meglio la system32 è nella path e pertanto ogni comando in
essa è reperbile da ogni location)
2) usare i doppi apici:
Set oExecCopy=WshShellCopy.Exec("xcopy.exe ""s:\Business Development
General\GestGov\GestGov_FE1.mdb"" c:\ /y")
facce sapè :)
ciao
Nick



text:

toh! va chi si rivede!!!
ciao papà ... tutto ok?


text:
On 27 Mar, 09:46, ciroteo <
matteo.ci...@gmail.com
> wrote:
> Non ho trovato nella guida il comando che indichi. La guida è msdn
> sezione vbscript.
Devi verificare la versione installata di .net, qui c'è la pagina per
la 2.0:
http://msdn2.microsoft.com/en-us/library/e1wf9e7w(VS.80).aspx
e qua per la 3.0:
http://msdn2.microsoft.com/en-us/library/e1wf9e7w(VS.85).aspx
> Comunque ho notato un paio di problemini ...
> 1) il diverso percorso del file eseguibile di access ... e li dovrei
> intercettare la versione e condizionare il percorso.
Bisogna ravanare nel registro, laddove:
Questa chiave contiene il percorso all'eseguibile di Access registrato
nel sistema:
HKLM\Software\Microsoft\Windows\CurrentVersion\App Paths\MSACCESS.EXE
Questa contiene il percorso all'installazione corrente di Office:
HKLM\Software\Microsoft\Windows\CurrentVersion\App Paths\MSOFFICE.EXE
Per accedere al registro sotto XP c'è il comando reg.exe (credo si
trovi anche in versione W2000); in mancanza del quale dovrei fare
ricerchina su google sui metodi di accesso al registro da VBA :-)
Cmq una volta che trovi l'eseguibile non è detto che sia quello
"giusto" da usare,
le diverse versioni di Office sono nella chiave:
HKLM\Software\Microsoft\Office
Potrebbe succedere che tu hai sviluppato in A2003 ed il cliente ha il
runtime della tua versione assieme alla versione completa di Office
2000 o XP; pertanto non saprei dirti esattamente quali combinazioni
utilizzare perché sui pc dove ho infilato applicazioni Access sapevo
esserci la versione 97.
> 2) il percorso del file xcopy.exe nelle versioni win2k e winxp.
> (fortunatamente non abbiamo macchine vista sennò suppongo che sia
> ancora diverso.)
Se la macchina è a posto, dovrebbe essere valorizzata la variabile di
ambiente %systemroot%; leggendo quest'ultima sai dove cercare gli
eseguibili.
L'equivalente della funzione VBA Environ(variabile) è il metodo
ExpandEnvironmentStrings:
Set oShell = CreateObject( "WScript.Shell" )
percorso = oShell.ExpandEnvironmentStrings("%systemroot%")
percorso = percorso & "\system32\xcopy.exe /Y"
> Però se tu ritieni più utile usare un file batch io ti ascolto
> volentieri!
In questo caso probabilmente userei un batch; ma solo perché farei
presto a scriverlo ed i comandi necessari li metterei comunque sul
pc.
Poi non è affatto detto che sia la soluzione ottimale... cmq il batch
è questo:
----------------------------
::: richiede grep.exe per win32 nella directory %systemroot%\system32
set miomdb="C:\GestGov_FE1.mdb"
set nuovopercorso="c:\"
set msg=Errore durante la copia
xcopy /y %miodb% %nuovopercorso% || goto :errore
set acc=HKLM\Software\Microsoft\Windows\CurrentVersion\App Paths
\MSACCESS.EXE
set msg=msaccess.exe non trovato
reg query %acc% | grep -i msaccess.exe || goto :errore
FOR /F "delims=;" %%I IN ('reg query %acc%') DO SET acc="%%I"
set msg=Errore nell'avvio dell'applicazione
start /w %acc% %miomdb% || goto :errore
set msg=Operazione completata
echo msgbox "%msg%" >%tmp%\ok.cmd
start %tmp%\ok.cmd
del /q %tmp%\ok.cmd
goto :esci
:errore
echo msgbox "%msg%" >%tmp%\ok.cmd
start %tmp%\ok.cmd
del /q %tmp%\ok.cmd
exit 1
:esci
exit 0
-------------------
ciao,
Panathos


text:
ciroteo ha scritto:

ehhehe
chi non **** si rivede!! :)
ho finalmente trovato un server nntp che mi permetta di visualizzare il
NG correttamente e moh provo a toranre un po' più attivo, ora non uso
molto accesso (purtroppo) ma vedrò cmq di dare una mano alla comunity...
e poi.. non si finisce mai di imparare :)
... il resto tutto bene, si dorme poco.. ma va cmq tutto bene :)
ti ho visto nella demo del cisa3... relatore?? grande ciroteo!!!
tu tutto bene?
ciao
Nick


text:
On 27 Mar, 14:44, "Fabrizio Conti (Panathos)" <
panat...@gmail.com
>
wrote:

FIKO!
Grazie me lo studio.
Per il momento visto che l'applicazione è in una piccola lan in cui
lavoro ogni giorno mi basta quello che ho fatto col vbs.
ogni volta che qualcuno lancia il vbs si apre la nuova versione che
viene aggiornata più o meno ogni sera. Trattandosi di pochi utenti
(5-6) va bene cosi al max mi chiamano ...  la nuova assistende della
mia capa è pure carina ...
:-)


text:
On 28 Mar, 09:37, ciroteo <
matteo.ci...@gmail.com
> wrote:
> FIKO!
Grazie... cmq non so se funziona, l'ho solo scritto senza eseguirlo.
> Grazie me lo studio.
Allora in questa linea:
reg query %acc% | grep -i msaccess.exe || goto :errore
è meglio usare find, disponibile sotto windows senza installare
niente:
reg query %acc% | find /i "msaccess.exe" || goto :errore
> viene aggiornata più o meno ogni sera. Trattandosi di pochi utenti
> (5-6) va bene cosi al max mi chiamano ...  la nuova assistende della
> mia capa è pure carina ...
Ci sono scelte che vanno aldilà della tecnica :-)
ciao,
Panathos


author: davide

text:
Un saluto a Tutti
Volevo aggiornare un campo di una tabella con la sostituzione di una
parola
con un'altra.
Questo tramite una query di aggiornamento usando la routine della
sezione
generale del sito comune "sostituire delle sottostringhe in una
stringa".UPDATE PROVA SET PROVA.IND =
ldSostituisciStringa([IND],"VIA","PIAZZA")
WHERE (((PROVA.IND) Like "*VIA*"));
Mentre questa è la routine:
Public Function ldsostituiscistringa(ByVal strTesto As String, _
        ByVal strTrova As String, _
        ByVal strSostituisci As String, _
        Optional ByVal fIgnoraMaiuscole As Boolean = False, _
        Optional ByVal fAutoTest As Boolean = False _
        ) As String
' Autore: Luca Dall'Olio
' email:
dall...@bigfoot.com
' Dalla originale SostituisciStringa di Lbo
' La modalita' autotest ignora i parametri ed esegue un check
' interno, sollevando eccezioni in caso di errori.
    Dim strRicerca As String
    Dim strPrima As String
    Dim strDopo As String
    Dim lngPivot As Long
    Const errldSostituisciStringaAutotest As Long = 1000 +
vbObjectError
    ' Modalita' autotest
    If fAutoTest Then
        ' Autotest modalita' case insensitive
        If ldsostituiscistringa("XXpippoXXpippopippoXXpiPpo", _
            "pippo", "pLuto") <> _
            "XXpLutoXXpLutopLutoXXpiPpo" Then
            Err.Raise errldSostituisciStringaAutotest, _
            "ldSostituisciStringa", _
            "Errore nell'autotest (case insensitive)"
        End If

        ' Autotest modalita' case sensitive
        If ldsostituiscistringa("XXPipPoXXpiPPoPIPPOXXpippo", _
            "PippO", "Pluto", True) <> _
            "XXPlutoXXPlutoPlutoXXPluto" Then
            Err.Raise errldSostituisciStringaAutotest, _
            "ldSostituisciStringa", _
            "Errore nell'autotest (case sensitive)"
        End If
        ' Autotest con stringa destinazione vuota.
        If ldsostituiscistringa("XXPipPoXXpiPPoPIPPOXXpippo", _
            "PippO", "", True) <> _
            "XXXXXX" Then
            Err.Raise errldSostituisciStringaAutotest, _
            "ldSostituisciStringa", _
            "Errore nell'autotest (sostituisci una stringa vuota)"
        End If

        ' Autotest con testo in cui cercare vuoto.
        If ldsostituiscistringa("", "PippO", "", True) <> "" Then
            Err.Raise errldSostituisciStringaAutotest, _
            "ldSostituisciStringa", _
            "Errore nell'autotest (testo in cui cercare vuoto)"
        End If

        ' Autotest con testo da cercare vuoto.
        If ldsostituiscistringa("XXPipPoXXpiPPoPIPPOXXpippo", _
            "", "Pluto", True) <> _
            "XXPipPoXXpiPPoPIPPOXXpippo" Then
            Err.Raise errldSostituisciStringaAutotest, _
            "ldSostituisciStringa", _
            "Errore nell'autotest (testo da cercare vuoto)"
        End If
        Exit Function
    End If
    ' Controllo gli argomenti
    If strTrova = "" Then
        ldsostituiscistringa = strTesto
        Exit Function
    End If
    ' Per ottenere il case insensitive cerco tutto in minuscolo.
    If fIgnoraMaiuscole Then
        strTrova = LCase(strTrova)
    End If
    ' Cerco la prima posizione da sostituire.
    lngPivot = 0

    ' Eseguo tutte le sostituzioni.
    Do While True
        ' Sincronizzo stringa di ricerca e testo da sostituire.
        If fIgnoraMaiuscole Then
            strRicerca = LCase(strTesto)
        Else
            strRicerca = strTesto
        End If

        ' Cerco la prossima occorrenza.
        lngPivot = InStr(lngPivot + 1, strRicerca, strTrova,
vbBinaryCompare)
        If lngPivot <= 0 Then
            Exit Do
        End If

        ' Recupero il testo prima dell'occorrenza.
        strPrima = Left(strTesto, (lngPivot - 1))

        ' Recupero il testo dopo l'occorrenza.
        strDopo = Mid(strTesto, lngPivot + Len(strTrova))

        ' Eseguo la sostituzione.
        strTesto = strPrima & strSostituisci & strDopo
        lngPivot = lngPivot + Len(strSostituisci) - 1
    Loop
    ldsostituiscistringa = strTesto
End Function
Solo che si presenta una finestra di dialogo con la seguente dicitura:
"Errore di compilazione nell'espressione della query"
In un modulo a parte ho scritto la routine,nella griglia di struttura
della query a criteri ho scritto: like "*VIA*"
mentre in aggiorna a:ldsostituiscistringa([IND];"VIA";"PIAZZA").
Ma appare la finestra di dialogo che dicevo prima.
Mi potreste aiutare a risolvere il problema?
Ciao Davide


text:
"davide" <
davi...@libero.it
> ha scritto nel messaggio
news:e2ac43b1.04091...@posting.google.com...
> Un saluto a Tutti
>
> Volevo aggiornare un campo di una tabella con la sostituzione di una
> parola
> con un'altra.
> Solo che si presenta una finestra di dialogo con la seguente dicitura:
> "Errore di compilazione nell'espressione della query"
Prima di vedere tutto il resto, prova a compilare il codice: se ti da
errore, c'è un problema di riferimenti da risolvere..
Antonio


title: Errore di compilazione nell'espressione della query

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> wrote in message news:<XqA1d.2372$
zF3....@twister2.libero.it
>...

Ciao Antonio
Ti ringrazio per il suggerimento.
Il problema sono riuscito a risolverlo facendo
il ripristino e compattando il file mdb(versione 97).
Adesso la routine funziona bene.
Un saluto
Davide


title: report designer

author: Michael

text:
        Ma che linguaggio\sintassi usa questo builder di report??
Allego esempi di campi calcolati :è mica SQL ?
Space(Min(prof,5)*2)+CodComp
Tran(CostoCalc*QtaProd)*100
E poi variabili : _pageno, _lmargin, _alignment, _box, ............
ciao!


title: Select case

author: Filippo

text:
Salve a tutti, su access 97 usavo il select case in questo modo:
Private Sub Comando128_Click()
Dim ricevuta As String
campo = Forms![prenota]![posto]
Select Case campo
   case1 "postomio"
   DoCmd.RunMacro "Stampa ricevuta1"
End Select
nella conversione al 2000 non gli piace "campo =" cosa posso usare??
grazie.


title: Select case

author: Cinzia

text:
"Filippo" <
filip...@libero.it
> ha scritto nel messaggio
news:j13dd.47939$H11.1...@twister1.libero.it...

Ciao Filippo,
probabilmente campo che in inglese fa Field in Access2K è diventata una
parola riservata, è successo anche ad altre parole italiane tipo Descrizione
usa qualsiasi altra parola: ilcampo, uncampo ....
Ciao
Cinzia


title: Select case

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:cl2etb$v26$1...@lacerta.tiscalinet.it...

Grazie Cinzia, ho provato a chiamarlo ilcampo ma nulla, su blocca sempre sul
punto "Ilcampo =" non gli piace... non so che fare.


title: Select case

text:
"Filippo" <
filip...@libero.it
> ha scritto nel messaggio
news:Mf3dd.47189$N45.1...@twister2.libero.it...

Ciao Filippo
Se  posto è una casella di testo prova
Dim campo as string
 campo = Forms![prenota]![posto].value
oppure
 campo = Forms![prenota]![posto].text
Cinzia


title: Select case

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:cl2fqp$vk0$1...@lacerta.tiscalinet.it...

Ho aggiunto la variabile Campo e sembra sia passato, si è ribloccato su
"case1" però con il seguente messaggio:
"Errore di compilazione:
Istruzioni ed etichette non valide tra Select Case e la prima composizione
Case".
Grazie ancora..


title: Select case

text:
"Filippo" <
filip...@libero.it
> ha scritto nel messaggio
news:7t3dd.47206$N45.1...@twister2.libero.it...

Pensavo avessi sbagliato a copiare e non te l'ho detto subito, non è case1
ma case e basta.
Select Case campo
   case  "postomio"
           DoCmd.RunMacro "Stampa ricevuta1"
End Select
Cinzia


title: Select case

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:cl2gef$b9$1...@lacerta.tiscalinet.it...

Fatta anche questa, ora sembra che funzioni, solo in un ultimo punto su
blocca:
Private Sub Comando120_Click()
"On Error GoTo Err_Comando120_Click" su questa riga scrive:
Errore di compilazione: Etichetta non definita
Grazie


title: Select case

text:
[CUT]

Ciao Filippo,
sicuro che su A97 funzionasse??
prima dell'end sub dovrebbe esserci :
Err_Comando120_Click:
Controlla se c'è e che sia scritto correttamente.
Cinzia


title: Select case

author: Sergio MAZZA

text:
"Filippo" <
filip...@libero.it
> ha scritto nel messaggio
news:Mf3dd.47189$N45.1...@twister2.libero.it...
>
> Grazie Cinzia, ho provato a chiamarlo ilcampo ma nulla, su blocca sempre
sul
> punto "Ilcampo =" non gli piace... non so che fare.
Se "campo" o "ilCAmpo" è una variabile la devi dichiarare come hai fatto per
"ricevuta"...
Ciao.
--
Sergio MAZZA


title: Select case

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:cl2i4k$1md$1...@lacerta.tiscalinet.it...

Ciao Cinzia,
precisamente c'è scritto:
Private Sub Comando120_Click()
On Error GoTo Err_Comando120_Click
   Dim stDocName As String
If Forms![prenota]![Posto] = "Prima fila" Then
  Call Comando113_Click
ElseIf Forms![prenota]![Posto] = "Seconda fila" Then
  Call Comando113_Click
  ElseIf Forms![prenota]![Posto] = "Terza fila" Then
  Call Comando113_Click
End If
Exit_Comando120_Click:
    Exit Sub
Err_Comando112_Click:
    MsgBox Err.Description
    Resume Exit_Comando120_Click
End Sub
Se modifico la terz'ultima riga da 112 a 120 funzionerebbe, ma...   in A97 è
scritto uguale, non è stato modificato dalla conversione.
Grazie mille.


title: Select case

text:

Se in A97 funzionava, vuol dire che quella procedura non è più richiamata da
nessuno, e la versione A97 non era stata compilata!
Saluti
Cinzia


title: Select case

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:cl2jil$2p6$1...@lacerta.tiscalinet.it...

Ciao Cinzia,
in effetti erano vecchi controlli non più utilizzati, ho fatto un po' di
pulizia, ora apparentemente funziona tutto correttamente, farò qualche
ulteriore prova.
Grazie per l'aiuto.
Filippo.


title: Select case

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:s_3dd.57637$b5.29...@news3.tin.it...

Grazie sergio, in effetti non era stata dichiarata la variabile, ora
funziona correttamente.
Filippo.


title: due richieste per office 2021

author: Ammammata

text:
la prima č la solita: implementare lo zoom nella struttura delle maschere e
dei report, che non se ne puň piů di dover tirare fuori gli occhi per
sistemare le cose piccole (no, il magnifier lo usate voi, grazie)

la seconda č la visualizzazione del codice VBA con il word-wrap,
opportunamente evidenziato (no, il trucco di usare underscore-spazio andava
bene venti anni fa, non oggi)

per oggi basta cosě, meglio non subissare microsoft di richieste

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: due richieste per office 2021

author: BFS

text:
Il 20/07/2021 09:31, Ammammata ha scritto:
> la prima è la solita: implementare lo zoom nella struttura delle maschere e
> dei report, che non se ne può più di dover tirare fuori gli occhi per
> sistemare le cose piccole (no, il magnifier lo usate voi, grazie)
>
> la seconda è la visualizzazione del codice VBA con il word-wrap,
> opportunamente evidenziato (no, il trucco di usare underscore-spazio andava
> bene venti anni fa, non oggi)
>
> per oggi basta così, meglio non subissare microsoft di richieste
>
>

andrebbe rifatto tutto l'editor vba...siamo a livelli di visual basic
1.0 :-)

per lo zoom...ti accontenti di poco
io vorrei poter disegnare una form in xml con la stessa facilità degli
ide più evoluti

e un ritorno a quello che erano i vecchi adp con cui si lavorava con
sqlserver direttamente da dentro access.. ed era una meraviglia

BFS


title: due richieste per office 2021

text:
....
> andrebbe rifatto tutto l'editor vba...siamo a livelli di visual basic
> 1.0 :-)

+1, mi pare che NotePad ++ sia meglio ;-)

> per lo zoom...ti accontenti di poco
> io vorrei poter disegnare una form in xml con la stessa facilità degli
> ide più evoluti

Penso che un Editor di Struttura migliore sarebbe veramente l'ora che lo facessero... così come sarebbe ora che venissero inclusi anche come NATIVI controlli più aggiornati.
Parliamo di LisBox e Combo che fanno fanno invidia al vecchio GW BASIC...
Ora tralasciando la suite MSCommonControl, ma vi pare normale che uno strumento come Access non disponga di ListView e TreeView Nativi...?
Non voglio spingermi a chiedere HyerarchicalFlexGrid o GanttControl ... ma i basici con possibilità Grafiche penso sia venuta l'ora di averli.

> e un ritorno a quello che erano i vecchi adp con cui si lavorava con
> sqlserver direttamente da dentro access.. ed era una meraviglia

Era la cosa più intelligente che avevano fatto..., e qui a pensar male ci si potrebbe anche prendere... (era troppo funzionale come sistema, un concorrente a NET veramente da evitare).

> BFS

Temo infatti, ed ovviamente è una considerazione personale, che dietro a queste cose ci sia una accuraa strategia di prodotto... che orienta o vorrebbe orientare il pubblico professionale ad abbandoare Access per accettare NET a tutti gli effetti, e circoscrivere la fruizione della Suite Office ad un pubblico di minor impatto tecnico.
Ne sono prova i continui rumors che si susseguono negli anni di dismissione di Access, puntualmente smentiti, ma sicuramente creati a dovere, il bacino è ancora troppo rilevante ma si cerca di ridurne il peso.

Come strategia di Casa MS, la posso comprendere, non mi piace... ma far rientrare il processo di evoluzione in binari predefiniti sicuramente agevola il lavoro alla MS e riduce i costi di sviluppo, il lavoro sporco di dover portare avanti prodotti che stanno facendo diventare di "nicchia"...

Il Passaggio a NET in parte è automatico, molti sviluppatori lo fanno in autonomia, ma ovviamente arrivare ad essere produttivi con un nuovo linguaggio non è immediato, serve qualche anno credo ad avere la medesima dimestichezza/autonomia/garanzia, e questo lo si può ragionevolmente pensare per NUOVE applicazioni, ma il problema più serio è il mantenimento del parco clienti ed Applicazioni precedenti.

Francamente, non conosco aziende che si mettono a rifare applicativi di clienti consolidati per passare da Access a Net... solo a titolo di studio... ;-), poicheè a titolo "oneroso" penso sia veramente oneroso...
Basti solo pensare al carico di lavoro aggiunto, su cui temo che sia più facile fare una patta se va veramente bene...

Tema che penso si possa prestare a considerazioni importanti e molto vaste nell'insieme...

@Alex


title: due richieste per office 2021

author: Simone Calligaris

text:
>
> Francamente, non conosco aziende che si mettono a rifare applicativi di clienti consolidati per passare da Access a Net... solo a titolo di studio... ;-), poicheè a titolo "oneroso" penso sia veramente oneroso...

E' un problema di carattere generale, tanto è vero che a tutt'oggi restano attive molte installazioni AS400, con relative applicazioni sviluppate in ...  RPG e Cobol.
Rifare i software aziendali non è mai un giochino.

Saluti.

P:S:  Però non concordo sulla nostalgia per i files .ADP: non avrebbero mai dovuto introdurre in Access quei baracconi ultra-buggati, buoni forse per assegnare un tapirone d'oro agli ideatori degli "snapshot aggiornabili" delle Forms.


title: due richieste per office 2021

text:

"ultra buggati" ?

ho alcune applicazioni di contabilità molto complesse sviluppate ancora
con adp xp che girano una meraviglia pure con sql server 2019 come BE e
windows 11 come s.o.
mai un db corrotto o un dato perso
fossero tutti cosi buggati i software MS :-)


title: due richieste per office 2021

text:
> "ultra buggati" ?

> ho alcune applicazioni di contabilità molto complesse sviluppate ancora
> con adp xp che girano una meraviglia pure con sql server 2019 come BE e
> windows 11 come s.o.
> mai un db corrotto o un dato perso
> fossero tutti cosi buggati i software MS :-)

Guarda, di problemi ne avevano molti (chiaramente mi riferisco alla fase di Design e programmazione): noi ci investimmo tempo e risorse (principalmente Access 2000) ma fu un macello.
Tipi di Dati supportati da SQLSVR inutilizzabili in ADP/VBA, bugs di programmazione da aggirare in continuazione, impossibilità di connessione in scrittura ad altri formati di Database (ma come fai a chiamare "ACCESS" un prodotto siffatto?),  conseguente impossibilità nel creare banalissime tabelle temporanee localmente, Recordsets 'snapshot aggiornabili' inadatti per Forms oltre le centinaia di records (si scaricavano tutto il pacco in background a velocità bradipesche), se ben ricordo era perfino macchinoso agganciare una distribuzione Runtime al Server SQL.

Non mi stupisco che li abbiano abbandonati, ma piuttosto che li abbiano ideati in quel modo.
Se n'è discusso spesso sul ng. tra chi li ha amati e chi li ha odiati considerandoli un controsenso, io appartengo alla seconda.

Saluti.


title: due richieste per office 2021

text:
Il 04/08/2021 17:00, Simone Calligaris ha scritto:
>   bugs di programmazione da aggirare in continuazione, impossibilità di connessione in scrittura ad altri formati di Database (ma come fai a chiamare "ACCESS" un prodotto siffatto?),  conseguente impossibilità nel creare banalissime tabelle temporanee localmente, Recordsets 'snapshot aggiornabili' inadatti per Forms oltre le centinaia di records (si scaricavano tutto il pacco in background a velocità bradipesche), se ben ricordo era perfino macchinoso agganciare una distribuzione Runtime al Server SQL.

di tutto ciò mai visto nulla
sopratutto del "si scaricavano tutto il pacco in background a velocità
bradipesche"...anzi le prestazioni sono ancora sbalorditive

sarò stato fortunato


title: due richieste per office 2021

text:

O sei stato fortunato, oppure parliamo di cose diverse.

Saluti.


title: due richieste per office 2021

text:

Sulla questione del pacco dati in background... francamente resto stranito pure io..., se me lo dicesse un'altro risponderei che l'origine Record includeva riferimenti non risolvibili ServerSide... come FORMS!NomeForm!NomeControllo/Dcount/EVAL e quanto altro non riconoscibile dal ServerEngine..., ma dal momento che sei tu, e so che quanto ho esposto sono banalità ... la cosa mi lascia molto perplesso...

Io ricordo che feci a suo tempo, parecchie comparazioni di performances anche sulla navigazione delle Form DataBound, una anche con Giorgio Rancati che ai tempi era pieno sostenitore dìi ADP, su Form associate a SP Parametriche con e senza appoggiarsi a Filter di Form, e risultavano sempre più performanti in ADP che Form con Filtri con DAO.
Le prove erano eseguite su basi dati importanti come mole, che appunto rendevano l'idea delle Performances temporali.
In quei casi anche l'analisi fatta con SQL_Server Managment in nessun caso rilevava quanto affermi, salvo appunto impossibilità di risoluzione del predicato lato Server..., in quel caso il Driver DAO era sicuramente più performante, ed i dati restituiti erano tutto l'intero Recordset in locale, e poi l'applicazione del criterio da parte del Driver di JET.

Però mi fermo quì in quanto ho fatto sicuramente vari esperimenti anche molto approfonditi, ma nulla di più impegnativo.

@Alex


title: due richieste per office 2021

text:

mi sa che parliamo di cose diverse

esempio
file adp sempre uguale dal 2002 a oggi, nato per MSDE/SQL2000 e che
ancora oggi connetto a sql più recenti e non da problemi

classica maschera di ricerca articoli
articoli 145.000 ma ho clienti con ferramenta che ne hanno 5 volte tanti
database su sql server 2017 su cloud aruba
client file adp su pc I3 4gb di ram
adsl 4 mbit

questa è la bradipesca velocità pur non avendo il db sql in lan:

http://youtu.be/g1nDdEycv1A?hd=1

per le tabelle temporanee sql server ha un db apposito per crearti tutte
quelle che ti servono...

per il runtime/sql server
in fase di apertura fai la classica connessione..due righe di codice
nulla da installare in più rispetto al runtime per un mdb

bugs di programmazione...boh

BFS


title: due richieste per office 2021

text:
 del pacco dati in background... francamente resto stranito pure io..., se me lo dicesse un'altro risponderei che l'origine Record includeva riferimenti non risolvibili ServerSide... come FORMS!NomeForm!NomeControllo/Dcount/EVAL e quanto altro non riconoscibile dal ServerEngine..., ma dal momento che sei tu, e so che quanto ho esposto sono banalità ... la cosa mi lascia molto perplesso...

>

Premesso che i problemi degli .ADP sono testimoniati da molti vecchi post rintracciabili sui ng. ma che sono lustri che non ci lavoro, ricordo bene che la logica stessa d'apertura di una tabella/qry di grandi dimensioni era "particolare": anzichè visualizzare istantaneamente la prima "pagina" di dati, e recuperare poi le successive durante lo scrolling o eventuali Filtri, il sistema scaricava tutti i records (con comodo) sul Client, con tanto d'indicazione del numero di righe trasferite in background.  Forms agganciate a origini dati impegnative si comportavano in tal modo.
Ma questo era solo uno dei tanti inghippi ... tu sei mai riuscito a collegarti da un ADP a un altro Server di database in scrittura?  (coi server collegati si poteva solo leggere)

Saluti.


title: due richieste per office 2021

text:
> per le tabelle temporanee sql server ha un db apposito per crearti tutte
> quelle che ti servono...

Ovvio ed è quello che dovevi fare con un .ADP ma non c'è paragone con la facilità di gestione che hai in .AccDE connesso via ODBC.
Ti connetti a tutto quello che vuoi, crei localmente tutti i temporanei che vuoi, in maniera immediata.

> per il runtime/sql server
> in fase di apertura fai la classica connessione..due righe di codice
> nulla da installare in più rispetto al runtime per un mdb

Passato molto tempo, ma ricordo problemi di connessione con .ADE eseguiti in Runtime  (forse risolti con aiuto di Giorgio Rancati).

Saluti.


title: due richieste per office 2021

text:
Il 04/08/2021 18:43, Simone Calligaris ha scritto:
>
>> per le tabelle temporanee sql server ha un db apposito per crearti tutte
>> quelle che ti servono...
>
> Ovvio ed è quello che dovevi fare con un .ADP ma non c'è paragone con la facilità di gestione che hai in .AccDE connesso via ODBC.

ADP/ADE era specifico per sqlserver altrimenti avrebbero dovuto fargli
un editor di SP per ogni tipo di database.
chi iniziava un progetto con quel formato di file di sicuro non aveva
interesse a collegarsi a qualcsosa di diverso da sql server

> Ti connetti a tutto quello che vuoi, crei localmente tutti i temporanei che vuoi, in maniera immediata.
>
>> per il runtime/sql server
>> in fase di apertura fai la classica connessione..due righe di codice
>> nulla da installare in più rispetto al runtime per un mdb
>
> Passato molto tempo, ma ricordo problemi di connessione con .ADE eseguiti in Runtime  (forse risolti con aiuto di Giorgio Rancati).
>
> Saluti.
>

i miei clienti che li usano ancora hanno ovviamente .ADE e non ADP
problemi di connessione mai visti

la connessione è tutta qua:

Function fChangeADPConnection(strServername, strDBName As String,
Optional strUN As String, _
         Optional strPW As String) As Boolean
'------------------------------------------------------------
'This Function resets the connection for an ADP by using the
'input parameters to create a new connection string. If no username
'is supplied, it tries to connect by using integrated security.
'
'Input:
'   strServerName    The server to be started
'   strDBName   The Name of the MSDE Database
'   strUN        The user used to start server
'   strPW        The password of user
'------------------------------------------------------------
     Dim strConnect As String
     On Error GoTo EH:
     strConnect = "Provider=SQLOLEDB.1" & _
     ";Data Source=" & strServername & _
     ";Initial Catalog=" & strDBName
     adp_UseIntegratedSecurity = False
     If Len(strUN) = 0 Then
         adp_UseIntegratedSecurity = True
     End If
     If adp_UseIntegratedSecurity = True Then
         strConnect = strConnect & ";integrated security=SSPI"
     Else
         strConnect = strConnect & ";user id=" & strUN
         strConnect = strConnect & ";password=" & strPW
     End If
     Application.CurrentProject.OpenConnection strConnect
     fChangeADPConnection = True
     Exit Function
EH:
     MsgBox err.Number & ": " & err.Description, vbCritical, "Connection
Error"
     fChangeADPConnection = False
End Function

vabbè
io sono tra quelli che farebbe i salti di gioia perchè tornassero.
probabilmente l'essere a favore o contro dipende dal successo che si ha
avuto con quel tipo di formato.
io ne posso solo parlare bene, 20 anni che non mi creano una minima
rogna e prestazioni ancora oggi fenomenali

BFS


title: due richieste per office 2021

text:
> ADP/ADE era specifico per sqlserver altrimenti avrebbero dovuto fargli
> un editor di SP per ogni tipo di database.
> chi iniziava un progetto con quel formato di file di sicuro non aveva
> interesse a collegarsi a qualcsosa di diverso da sql server

Nel corso degli anni mi è capitato varie volte di dover "comunicare" con altri applicativi (di produzione) e di dover inviare dati ad altri Server.
Quando inizi un lavoro non puoi sapere a priori quali saranno gli sviluppi futuri e imho l'idea di concepire un ambiente di Editing da Access per il solo SQLSVR (oltretutto incompatibile, se ricordo, con le versioni più vecchie del Server SQL) era limitante.

> > Passato molto tempo, ma ricordo problemi di connessione con .ADE eseguiti in Runtime (forse risolti con aiuto di Giorgio Rancati).

> i miei clienti che li usano ancora hanno ovviamente .ADE e non ADP
> problemi di connessione mai visti

Mah, può essere che fosse Access 2000 Runtime con (o senza) uno dei 20.000 relativi S.Pack a darci noie: ricordo che s'impazziva.
Comunque prendo atto della tua soddisfazione sul prodotto.

Saluti


title: due richieste per office 2021

text:
Il 04/08/2021 19:24, Simone Calligaris ha scritto:
> Nel corso degli anni mi è capitato varie volte di dover "comunicare" con altri applicativi (di produzione) e di dover inviare dati ad altri Server.
> Quando inizi un lavoro non puoi sapere a priori quali saranno gli sviluppi futuri e imho l'idea di concepire un ambiente di Editing da Access per il solo SQLSVR (oltretutto incompatibile, se ricordo, con le versioni più vecchie del Server SQL) era limitante.

scusa dov'è il problema a leggere/scrivere "comunicare" dati da un adp
su altro applicativo?

da dei file adp/ade io leggo e scrivo dati su un software di timbratura
che usa mdb

sincronizzo un e-commerce leggendo e scrivendo direttamente in mysql nel web

leggo e scrivo dati sul software del centralino telefonico che usa sql
portable

quando ho la connection string leggo e scrivo dove voglio. forse intendi
il fatto di non poter linkare la tabella...ma non è una gran mancanza per me

per il discorso versione vecchie sql server
mi pare che il formato sia nato con MSDE/SQL2000...quindi mi pare
normale che con le più vecchie non vada

ma da quella versione alla 2019 express ancora gira

bon dai basta altrimenti sembra che sia stipendiato da MS
sono solo stato fortunato con questo formato

"adp è morto, lunga vita a adp"

BFS


title: due richieste per office 2021

text:
> > Nel corso degli anni mi è capitato varie volte di dover "comunicare" con altri applicativi (di produzione) e di dover inviare dati ad altri Server.
> > Quando inizi un lavoro non puoi sapere a priori quali saranno gli sviluppi futuri e imho l'idea di concepire un ambiente di Editing da Access per il solo SQLSVR (oltretutto incompatibile, se ricordo, con le versioni più vecchie del Server SQL) era limitante.

> scusa dov'è il problema a leggere/scrivere "comunicare" dati da un adp
> su altro applicativo?

> da dei file adp/ade io leggo e scrivo dati su un software di timbratura
> che usa mdb
>
> sincronizzo un e-commerce leggendo e scrivendo direttamente in mysql nel web
>
> leggo e scrivo dati sul software del centralino telefonico che usa sql
> portable
>
> quando ho la connection string leggo e scrivo dove voglio. forse intendi
> il fatto di non poter linkare la tabella...ma non è una gran mancanza per me

Beh, potremmo fare un sondaggio se sia (o non sia) una mancanza il non poter accedere direttamente alle tabelle di altri DB (per leggere, scrivere, fare query e magari crearci Forms in due minuti...)
Non avrei molti dubbi sull'esito.

> per il discorso versione vecchie sql server
> mi pare che il formato sia nato con MSDE/SQL2000...quindi mi pare
> normale che con le più vecchie non vada

Tuttavia con ODBC accedevi senza difficoltà anche alle prime versioni del Server. Quindi, all'epoca, la soluzione ADP (a mio avviso) era già stranamente limitante.

> bon dai basta altrimenti sembra che sia stipendiato da MS
> sono solo stato fortunato con questo formato

In realtà è stato amato da tanti 'accessisti', quindi è evidente che la differenza d'opinioni è molto legata al tipo di applicazioni e alle difficoltà incontrate all'uscita del prodotto.

Saluti.


title: chiudere maschera con con almeno un record della sottomaschera

author: pfmarro

text:
salve!

ho una maschera ordini
con una sottomaschera dettaglio ordini

vorrei controllare all'uscita che ci sia almeno un record della sottomaschera dettaglio ordini per salvare la maschera ordini

dove devo mettere il controllo?

form_unload?

la maschera ordini e' associata alla tabella
quindi se chiudo senza dettaglio ordini devo cancellare il record corrente

Grazie

PFMarro


author: CIDI

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:231ea37e-32a2-4790...@googlegroups.com...

su Scaricamento della maschera Ordini

If Me.smDettagliFatturaVendita.Form.RecordsetClone.RecordCount = 0 Then

    If MsgBox("A  T  T  E  N  Z  I O  N  E Vuoi chiudere la Spedizione,
senza i particolari?", vbCritical + vbYesNo, ) = vbYes Then

    DoCmd.SetWarnings False
    DoCmd.RunSQL "DELETE tblFattureVendite.IDSpedizione " & _
    "FROM tblFattureVendite " & _
    "WHERE
(((tblFattureVendite.IDSpedizione)=Forms!mFatturaVendita![IDSpedizione]));",
0

    DoCmd.SetWarnings True

        Exit Sub
    Else
        Cancel = True
   End If
End If

adatta i nomi
ciao

Daniele


title: Dividere il nome dal cognome in una query

author: Fabrizio Domiziani

text:
Esiste la possibilità di creare due campi calcolati
in una query in grado di restituire rispettivamente il Nome
e il Cognome estratti da un campo Nominativo che li contiene
entrambi?
Non mi riesce di trovare le funzioni idenee
Grazie infinite
--
Fabrizio Domiziani
dom...@tin.it


author: Luciano

text:
Fabrizio Domiziani ha scritto nel messaggio
<9jB54Tqs$
GA....@news1.news.mcis.galactica.it
>...
>Esiste la possibilità di creare due campi calcolati
>in una query in grado di restituire rispettivamente il Nome
>e il Cognome estratti da un campo Nominativo che li contiene
>entrambi?
Se mi dici con parole tue cosa distingue un nome da un cognome la funzione
te la scrivo io!:-)
Uno spazio? Buono per Mario Rossi, ma non per Andrea Della Rovere o Maria
Antonietta Bianchi.
Mi spiegai?:-)
Saluti.
Luciano


text:
Uno spazio certo.
Con excel mi riesce facilmente usando le funzioni SINISTRA - TROVA
ma in access non le trovo
Grazie e saluti
--
Fabrizio Domiziani
dom...@tin.it
Luciano <
mc5...@mclink.it
> wrote in message
8ekju1$rls$3...@pegasus.tiscalinet.it...



text:
"Fabrizio Domiziani" <
dom...@tin.it
> ha scritto nel messaggio
news:co#rRcBt$GA....@news1.news.mcis.galactica.it...
> Uno spazio certo.
>
> Con excel mi riesce facilmente usando le funzioni SINISTRA - TROVA
> ma in access non le trovo
>
> Grazie e saluti
>
> --
> Fabrizio Domiziani
>
dom...@tin.it
>
> Luciano <
mc5...@mclink.it
> wrote in message
> 8ekju1$rls$3...@pegasus.tiscalinet.it...
> >
> > Fabrizio Domiziani ha scritto nel messaggio
> > <9jB54Tqs$
GA....@news1.news.mcis.galactica.it
>...
> > >Esiste la possibilitą di creare due campi calcolati
> > >in una query in grado di restituire rispettivamente il Nome
> > >e il Cognome estratti da un campo Nominativo che li contiene
> > >entrambi?
> >
> >
> > Se mi dici con parole tue cosa distingue un nome da un cognome la
funzione
> > te la scrivo io!:-)
> > Uno spazio? Buono per Mario Rossi, ma non per Andrea Della Rovere o
Maria
> > Antonietta Bianchi.
> > Mi spiegai?:-)
> > Saluti.
> >
> > Luciano
> >
> >
>
>
Dai uno sguardo all'help nelle funzioni:
mid(), left(),right(),instr()
Ciao..


text:
Fabrizio Domiziani ha scritto nel messaggio ...
>Uno spazio certo.
E allora sei fuori strada!:-)
Ti ripeto:
Mario Rossi: tutto OK
Andrea Della Rovere: il primo spazio e' il nome, OK
Maria Antonietta Bianchi: e qui?
Saluti.
Luciano


author: lbo dal portatile

text:
>Ti ripeto:
>Mario Rossi: tutto OK
>Andrea Della Rovere: il primo spazio e' il nome, OK
ehi, io conoscevo un tizio il cui secondo nome era Della.
>Maria Antonietta Bianchi: e qui?
e conoscevo anche la famiglia Antonietta, il sig. Mario Antonietta, la
moglie Maria Rossi in Antonietta...
altra complicazione: Antonio De Curtis, noto filosofo.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Orario in una Maschera

author: Markus

text:
Salve,
Vorrei mettere in una maschera un campo "ORA" in cui l'orario si aggiorna in
automatico.
Spero di essere stato chiaro.


title: Orario in una Maschera

author: ALESSANDRO Baraldi

text:
"Markus" <
n...@nn.it
> ha scritto nel messaggio
news:AbRPd.44123$2h5....@tornado.fastwebnet.it...

Metti una Label e gestisci l'Evento Timer con un TimerInterval=500
Me.NomeLabel.Caption=Format(Now(),"hh:mm:ss")
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: ricerca per date

author: sandra

text:
Desidero creare una query che mi permetta di ricercare dei record per
un intervallo di date.
In poche parole voglio usare una query between dove però sono io ad
impostare manualmente e di volta in volta (tipo query parametrica) la
data iniziale e finale.
Potete aiutarmi?


title: ricerca per date

author: Sandro

text:
"sandra" <
in...@progettimultimediali.com
> ha scritto nel messaggio
news:6cjn011op31sa9tfk...@4ax.com...

Ciao Sandra,
Prova a seguire questo3d
http://www.google.it/groups?hl=it&lr=&threadm=9GtId.4074%245k5.85505%40twister2.libero.it&rnum=7&prev=/groups%3Fq%3Dsimba883%2Bdate%26hl%3Dit%26lr%3D%26selm%3D9GtId.4074%25245k5.85505%2540twister2.libero.it%26rnum%3D7


title: ricerca per date

author: Frizzitek

text:
> > Desidero creare una query che mi permetta di ricercare dei record per
> > un intervallo di date.
> > In poche parole voglio usare una query between dove però sono io ad
> > impostare manualmente e di volta in volta (tipo query parametrica) la
> > data iniziale e finale.
Puoi fare così:
Crea una maschera in cui inserisci in 2 campi data (inizio e fine)
Non associarli a niente, ma chiamali semplicemente Data1 e Data2
Salva questa maschera col nome di "Maschera_Ricerca"
Con la creazione guidata creaci all'interno un pulsante di apertura maschera
(la maschera da aprire sarà quella risultante che restituirà i valori
filtrati)
Crea una query basata sulla tabella dalla quale devi estrapolare le date e
sotto il campo "data" inserisci:
Between [Forms]![Maschera_Ricerca]![Data1] And
[Forms]![Maschera_Ricerca]![Data2]
Ovviamente devi selezionare nella SELECT anche tutti gli altri campi
Basa la maschera risultante su questa query...
(Occhio al formato dei campi DATA: devono essere tutti uguali! Semmai
aiutati configurando una maschera di imput)
Il gioco è fatto...
E' semplice e non hai bisogno di scrivere del codice a mano.
Spero di essermi spiegato (anche se ho dei dubbi in merito!)
Cla


title: ricerca per date

author: Daniele Meante

text:
"sandra" <
in...@progettimultimediali.com
> wrote in message
news:6cjn011op31sa9tfk...@4ax.com

between [dal] AND [al].
 compaiono (dovrebbero) delle input box dove inserire la data
Daniele
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Ordinamento Sottomaschera

author: bizio

text:
Supponendo di avere una maschera frmPrincipale con sottomaschera
sbfrmSecondaria che ha i campi "idSecondaria" e "anno". (ntrambe le
maschere basate su tabelle.)
Vorrei che aprendo la maschera, la sottomaschera si ordinasse in
ordine decrescente per "anno" e a parità di anno, in ordine
decrescente per "idSecondaria". (Senza dover basare le maschere su
query).
Attualmente la ordino per un solo criterio e sull'evento su apertura
della sbfrmSocondaria ho questo codice:
Me.OrderBy = "anno desc"
Me.OrderByOn = True
Ma volendo aggiungere un secondo criterio come posso fare?
Grazie per l'aiuto


title: Ordinamento Sottomaschera

author: Karl Donaubauer

text:
bizio wrote:
> Supponendo di avere una maschera frmPrincipale con sottomaschera
> sbfrmSecondaria che ha i campi "idSecondaria" e "anno". (ntrambe le
> maschere basate su tabelle.)
> Vorrei che aprendo la maschera, la sottomaschera si ordinasse in
> ordine decrescente per "anno" e a parità di anno, in ordine
> decrescente per "idSecondaria". (Senza dover basare le maschere su
> query).
> Attualmente la ordino per un solo criterio e sull'evento su apertura
> della sbfrmSocondaria ho questo codice:
> Me.OrderBy = "anno desc"
Me.OrderBy = "anno desc, idSecondaria"
> Me.OrderByOn = True
>
> Ma volendo aggiungere un secondo criterio come posso fare?
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Ordinamento Sottomaschera

text:
> Me.OrderBy = "anno desc, idSecondaria"
>
> > Me.OrderByOn = True
>
> > Ma volendo aggiungere un secondo criterio come posso fare?
>
> --
> Ciao
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Grazie Karl, ci ero quasi arrivato da solo, ti ho scomodato per
niente :-)
Rettifico solo una cosa:
Me.OrderBy = "anno desc, idSecondaria desc"
dato che nel mio caso ho necessità dell'ordine decrescente per il
secondo criterio.
Grazie e buona giornata


title: Recordset.Open "MiaQuery" genera un errore

author: marioP

text:
Salve al NG
Vorrei semplicemente aprire una Qurey da codice. Perchè genera un errore?
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "MiaQuery", CurrentProject.Connection, adOpenStatic, adLockReadOnly
Eppure il metodo rs.Open "NomeQuery" l'ho visto su un libro...
L'errore dice "ISTRUZIONE SQL NON VALIDA. PREVISTA : DELETE, INSERT ETC..
potete darmi una spiegazione?
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: giorgio rancati

text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
> Salve al NG
>
> Vorrei semplicemente aprire una Qurey da codice. Perchè genera un errore?
>
> Dim rs As ADODB.Recordset
>
> Set rs = New ADODB.Recordset
> rs.Open "MiaQuery", CurrentProject.Connection, adOpenStatic,
adLockReadOnly
>
>
> Eppure il metodo rs.Open "NomeQuery" l'ho visto su un libro...
> L'errore dice "ISTRUZIONE SQL NON VALIDA. PREVISTA : DELETE, INSERT ETC..
> potete darmi una spiegazione?
>
Ciao Mario,
il metodo funziona, probabilmente stai tendando di aprire una query che
richiede dei parametri.
Ciao
--
Giorgio Rancati
[Office Access MVP]


text:
Il 12 Lug 2006, 16:26, "giorgio rancati"
<
giorgio_No_Sp...@tiscali.it
> ha scritto:

Ciao Giorgio. Si è vero: i parametri sono [Forms]![MiaForm]![MioCampo]
Togliendo questi parametri e inserendo semplicemente un criterio su un Campo
x es: 1
La query si apre. Non è anche quello un parametro?
Altra domanda già che ci siamo:
La sintassi del generatore di Query è diversa dalla sintassi di VBA?
La query copiata e incollata su codice non funziona. Che cosa cambia in
genere?
Le parentesi? gli apici " "?...E' un casino. Grazie ciao.



text:

ho copiato dalla guida Access un esempio di RunSQL, ed ho emulato la
sintassi nella mia Query che riporto.
Ma mi dice che c'è un operarote mancante. Che gli manca?
(Tieni conto che l'E-mail non rispetta la tabulazione. Pertanto considera
corretti i punti in cui le righe vanno a capo con & spazio _ ")
Se mi aiuti a farne funzionare una presumo che riuscirò nelle altre. GRAZIE!
DoCmd.RunSQL "SELECT DISTINCTROW Capitolato.Anno, Capitolato.Porto,
Capitolato.Servizio, Capitolato.Appr_Mov, TariffaBase.Da, TariffaBase.A,
TariffaBase.EuroT_Base" & _
"FROM Capitolato INNER JOIN TariffaBase ON Capitolato.IDCapitolato =
TariffaBase.IdNomeTariffaBase" & _
"WHERE (((Capitolato.Anno)=[forms]![Clienti1]![Anno]) AND
((Capitolato.Porto)=[forms]![Clienti1]![Porto]) AND
((Capitolato.Appr_Mov)=2));"
> Inviato via
http://arianna.libero.it/usenet/



text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
>
> Ciao Giorgio. Si è vero: i parametri sono [Forms]![MiaForm]![MioCampo]
> Togliendo questi parametri e inserendo semplicemente un criterio su un
Campo
> x es: 1
> La query si apre. Non è anche quello un parametro?
no, un parametro è un qualcosa che passi alla query quando viene eseguita,
quello che hai messo tu è una costante.
> Altra domanda già che ci siamo:
> La sintassi del generatore di Query è diversa dalla sintassi di VBA?
> La query copiata e incollata su codice non funziona. Che cosa cambia in
> genere?
niente,
> Le parentesi? gli apici " "?...E' un casino. Grazie ciao.
certo, se nel codice Sql utilizzi i doppi apici questi complicano la
scrittura in vba perchè sono utilizzati per le stringhe.



text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
>
> ho copiato dalla guida Access un esempio di RunSQL, ed ho emulato la
> sintassi nella mia Query che riporto.
> Ma mi dice che c'è un operarote mancante. Che gli manca?
>
> (Tieni conto che l'E-mail non rispetta la tabulazione. Pertanto considera
> corretti i punti in cui le righe vanno a capo con & spazio _ ")
> Se mi aiuti a farne funzionare una presumo che riuscirò nelle altre.
GRAZIE!
>
> DoCmd.RunSQL "SELECT DISTINCTROW Capitolato.Anno, Capitolato.Porto,
> Capitolato.Servizio, Capitolato.Appr_Mov, TariffaBase.Da, TariffaBase.A,
> TariffaBase.EuroT_Base" & _
> "FROM Capitolato INNER JOIN TariffaBase ON Capitolato.IDCapitolato =
> TariffaBase.IdNomeTariffaBase" & _
> "WHERE (((Capitolato.Anno)=[forms]![Clienti1]![Anno]) AND
> ((Capitolato.Porto)=[forms]![Clienti1]![Porto]) AND
> ((Capitolato.Appr_Mov)=2));"
a prima vista manca uno spazio prima della FROM e uno prima della WHERE,
sono importanti anche gli spazi.
Come hai fatto tu la Where è intesa come nome di campo
----
TariffaBase.IdNomeTariffaBaseWHERE
----
con lo spazio Access può capire che hai inserito la clausola Where.
----
TariffaBase.IdNomeTariffaBase WHERE
----
Cia



text:
Il 13 Lug 2006, 11:24, "giorgio rancati"
<
giorgio_No_Sp...@tiscali.it
> ha scritto:

> _______
Certo! Hai ragione per lo spazio!...E anche per la Costante - Parametri
Ho corretto la stringa aggiungendo i due spazi ma adesso dice:
"Un azione EseguiSQL richiede un argomento costituito da un istruzione SQL "
??????????????????????????? Intanto Grazie????????????????????



text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
> > _______
> Certo! Hai ragione per lo spazio!...E anche per la Costante - Parametri
> Ho corretto la stringa aggiungendo i due spazi ma adesso dice:
> "Un azione EseguiSQL richiede un argomento costituito da un istruzione SQL
"
> ??????????????????????????? Intanto Grazie????????????????????
sě, non puoi eseguire una query di selezione con il comando RunSql, che
senso ha ?
O ti apri il recordset come nel tuo post originale o salvi il testo Sql in
una query e poi la visualizzi con Docmd.OpenQuery
Ciao



text:
Il 13 Lug 2006, 11:53, "giorgio rancati"
<
giorgio_No_Sp...@tiscali.it
> ha scritto:

Quindi se ho ben capito :
SOLUZIONE 1 Mi apro una query (ma deve essere senza parametri)
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "MiaQuery", CurrentProject.Connection, adOpenStatic, adLockReadOnly
_________________________________
SOLUZIONE 2 mi apro la Query solo per Leggerla
Docmd.OpenQuery "Nome query", Visualizzazione, ReadOnly
SOLUZIONE 3 serve solo ad aggiornare la Query
Docmd.RunSQL non dovrebbe esserci il SELECT ma INSERT, UPDATE etc
Giusto? Spero di si. Credo di essermi chiarito dei misteri vecchi di anni.
Tante Grazie ciao.



text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
> Quindi se ho ben capito :
> SOLUZIONE 1 Mi apro una query (ma deve essere senza parametri)
>
> Dim rs As ADODB.Recordset
> Set rs = New ADODB.Recordset
> rs.Open "MiaQuery", CurrentProject.Connection, adOpenStatic,
adLockReadOnly
> _________________________________
> SOLUZIONE 2 mi apro la Query solo per Leggerla
> Docmd.OpenQuery "Nome query", Visualizzazione, ReadOnly
>
>
> SOLUZIONE 3 serve solo ad aggiornare la Query
diciamo che serve per eseguire query di aggiornamento o query di
eliminazione o query di creazione tabella o per eseguire comandi DDL.
Insomma tutto ciò che non è *Query di Selezione.*
> Docmd.RunSQL non dovrebbe esserci il SELECT ma INSERT, UPDATE etc
> Giusto? Spero di si. Credo di essermi chiarito dei misteri vecchi di anni.
esatto :-)
> Tante Grazie ciao.



author: mariop

text:
Il 13 Lug 2006, 11:53, "giorgio rancati"
<
giorgio_No_Sp...@tiscali.it
> ha scritto:

> O meglio. Ho capito in parte ma non ho trovato la soluzione.
Ho sempre aperto Recodset basato su tabelle.
Ora mi serve di aprire un Recordset che legge i dati da una Query (Che dei
Parametri).
Es : Rs!NumeroOrdine, Rs!IDfornitore etc.
E' possibile? con quale metodo?
Scusa se sono capoccione!



text:
"mariop" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
> > O meglio. Ho capito in parte ma non ho trovato la soluzione.
> Ho sempre aperto Recodset basato su tabelle.
> Ora mi serve di aprire un Recordset che legge i dati da una Query (Che dei
> Parametri).
> Es : Rs!NumeroOrdine, Rs!IDfornitore etc.
> E' possibile? con quale metodo?
> Scusa se sono capoccione!
se devi aprire con ADO un recordset da una query con parametri guarda qui.
----
Aprire una query parametrica utilizzando ADO.
http://web.tiscali.it/giorgiorancati/msaccess/documents/adoqueryparametrica.htm
----



text:
Il 13 Lug 2006, 13:00, "giorgio rancati"
<
giorgio_No_Sp...@tiscali.it
> ha scritto:

OK , spero di risolvere e non continuare questo post all'infinito.
:-))))))) Ciao
Mario P
> [Office Access MVP]



text:
"marioP" <
mariop...@libero.it
> ha scritto nel messaggio
news:82Z61Z37Z212Y1...@usenet.libero.it...
> OK , spero di risolvere e non continuare questo post all'infinito.
> :-))))))) Ciao
> Mario P
Casomai apri un altro thread, il problema in oggetto **Recordset.Open
"MiaQuery" genera un errore** mi sembra che sia stato chiarito :-)



title: Tabelle Collegate - Urgente!!!

author: Adriano

text:
Ho un database diviso tra un file dati e un file programma (entrambi .mdb).
Il problema è questo: il database viene usato da molti utenti sparpagliati
su tutto il territorio nazionale. Ognuno ha un percorso diverso sul quale
indirizzare il 'file programma' perché legga il 'file dati'. Io devo inviare
un aggiornamento del programma, ma, poiché gli utenti sono inespertissimi,
non sanno, con il gestore tabelle collegate, indirizzare il programma sul
percorso giusto dei dati (e comunque al primo imprevisto si bloccherebbero,
magari facendo 'danni').
D'altronde mi sembra che purtroppo sia una cosa fattibile solo in locale.
Ma esiste un sistema, conoscendo i vari percorsi (che ovviamente non
esistono sul mio PC), di inviare i' files programma' con già il percorso
giusto inserito? Ovvero un sistema per evitarmi di andarmene in giro 2 mesi
per tutta l'Italia? :-))
Grazie a tutti
Adriano


title: Tabelle Collegate - Urgente!!!

author: Sib

text:
"Adriano" <
ic...@xxxlibero.it
> ha scritto nel messaggio
news:97l43l$sba$1...@lacerta.tiscalinet.it...
> Ho un database diviso tra un file dati e un file programma (entrambi
.mdb).
> Il problema è questo: il database viene usato da molti utenti sparpagliati
> su tutto il territorio nazionale. Ognuno ha un percorso diverso sul quale
> indirizzare il 'file programma' perché legga il 'file dati'.
Questo mi pare molto strano. Perche' hanno tutti percorsi diversi?
Select Case "Usi la connessione delle unita' di rete?"
    Case "Si'"
        Usa la stessa lettera su tutti i pc remoti
    Case "No"
        Il nome del server e' lo stesso da qualunque posto ti colleghi
    Case Else
        Stai sbagliando qualcosa
End Select
> Io devo inviare un aggiornamento del programma, ma, poiché gli utenti sono
inespertissimi,
> non sanno, con il gestore tabelle collegate, indirizzare il programma sul
> percorso giusto dei dati (e comunque al primo imprevisto si
bloccherebbero,
> magari facendo 'danni').
'mazza che sprovveduti! E pensare che quella funzione serve proprio per gli
inesperti. ;-)
> D'altronde mi sembra che purtroppo sia una cosa fattibile solo in locale.
Questo non e' vero, si strafa anche in remoto.
> Ma esiste un sistema, conoscendo i vari percorsi (che ovviamente non
> esistono sul mio PC)
Ribadisco che questo non lo capisco. Perche' dovrebbe essere diverso? Come
cavolo si collegano i tuoi utenti?
> , di inviare i' files programma' con già il percorso
> giusto inserito? Ovvero un sistema per evitarmi di andarmene in giro 2
mesi
> per tutta l'Italia? :-))
Ovviamente ci sono circa 100 modi di farlo, puoi fare inserire all'utente il
percorso o farglielo cercare con una API e per questo ti rimando al sito
comune (
www.sitocomune.it
) ma secondo me devi modificare qualcosa
nell'applicazione infatti questa operazione si rende necessaria solo quando
si sposta l'mdb dati e non quando si ridistribuisce un fe.
Ciao, Sib


title: Tabelle Collegate - Urgente!!!

text:
"> Questo mi pare molto strano. Perche' hanno tutti percorsi diversi?
 > Ribadisco che questo non lo capisco. Perche' dovrebbe essere diverso?
Come
> cavolo si collegano i tuoi utenti?
>
Ti faccio un esempio: sul mio Pc il percorso per il database dei dati è:
c:\cartellaDati\Dati.mdb; su quello del mio utente di Napoli è:
\\serverPippo\CartellaDati\Dati.mdb; su quello del mio utente di Milano è:
\\ServerPluto\CartellaDati\Dati.mdb; su quello di Mantova è
D:\CartellaDati\Dati.mdb, ecc ecc. Cioè a seconda del tipo di LAN presente,
se è presente. Infatti si tratta di utenti non appartenenti alla stessa
azienda, ma esterni.
 > si strafa anche in remoto.
>
 > Ovviamente ci sono circa 100 modi di farlo, puoi fare inserire all'utente
il
> percorso o farglielo cercare con una API
Non mi chiedere il perché di tutto questo. Mi sto occupando temporaneamente
del problema cercando di risolverlo.
Devo inviare l'aggiornamento contenente già i percorsi (tipo
\\ServerPippo\CartellaDati\Dati.mdb per Napoli ecc ecc).
M'hanno dato 'sta grana e non è nemmeno il mio lavoro (forse si capiva eh
:-)).
Vado a vedere sul sito comune, ma se tu puoi darmi qualche indicazione  su
uno dei tanti modi che conosci, te ne sarei molto grato.
Grazie e scusa la rottura.
Ciao
Adriano


title: Tabelle Collegate - Urgente!!!

author: sib

text:
Adriano <
ic...@xxxlibero.it
> wrote in message
cut
> Ti faccio un esempio: sul mio Pc il percorso per il database dei dati č:
> c:\cartellaDati\Dati.mdb; su quello del mio utente di Napoli č:
> \\serverPippo\CartellaDati\Dati.mdb; su quello del mio utente di Milano č:
> \\ServerPluto\CartellaDati\Dati.mdb; su quello di Mantova č
> D:\CartellaDati\Dati.mdb, ecc ecc. Cioč a seconda del tipo di LAN
presente,
> se č presente. Infatti si tratta di utenti non appartenenti alla stessa
> azienda, ma esterni.
C'e' qualcosa che non torna in tutto questo, l'unica spiegazione a cio' che
dici e' che ogni sede utilissi un file di dati diverso.
Se e' cosi' non mi spiego il tuo dubbio sulla possibilita' di farlo in
remoto.
Se il file, invece, e' lo stesso per tutti, allora non e' possibile che un
utente lo veda come
\\serverpippo\ecc ecc
mentre un altro lo veda come
\\serverpluto\ecc ecc
se il file e' uno, risiede su un solo pc che avra' un suo nome (non e' che
ognuno lo vede con un nome diverso) semmai puo' capitare che, utilizzando la
connessione delle unita' di rete, ognuno usi una lettera diversa. Se il caso
e' questo usa per tutti l'url di rete (\\Server ecc ecc) che va bene per
tutti.
Se invece ogni sede usa una base dati locale (e quindi diversa da sede a
sede) sul SC trovi esempi molto interessanti.
>  > si strafa anche in remoto.
>  > Ovviamente ci sono circa 100 modi di farlo, puoi fare inserire
all'utente il
> > percorso o farglielo cercare con una API
cut
> Vado a vedere sul sito comune, ma se tu puoi darmi qualche indicazione  su
> uno dei tanti modi che conosci, te ne sarei molto grato.
l'istruzione piu' semplice per collegare una tabella da codice e':
currentdb.tabledefs("tuatabella").connect="\\Server\eccecc"
currentdb.tabledefs("tuatabella").refreshlink
Sib
--
il sito comune di it.comp.database.access:
http://www.sitocomune.com
------------------------------------------------------
La mia home
http://digilander.iol.it/syb
------------------------------------------------------
"Non sempre cio' che viene dopo e' progresso"
Alessandro Manzoni
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Etichetta definita dell'utente...

author: Paolo Soldani

text:
Ho un'applicazione che mi stampa delle etichette in una stampante ad aghi..
e avevo definito le misure dalla stampante.. ora su winxp non si può fare
più.. ho creato una forms dalla gestione stampanti.. però quando vado a
scegliere le dimensioni del foglio.. dal driver della stampante..  o dalla
mia applicazione access.. questa non appare nell'elenco..
come si risolve il problema ?
Ciao e grazie..


title: problema complesso quietanze

author: interbusines

text:
Vi spiego il problema in poche parole: ho una tabella polizze con tutti i
dati necessari e con il numero della polizza, questa polizza dopo un anno
deve essere rinnovata e quindi ripagata, allora ho costruito una tabella
quitanze con il riferimento al numero di polizza, pertanto alla scadenza
incasso la quitanza, il problema è che quando ogni giorno faccio il foglio
cassa, una bella query degli incassi del giorno, non riesco ad aggiungere
anche gli incassi delle quitanze.
esempio : tabella polizze: campi
numero polizza, data emissione, data incasso, costo, oggetto , ecc
tabella quitanze: campi
numero quitanza, numero polizza, data incasso, costo, oggetto,
qualcuno che si diletta in database assicurativi ha la risposta?
ve ne sarei grato.


title: aggiornamento dati

text:
Da: <
luck...@inwind.it
>
Oggetto: aggiornamento dati
Data: domenica 29 dicembre 2002 20.09
Un saluto a tutti e un anticipo di Buone Festa a tutti.
per tornare al lavoro, vi spiego il mio problema:
ho un mdb in rete condivisa da piu utenti, un una tabella sono
state create due distente maschere una di inserimento dati e una
di scarico dati riferite a quelle inserite.
il problema e che la maschera di scarico che si trova su un altro
compute non aggiorna in tempo reale i dati inretiti dall'altro utente
ma sono stato costretto a creare un bottone che chiude e riapre la
maschera di scarico per aggrionare i dati dalla tabbella.
mi chiedo esiste una procedura che consente l'aggiornamento in tempo
reale dei dati o che esegue in automatico una procedura o esegue una macro
che dopo tot secondi di inattivita esegue una macro?
un saluto a tutti Daniele


title: A97 o AXP, ADO o DAO per base dati su MySQL?

author: Fabrizio yQy

text:
ciao ragazzi....da un po ho tralasciato access per sviluppare
soluzioni web su php (per motivi di scelte aziendali presso la quale
lavoro) e quindi non seguo il ng da un po'...
devo realizzare un FE su desktop windows per alcuni clienti e volevo
farlo in access, conservando pero' la base dati di MySQL (che sempre
per scelte aziendali non posso escludere, visto che abbiamo molte
applicazioni web su MySQL)...
sono indeciso se utilizzare client access97 o xp, ma soprattutto se
utilizzare DAO o ADO...perche non ho mai fatto access+mysql fino ad
ora e chiedo quindi pareri a voi, che magari avete gia avuito modo di
studiare.
voi che accoppiata scegliereste (cioe A97+DAO,A97+ADO, AXP+Dao...)
tenendo in considerazione che la soluzione desktop deve essere stabile
e veloce?
e poi quale metodo utilizzereste per sviluppare velocemente il tutto
(maschere associate, non associate.......)
insomma chiedo pareri in merito, e soprattutto i motivi tecnici delle
vostre scelte.
scusate il post generico ma piu che una risoluzione a problemi, avevo
il piacere di avere un consiglio professionale da voi, per
intraprendere la strada piu giusta per sviluppare nel miglior modo
possibile.
pareri, critiche di qualsiasi genere, soluzioni, suggerimenti...tutto
insomma.
Ciao a tutti :)


author: Alessandro Baraldi

text:
Fabrizio yQy ha scritto:








> Ciao a tutti :)
Premetto che nel mio lavoro sviluppo ancora con A97, ma sono
motivazioni di mancato aggiornamento aziendale.
Io userei A_XP e DAO.
Non potendo sfruttare ADP con un BE(MySQL) non credo sia
utile rendere scalabile ad ADP, pertanto usando un FE MDB/E
la soluzione più performante è senza dubbi DAO.
Per AXP o A97 senza dubbi AXP consente l'associazione dei Recordset
diretta, ed è estremamente comoda per Form Readonly passare un
RS estratto da una Query_PT.
Non sò che versione di MySQL usi ma fino alla 4 non erano disponibili
le SP pertanto io a suo tempo(3anni fà) mi gestivo le sintasi SQL
delle Q_PT in modo Dinamico.
Saluti.
@Alex
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Oscar Manfredini

text:
"Fabrizio yQy" <
> devo realizzare un FE su desktop windows per alcuni clienti e volevo
> farlo in access, conservando pero' la base dati di MySQL (che sempre
> per scelte aziendali non posso escludere, visto che abbiamo molte
> applicazioni web su MySQL)...
> sono indeciso se utilizzare client access97 o xp, ma soprattutto se
> utilizzare DAO o ADO...perche non ho mai fatto access+mysql fino ad
> ora e chiedo quindi pareri a voi, che magari avete gia avuito modo di
> studiare.
Come dice Alessandro, non hai molte possibilità di scelta sul modello a
oggetti.
Gli ADP lavorano in lettura/scrittura solo con MS Sql Server, mentre con gli
.mdb/e non è possibile creare tabelle collegate che utilizzino recordset(s)
ADO.
Certo, con gli .mdb è possibile aprire Recordsets ADO in lettura/scrittura
verso alcuni Server (forse anche MySQL) e passarli a Runtime con l'oggetto
<Recordset>  alle maschere di Access ... ma tale strategia non funziona con
la Reportistica (a quel punto dovresti utilizzare tabelle temporanee per
alimentare i Reports).
E in ogni caso rinunciare alle tabelle collegate per usare ADO significa
molto più lavoro.
E per concludere: non dimentichiamo che ADO è comunque uno strato intermedio
tra il FE e l'API del Server di database ... l'idea che Ole-DB sia
prestazionalmente sempre superiore a ODBC è da verificare sul campo, da DB a
DB...
> voi che accoppiata scegliereste (cioe A97+DAO,A97+ADO, AXP+Dao...)
> tenendo in considerazione che la soluzione desktop deve essere stabile
> e veloce?
Direi AXP SP3 (JET 4.0 S.P. 8 ovviamente) + ODBC (e quindi DAO).
Già saprai quali sono le strategie seguire per creare applicazioni ODBC
performanti per gruppi di lavoro medio-piccoli (quindi senza preoccuparsi
troppo di Query Pass Th e ODBCDirect).
Usare SubQueries al posto di Dlookups et simili, evitare query tra tabelle
locali e tabelle su Server, usare transazioni in fase d'aggiornamento Batch
dei dati, inserire campi TimeStamp, indicizzare e normalizzare razionalmente
le tabelle, non eccedere con le Combo(s) e strutture Master-Detail (e
comunque seguire bene i consigli di ottimizzazione dell'HELP di Access!) e
soprattutto i campi calcolati nelle Form(s)...
> e poi quale metodo utilizzereste per sviluppare velocemente il tutto
> (maschere associate, non associate.......)
Francamente trovo assurdo rinunciare ai controlli legati di Access: la
programmazione si complica enormemente, la Reportistica diventa gestibile
solo con tabelle temporanee ... le prestazioni sono superiori solo per chi
non abbia avuto voglia e pazienza di capire bene come usare gli strumenti
nativi (e quali strumenti *pesino* più di altri) e ottimizzare il codice
SQL.
Ciao.
>