title: Aggiornamento DB via VBA.

author: TANNHAUSER

text:
WXP Pro SP3/A03 SP3
Ciao a tutti,
ho provato, su un DB di prova, ad inserire il seguente codice su di una
maschera richiamata da una macro all'avvio di Access:
Private Sub Form_Open(Cancel As Integer)
Dim dbOld As Database
Dim dbNew As Database
Dim RelOld As Integer
Dim RelNew As Integer
Dim TitleOld, Msg As String
Dim TitleNew As String
Dim DBFileNew As String
Dim DBFileOld As String
DBFileNew = "X:ServerMio.mdb"
DBFileOld = "C:Documents and Settings" + LeggiUtenteCorrente() +
"DesktopMio.mdb"
Set dbOld = CurrentDb
If FileExist(DBFileNew) Then
Set dbNew = DBEngine.OpenDatabase(DBFileNew)
TitleOld = dbOld.Properties!AppTitle
TitleNew = dbNew.Properties!AppTitle
RelOld = CInt(Right(TitleOld, Len(TitleOld) - 1))
RelNew = CInt(Right(TitleNew, Len(TitleNew) - 1))
If RelNew - RelOld > 0 Then
CopyFile DBFileNew, DBFileOld, 0
MsgBox "File aggiornato, riavvia!"
DoCmd.Quit
End If
End If
End Sub
In teoria, ed anche in pratica, viene verificata l'esistenza di una
versione pi� recente di un DB su di una cartella fissa di un server e
copiata sulla scrivania dell'utente.
Dopo la prova ho messo il codice, con l'opportuna modifica del nome del
DB, in una form richiamata dalla macro Autoexec in un DB "ufficiale".
Beh, il messaggio appare sempre ma il DB non viene mai sovrascritto.
Qualche commento? Grazie.
--
TANNHAUSER
"I've seen things you people wouldn't believe..."
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Aggiornamento DB via VBA.

author: Pablitomf

text:
TANNHAUSER ha scritto:
> WXP Pro SP3/A03 SP3
> Ciao a tutti,



> Set dbOld = CurrentDb
> If FileExist(DBFileNew) Then

> End If
> End Sub

> Qualche commento? Grazie.
Problemi di spazi nei percorsi...? usa chr(34) per emulare le virgolette
all'inizio e alla fine del percorso (incluso il nome file) e vedi se funge.
--
Ciao
Pablitomf
----------------------------
http://www.accessgroup.it/
----------------------------
Non mi fido molto delle statistiche, perch� un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.



title: Aggiornamento DB via VBA.

author: Geppo

text:
Ciao "TANNHAUSER" <
tannau...@virgilio.it
> ha scritto nel messaggio
news:h2ij59$415$1...@news.newsland.it...
> WXP Pro SP3/A03 SP3
>
--cut--
Oltre a quanto gi� suggerito da Pablitomf, controlla gli slash nel path.
> DBFileOld = "C:Documents and Settings" + LeggiUtenteCorrente() +
> "DesktopMio.mdb"
--
Ciao
Geppo


title: Aggiornamento DB via VBA.

author: Karl Donaubauer

text:
TANNHAUSER wrote:
> ...
> If FileExist(DBFileNew) Then
>
> Set dbNew = DBEngine.OpenDatabase(DBFileNew)
> TitleOld = dbOld.Properties!AppTitle
> TitleNew = dbNew.Properties!AppTitle
> RelOld = CInt(Right(TitleOld, Len(TitleOld) - 1))
> RelNew = CInt(Right(TitleNew, Len(TitleNew) - 1))
> If RelNew - RelOld > 0 Then
> CopyFile DBFileNew, DBFileOld, 0
> MsgBox "File aggiornato, riavvia!"
> DoCmd.Quit
> End If
> ...
> In teoria, ed anche in pratica, viene verificata l'esistenza di una
> versione pi� recente di un DB su di una cartella fissa di un server e
> copiata sulla scrivania dell'utente.
> Dopo la prova ho messo il codice, con l'opportuna modifica del nome
> del DB, in una form richiamata dalla macro Autoexec in un DB
> "ufficiale". Beh, il messaggio appare sempre ma il DB non viene mai
> sovrascritto.
>
> Qualche commento?
Oltre a quanto gi� suggerito dagli altri:
Sei sicuro che a parte della copia tutto funziona?
Hai controllato i valori dei variabili RelOld e RelNew?
Come hai programmato i tuoi metodi FileExist e CopyFile?
Se p.e. usano delle API, sei sicuro che hai i diritti e funzionano
sul sistema?
Perch� non usi i metodi di VBA Dir e FileCopy?
Puoi anche provare di creare un file di testo nel percorso dell'utente
e poi se dalla finestra debug funziona:
Kill("PercorsoENomeDelFileDiTesto")
Vuol dire provare in pratica se tu e Access hanno i diritti necessari.
� anche meglio di non cancellare/copiare file in uso.
Cio� prima della riga con CopyFile:
dbOld.Close: Set dbOld = Nothing
dbNew.Close: Set dbNew = Nothing
DoEvents
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Aggiornamento DB via VBA.

text:
Karl Donaubauer ha scritto:
> Sei sicuro che a parte della copia tutto funziona?
> Hai controllato i valori dei variabili RelOld e RelNew?
> Come hai programmato i tuoi metodi FileExist e CopyFile?
> Se p.e. usano delle API, sei sicuro che hai i diritti e funzionano
> sul sistema?
> Perch� non usi i metodi di VBA Dir e FileCopy?
> Puoi anche provare di creare un file di testo nel percorso dell'utente
> e poi se dalla finestra debug funziona:
> Kill("PercorsoENomeDelFileDiTesto")
> Vuol dire provare in pratica se tu e Access hanno i diritti necessari.
> � anche meglio di non cancellare/copiare file in uso.
> Cio� prima della riga con CopyFile:
> dbOld.Close: Set dbOld = Nothing
> dbNew.Close: Set dbNew = Nothing
> DoEvents
Grazie a tutti per i preziosi consigli; ho verificato con tutti i vostri
suggerimenti ma non riuscivo a trovare dove fosse il problema. Alla fine
ho scoperto che la funzione LeggiUtenteCorrente() mi resitutiva "USERxxxx"
seguito da decine di caratteri non stampabili. A quel punto ho sostituito
LeggiUtenteCorrente() con Left(LeggiUtenteCorrente(),8) e la cosa si �
risolta.
Buona giornata.



title: tabelle-word

author: luca

text:
da access come faccio a creare una tabbella in word ed aggiungere i
risultati provenienti da una query ?
Riesco ad aperire l'applicazione word, a aprire il documento a me
interessato ma pio non rieso ad andare nel punto preciso del documento di
word ( che puo essere anche un riferimento di riga es. riga 5 o 13) e li
creare una tabelle ed immettere i dati che risultano da una query di access.
--
Luca Beatrice
Luca.b...@tiscali.it
http://lucabeatrice.risorse.com


title: tabelle-word

author: Sergio MAZZA

text:
"luca" <
luca.b...@tiscali.it
> ha scritto nel messaggio
news:aejvl5$uns$1...@lacerta.tiscalinet.it...

Se devi crearla la tabella poi provare con questo suggerimento che ho
inviato qualche tempo fa:
'-----------------
Salve a tutti;
sono un po' latitante ma le ultime battute sull'argomento "stampa unione" mi
hanno dato la molla per la ricerca di altre soluzioni. In effetti c'è una
soluzione molto semplice che avevo visto utilizzare in word 2000 e pensavo
fosse una features di quel pacchetto; invece (mea culpa) la stessa soluzione
è possibile utilizzarla anche nel pacchetto '97.
Esiste in word un "codice di campo" (spulciate l'help please!) chiamato
DATABASE; iddu non fa altro che creare una connessione al database e leggere
i dati o da tabella o da stringa sql specificata nel codice di campo e
presentarli formattati come una tabella.
Quindi per realizzare un documento word di tipo fattura (dati intestazione
ed elenco dettaglio) i passi sono questi (da modificare a secondo delle
proprie necessità):
- tabella o query con i dati dell'intestazione della fattura (parte alta -
lato uno della relazione);
- creare il documento word, scrivere il documento e legarlo (stampa unione)
alla tabella/query (lato uno);
- visualizzare (sempre da word) la barra strumenti "DATABASE";
- posizionare il cursore dove vogliamo inserire la tabella dei dati riferiti
al dettaglio (lato molti) e premere il bottone "Inserisci database";
seguendo le istruzioni del wizard noi creiamo tutti i riferimenti per
leggere i dati (molti) della fattura indicando anche il campo della
condizione where che ci serve per estrarre solo quelli riferiti a quel
cliente o id. Ricordatevi di spuntare l'opzione "inserisci come campo".
Ora manca di inserire la "variabile" nella condizione where; con ALT-F9
possiamo intervenire nelle opzioni del codice di campo visualizzandone il
contenuto che dovrebbe essere simile a questo:
{DATABASE \d "C:\\dati\\fatture.mdb" \c "TABLE Dettagli" \s "SELECT
[articolo], [prezzo], [idFattura] FROM [Dettagli] WHERE (([idFattura] =
3 ))" \h}
Praticamente la condizione è preimpostata per restitutire i dettagli della
fattura con idFattura = 3; quindi bisogna inserirgli il riferimento al campo
id della fattura. Possiamo farlo perché il documento word è legato alla
tabella/query (lato uno) delle fatture.
togliamo il 3 (l'idfattura), lasciando il cursore vicino al segno
dell'uguale, dalla barra strumenti "Stampa unione" - "inserisci campo
unione"  e scegliamo "Id" (della fattura).
La situazione dovrebbe essere questa:
{DATABASE \d "C:\\dati\\fatture.mdb" \c "TABLE Dettagli" \s "SELECT
[articolo], [prezzo], [idFattura] FROM [Dettagli] WHERE (([idFattura] =
{MERGEFIELD id} ))" \h}
Ora premiamo ALT-F9 per ripristinare la visualizzazione dei codici di campo
e se facciamo la stampa unione si dovrebbe materializzare il nostro sogno...
Una fattura si word!!
Spero di essermi spiegato...
Un saluto a tutti e buon lavoro.
--
Sergio MAZZA
'-----------------
Ciao.
--
Sergio MAZZA


title: tabelle-word

text:
ti rigrazio ma non è esattamente quello che voglio:
mi spiego:
il mio documento di word è gia precompilato ( esempio una intestazione della
società )
pio devo aggiungere diverse tabelle ( che posssono variare da una a 40... e
piu )
il contenuto di ogni tabella deve appartenere ad una query di access.
quindi è possibile che la yabella di word abbia in termini numerici (
diverse colonne e righe ) a seconda della query utilizzata.
Con stampa unione non riesco a farlo perche viene associata solo una query o
tabella!!!
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:aek52j$d4c$1...@canarie.caspur.it...



title: tabelle-word

text:
"luca" <
luca.b...@tiscali.it
> ha scritto nel messaggio
news:aekboj$4i2$1...@lacerta.tiscalinet.it...
> ti rigrazio ma non è esattamente quello che voglio:
> mi spiego:
>
> il mio documento di word è gia precompilato ( esempio una intestazione
della
> società )
> pio devo aggiungere diverse tabelle ( che posssono variare da una a 40...
e
> piu )
> il contenuto di ogni tabella deve appartenere ad una query di access.
> quindi è possibile che la yabella di word abbia in termini numerici (
> diverse colonne e righe ) a seconda della query utilizzata.
>
>
> Con stampa unione non riesco a farlo perche viene associata solo una query
o
> tabella!!!
>
Per favore scrivi la tua risposta dopo il testo del messaggio precedente,
come faccio io; grazie.
Probabilmente non è chiaro quello che ho scritto; l'esempio che ti ho
inviato ti permette di effettuare più connessioni a database (di varia
natura) e relative tabelle/query nello stesso documento, arrivando a
generare più tabelle dinamiche. Lo fai utilizzando da word il codice campo
DATABASE (vedi help) o meglio ancora con il wizard nella barra strumenti
"database".
Per quello che vuoi fare tu ho una routine di esempio ma modificarla e
adattarla vuol dire un bagno di sangue se non hai dimestichezza con il
codice VBA.
Fammi sapere cosa preferisci fare...
Ciao.
--
Sergio MAZZA


title: tabelle-word

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:ael2me$qs$1...@canarie.caspur.it...

OK prova ad inviarmela vedro cosa posso fare...
Grazie


title: tabelle-word

text:
"luca" <
luca.b...@tiscali.it
> ha scritto nel messaggio
news:aepq8r$d10$1...@lacerta.tiscalinet.it...
>
> OK prova ad inviarmela vedro cosa posso fare...
> Grazie
>
Eccola la routine:
'--------------
Sub stampaDettaglio()
'gestisco l'errore altrimenti rimango in mutande
On Error GoTo stampaDettaglio_err
'chiamiamo word e per ora non lo rendiamo visibile
Dim oApp As Word.Application
Set oApp = CreateObject("Word.Application")
oApp.Visible = True
'oggetto contenente il recordset del Dettagglio
Dim rstDett As Recordset
'variabile contenente l'istruzione sql
Dim stringaSql As String
'apro il modello della fattura
oApp.Documents.Open "c:\documenti\provaMailmerge.doc"
'eseguo la stampa unione dell'intestazione con output su un nuovo documento
With oApp.Documents(1).MailMerge
    .Destination = wdSendToNewDocument
    .Execute
End With
'attivo il documento creato
oApp.Windows(2).Activate
'cerco la stringa "Elenco"
oApp.Selection.Find.ClearFormatting
With oApp.Selection.Find
    .Text = "Elenco"
    .Replacement.Text = ""
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With
oApp.Selection.Find.Execute
'mi creo la query che mi restituisce il dettaglio della fattura
stringaSql = "Select numero, testo, data, contatore From q_elenco2 Where
numero = 22"
'mi prendo il recordset
Set rstDett = CurrentDb.OpenRecordset(stringaSql)
'tanto pe' nun sape' ne' legge ne' scrive
rstDett.MoveLast
rstDett.MoveFirst
'inserisco la tabella con X colonne, intestazione Y righe
oApp.ActiveDocument.Tables.Add Range:=oApp.Selection.Range,
NumRows:=rstDett.RecordCount, NumColumns:=4
'tabella senza griglia
oApp.Selection.Tables(1).Borders.Enable = False
'scrivo l'intestazione della tabella
With oApp.Selection
    .TypeText Text:="Numero"
    .MoveRight Unit:=wdCell
    .TypeText Text:="Testo"
    .MoveRight Unit:=wdCell
    .TypeText Text:="Data"
    .MoveRight Unit:=wdCell
    .TypeText Text:="Contatore"
End With
'scrivo il dettaglio della fattura
Do While Not rstDett.EOF
    With oApp.Selection
        .MoveRight Unit:=wdCell
        .TypeText Text:=rstDett(0)
        .MoveRight Unit:=wdCell
        .TypeText Text:=rstDett(1)
        .MoveRight Unit:=wdCell
        .TypeText Text:=Format(rstDett(2), "dd mmmm yyyy")
        .MoveRight Unit:=wdCell
        .TypeText Text:=Format(rstDett(3), "#,###")
    End With
    rstDett.MoveNext
Loop
'posso visualizzare il risultato per un controllo
oApp.Visible = True
'stampo il documento appena creato
oApp.ActiveDocument.PrintOut
'chiudo il documento senza salvarlo
oApp.Windows(1).Close SaveChanges:=wdDoNotSaveChanges
'chiudo il modello della fattura senza salvarlo
oApp.Windows(1).Close SaveChanges:=wdDoNotSaveChanges
'chiudo word
oApp.Quit
'chiudo il recordset
rstDett.Close
'rilascio gli oggetti
Set oApp = Nothing
Set rstDett = Nothing
MsgBox "Stampa terminata."
stampaDettaglio_exit:
    Exit Sub
stampaDettaglio_err:
    oApp.Visible = True
    MsgBox Err.Number & ", " & Err.Description
End Sub
'--------------
Funziona cosě; devi inserire nel documento word la parola "Elenco" dove vuoi
far creare la la tabella con i dati presi da access.
Devi togliere (se non ti interessa) la parte di codice che esegue il
mailmerge...
Ciao.
--
Sergio MAZZA


title: Domandina da neofita...

author: Zandor

text:
Ciao a tutti...
ho realizzato un database che contiene una tabella ordini ed un'altra
chiamata permute. In la prima tabella raccoglie il prodotto ordinato nemtre
la seconda raccoglie l'eventuale permuta ricevuta. Le due tabelle sono
collegate dal campo id_vendita.
Il mio problema è il seguente: devo realizzare un report che contenga un
importo calcolato sul campo prezzo della tabella vendite e sul campo
'eventuale' valore della tabella permute...
Come posso fare in modo che un espressione del tipo: vendite.prezzo -
permute.valore attribuisca valore zero a permute.valore se non esiste una
permuta collegata alla vendita in oggetto (in pratica se la tabella permute
non contiene un record con il corrispettivo id_vendita)?
Mille grazie per l'attenzione...
Ciao
Zandor


title: Domandina da neofita...

author: Antonio Biso

text:
"Zandor" <
Zan...@pippo.com
> ha scritto nel messaggio
news:t6dZ8.76322$Jj7.1...@news1.tin.it...

L'origine record del report sarà una query che lega le due tabelle sul campo
chiave con un join con la freccia verso la tabella permute (in modo da avere
comunque tutti i record della tabella vendite).
Ci metterai poi un campo calcolato fatto così:
prezzo finale: prezzo - nz(valore)
Antonio


title: Domandina da neofita...

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:AjdZ8.59020$K_4.1...@twister1.libero.it...
> "Zandor" <
Zan...@pippo.com
> ha scritto nel messaggio
> news:t6dZ8.76322$Jj7.1...@news1.tin.it...
> Ci metterai poi un campo calcolato fatto cosě:
> prezzo finale: prezzo - nz(valore)
>
> Antonio
Fatto e... funziona alla perfezione!
Mille grazie!
Zandor


title: QUERY A CAMPI INCROCIATI

author: laura

text:
Vorrei limitare i dati visualizzati in un query a campi incrociati, e allora
nei criteri gli metto il percorso di una combo selezionabile dagli utenti ma
non l'accetta dice che non ha riconosciuto il campo.
Sapete come mai?Nelle query di selezione o di accodamento funziona
normalmente BOOOH?!
L@u


title: QUERY A CAMPI INCROCIATI

author: Roberto da casa

text:
"laura" <
laura...@hotmail.com
> ha scritto nel messaggio
news:a8n3re$ves$1...@pegasus.tiscalinet.it...

Se una query a campi incrociati è parametrica (il tuo caso) o comunque è
basata su una query di selezione parametrica, è obbligatorio esplicitare il
tipo campo di ogni parametro.
Se la combo si chiama Pippo, contiene una lista di valori di tipo testo ed è
contenuta nella maschera Pluto e quindi nei criteri della query avrai
scritto:
Forms!Pluto!Pippo
apri la griglia di struttura della tua query a campi incrociati e dal menu
Query seleziona il comando Parametri... ; nella finestra di dialogo che ti
comparirà digita nella prima riga della colonna intestata Parametro
Forms!Pluto!Pippo (senza parentesi quadre) e nella prima riga della colonna
intestata Tipo dati seleziona, dal menu a tendina, la parola Testo.
Riempirai una riga della finestra di dialogo Parametri query per ogni
parametro della query a campi incrociati (nel tuo caso, mi sembra di capire,
una sola riga).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: MSDE

author: Emiliano

text:
Visto che in questo periodo la situazione in ufficio è abbastanza
tranquilla, volevo approfittarne per provare a capire questo MSDE prima di
passare (se è il caso) a SQL Server.
Essendo io completamente a zero,
vorrei avere qualche aiuto sulla config. e sul passaggio del mio database
esistente (A2000) a questo motore.
 Ringrazio tutti
   Emiliano
--------------------------------
Inviato via
http://usenet.iol.it


title: MSDE

author: Re Artů

text:
"Emiliano" <
e.de...@libero.it
> ha scritto nel messaggio
news:212Z171Z42Z246...@usenet.iol.it...

E' un bel argomento ... difficile da spiegare in poche parole. Se puoi
prenditi il libro Da access a SQL Server della mondadori, è abb. ben fatto


title: MSDE

author: koo

text:
> Essendo io completamente a zero,
> vorrei avere qualche aiuto sulla config. e sul passaggio del mio database
> esistente (A2000) a questo motore.
Non so da che punto devi partire, cmq, provo a sintetizzare.
Installa MSDE: è piuttosto semplice da fare.
L'installazione, se ricordo bene, dovrebbe chiederti una username e una
password da utilizzare per l'accesso ai dati. Memorizzala, ti servirà dopo.
Apri l'MDB di Access2000, vai su strumenti->utilità database->upsize guidato
A questo punto ti viene chiesto se vuoi utilizzare un database esistente o
se vuoi crearne uno nuovo. Segli la seconda opzione e vai avanti.
Ti viene chiesto il server SQL da utilizzare (nel tuo caso, è il server
MDSE). Metti l'indirizzo IP del server, oppure il suo nome, oppure 127.0.0.1
se MSDE è installato sulla tua macchina.
Inserisci username e password e poi digita il nome da dare al database.
Clicca su avanti.
Adesso devi selezionare le tabelle da esportare in SQL/MSDE.
Clicca su Avanti.
Ti viene chiesto ora se vuoi esportare anche gli indici, le regole di
convalida, relazioni, ecc...
Inizialmente, io farei l'esportazione di tutto, poi, quando prenderai la
mano, magari, esporterai solo alcune cose.
Non selezionare "Crea solo la struttura della tabella e non eseguire
l'upsize dei dati", altrimenti, come dice l'opzione, perdi i dati, se ce ne
sono già.
Clicca su Avanti.
Ora hai tre scelte.
1. Nessuna
L'applicazione originale non viene toccata, ma viene creato solo il database
MSDE.
2. Collega tabelle...
La tua applicazione MDB resta la stessa, ma, le tabelle, vengono sostituite
con tabelle allegate dal DB SQL/MSDE (in realtà, dovrebbe chiederti un nuovo
nome da dare all'MDB, così da non perdere l'originale)
3. Crea una nuova applicazione...
Viene creato un vile ADP di Access2000 che fa letteralmente da interfaccia
al DB SQL/MSDE. In pratica sarà più o meno come avere un MDB, ma potrai,
direttamente dall'applicazione, modificare la struttura del database e
accedere ai vari oggetti del DB (viste, stored procedure, ecc...)
Devi scegliere la terza opzione, poichè è la sola che ti permette di
modificare la struttura di un DB MSDE, a meno che tu non abbia qualche altro
programma di interfaccia (a me viene in mente solo l'Enterprise Manager di
SQL, il che significa avere SQL :-), però, forse, è sufficiente utilizzare
l'MMC... non so...).
Ora clicca su Avanti, poi su Fine. A questo punto, dovrebbe partire la
generazione del file ADP e del database SQL/MSDE.
Finita la generazione, si apre un report con l'elenco delle operazioni
effettuate. Chiudendo il report dovrebbe aprirsi automaticamente il file
ADP.
Ora, un file ADP, come già detto, è, sostanzialmente, simile ad un file MDE.
Ha solo qualche differenza:
1. Le query spariscono e compaiono le viste. Sono uguali alle query. La sola
differenza sta nel fatto che non puoi fare ordinamenti (c'è la soluzione,
però)
2. Puoi creare più di un diagramma di database (le Relazioni, praticamente)
3. Si aggiunge la voce Stored Procedure: questa è la soluzione
all'ordinamento delle viste, ma devi imparare a scrivere le Stored Procedure
(e non è possibilespiegarlo in questa sede). Però, tutte le query ordinate o
le istruzioni SQL utilizzate nella maschere, per esempio, vengono
automaticamente convertite in Stored Procedure e associate alla rispettive
istruzioni SQL e maschere (il codice VBA non viene considerato).
L'altra soluzione all'ordinamento (che di solito serve nelle maschere o in
alcuni controlli), è quella di utilizzare la proprietà recordset degli
oggetti e ADO: insomma, lavorando molto con codice VBA.
Finito.
Spero di non aver detto castronerie, di non aver generato confusione e di
non essere stato troppo lungo.
Ciao.


title: MSDE

text:
Il 09 Ago 2001, 10:38, "koo" <koo@k.k> ha scritto:
>[...]
>Spero di
non aver detto castronerie, di non aver generato confusione e di
>non
essere stato troppo lungo.
>Ciao.
Sei stato gentilissimo, ora provo
e poi ti faccio sapere
Grazie ancora



title: MSDE

text:
Il 09 Ago 2001, 10:38, "koo" <koo@k.k> ha scritto:
>Non so da che punto
devi partire, cmq, provo a sintetizzare.
>Installa MSDE: è piuttosto
semplice da fare.
>L'installazione, se ricordo bene, dovrebbe chiederti
una username e una
>password da utilizzare per l'accesso ai dati.
Memorizzala, ti servirà
>dopo.
Rieccomi ad approfittare della vostra
pazienza.
neanche ho iniziato e già ho un problema:
La schermata
dell'installazione che dovrebbe chiedermi username e password non mi appare
credo perchè sto tentando di installare MSDE da un PC con win98.
Da quanto
ho letto nell'help credo che questa richiesta la faccia solo con winNT.
Se
è veramente così, c'è un modo per impostare questi parametri
successivamente, oppure devo obbligatoriamente installare da winNT?
ri
ringrazio per la pazienza e per la collaborazione.



title: MSDE

text:
Il 10 Ago 2001, 14:54,
e.de...@libero.it
 (Emiliano) ha scritto:
>Il 09
Ago 2001, 10:38, "koo" <koo@k.k> ha scritto:
Visto che probabilmente la
settimana scorsa stavate tutti al mare ripropongo il mio post:



title: Help per Access

author: Luigi

text:
Buongiorno al NG
Mi sapreste dare un buon indirizzo per un "creatore di Help" da inserire
nell'applicazione Access (non quello distribuito dalla MS sul
developer)...possibilimente gratuito J
Grazie
Luigi


title: Help per Access

author: ALESSANDRO Baraldi

text:
"Luigi" <
port...@libero.it
> ha scritto nel messaggio
news:_2bZd.11160$Tm5.2...@twister2.libero.it...

Dai un'occhiata a questo:
http://www.danish-shareware.dk/soft/shelpmbeta/index.html
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Help per Access

author: MA

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:42354168$0$32335$5fc...@news.tiscali.it...
> "Luigi" <
port...@libero.it
> ha scritto nel messaggio
> news:_2bZd.11160$Tm5.2...@twister2.libero.it...
>>
>> Buongiorno al NG
>>
>> Mi sapreste dare un buon indirizzo per un "creatore di Help" da inserire
>> nell'applicazione Access (non quello distribuito dalla MS sul
>> developer)...possibilimente gratuito J
>>
>> Grazie
>> Luigi
> Dai un'occhiata a questo:
>
http://www.danish-shareware.dk/soft/shelpmbeta/index.html
> Ciao
> --
> @Alex (Alessandro Baraldi)
E tutti e due date un'occhiata a questo
In fondo a questo articolo, inviato automaticamente ogni mese, troverai
il manifesto di questo newsgroup (it.comp.appl.access).
Tutto questo è arabo per te? leggi
<
http://www.news.nic.it/news-it/docs/glossario.html
>.
Tieni presente che esistono anche questi newsgroup
it.test        - per fare tutte le prove con le news
it.aiuto       - per domande generiche di aiuto
it.news.aiuto  - per tutti i problemi riguardanti le news
Un gruppo molto importante che *ogni utente* dovrebbe seguire è
it.news.annunci; su questo gruppo, moderato e con *pochissimo* traffico,
vengono inviate le comunicazioni ufficiali di creazione e rimozione dei
newsgroup, le proposte per la creazione di nuovi gruppi, i moduli per
votarli, i risultati delle votazioni eccetera.
Per tenerti informato su cosa succede nella gerarchia it.*, sottoscrivi
il newsgroup it.news.annunci.
Infine, questo newsgroup fa parte della gerarchia it.*: se non sai cos'è
un newsgroup, una gerarchia, oppure it.*, lo puoi scoprire a
<
http://www.news.nic.it/
>.
it.comp.appl.access Il DBMS Microsoft Access
Paolo Holzl <
me...@dns.asianet.it
>
Questo newsgroup tratta dell'ambiente Microsoft-Access, di specifiche
tecniche, aggiornamenti, discussioni, scambi di codice sorgente e routine,
chiarimenti su eventuali bug, discussioni tra chi lo utilizza e in
particolar
modo tra sviluppatori.


title: Help per Access

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:nHbZd.5533$tY2....@news.edisontel.com...
> E tutti e due date un'occhiata a questo
> In fondo a questo articolo, inviato automaticamente ogni mese, troverai
> il manifesto di questo newsgroup (it.comp.appl.access).
> Tutto questo è arabo per te? leggi
> <
http://www.news.nic.it/news-it/docs/glossario.html
>.
MA, non hai letto il suo Post...?
Il Subject poteva ingannare, ma è proprio quello che serve, e per questo
deduco
che non hai letto il POST, ma ti sei limitato a fare un'osservazione
inutile.
Se gli serve un HELP per Access cosa dovrebbe chiedere nel Subject...?
Saluti



title: Help per Access

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4235495a$0$32339$5fc...@news.tiscali.it...
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:nHbZd.5533$tY2....@news.edisontel.com...
>> E tutti e due date un'occhiata a questo
>> In fondo a questo articolo, inviato automaticamente ogni mese, troverai
>> il manifesto di questo newsgroup (it.comp.appl.access).
>> Tutto questo è arabo per te? leggi
>> <
http://www.news.nic.it/news-it/docs/glossario.html
>.
>
> MA, non hai letto il suo Post...?
> Il Subject poteva ingannare, ma è proprio quello che serve, e per questo
> deduco
> che non hai letto il POST, ma ti sei limitato a fare un'osservazione
> inutile.
>
> Se gli serve un HELP per Access cosa dovrebbe chiedere nel Subject...?
>
> Saluti
Hai ragione Alessandro, scusami tu e chiedo scusa anche Luigi.
Effettivamente mi sono lasciato "traviare" dal subject.
Ciao
MAssimiliano


title: Help per Access

author: Alex NSB

text:
> Mi sapreste dare un buon indirizzo per un "creatore di Help" da
> inserire nell'applicazione Access (non quello distribuito dalla MS sul
> developer)...possibilimente gratuito
http://www.helpscribble.com/
HTH.
Alessandro


title: Dimensioni Foglio nei Report

author: Joker

text:
Nei Report: File/Imposta Pagina/Pagina
Come mai non sempre riesco a impostarle?
Scelgo A4, Ok, salvo (anche no) e se vado a vedere è rimasto Letter.
Non sempre e non ho capito in che condizioni.
Qualcuno ne sa qualcosa?
Grazie.


title: Dimensioni Foglio nei Report

author: Emyr

text:


non hai specificato cosa usi...
comunque perdere le impostazioni era un bug riconosciuto del A2000
Saluti.
Emanuele.


title: Approssimazione valori (double) per stampa importi in fattura

text:
Ho questo problema in A97:
Sto utilizzando variabli (double) per l'assegnazione di campi (calcolati)
per ogni rigo in fattura.
La stessa cosa quindi per il totale imponibile, IVA e tot. fattura.
Noto poi, che la somma (fatta con la calc.ce) di ogni rigo, è diversa dal
tot. imponibile.
Quindi, controllando il valore di ogni singolo rigo in fatt., vedo che è
formato da svariate cifre decimali, che vengono "troncate" sulla stampa.
E' chiaro quindi, che la somma di ogni campo dei righi in fattura, non
corrisponde al totale.
Come faccio ad assegnare il giusto valore approssimato a 2 cifre decimali
(anzichè solamente visualizzato), in modo che la somma mi generi il valore
giusto?
Grazie 1000
Marco


text:

Puoi arrotondare il valore in ogni righa.
Una funzione per l'arrotondamento commerciale trovi qui:
www.donkarl.com/it/?FAQ2.1
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:5arrnaF...@mid.individual.net...

Grazie mille Karl peri suggerimenti.
Tutti questi esempi richiedono però che il dato sia preso ed inviato alla
routine di controllo (oppure utilizzando un'espressione).
Se i righi della fattura, vengono generati da una query però (che uso in
forma strutturata e non attraverso SQL), dovrei avere la possibilità di
approssimare immediatamente il valore in euro!
"Scartabellando" quà e là, sto provando questa riga di codice, che dovrebbe
assegnare direttamente la variabile Imponibile nella query, approssimandolo
a 2 cifre decimali (+ 0,5 per l'eccesso).
Imponibile: CCur(Int([c_orario]*[tt_ore]*100+0,5)/100)
Che ne pensi, corrisponde a quello che mi avevi suggerito ?
Ho usato la funzione CCur, che mi pare possa fare al caso mio (la funz.
Format genera una stringa, che dovrei quindi "riassegnare" con la VAL, che
però tronca i decimali vero?)
Grazie ancora
Marco


text:
Marco_280167 wrote:
> "Karl Donaubauer ha scritto:
>>> Ho questo problema in A97:
>>>
>>> Sto utilizzando variabli (double) per l'assegnazione di campi
>>> (calcolati) per ogni rigo in fattura.
>>> La stessa cosa quindi per il totale imponibile, IVA e tot. fattura.
>>>
>>> Noto poi, che la somma (fatta con la calc.ce) di ogni rigo, è
>>> diversa dal tot. imponibile.
>>> Quindi, controllando il valore di ogni singolo rigo in fatt., vedo
>>> che è formato da svariate cifre decimali, che vengono "troncate"
>>> sulla stampa.
>>> E' chiaro quindi, che la somma di ogni campo dei righi in fattura,
>>> non corrisponde al totale.
>>>
>>> Come faccio ad assegnare il giusto valore approssimato a 2 cifre
>>> decimali (anzichè solamente visualizzato), in modo che la somma mi
>>> generi il valore giusto?
>>
>> Puoi arrotondare il valore in ogni righa.
>> Una funzione per l'arrotondamento commerciale trovi qui:
>>
www.donkarl.com/it/?FAQ2.1
> ...
> Tutti questi esempi richiedono però che il dato sia preso ed inviato
> alla routine di controllo (oppure utilizzando un'espressione).
>
> Se i righi della fattura, vengono generati da una query però (che uso
> in forma strutturata e non attraverso SQL), dovrei avere la
> possibilità di approssimare immediatamente il valore in euro!
Non capisco dove hai il problema.
La funzione della FAQ puoi chiamare in qualunque codice o
espressione di ogni oggetto (certo anche una query) nello stesso
modo come una funzione integrata di Access.
> "Scartabellando" quà e là, sto provando questa riga di codice, che
> dovrebbe assegnare direttamente la variabile Imponibile nella query,
> approssimandolo a 2 cifre decimali (+ 0,5 per l'eccesso).
>
> Imponibile: CCur(Int([c_orario]*[tt_ore]*100+0,5)/100)
>
> Che ne pensi, corrisponde a quello che mi avevi suggerito ?
>
> Ho usato la funzione CCur, che mi pare possa fare al caso mio (la
> funz. Format genera una stringa, che dovrei quindi "riassegnare" con
> la VAL, che però tronca i decimali vero?)
Non è necessario e non è esatto. Trovi mille discussioni sull'oggetto
con google. Per questo esiste la funzione della FAQ.



title: For Each

author: Giuseppe

text:
Per controllare che tutti i campi in una frm di inserimento dati siano
riempiti dall'utente ho scritto la seguente routine
sull'evento Salva.
Dim ctlNomeText As Control
For Each ctlNomeText In Me.Controls
    If IsNull(ctlNomeText.Value) Then
        MsgBox "Il campo " &  ctlNomeText.Name &" è vuoto"
        Exit Sub
    End If
Next ctlNomeText
Il problema è che il ciclo funziona solo al primo giro
perchè sul secondo mi lancia l'allarme "Propietà o metodo non
supportato dall'oggetto." ,bloccandosi sulla riga If IsNull.....
P.S. I controlli non sono associati a nessuna tbl.
Consigli?
Ciao
Giuseppe


title: For Each

author: Maurizio Borrelli

text:
> "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> news:Sv16a.219653$0v.61...@news1.tin.it...

[...]
    Mi sa che non hai considerato che la collezione Controls di un Form
comprende *tutti* i controlli presenti sul Form, non solo le Caselle di
testo, quindi, ma anche Pulsanti, Etichette, ecc. Alcuni di questi
controlli non posseggono la proprieta' Value, ecco perche' avviene
l'errore che segnali. Quindi, prima di testare la proprieta' Value di un
controllo dovrai accertarti che tale controllo sia del *tipo* di quelli
da verificare. Per esempio:
        Dim oAcCtl As Access.Control
        For Each oAcCtl In Me.Controls
            If (TypeName(oAcCtl) = "Textbox") Then
                If IsNull(...
    Consulta la Guida in linea di Microsoft Visual Basic a proposito di:
        Function TypeName(VarName) As String
            Membro di VBA.Information
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------


title: For Each

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:b3aa1m$1iqqjl$1...@ID-52090.news.dfncis.de...
> > "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> > news:Sv16a.219653$0v.61...@news1.tin.it...
>
>     (Facci sapere se ed eventualmente come hai risolto. Grazie.)
>
> --
> Ciao :o)
> Maurizio
Prima di tutto grazie del consiglio.In effetti non avevo considerato gli
altri controlli.Ho provato la tua routine ma mi dava sempre
errore,"Variabile dell'oggetto
with non impostata".Cmq ho risolto così.Anche questa routine mi da un errore
ma con la gestione
degli errori lo by-passo.Non sarà elegante ma apparentemente funziona.
Ciao
Giuseppe
Private Sub cmdSalva_Click()
Dim TextBox As TextBox
On Error GoTo Err_cmdSalva_Click
       For Each TextBox In Me
            If IsNull(TextBox.Value) Then
            MsgBox "Il campo " & TextBox.Name & " è vuoto"
            TextBox.SetFocus
            Exit Sub
End If
Next TextBox
Exit_Err_cmdSalva_Click:
    Exit Sub
Err_cmdSalva_Click:
    Resume
End Sub


title: For Each

text:
> "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel
> messaggio news:Ko26a.219966$0v.61...@news1.tin.it...
> > "Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel
> > messaggio news:b3aa1m$1iqqjl$1...@ID-52090.news.dfncis.de...
> > > "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> > > news:Sv16a.219653$0v.61...@news1.tin.it...
[...]
> Prima di tutto grazie del consiglio.
    Consiglio? Non ti ho consigliato niente, io.
    (Non ho consigli da dare e nemmeno mi interessa riceverne.)
    ;o))))
> In effetti non avevo considerato gli
> altri controlli.Ho provato la tua routine ma mi dava sempre
> errore,
    Impossibile! Ti ricordo che quella che chiami la "mia" routine era:
        Dim oAcCtl As Access.Control
        For Each oAcCtl In Me.Controls
            If (TypeName(oAcCtl) = "Textbox") Then
                If IsNull(...
quindi, come vedi, non si tratta di una routine ma di uno spezzone di
codice che non puo' produrre errori perche' cosi' com'e' non puo'
nemmeno girare. E se non gira... non da' errori. Bisogna vedere cosa ci
hai aggiunto, o tolto, tu. ;-)
    Scusa se sembro (o sono, non importa) cosi' "tignoso" ma in queste
cose la precisione e' tutto.
> "Variabile dell'oggetto
> with non impostata".Cmq ho risolto così.Anche questa routine mi da un
> errore ma con la gestione
> degli errori lo by-passo.Non sarà elegante ma apparentemente funziona.
    Apparentemente, dici bene. Ma vediamo qual e' il problema...
> Private Sub cmdSalva_Click()
> Dim TextBox As TextBox
> On Error GoTo Err_cmdSalva_Click
>        For Each TextBox In Me
    Non si puo' e non si deve scrivere "For Each TextBox In Me" perche'
"Me", ovvero la maschera o Form, *non* possiede una collezione di
oggetti "Textbox". L'unica collezione di oggetti posseduta da Form e'
quella generica dei controlli (Controls). Faresti bene a cercare nella
guida la *FONDAMENTALE* pagina:
        Oggetti di Microsoft Access
che potrebbe sicuramente contribuire a chiarirti le idee.
>             If IsNull(TextBox.Value) Then
>             MsgBox "Il campo " & TextBox.Name & " è vuoto"
>             TextBox.SetFocus
>             Exit Sub
> End If
> Next TextBox
> Exit_Err_cmdSalva_Click:
>     Exit Sub
> Err_cmdSalva_Click:
>     Resume
> End Sub
    Testa questo codice:
        Dim oAcCtl As Access.Control
        For Each oAcCtl In Me.Controls
            If (TypeName(oAcCtl) = "Textbox") Then
                If (Len("" & oAcCtl.Value)=0) Then
                    oAcCtl.SetFocus
                    MsgBox _
                        "Campo a immissione obbligatoria." _
                      , vbExclamation Or vbOkOnly _
                      , oAcCtl.ControlSource
                    Exit Sub
                End If
            Else
                ' Non ci interessa perche' non e'
                ' un controllo di tipo "TextBox".
            End If
        Next



title: For Each

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:b3adsb$1j5ph7$1...@ID-52090.news.dfncis.de...
> > "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel
> > messaggio news:Ko26a.219966$0v.61...@news1.tin.it...
> > > "Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel
> > > messaggio news:b3aa1m$1iqqjl$1...@ID-52090.news.dfncis.de...
> > > > "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> > > > news:Sv16a.219653$0v.61...@news1.tin.it...
> [...]
[CUT]
>
>     Testa questo codice:
>
>         Dim oAcCtl As Access.Control
>         For Each oAcCtl In Me.Controls
>             If (TypeName(oAcCtl) = "Textbox") Then
>                 If (Len("" & oAcCtl.Value)=0) Then
>                     oAcCtl.SetFocus
>                     MsgBox _
>                         "Campo a immissione obbligatoria." _
>                       , vbExclamation Or vbOkOnly _
>                       , oAcCtl.ControlSource
>                     Exit Sub
>                 End If
>             Else
>                 ' Non ci interessa perche' non e'
>                 ' un controllo di tipo "TextBox".
>             End If
>         Next
>
> --
> Ciao :o)
> Maurizio
OK funziona egregiamente e senza generare errori.
In pratica se ho capito qualcosa leggendo anche "Oggetti di Microsoft
Access" i riferimenti  in sequenza sono
Access -> Form->Control->TextBox
Mentre io facevo
Form->TextBox
Una cosa però non ho ancora capito.Perchè posso dichiarare
una variabile As TextBox?Cioè in che contesto la dovrei usare
allora?
Ciao
Giuseppe


title: For Each

text:
> "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> news:iT36a.220423$0v.61...@news1.tin.it...
> > "Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel
> > messaggio news:b3adsb$1j5ph7$1...@ID-52090.news.dfncis.de...
> > > "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel
> > > messaggio news:Ko26a.219966$0v.61...@news1.tin.it...
[...]
> >     Testa questo codice:
> >         Dim oAcCtl As Access.Control
> >         For Each oAcCtl In Me.Controls
> >             If (TypeName(oAcCtl) = "Textbox") Then
> >                 If (Len("" & oAcCtl.Value)=0) Then
> >                     oAcCtl.SetFocus
> >                     MsgBox _
> >                         "Campo a immissione obbligatoria." _
> >                       , vbExclamation Or vbOkOnly _
> >                       , oAcCtl.ControlSource
> >                     Exit Sub
> >                 End If
> >             Else
> >                 ' Non ci interessa perche' non e'
> >                 ' un controllo di tipo "TextBox".
> >             End If
> >         Next
> OK funziona egregiamente e senza generare errori.
> In pratica se ho capito qualcosa leggendo anche "Oggetti di Microsoft
> Access" i riferimenti  in sequenza sono
> Access -> Form->Control->TextBox
> Mentre io facevo
> Form->TextBox
> Una cosa però non ho ancora capito.Perchè posso dichiarare
> una variabile As TextBox?Cioè in che contesto la dovrei usare
> allora?
    Confronta questo codice con quello sopra:
        Dim oAcCtl As Access.Control
        Dim oAcTxt As Access.TextBox
        For Each oAcCtl In Me.Controls
            If (TypeName(oAcCtl) = "Textbox") Then
                Set oAcTxt = oAcCtl
                If (Len("" & oAcTxt.Value)=0) Then
                    oAcTxt.SetFocus
                    MsgBox _
                        "Campo a immissione obbligatoria." _
                      , vbExclamation Or vbOkOnly _
                      , oAcTxt.ControlSource
                    Exit Sub
                End If
            End If
        Next
        Set oAcTxt = Nothing
        Set oAcCtl = Nothing
    In questo, una volta riconosciuto il controllo oAcCtl come controllo
di tipo Textbox, lo gestiamo per mezzo di una variabile oggetto di tipo
idoneo, in modo che possiamo, per esempio, sfruttare l'Intellisense per
ottenere la lista di proprieta' e metodi propri dell'oggetto e non
quelle generiche degli oggetti di tipo Control.
    Nota anche le ultime due righe. Nell'esempio precedente avevo
trascurato questo importantissimo particolare.



title: For Each

text:
[CUT]
> [...]
[CUT]
>
>     Nota anche le ultime due righe. Nell'esempio precedente avevo
> trascurato questo importantissimo particolare.
Certo come si fa quando si usano gli oggetti recordset e compagnia.
> Ciao :o)
> Maurizio
Adesso mi creo una frm nuova e mi metto a studiare i due "modelli"
;)
Ciao
Giuseppe


title: OT SANT'ANTONIO E SAN LUCA MARTIRI

author: Luciano (DOC)

text:
Stanotte ho fatto un sogno...ho sognato Sant'Antonio e San Luca martiri di
Access.
Il primo mi ha pregato di accettare in casa mia il suo omonimo ed io, seppur
mooooolto malvolentieri mi sono impeganto ad esaudire la richiesta del
santo.
Il secondo invece mi ha chiesto di scrivere su ICAA una msg per ricordare a
quanti transiteranno per casa di LBO prima di venire al raduno che il tempo
del medesimo e' GMT -1 mentre noi attualmente siamo a GMT +1. Questo
significa che se volete sincronizzarvi per un'appuntamento dovete dargli
un'orario anticipato di due ore rispetto al fuso italiano. O in alternativa
controllare che non si addormenti prima dell'ora di cena!:))
Amen!
Luciano
(DOC)
Stavo pensando ti mettere su una webcam per la diiffusione planetaria del
meeting...:.))) Tanto ci'ho la flat!


title: OT SANT'ANTONIO E SAN LUCA MARTIRI

author: RoDAgo

text:
"Luciano (DOC)" ha scritto nel messaggio ...
> Stanotte ho fatto un sogno...ho sognato Sant'Antonio e San Luca martiri di
> Access.
I sogni mistici sono di buon auspicio. :-)
> Il primo mi ha pregato di accettare in casa mia il suo omonimo ed io,
seppur
> mooooolto malvolentieri mi sono impeganto ad esaudire la richiesta del
> santo.
Bravo! Ma facevi il cherichetto da piccolo? :)
> Il secondo invece mi ha chiesto di scrivere su ICAA una msg per ricordare
a
> quanti transiteranno per casa di LBO prima di venire al raduno che il
tempo
> del medesimo e' GMT -1 mentre noi attualmente siamo a GMT +1. Questo
> significa che se volete sincronizzarvi per un'appuntamento dovete dargli
> un'orario anticipato di due ore rispetto al fuso italiano.
Buono a sapersi, porterò due orologi sincronizzati rispettivamente ad ora di
Roma ed ora di Lbo.
> O in alternativa
> controllare che non si addormenti prima dell'ora di cena!:))
Sono un pò in confusione, quale ora?  8-|
Tra l'altro bisogna prendere in considerazione l'ora legale.
Riassumendo abbiamo l'ora di Lbo, l'ora di cena, l'ora legale e il fuso
italiano.
Ma quanti cacchio di orologi devo portare! :-O
Cmq, Lbo non preoccuparti, al limite se non arriviamo in tempo ci
consoleremo con 4Kg di Cassata Siciliana, 10 Cannoli (ricotta e cioccolata)
ed un vassoio di Martorana. ;-P
> Amen!
E cosi sia!
Scappo a preparare la valigia per il volo (a proposito del volo, nel caso di
sciagura aerea, cercate i dolci tra i rottami, li troverete alla destra
della scatola nera :) )
> Luciano
> (DOC)
Cià
RoDAgo
> Stavo pensando ti mettere su una webcam per la diiffusione planetaria del
> meeting...:.))) Tanto ci'ho la flat!
Buona idea, l'importante è non attivare il sonoro, credo che dopo la cenetta
il più tranquillo rutterà come un lottatore di sumo!


title: OT SANT'ANTONIO E SAN LUCA MARTIRI

text:
"Luciano (DOC)" <
mc5...@mclink.it
> ha scritto nel messaggio
news:8tv8pj$phl$5...@news.mclink.it...
> Stanotte ho fatto un sogno...ho sognato Sant'Antonio e San Luca martiri di
> Access.
> Il primo mi ha pregato di accettare in casa mia il suo omonimo ed io,
seppur
> mooooolto malvolentieri mi sono impeganto ad esaudire la richiesta del
> santo.
> Il secondo invece mi ha chiesto di scrivere su ICAA una msg per ricordare
a
> quanti transiteranno per casa di LBO prima di venire al raduno che il
tempo
> del medesimo e' GMT -1 mentre noi attualmente siamo a GMT +1. Questo
> significa che se volete sincronizzarvi per un'appuntamento dovete dargli
> un'orario anticipato di due ore rispetto al fuso italiano. O in
alternativa
> controllare che non si addormenti prima dell'ora di cena!:))
> Amen!
>
> Luciano
> (DOC)
>
> Stavo pensando ti mettere su una webcam per la diiffusione planetaria del
> meeting...:.))) Tanto ci'ho la flat!
>
ragazzi, attenzione alle indigestioni .
mi raccomando le bevute debbono essere pari.
divertitevi anche per me.
ciao mario ... ;-))
gens una sumus!


title: OT SANT'ANTONIO E SAN LUCA MARTIRI

text:
Luciano (DOC) <
mc5...@mclink.it
> wrote in message
8tv8pj$phl$5...@news.mclink.it...
> Stanotte ho fatto un sogno...ho sognato Sant'Antonio e San Luca martiri di
> Access.
> Il primo mi ha pregato di accettare in casa mia il suo omonimo ed io,
seppur
> mooooolto malvolentieri mi sono impeganto ad esaudire la richiesta del
> santo.
Dov'è l'invito ufficiale, dov'è dov'è?
Antonio


title: OT SANT'ANTONIO E SAN LUCA MARTIRI

text:
"Luciano (DOC)" <
mc5...@mclink.it
> ha scritto nel messaggio
news:8tv8pj$phl$5...@news.mclink.it...
> Stanotte ho fatto un sogno...ho sognato Sant'Antonio e San Luca martiri di
> Access.
> Il primo mi ha pregato di accettare in casa mia il suo omonimo ed io,
seppur
> mooooolto malvolentieri mi sono impeganto ad esaudire la richiesta del
> santo.
[CUT]
E daje Luciŕ, fallo sto nummero de telefono.
Roberto


title: [OT] Gestione Interventi

author: Gian Paolo

text:
Salve a tutti
    So di essere ot ma mi permetto di postare qui in quanto penso che il
software che potrete trovare all'URL
http://www.interventi.info/
 possa fare
comodo a tutti.
Si tratta di un software per la getione degli interventi di assistenza,
manutenzione ordinaria e straordinaria.
Le caratteristiche principali:
1. Insermento nuovo intervento dietro richiesta Cliente o generato da
manutenzione programmata
2. Stampa del rapporto da far firmare al cliente
3. Evasione dell'intervento
4. Anagrafica Clienti, tecnici e utenti.
5. Inserimento di piu' contratti per lo stesso cliente
6. Statistiche di tutti i tipi
Spero che lo troviate utile
Saluti
Gian Paolo


title: [OT] Gestione Interventi

author: Massimiliano Bertoglio

text:
"Gian Paolo" <
> Spero che lo troviate utile
Attenzione: non si possono utilizzare in newsgroups per inserzioni di natura
commerciale!


title: [OT] Gestione Interventi

author: ciroteo

text:
Massimiliano Bertoglio ha scritto:

ma va secondo me ce lo voleva regalare ... in fondo siamo già in clima
natalizio.
...


title: [OT] Gestione Interventi

text:
regalare no ma se vai su
www.interventi.info
 e verifichi a quanto lo vendi e
quello che il programma fa... bhe ci siamo molto vicini-....
"ciroteo" <
matteo...@gmail.com
> ha scritto nel messaggio
news:1158068120.3...@i42g2000cwa.googlegroups.com...



title: [OT] Gestione Interventi

text:
"Gian Paolo"
> regalare no ma se vai su
www.interventi.info
 e verifichi a quanto lo vendi
e
> quello che il programma fa... bhe ci siamo molto vicini-....
Ammesso che a qualcuno interessi, non è questa l'area giusta: leggiti le
netiquette dei newsgroups.
Ciao


title: da access compilare modello pdf

author: pfm

text:
salve

ho un file .pdf che contiene dei campi da compilare.

ho trovato documentazione per scrivere da VBA
ma come posso sapere il nome dei campi modulo del file PDF?

con i modelli di word sfruttavo i segnalibri ma da word potevo vederli facilmente-

come fare con i pdf.

frazie


title: da access compilare modello pdf

text:
Il giorno lunedì 26 gennaio 2015 20:04:05 UTC+1, pfm ha scritto:
> salve
> ho un file .pdf che contiene dei campi da compilare.
> ho trovato documentazione per scrivere da VBA
> ma come posso sapere il nome dei campi modulo del file PDF?

Non lo so,
pero'  puoi  produrre  un  file word praticamente identico al
file pdf e poi esportarlo come tale.

Potrebbe andar bene ?


title: da access compilare modello pdf

text:
grazie dell'idea, ma il problema e' che mi hanno dato un file PDF da compilare

da anni scrivo file modelli di word con la tecnica dei segnalibri li compilo e li stampo o li esporto in pdf

qui visto che e' fatto da altri era vedere come compilarlo, ma non so il nome dei campi


title: da access compilare modello pdf

author: Principiante

text:
Il giorno lunedì 26 gennaio 2015 20:04:05 UTC+1, pfm ha scritto:

Condividi la documentazione per scrivere da VBA che hai trovato,
vedrò di farti un esempio.


title: da access compilare modello pdf

text:

http://www.simply4you.it/articoli/vbp/art0002a.asp


title: da access compilare modello pdf

text:

Queste istruzioni sono per Visual Basic che è differente dal VBA di access.
Hai trovato come adattarle al VBA di access?
Un sistema che alcuni hanno tentato di applicare per ottenere lo scopo che cerchi è 'sendkeys' ma presenta molti problemi.

Comunque se vuoi conoscere i nomi dei campi di un pdf compilabile, a patto che questi non sia protetto da password, devi aprirlo con Acrobat (per esempio),non il reader ovviamente.
Potrai vederne la struttura ed i nomi dei campi che lo compongono.

Prova, e se riesci sei pregato di condividere. Saremo grati.


title: da access compilare modello pdf

text:

e' un argomento che mi interessa e vorrei condividere appena riesco ad andare avanti.
mi parli di Acrobat (reader o Solo Writer) per vedere i campi?


title: da access compilare modello pdf

text:
Scarica acrobat XI pro in versione valutazione dal sito di acrobat Italia.
Per 30 giorni sarà pienamente funzionante.

Con esso aprì il tuo pdf compilabile e vedrai la sua struttura con i relativi campi e i loro nomi.

Potrai cominciare a sperimentare.

Per verificare se il file è protetto, aprilo anche con acrobat reader, dal menù file potrai vederne le proprietà e le eventuali protezzioni interne.

In passato ho fatto prove per compilarli automaticamente da excell, sono riuscito con Sendkey ma con evidenti problemi.

Ciao....


title: da access compilare modello pdf

text:
Il giorno lunedì 26 gennaio 2015 20:04:05 UTC+1, pfm ha scritto:

Io uso una procedura cui faccio generare un file xml con estensione .xdf - Questo file richiamato apre l'originale e riempie i campi.

I nomi dei campi li trovi grazie ad un parser on line (La chiave per ricercare tutto è xdf ...) che ti permette addirittura di modificare i nomi o altri interventi sul modello. Utlie se il modello è sbagliato (io ho corretto il mod. 69 dell'Agenzia delle Entrate)


title: da access compilare modello pdf

author: Bonk

text:
Go trovato qualche riferimento al codice del tizio da cui sono partito ... buon viaggio :-D

http://www.utteraccess.com/forum/lofiversion/index.php/t2010259.html


title: OutPut Formato Snapshot(*.snp) in inglese

author: Govardo Libero

text:
Ho un db replicato in italiano/inglese, purtroppo l'argomento utilizzato
sull'output in snapshot "Formato Snapshot(*.snp)" non č compatito dalla
versione di A97-english, che utilizza "snapshotformat(*.snp)", c'č modo di
universalizzare questo parametro.
  DoCmd.OutputTo acReport, "Ordine", "Formato Snapshot(*.snp)",
......
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------


title: Stored Procedure

author: Pietrobon Enrico

text:
Ciao a tutti
Problemino
Riesco a creare le stored procedure e a lanciarle da Sql.
Ma come posso, o meglio, con quale istruzione posso lanciarle da Vb.
Ho la necessità di aprire una maschera e lanciare quando premo un pulsante
una Stored Procedure.
Ciao ciao e Grazie
Enrico Pietrrobon


title: Stored Procedure

author: Giorgio prx

text:
"Pietrobon Enrico" <
enri...@softdream.it
> ha scritto nel messaggio
news:KjQra.24809$3M4.6...@news1.tin.it...

Ciao Enrico
se non hai bisogno di valori di ritorno la via più semplice è ....
Currentproject.connection.execute "EXEC nomesp"
Se la Sp ritorna un recordset ....
Set Rs=Currentproject.connection.execute ("EXEC nomesp")
Ciao Giorigo.


title: Stored Procedure

author: Sandrobi

text:
"Giorgio prx" <
giorgio...@tiscalinet.it
> ha scritto nel messaggio
news:b8oo1l$suh$1...@lacerta.tiscalinet.it...
>
> "Pietrobon Enrico" <
enri...@softdream.it
> ha scritto nel messaggio
> news:KjQra.24809$3M4.6...@news1.tin.it...
> > Riesco a creare le stored procedure e a lanciarle da Sql.
> >
> > Ma come posso, o meglio, con quale istruzione posso lanciarle da Vb.
>
> Ciao Enrico
> se non hai bisogno di valori di ritorno la via più semplice è ....
> Currentproject.connection.execute "EXEC nomesp"
> Se la Sp ritorna un recordset ....
> Set Rs=Currentproject.connection.execute ("EXEC nomesp")
>
Forse funziona con Access 2000 perché in A97 non c'è traccia di
Currentproject
Per A97 c'è un esempio funzionate su Sitocomune nel capitolo Query
Ciao. Sandro


title: File formato Access2000, se modificato da Access 2013 poi non e' piu' lavorabile

author: RobertoA

text:
Per la realizzazione di alcune procedure sto usando Access 2003
Lavoro su un file, come creato di default (versione Access2000), per
l'inserimento di form, codice, report, ecc..
A volte vado su altra postazione, dotata di Access 2013, per modificare
alcune righe di codice
Quando riporto il file alla postazione con Access 2003, tento di aprire
e si pianta tutto senza nessun errore, si schianta proprio
Da premettere che il formato del file non viene mai cambiato, e' sempre
in formato Access2000
Le domande sono:
- da cosa puo' dipendere l'impossibilita' di editare con Access2003 un
file modifcato da un Access2013 ?
- come far coesistere lo sviluppo di un unico applicativo usando una
volta la postazione con il 2003, l'altra la postazione col 2013 e viceversa?
Ciao e grazie
RobertoA


title: Problemi maximize

author: giaconet

text:
Ciao a tutti.
Vorrei che un'applicazione Access (2000) funzionasse a pieno schermo,
così ho impostato il metodo DoCmd.Maximize sulla prima maschera.
La cosa funziona maluccio, perché 1) ci sono alcune maschere che vorrei
non si vedessero a pieno schermo e 2) quando chiudo una maschera
improvvisamente questo giochino non funziona più e le maschere sono
tutte quante ridotte.
Allora ho provato ad impostare il metodo DoCmd.Maximize (e il metodo
DoCmd.Restore) su vari eventi delle maschere, ma questo genera un
fastidioso ingrandimento/riduzione che non riesco a eliminare neanche
con Application.Echo False e True.
Non ho poi ben capito se la proprietà Dimensioni automatiche delle
maschere deve stare a Si o a No per lo scopo che voglio ottenere (che è
poi tutte le maschere, tranne 2 o 3, sempre a schermo intero)
Grazie a chiunque mi spiegherà un po' meglio il funzionamento delle
maschere in questi casi.
Thanx
giaconet


title: Problemi maximize

author: Mak

text:
"giaconet" <
giacone...@inwind.it
> ha scritto nel messaggio
news:b0i5mh$pscfr$1...@ID-71483.news.dfncis.de...

Prova ad utilizzare la proprietà Pop-Up impostata su Si,
oppure quando apri le maschere ricordati di impostarci la modalità finestra
di Dialogo:
Docmd.OpenForm stDocName, , , stLinkCriteria, , acDialog
Saluti
Mak


title: conversione formato testo in numerico

author: Nicola

text:
ciao a tutti
esiste una funzione predefinita di access che mi permetta di trasformare
"23" (testo) in 23 (numerico) e viceversa?
grazie a tutti
Nicola


title: conversione formato testo in numerico

author: Mazui

text:
Per trasformare il numero in testo c'è la funzione "Cstr" quella per il
contrario non la ricordo
ciao
"Nicola" <
nick.19...@tin.it
> ha scritto nel messaggio
news:qKDfb.166724$hE5.5...@news1.tin.it...



title: conversione formato testo in numerico

author: Alberto S.

text:
On Sat, 04 Oct 2003 17:49:10 GMT, "Nicola" <
nick.19...@tin.it
>
wrote:
>ciao a tutti
>
>esiste una funzione predefinita di access che mi permetta di trasformare
>"23" (testo) in 23 (numerico) e viceversa?
vedi funzione Val
>grazie a tutti
>
>Nicola
Ciao
--
Alberto
No alle guerre


title: conversione formato testo in numerico

author: ALESSANDRO Baraldi

text:
"Alberto S." <
sartori.SPA...@tin.it
> ha scritto nel messaggio
news:jgdunvokl31jn8ndr...@4ax.com...

In realtà dipende cosa deve fare dopo la conversione.....!
Io oltre la giusta indicazione datagli aggiungerei Clng/Cstr e
tutta la famiglia di conversioni.
@Alex.


title: conversione formato testo in numerico

text:
On Sun, 5 Oct 2003 17:00:58 +0200, "ALESSANDRO Baraldi"
<
ik2...@libero.it
> wrote:
[cut]
>> >esiste una funzione predefinita di access che mi permetta di trasformare
>> >"23" (testo) in 23 (numerico) e viceversa?
>>
>> vedi funzione Val
>>
>> >grazie a tutti
>> >
>> >Nicola
>>
>> Ciao
>> --
>> Alberto
>> No alle guerre
>
>In realtà dipende cosa deve fare dopo la conversione.....!
>Io oltre la giusta indicazione datagli aggiungerei Clng/Cstr e
>tutta la famiglia di conversioni.
>
>@Alex.
Giustissimo,
la mia risposta (in stile 'emyr' - ricordi?) era soprattutto una
indicazione a dove trovare nella guida in linea un punto di partenza
da studiare.



title: conversione formato testo in numerico

author: Alessandro Baraldi

text:
"Alberto S." <
sartori.SPA...@tin.it
> wrote in message
news:vbj0ovkcg4vbrkn9i...@4ax.com
[CUT]
> Giustissimo,
> la mia risposta (in stile 'emyr' - ricordi?) era soprattutto una
> indicazione a dove trovare nella guida in linea un punto di partenza
> da studiare.
>
> Ciao
> Alberto
Si ricordo Emyr, speriamo qualche volta faccia un salto
a salutare....!
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Dcount e sintassi: gli apici

author: l'Andre

text:
Salve a tutti,
ho un problema con gli apici di Dcount.In una casella di testo ho
associato questo:
=DCount("Regione";"Clienti per Regione";"Regione = 'Val d'Aosta'")
naturalmente il problema è che l'apice di Val d'Aosta disturba la
sintassi di dcount e gli impedisce di lavorare.... come faccio a dirgli
che deve ignorarlo ?
grasie
l'Andre


title: Dcount e sintassi: gli apici

author: Roberto dal portatile

text:
"l'Andre" <
blackd...@yahoo.it
> ha scritto nel messaggio
news:1154507910.9...@i42g2000cwa.googlegroups.com...
>Salve a tutti,
>
>ho un problema con gli apici di Dcount.In una casella di testo ho
>associato questo:
>=DCount("Regione";"Clienti per Regione";"Regione = 'Val d'Aosta'")
>naturalmente il problema č che l'apice di Val d'Aosta disturba la
>sintassi di dcount e gli impedisce di lavorare.... come faccio a dirgli
>che deve ignorarlo ?
Prova cosě:
=DCount("Regione"; "[Clienti per Regione]"; "Regione =" & Chr$(34) & "Val
d'Aosta" & Chr$(34))
Per maggiori dettagli sull'help in linea dai un'occhiata all'argomento
intitolato "Virgolette nelle stringhe".
>grasie
Prego
>
>l'Andre
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Dcount e sintassi: gli apici

text:
Roberto dal portatile ha scritto:
> "l'Andre" <
blackd...@yahoo.it
> ha scritto nel messaggio
> news:1154507910.9...@i42g2000cwa.googlegroups.com...
> >Salve a tutti,
> >
> >ho un problema con gli apici di Dcount.In una casella di testo ho
> >associato questo:
> >=DCount("Regione";"Clienti per Regione";"Regione = 'Val d'Aosta'")
> >naturalmente il problema è che l'apice di Val d'Aosta disturba la
> >sintassi di dcount e gli impedisce di lavorare.... come faccio a dirgli
> >che deve ignorarlo ?
>
> Prova così:
>
> =DCount("Regione"; "[Clienti per Regione]"; "Regione =" & Chr$(34) & "Val
> d'Aosta" & Chr$(34))
>
> Per maggiori dettagli sull'help in linea dai un'occhiata all'argomento
> intitolato "Virgolette nelle stringhe".
>
> >grasie
>
> Prego
>
> >
> >l'Andre
>
> --
> Roberto
> -----------------------------------------------
> il Sito Comune di it.comp.appl.access
>
http://www.sitocomune.com
> -----------------------------------------------
Grazie Mille ! FUNZIONA !
per chi fosse interessato sto usando delle semplici etichette di testo
per creare una mappa geografica dei clienti e devo dire che sono molto
soddisfatto del risultato.
Grazie ancora.
l'Andre


title: EVITARE requery SubForm_Details dopo metodo FindFirst della Form_Master. Si può?

author: OneEDP

text:
Buon giorno,
ho una form master che contiene un casella di testo Find_Text.
La form master contiene una sub form details a maschere continue riepilogativa (contiene parte degli stessi dati della form master tra cui l'ID del record) con RecordSource con clausola where basato sulla stringa di ricerca Find_text.
Il probleme è questo. Su evento OnCurrent della form details ho inserito.

Me.Parent.Form.Recordset.FindFirst "ID = " & Me.ID
Accade qyesto
- dopo il metodo first la master punta all'ID scelto dall'utente all'evento Su Corrente
- dopo la visualizzazione della form master dell'ID trovato viene scatenato il metodo requery della subform details che porta irrimediabilmente ad spostare il record corrente sul primo record DI CONSEGUENZA viene scatenato l'evento Su Corrente della subform che fa puntare nuovamente SEMPRE al primo record!

Come posso evitare che venga eseguita la requery della subform dopo lo spostamento del record della form master?

La combo box è inssuficiente per trovare i dati necessari allora ho pensato ad una sub form a maschere continue per scegliere il record. Un esempio lo trovate qui
http://cdn.arstechnica.net/wp-content/uploads/2012/07/outlook-2013-people-view.png

Grazie!
Daniele


text:

Non ho capito....Hai una casella di testo in cui immetti il testo da cercare. La sub form trova quello che ti serve. E l'evento onCurrent sulla sub form che lavora sulla master è per fare cosa?


text:

Per trovare l'ID appena selezionato dall'utente. La sub espone dei dati riepilogativi il cui dettaglio edtabile è sulla master
Grazie


text:
Il giorno mercoledì 7 dicembre 2016 15:22:02 UTC+1, Fair87 ha scritto:

Questa soluzione funzionerebbe, ma non è esente da flickering:
sulla subform:
Me.Parent.Filter = "IDRst = " & Me.IDRst
Me.Parent.FilterOn = True
Me.Recordset.FindFirst "IDRst= " & Me.Parent.IDRst

Suggerimenti?

Grazie


title: Visual Studio 2005 Tools per Microsoft Office System: Access 2003 Developer Extensions

author: PBsoft

text:
Stamattina mi sono messo ad installare le Access 2003 Developer Extensions
che ho ritirato proprio ieri dal negozio.
Tengo a precisare che ho installato SOLAMENTE le ADE e niente di tutto il
resto dei cd forniti nella confezione.
Ho voluto subito provare il Package Wizard e.....sono arrivati i primi problemi:
1) io ho acquistato i VSTO in italiano ma l'interfaccia e l'help (sia del
Package Wizard che del Custom Startup Wizard) sono completamente in inglese:
su questo posso anche soprassedere, comunque se uno acquista il software
in italiano ci dovrebbe essere una ragione di fondo.....
2) nella creazione del pacchetto di installazione di un file ADP, quando
arrivo alla schermata 5 (Installer Experience), scegliendo l'italiano come
"Install Language", viene chiesto di mettere in cache i file relativi a quella
lingua e disponibili sul cd di installazione di Office 2003 Professional
in italiano: purtroppo non funziona, nel senso che c'è un bug che non permette
il recupero diretto di tali file dal cd in questione. Per risolvere il problema
si deve ricorrere a quanto suggerito nell'articolo Microsoft a questo indirizzo:
http://support.microsoft.com/kb/887031/en-us
. Purtroppo anche in questo caso
non funziona, nel senso che comunque non viene trovato il file BASE.MSI.
Per risolvere anche quest'altro problema basta recuperarlo dal percorso di
installazione delle ADE.
3) finisco la creazione del pacchetto e mi metto a testarlo: l'interfaccia
del pacchetto creato è in inglese!!!!!
Ergo: secondo me il file BASE.MSI che gli ho fornito a mano, essendo recuperato
dall'installazione delle ADE che pare che siano in inglese, è in inglese
pure lui.
Che ne pensate? Come si può risolvere?
Inoltre, anche voi avete riscontrato che l'interfaccia delle ADE è comunque
in inglese anche se il pacchetto acquistato è per l'italiano?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


text:
Mi premeva aggiungere che ho appena provato la creazione dello stesso pacchetto,
ma stavolta includendo anche il runtime di Access: posso tirare almeno un
sospiro di sollievo, visto che almeno il rutime sembra essere in italiano.
Rimane tuttavia il problema dell'installazione che avviene completamente
in inglese.



text:
Per i problemi che ho descritto ai punti 1 e 3, la soluzione era semplicissima
e per giunta descritta nel file README.mht contenuto nella root del cd di
installazione delle ADE: successivamente all'installazione delle ADE in inglese,
bastava eseguire il file adeuipck.exe contenuto nella cartella LANGPACK del
cd di installazione delle ADE.
Rimane tuttavia aperto il problema relativo al punto 2, per il quale accetto
volentieri dei consigli.



title: Errore di Riferimento non valido

author: Simone

text:
Salve a tutti,
stò cercando di scrivere una funzione che modifichi in maniera
automatica le proprietà dei controlli di una form.
  I miei problemi nascono quando nella form c'è una sub form.
Precisamente: come faccio a creare un riferimento ai controlli che
stanno nella subform della form?
  Questo è il codice che ho scritto io, mi si ferma con un errore del
tipo 'Riferimento non valido alla proprietà form/report
nell'espressione'.

Private Sub Cambia(fState as Boolean)
Dim ctl as Control, ctlSub as Control
   For Each ctl In frmMain.Controls
     If TypeOf ctl Is SubForm Then
>       For Each ctlSub In ctl.Form.Controls
          If Len(ctlSub.Tag) > 0 Then
          . . .
  Eppure a me sembra tutto corretto...


title: Tasto SHIFT all'avvio:

text:
Tempo fa avevo già postato questo quesito senza ottenere risposta.
E' possibile disabilitare la funzione dello SHIFT all'avvio di un db o
comunque sostituirlo con un altro pulsante?
Grazie
U.J.


title: Tasto SHIFT all'avvio:

author: Carlo Ve

text:
U.J. ha scritto nel messaggio <8kpt61$5s4$
3...@fe1.cs.interbusiness.it
>...
>Tempo fa avevo già postato questo quesito senza ottenere risposta.
Tempo fa avevo gia' postato questa soluzione senza ottenere attenzione
Carlo Ve


title: Tasto SHIFT all'avvio:

text:
Simpatico :(
UJ
Carlo Ve <
carlo...@libero.it
> wrote in message
aG0c5.18497$KD3.1...@news.infostrada.it...



title: Tasto SHIFT all'avvio:

author: aremarco

text:
siamo interessati in tanti. Puoi postare di nuovo la tua soluzione?
grazie



title: Tasto SHIFT all'avvio:

text:
U.J. ha scritto nel messaggio <8ku9r1$c4p$
1...@fe1.cs.interbusiness.it
>...
>Simpatico :(
Senti ciccio,
ma perche' invece di fare l'offeso prima di postare e ripostare la stessa
domanda,
dato  che nessuno si e' "degnato" di rispoderti,
non ti fai venire un piccolo dubbio che magari non sia gia' stata  data gia'
la  soluzione al problema e ti vai a scorrere  i titoli dei messaggi degli
ultimi giorni ? (12/7/00) e (15/7/00)
Considera  che nessuno e' pagato per dedicare il proprio tempo e dare
soluzioni agli altri, ma se lo fa' e' perche' gli fa comunque piacere,
ma una delle cose che infastidiscono (credo di non essere l'unico) e' vedere
qualcuno
pretende e si lamenta quando non gli viene risolto il problema
istantaneamente e magari a domicilio.
Nulla di personale comunque
Carlo Ve
>UJ



title: Tasto SHIFT all'avvio:

author: Gigi

text:
In pieno accordo
Tra l'altro la procedura di disattivazione tasto shift o allowbypasskey, si
trova anche su vari libri di programmazione.
Basta comprarlo. Come ho fatto io.
E s'incazzano pure se non gliela dai.
Carlo Ve <
carlo...@libero.it
> wrote in message
q4Dc5.1158$z%4.1...@news.infostrada.it...



title: Tasto SHIFT all'avvio:

text:
Punto primo: Ciccio lo dici a tuo fratello!
Punto secondo: Io ho solo fatto una domanda in modo molto educato!
Punto terzo: Se non vuoi rispondere fai a meno ma non rompere le bip.
Punto quarto: Anche se una soluzione è già stata postata non è detto che
ripostarla non sia utili a molti.
UJ


title: Tasto SHIFT all'avvio:

text:
U.J. ha scritto nel messaggio <8l0te7$sks$
1...@fe2.cs.interbusiness.it
>...


Certo,  succede continuamente che a distanza di tempo vengano rischieste e
ripostate
le stesso cose,
ma quando la soluzione e' stata in maniera completa due giorni prima e
bastava alzare lo sguardo
per vederla non puoi fare il risentito se nessuno vuole  riperdere  tempo a
ripostare le stesse cose.
e magari ti dice di andarti a vedere i messaggi "vecchi" di due giorni prima
oppure e' troppo faticoso ?
E' chiaro ora chi sta rompendo le bip ?
per me finisce qui
Carlo Ve


title: Tasto SHIFT all'avvio:

text:
Per me era già finita!
UJ


title: Tasto SHIFT all'avvio:

author: lbo dal portatile

text:
>Punto secondo: Io ho solo fatto una domanda in modo molto educato!
lo so fratello, ma vedi, qui c'e' una marea di gente che fa le stesse
identiche domande tutti i giorni, certo in modo molto educato.
pero' tu ci metti 5 secondi a fare la tua domanda educata, mentre chi
ti risponde, per non dare una risposta banale, ci impiega di piu', si
sforza di dare una risposta utile ecc. ecc.
quando poi vede che il suo sforzo e' stato completamente vano, che la
sua risposta non se la fila nessuno, ci rimane, come dire, un po'
deluso.
allora sarebbe opportuno che la fatica venisse un po' livellata.
cioe' non e' carino che tu (un tu generico) fai pochissima fatica a
chiedere e c'e' chi fa molta fatica a rispondere tutte le volte.
facciamo un po' per uno: c'e' chi fa abbastanza fatica a rispondere
quando serve, c'e' chi fa abbastanza fatica a cercare un po' prima di
chiedere e poi, se non trova, a chiedere.
va bene cosi'?
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Tasto SHIFT all'avvio:

text:
Sono pienamente d'accordo con te.
Infatti con una ricerca più approfondita ho trovato nei msg più vecchi la
risposta alla mia domanda.
Quello che ritengo non corretto è l'arroganza di qualcun altro che poteva
semplicemente scrivere "Controlla tra i miei messaggi vecchi e troverai la
risposta".
Visto che tra l'altro non ero l'unico a non trovata.
Saluti
UJ.


title: Tasto SHIFT all'avvio:

text:
>Sono pienamente d'accordo con te.
>Infatti con una ricerca più approfondita ho trovato nei msg più vecchi la
>risposta alla mia domanda.
oooh, vabbe'.  mo' fate pace che l'unico a flammare qui voglio essere
io.



title: Tasto SHIFT all'avvio:

author: UJ

text:
Sorry but... cosa intendi per "flammare"?
UJ
--
Saccardo Gianni
gsac...@witcom.com
"lbo dal portatile" <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:3974b0c0...@news.interbusiness.it...



title: Tasto SHIFT all'avvio:

text:
>Sorry but... cosa intendi per "flammare"?
litigare e incazzarsi.



title: Tasto SHIFT all'avvio:

text:
AAAAaaaaannnnn! Ora ho capito. :)
A risentirci
UJ
--
Saccardo Gianni
gsac...@witcom.com
"lbo dal portatile" <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:3975b36e...@news.interbusiness.it...



title: Problemi di approssimazione

author: Paolo B.

text:
Ho due campi in una maschera
ORE e COSTO
L'origine del controllo di costo e' = =ORE*30  ed e' "tipizzato" come
valuta in Euro.
Se metto valori interi di ORE tutto e' OK, ma se metto valori decimali
di ORE  es. 1,5 2,5 ecc i valori mi vengono approssimati all'intero
successivo (es. 2 , 3)
Come devo fare per evitare cio'?
Grazie


title: Problemi di approssimazione

author: Antonio Biso

text:
"Paolo B." <pa...@bi.ii> ha scritto nel messaggio
news:2sjovvgvrb6pmhgps...@4ax.com...

Forse che il controllo è associato ad un campo di tipo intero?!?
Antonio


title: Problemi di approssimazione

text:
On Wed, 07 Jan 2004 18:47:25 GMT, "Antonio Biso" <
ch...@etruria.net
>
wrote:
>Forse che il controllo è associato ad un campo di tipo intero?!?
Infatti...grazie!


title: recuperare numerazione campo contatore

author: Luciano

text:
salve,
c'è un  sistema per recuperare la numerazione di un campo contatore? Mi
spiego: sono arrivato incolume al record numero 55, poi per un errore di
inserimento mi sono giocato il 56 e il 57. Posso recuperarli e ripartire dal
56?
grazie mille


title: recuperare numerazione campo contatore

author: Pablitomf

text:
Luciano ha scritto:

DoCmd.RunSQL "INSERT INTO Tua_Tabella
(Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
Sostituisci Tua_Tabella, Tuo_Campo_Chiave e Valore_Da_Attribuire con i
valori reali...
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: recuperare numerazione campo contatore

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cto5uj$t8f$1...@news.newsland.it...
> Luciano ha scritto:
>
> > salve,
> > c'è un  sistema per recuperare la numerazione di un campo contatore? Mi
> > spiego: sono arrivato incolume al record numero 55, poi per un errore di
> > inserimento mi sono giocato il 56 e il 57. Posso recuperarli e ripartire
dal
> > 56?
> > grazie mille
>
> DoCmd.RunSQL "INSERT INTO Tua_Tabella
> (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
>
> Sostituisci Tua_Tabella, Tuo_Campo_Chiave e Valore_Da_Attribuire con i
> valori reali...
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
> Access : Ver.97 - 2K
Sta parlando di un campo COUNTER...!!
Per quanto ne sò il campo COUNTER è readOnly.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: recuperare numerazione campo contatore

author: Ebo

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:41ffe1e9$0$32355$5fc...@news.tiscali.it...
> "Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
> news:cto5uj$t8f$1...@news.newsland.it...
>> Luciano ha scritto:
>>
>> > salve,
>> > c'è un  sistema per recuperare la numerazione di un campo contatore? Mi
>> > spiego: sono arrivato incolume al record numero 55, poi per un errore
>> > di
>> > inserimento mi sono giocato il 56 e il 57. Posso recuperarli e
>> > ripartire
> dal
>> > 56?
>> > grazie mille
>>
>> DoCmd.RunSQL "INSERT INTO Tua_Tabella
>> (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
>>
>> Sostituisci Tua_Tabella, Tuo_Campo_Chiave e Valore_Da_Attribuire con i
>> valori reali...
>> --
>> Ciao
>> Pablitomf (Maurizio Facciuti)
>> Access : Ver.97 - 2K
>
> Sta parlando di un campo COUNTER...!!
>
> Per quanto ne sò il campo COUNTER è readOnly.
>
> --
> @Alex (Alessandro Baraldi)
Il 27/01/05 c'era un analogo post che ti rimanda al SitoComune sez.Tables
Se vuoi risolvere il problema ti conviene crearti tu un Progressivo tramite
una semplice istruzione DMax:
in questo caso potrai sempre cancellare i records finali senza saltare
numerazione: ho detto "finali".
Ciao Ebo
>
>


title: recuperare numerazione campo contatore

text:
ALESSANDRO Baraldi ha scritto:
[CUT]
> > DoCmd.RunSQL "INSERT INTO Tua_Tabella
> > (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
> Sta parlando di un campo COUNTER...!!
> Per quanto ne sò il campo COUNTER è readOnly.
Allora da oggi ne sai una nuova. ;-)
Prova.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
------------------------------



title: recuperare numerazione campo contatore

text:
Luciano ha scritto:

Scaricati quest'esempio...
http://www.geviservices.it/files/db/reintegraid.mdb
1)Inserisci una serie di Record e cancellane a caso...
2)Reinseriscili con la funzione apposita
3)Appena hai finito di inserire gli ID mancanti Compatta il DB



title: recuperare numerazione campo contatore

author: MA

text:
> ALESSANDRO Baraldi ha scritto:
>
> [CUT]
>> > DoCmd.RunSQL "INSERT INTO Tua_Tabella
>> > (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
>
>> Sta parlando di un campo COUNTER...!!
>> Per quanto ne sò il campo COUNTER è readOnly.
>
> Allora da oggi ne sai una nuova. ;-)
> Prova.
>
> --
Come cosa è molto vecchia,, tra l'altro c'è anche sul sitocomune,
relazionata da Namor
MAssimiliano


title: recuperare numerazione campo contatore

author: namor

text:
MA ha scritto:
> > ALESSANDRO Baraldi ha scritto:
[CUT]
> >> > DoCmd.RunSQL "INSERT INTO Tua_Tabella
> >> > (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
> >> Sta parlando di un campo COUNTER...!!
> >> Per quanto ne sò il campo COUNTER è readOnly.
> > Allora da oggi ne sai una nuova. ;-)
> > Prova.
> Come cosa è molto vecchia,, tra l'altro c'è anche sul sitocomune,
> relazionata da Namor
> MAssimiliano
Questo è l'originale, era di ottobre 2003.
http://www.google.it/groups?threadm=bpg3j5%24ifl%241%40news.newsland.it
Namor
--
namor at inwind punto it



title: recuperare numerazione campo contatore

text:
Pablitomf ha scritto:
> Non mi fido molto delle statistiche, perchč un uomo con la testa
> nel forno acceso e i piedi nel congelatore statisticamente ha una
> temperatura media.
Bella questa!
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito



title: recuperare numerazione campo contatore

author: Alessandro Baraldi

text:
"Pablitomf" <
maurizio...@accessgroup.it
> wrote in message
news:ctq27e$jch$
1...@news.newsland.it
> ALESSANDRO Baraldi ha scritto:
>
> [CUT]
> > > DoCmd.RunSQL "INSERT INTO Tua_Tabella
> > > (Tuo_Campo_Chiave)VALUES (Valore_Da_Attribuire);
>
> > Sta parlando di un campo COUNTER...!!
> > Per quanto ne sò il campo COUNTER è readOnly.
>
> Allora da oggi ne sai una nuova. ;-)
> Prova.
Interessante e mi fido.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: recuperare numerazione campo contatore

text:
namor ha scritto:
> Pablitomf ha scritto:
> > Non mi fido molto delle statistiche, perchč un uomo con la testa
> > nel forno acceso e i piedi nel congelatore statisticamente ha una
> > temperatura media.
> Bella questa!
> Namor
Anche la nuova aggiunta non č male... ;-)
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
La disumanita' del computer sta nel fatto che, una volta programmato e
messo in funzione, si comporta in maniera perfettamente onesta (Isaac
Asimov).



title: Aggiornamento prezzi all'ultima data precedente

author: mimmo

text:
Salve a tutti
Sto alle prese con un problema..
Ho una Tabella mdb con i seguenti campi::
ID
DATA
MATRICOLA
PREZZI
mi servirebbe impostare una query in modo che il prezzo se fosse
uguale a
zero, dovrebbe essere uguale all'ulimo valore precedente ad Es.
ID    DATA        MATRICOLA  PREZZI
1    25/04/11       ART1              25
2   26/04/11         ART1               0
3    27/04/11         ART1              12
ID    DATA        MATRICOLA  PREZZI
1    25/04/11       ART1              25
2   26/04/11         ART1               "25"
3    27/04/11         ART1              12
Avevo pensato di strutturare la qyery nel seguente modo:
SELECT Tab.id, Tab.data, tab.matricola, tab.prezzo, (select
last(PREZZO) FROM
Tabella1
Where [Tabella1].[matricola] = [tab].[matricola]  and  id <=
tab.id
AND
[tabella1].data*1+id/1000 <= tab.data*1+
tab.id/1000
 and prezzo >0) AS
ultimo
FROM Tabella1 AS Tab
ORDER BY TAB.matricola, tab.data*1+[id]/1000;
Funziona bene, ma se inserisco una data vecchia sfalsa tutti i prezzi.
Vi chiedo se si può fare qualcosa...
Anticipati ringrazimenti
A presto
Mimmo>


title: Anteprima di stampa di una query

author: Mirko

text:
Salve a tutto il ng, ho credo un banale problema con access che non riesco a
risolvere.
Ho creato una query con dei parametri e poi una maschera che visualizza i
dati della query, quando io apro la maschera devo digitare i vari parametri
impostati sulla query( e fin qui tutto bene ), ma sei io voglio fare
un'anteprima di stampa non voglio nuovamente reinserire i parametri
precedentemente inseriti, come posso fare ?
Grazie anticipatamente per il vs aiuto
Mirko


title: Anteprima di stampa di una query


title: Anteprima di stampa di una query

author: Fabio Montagner

text: usa la stessa query come origine dati del report


title: Anteprima di stampa di una query

text:
Forse sbaglio ma se la uso mi richiede sempre di mettere nuovamente i
paramentri
ciao Mirko
Fabio Montagner <
f.mon...@issz.vr.it
> wrote in message
8890p5$637u$1...@stargate1.inet.it...



title: mantenere traccia di user e pwd ?????

author: Adriano

text:
Come si può fare per tenere traccia delle operazioni effettuate da chi
accede al DB?
Posso impostare user e pwd per variare le abilitazioni, ma
mi interessa soprattutto mantenere tutte le operazioni fatte dai vari user
che ho creato!!
Grazie
Adriano
--------------------------------
Inviato via
http://usenet.iol.it


title: mantenere traccia di user e pwd ?????

author: Emyr

text:


puoi gestire tu da codice e registrare il tutto all'interno di una
tabella
Saluti.
Emanuele.


title: Funzione DCount

author: Leo

text:
Salve ragazzi...
Ho inserito in un controllo non associato di un report (sezione Intestazione
report) la seguente funzione:
=DCount("COGNOME";"NOTIZIE PERSONALI";[coniugato]="Sě")
Il report č collegato alla tabella "NOTIZIE PERSONALI", vorrei che la
predetta funzione mi conteggiasse
il numero dei dipendenti coniugati.
Risultato zero!!!!
Come mai ??? Dove sto sbagliando?
Vi ringrazio anticipatamente!!
Leo


title: Funzione DCount

author: Silvio Berruti

text:
"Leo" <
rut...@galactica.it
> ha scritto nel messaggio
news:z%cO6.19440$iC1.7...@news6.giganews.com...
> Salve ragazzi...
> Ho inserito in un controllo non associato di un report (sezione
Intestazione
> report) la seguente funzione:
>
> =DCount("COGNOME";"NOTIZIE PERSONALI";[coniugato]="Sě")
a tua scelta:
=DCount("COGNOME";"NOTIZIE PERSONALI";"[coniugato]= True")
=DCount("COGNOME";"NOTIZIE PERSONALI";"[coniugato]= Sě")
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Funzione DCount

text:
Grazie....
"Silvio Berruti" <
s...@libero.it
> ha scritto nel messaggio
news:4ndO6.1769$h9.7...@news.infostrada.it...



title: Funzione DCount

author: Andrea C.

text:
Ciao a tutto il ng,
mi sono creato una query che in funzione della data che immetto mi
visualizza in un report i clienti da me visitati nel periodo in questione.
Poichè i clienti hanno caratteristiche diverse (lattaio, verduriere,
fruttivendolo...) avrei anche bisogno di un report che mi riepiloghi, per
giorno il numero di lattai, fruttivendoli, verdurieri da me visti. Ho così
pensato di utilizzare la funzione DCount in un controllo non associato in un
report simile al primo. Putroppo mi restituisce sempre Errore, qualunque
modifica io tenti di apportare. Qualcuno sa indicarmi la via? ;-)))
La query di origine si chiama "Visite1 Query" ed è costituita dai campi
"Data", "CognomeNome" e "Specialità";  il criterio sul campo "Data" è
Between...and...
Nel controllo calcolato, all'origine dati io ho scritto:
=Nz(DCount("[CognomeNome]";"[Visite1 Query]";"[Specialità]='Lattaio'"))
grazie, andrea


title: Funzione DCount

author: Roberto dal portatile

text:
"Andrea C." <
dk...@tin.it
> ha scritto nel messaggio
news:qzNO6.3983$p3.5...@news2.tin.it...

Fermo restando che in questo caso la funzione Nz è superflua, in quanto la
DCount ti può restituire il valore zero ma mai il valore Null, quello che
hai scritto non contiene errori di sintassi.
Quindi viene fatto di pensare che o hai scritto male i nomi dei campi o il
nome della query.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Funzione DCount

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:eQPO6.16180$h9.13...@news.infostrada.it...
> >.......... mi sono creato una query che in funzione della data che

Smanettando un po' ho scoperto che l'errore non si verifica se io chiedo
alla query di effettuare solo la funzione DCount, ma se nei criteri della
stessa aggiungo la funzione:
Between [Forms]![Visite per Periodo]![Data Iniziale] And [Forms]![Visite per
Periodo]![Data Finale]
allora ecco che il risultato nel controllo calcolato del Report è #Error.
Putroppo mi è necessario limitare tra due date selezionabili il periodo di
analisi.
Come posso fare???????????????????
ciao andrea


title: Funzione DCount

text:
"Andrea C." <
dk...@tin.it
> ha scritto nel messaggio
news:tL3P6.3617$8Y1....@news2.tin.it...

Ti dà errore se la maschera Visite per Periodo non è aperta quando apri il
report.
Se vuoi aprire il report senza aprire la maschera (ma allora che cavolo
l'hai fatta a fare) e quindi inserire le date nelle fienestre di dialogo
anziché nella maschera, occorre che nei criteri della query non devi far
riferimento alla maschera e li scrivi:
Between [Data Iniziale] And [Data Finale]
Oppure la maschera dove imposti i parametri non si chiama Visite per Periodo
o le caselle di testo dove digiti le date non si chiamano rispettivamente
[Data Iniziale]  e [Data Finale].
Insomma non c'è coerenza tra la maschera, la query ed il report; dove non
c'è coerenza lo puoi vedere solo tu che hai in mano il database. Comunque ti
posso garantire che se tutto è coerente e la casella di testo non associata
l'hai inserita nell'Intestazione report il tuto ti deve funzionare, anche se
la query è una query di selezione parametrica.



title: Access 2.0 - controllo esistenza file con "nome lungo"

author: IO

text:
Non sono un gran esperto, e' la prima volta che scrivo qui e le mie scarse
conoscenze non mi permettono di aggirare questo ostacolo.
Ho necessita' di controllare se un file esiste in un determinato percorso e
con i nomi dei files "vecchio tipo" 8+3 non ci sono problemi, basta fare:
Open nomefile For Input Access Read As #1
a questo punto se ottengo errore 53 il file non esiste e mi regolo di
conseguenza.
Per vari problemi di "work in progress" sono ora costretto a dover
controllare files con 11+3 caratteri ed access 2.0 li vede con la tilde
sempre nel formato 8+3.
I nomi dei files vecchi erano del tipo LL0000LC a cui aggiungo un .gif o
.jpg a seconda dei casi, adesso invece e' LL0000LCCCC.ext e passando questo
codice alla variabile "nomefile" non c'e' niente da fare, il comando open
restituisce sempre l'errore 53 anche se il file esiste.
Ovviamente non mi e' possibile passare alla variabile "nomefile" il nome con
la tilde dato che non lo conosco e potrebbe anche cambiare.
(Sono in ambiente Access 2.0 ed i nomi lunghi non esistevano in windows)
Qualcuno ha un'idea ???
Devo solo controllare se il file esiste ed avere un codice di errore
gestibile in access se il file e' inesistente.
Ovviamente e' IMPOSSIBILE cambiare versione di access con una piu' recente.
Mille grazie a chi mi dara' una mano.
Saluti,
Dan
(se il problema e' gia' stato analizzato .... non ho cercato bene :-((  ,
sorry)


text:
IO wrote:
> Non sono un gran esperto, e' la prima volta che scrivo qui e le mie
> scarse conoscenze non mi permettono di aggirare questo ostacolo.
Benvevuto

usa dir
if dir(tuopath)<> then
>
> (se il problema e' gia' stato analizzato .... non ho cercato bene
> :-((  , sorry)
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


author: Pablitomf (Maurizio Facciuti)

text:
IO ha scritto:
> Non sono un gran esperto, e' la prima volta che scrivo qui e le mie scarse
> conoscenze non mi permettono di aggirare questo ostacolo.
> Ho necessita' di controllare se un file esiste in un determinato percorso e
> con i nomi dei files "vecchio tipo" 8+3 non ci sono problemi, basta fare:
> Open nomefile For Input Access Read As #1
> a questo punto se ottengo errore 53 il file non esiste e mi regolo di
> conseguenza.
If Dir("tuo_percorso\tuo_file") = "tuo_file" Then
Msgbox "ESISTE"
Else
Msgbox "NON ESISTE"
End if
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
> If Dir("tuo_percorso\tuo_file") = "tuo_file" Then
> Msgbox "ESISTE"
> Else
> Msgbox "NON ESISTE"
> End if
Mille grazie a entrambi per le info, spiegazioni chiarissime, ma mi sa che
anche il comando DIR non e' esente dal problema 11+3
guardate qui:
    If Dir("c:\test\foto1\BR\BR0888D003.gif") = "BR0888D003.gif" Then
        MsgBox ("esiste")
    Else
        MsgBox ("non esiste")
    End If
Il file esiste e sta pure nel posto giusto, ma arrivo sempre nella
condizione del "non esiste"
:-(((


text:
IO ha scritto:
> > If Dir("tuo_percorsotuo_file") = "tuo_file" Then
> > Msgbox "ESISTE"
> > Else
> > Msgbox "NON ESISTE"
> > End if
> Mille grazie a entrambi per le info, spiegazioni chiarissime, ma mi sa che
> anche il comando DIR non e' esente dal problema 11+3
> guardate qui:
>     If Dir("c:testfoto1BRBR0888D003.gif") = "BR0888D003.gif" Then
>         MsgBox ("esiste")
>     Else
>         MsgBox ("non esiste")
>     End If
> Il file esiste e sta pure nel posto giusto, ma arrivo sempre nella
> condizione del "non esiste"
usa un Msgbox Dir("c:\testfoto1\BRBR0888D003.gif"), vedi cosa ti dà e
dommi notizie.
> :-(((
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno



text:
> usa un Msgbox Dir("c:\testfoto1\BRBR0888D003.gif"), vedi cosa ti dą e
> dommi notizie.
restituisce un box vuoto (con il solo pulsante OK)
Sia utilizzando:
Msgbox Dir("c:\test\foto1\BR\BR0888D003.gif")
che utilizzando la variabile che passerebbe il nome del file
MsgBox Dir(nomefile)
(che ovviamente con un PRINT NOMEFILE in finestra di verifica restituisce
percorso e nomefile corretti)


author: Sergio MAZZA

text:
"IO" <
so...@toospam.com
> ha scritto nel messaggio
news:447c5dbf$0$18297$4faf...@reader1.news.tin.it...

Prova scaricando VBScript
(
http://msdn.microsoft.com/library/default.asp?url=/downloads/list/webdev.asp
)
ed inserire i riferimenti alla sua libreria ed utilizzare il metodo Metodo
FileExists...
Ciao.
--
Sergio MAZZA


text:
IO wrote:
>> usa un Msgbox Dir("c:\testfoto1\BRBR0888D003.gif"), vedi cosa ti dà e
>> dommi notizie.
>
> restituisce un box vuoto (con il solo pulsante OK)
>
> Sia utilizzando:
> Msgbox Dir("c:\test\foto1\BR\BR0888D003.gif")
> che utilizzando la variabile che passerebbe il nome del file
> MsgBox Dir(nomefile)
> (che ovviamente con un PRINT NOMEFILE in finestra di verifica
> restituisce percorso e nomefile corretti)
potrebbe essere un problema di accesso al file
prova a cambiare path



text:
> potrebbe essere un problema di accesso al file
> prova a cambiare path
Niente da fare, anche mettendolo nella root non cambia nulla, ho pero'
scoperto che anche il comando DIR cerca i files nel formato 8+3, ho provato
a dare questo:
MsgBox Dir("c:\test\foto1\br\br0888*.*")
e il risultato nel box e' stato:
BR0888~1.GIF
adesso provo a capirci qualcosa con i VBScript come suggerito da Sergio ...
(sempre se riesco a capirci qualcosa)


text:
IO ha scritto:
> > potrebbe essere un problema di accesso al file
> > prova a cambiare path
> Niente da fare, anche mettendolo nella root non cambia nulla, ho pero'
> scoperto che anche il comando DIR cerca i files nel formato 8+3, ho provato
> a dare questo:
> MsgBox Dir("c:testfoto1brbr0888*.*")
> e il risultato nel box e' stato:
> BR0888~1.GIF
Scusa, ma allora perchč non fai cosě...
hai la variabile "miofile"?
usi MsgBox Dir("c:\testfoto1\" & miofile & "~.*")
che accade?
> adesso provo a capirci qualcosa con i VBScript come suggerito da Sergio ...
> (sempre se riesco a capirci qualcosa)
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno



text:
Pablitomf (Maurizio Facciuti ha scritto:
[CUT]
> > MsgBox Dir("c:testfoto1brbr0888*.*")
> > e il risultato nel box e' stato:
> > BR0888~1.GIF
> Scusa, ma allora perchč non fai cosě...
> hai la variabile "miofile"?
> usi MsgBox Dir("c:testfoto1" & miofile & "~.*")
SORRY :
MsgBox Dir("c:testfoto1" & left(miofile,6) & "~*.*")



text:
Pablitomf (Maurizio Facciuti) wrote:
> Pablitomf (Maurizio Facciuti ha scritto:
>
> [CUT]
>>> MsgBox Dir("c:testfoto1brbr0888*.*")
>
>>> e il risultato nel box e' stato:
>
>>> BR0888~1.GIF
>
>> Scusa, ma allora perchč non fai cosě...
>> hai la variabile "miofile"?
>
>> usi MsgBox Dir("c:testfoto1" & miofile & "~.*")
>
> SORRY :
> MsgBox Dir("c:testfoto1" & left(miofile,6) & "~*.*")
>
>> che accade?
Acacde che per lui č lo stesso se i file hanno tutto uguale fino all'8
lettera e poi cambiano



text:
> Acacde che per lui è lo stesso se i file hanno tutto uguale fino all'8
> lettera e poi cambiano
ESATTO !
Io ho files assortiti cosi' composti:
BR0888D003.GIF
BR0888D005.GIF
BR0888D010.GIF
BR0888D012.GIF
ecc....
Questi sono "codici di modello" a cui aggiungo l'estensione per verificare
l'esistenza della foto, ma purtroppo non ho una sequenza predefinita che
puo' permettermi eventualmente di convertire il filename con la tilde, sono
costretto a cercare esattamente il nome del file per intero.
Sto cercando di capire qualcosa con "Microsoft Windows Script 5.6 (Windows
2000, XP)" come consigliato ...
sono entrato in "guru meditation" (leggasi "non so che pesci pigliare, non
ci capisco un tubo")
Se lanciassi un .exe con SHELL che sia in grado di ritornare un codice di
errore ad access ?
Qualche idea su qualcosa di preconfezionato ?


text:

Il limite sta nella versione di Access che usi
Con versioni moderne questo problema è risolto



text:
> Il limite sta nella versione di Access che usi
> Con versioni moderne questo problema è risolto
Lo so, ma questo c'e' e questo sono costretto ad usare.


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio news:e5k90o$dqa$1...@area.cu.mi.it...
> Il limite sta nella versione di Access che usi
> Con versioni moderne questo problema è risolto
> --
> _ _
> Ciao
> MAssimiliano Amendola
www.accessgroup.it
> Cisa - Conferenza Italiana per Sviluppatori Access
> Info:
www.donkarl.com/it
Non credo che il limite sia dato da access ma dal SO dove viene eseguito.
Per esempio non hai detto su quale windows fai girare Access 2.0.
Se per esempio fosse win98se (lo spero), già con la partizione a fat32 potevi gestire i nomi di file più lunghi di 8+3.
Comunque prova questo pezzo di codice (tratto dall'help VBScript delle proprietà ShortName/ShortPath):
'---
   Dim fso, f, s
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.GetFile("c:\directory\nomeFileLunghissimo.exe")
   s = "Il nome corto per " & UCase(f.Name) & " è: " & f.ShortName
   s = s & ", nella directory corta: " & UCase(f.ShortPath)
   Debug.Print s
'---
Ciao.
--
Sergio MAZZA


text:
> Non credo che il limite sia dato da access ma dal SO dove viene eseguito.
> Per esempio non hai detto su quale windows fai girare Access 2.0.
XP home SP2 (anche se poi in rete ci sono ancora un paio di W98, ma
ragioniamola come se fossi in locale su XP per il resto vedremo, un problema
alla volta basta e avanza !!! )
> Se per esempio fosse win98se (lo spero), già con la partizione a fat32
> potevi gestire i nomi di file più lunghi di 8+3.
>
> Comunque prova questo pezzo di codice (tratto dall'help VBScript delle
> proprietà ShortName/ShortPath):
> '---
>   Dim fso, f, s
>   Set fso = CreateObject("Scripting.FileSystemObject")
>   Set f = fso.GetFile("c:\directory\nomeFileLunghissimo.exe")
>   s = "Il nome corto per " & UCase(f.Name) & " è: " & f.ShortName
>   s = s & ", nella directory corta: " & UCase(f.ShortPath)
>   Debug.Print s
> '---
Il problema e' che non ho idea di come fare e/o dove inserire questo codice.
GetFile non e' riconosciuto da access 2.0, se inserisco questo codice nel
modulo che utilizzo, quando tento un "compila moduli caricati" access si
ferma al "." prima di GetFile dicendo "L'identificatore non e' un oggetto o
un tipo di dato definito dall'utente".
In effetti convertire il nome lungo in nome corto e poi darlo in pasto al
resto della procura sarebbe perfetto, il comando OPEN non avrebbe problemi a
trovare un nomefile convertito in 8+3, ma come faccio ad eseguire questo
script ?
Ciao,
Dan