title: Esosa richiesta di parametri

text:
E. Delacroix wrote:
> ...
> Il vero codice è:
>
> Public Sub Elenco0_AfterUpdate()
>
>    Dim dbs As DAO.Database
>    Dim qdfTemp As DAO.QueryDef
>    Dim rst As DAO.Recordset
>    Dim strSQL As String
>
> '--------Passa alla form giacenza e livello di riordino--------
> Forms![formProdotti]!Elenco21.RowSourceType = "Table/Query"
> Forms![formProdotti]!Elenco21.RowSource = "Prodotti Query"
> '-------------------------------------------------------------------------------
>
> Set dbs = CurrentDb
>
> strSQL = "SELECT Movimenti.IDMovimento," & _
> "Movimenti.DataMovimento, Movimenti.Prodotti_IDProdotto," & _
> "Movimenti.Quantità," & _
> "Movimenti.Quantità as Giacenza_Relativa " & _
> "FROM Prodotti INNER JOIN Movimenti ON " & _
> "Prodotti.IDProdotto = Movimenti.Prodotti_IDProdotto " & _
> "WHERE (((Movimenti.DataMovimento) Between " & _
> "(Forms!formProdotti!Calendar1) AND " & _
> "(Forms!formProdotti!Calendar2)) AND ((Prodotti.Prodotto)=" & _
> "(Forms!formProdotti.Elenco0))) " & _
> "ORDER BY Movimenti.DataMovimento, Movimenti.IDMovimento;"
>
> Nota: "Prodotto" è tipo string ricavato dalla tabella Prodotti
Prova così:
strSQL = "SELECT Movimenti.IDMovimento," & _
"Movimenti.DataMovimento, Movimenti.Prodotti_IDProdotto," & _
"Movimenti.Quantità," & _
"Movimenti.Quantità as Giacenza_Relativa " & _
"FROM Prodotti INNER JOIN Movimenti ON " & _
"Prodotti.IDProdotto = Movimenti.Prodotti_IDProdotto " & _
"WHERE Movimenti.DataMovimento Between " & _
clng(Forms!formProdotti!Calendar1) & " AND " & _
clng(Forms!formProdotti!Calendar2) & " AND Prodotti.Prodotto='" & _
Forms!formProdotti.Elenco0 & "'" & _
"ORDER BY Movimenti.DataMovimento, Movimenti.IDMovimento;"
> Set qdfTemp = dbs.CreateQueryDef("P", strSQL)
>
> Nota: la stringa  strSQL contine il campo "Quantità" due volte; la
> seconda volta è rinominato come "Giacenza_Relativa" in quanto nel
> recordset qui di seguito tramite Edit e Update dovrebbe cambiare il
> valore nel totale progressivo.
>
> Set rst = qdfTemp.OpenRecordset
>
> Nota: qui dovrebbe esservi  il codice per ottenere il totale
> progressivo, ma l'esecuzione si ferma prima per via dell'errore
> 3061.
>
> dbs.QueryDefs.Delete qdfTemp.Name
Non è chiaro perché fai tutta questa creazione e poi cancellazione
di una query. Per il recordset non è necessario. Invece basta
creare la stringa SQL e poi:
Set rst = dbs.OpenRecordset(strSQL, dbopendynaset)
> Dunque io ho provato ad usare Eval nella stringa SQL senza ottenere
> alcunchè. Credo che Eval non funzioni con Between.
> ...
Funziona, se usato correttamente. Però come già scritto non ci
sono necessari trucchi ecc. se passi i valori dei parametri
come mostrato sopra.



title: Esosa richiesta di parametri

author: E. Delacroix

text:
Il Wed, 11 Aug 2010 22:43:58 +0200, Karl Donaubauer ha scritto:
> Prova così:
>
> strSQL = "SELECT Movimenti.IDMovimento," & _
> "Movimenti.DataMovimento, Movimenti.Prodotti_IDProdotto," & _
> "Movimenti.Quantità," & _
> "Movimenti.Quantità as Giacenza_Relativa " & _
> "FROM Prodotti INNER JOIN Movimenti ON " & _
> "Prodotti.IDProdotto = Movimenti.Prodotti_IDProdotto " & _
> "WHERE Movimenti.DataMovimento Between " & _
> clng(Forms!formProdotti!Calendar1) & " AND " & _
> clng(Forms!formProdotti!Calendar2) & " AND Prodotti.Prodotto='" & _
> Forms!formProdotti.Elenco0 & "'" & _
> "ORDER BY Movimenti.DataMovimento, Movimenti.IDMovimento;"
>
>Nota: "Prodotto" è tipo string ricavato dalla tabella Prodotti
>Set qdfTemp = dbs.CreateQueryDef("P", strSQL)
Perfetto, ora funziona!
>
> Non è chiaro perché fai tutta questa creazione e poi cancellazione
> di una query. Per il recordset non è necessario. Invece basta
> creare la stringa SQL e poi:
>
> Set rst = dbs.OpenRecordset(strSQL, dbopendynaset)
Perchè così:
Forms![formProdotti]!Elenco19.RowSourceType = "Table/Query"
Forms![formProdotti]!Elenco19.RowSource = "P"
Elenco19 si popola, mentre non so come fare a popolarlo con il Recorset, il
quale non ha nome. Ho l'help corrotto su questo Access! Devo aspettare
lunedì e guardare su quello dell'ufficio per documentarmi.



title: Esosa richiesta di parametri

text:
E. Delacroix ha scritto:

Dato StrSql l'enunciato della query
Forms![formProdotti]!Elenco19.RowSource = StrSql
--


title: Esosa richiesta di parametri

author: Bruno Campanini

text:
"E. Delacroix" <
oni...@libero.it
> wrote in message
news:zx7igytfjj52.1ns0bg4fuljb4$.dlg@40tude.net...
> Il vero codice è:
>
> Public Sub Elenco0_AfterUpdate()
>
>    Dim dbs As DAO.Database
>    Dim qdfTemp As DAO.QueryDef
>    Dim rst As DAO.Recordset
>    Dim strSQL As String
>
>
> '--------Passa alla form giacenza e livello di riordino--------
> Forms![formProdotti]!Elenco21.RowSourceType = "Table/Query"
> Forms![formProdotti]!Elenco21.RowSource = "Prodotti Query"
> '-------------------------------------------------------------------------------
>
> Set dbs = CurrentDb
>
> strSQL = "SELECT Movimenti.IDMovimento," & _
> "Movimenti.DataMovimento, Movimenti.Prodotti_IDProdotto," & _
> "Movimenti.Quantità," & _
> "Movimenti.Quantità as Giacenza_Relativa " & _
> "FROM Prodotti INNER JOIN Movimenti ON " & _
> "Prodotti.IDProdotto = Movimenti.Prodotti_IDProdotto " & _
> "WHERE (((Movimenti.DataMovimento) Between " & _
> "(Forms!formProdotti!Calendar1) AND " & _
> "(Forms!formProdotti!Calendar2)) AND ((Prodotti.Prodotto)=" & _
> "(Forms!formProdotti.Elenco0))) " & _
> "ORDER BY Movimenti.DataMovimento, Movimenti.IDMovimento;"
A questo punto inserisci:
MsgBox strSQL: Exit Sub
e invia il contenuto del MsgBox.
Bruno


title: Esosa richiesta di parametri

text:
Il Thu, 12 Aug 2010 01:00:40 +0000 (UTC), Fair87 ha scritto:
> Dato StrSql l'enunciato della query
>
> Forms![formProdotti]!Elenco19.RowSource = StrSql
Grazie. Col vostro aiuto ho fatto cose eccezionali! E vanno come una
scheggia.
--
E. Delacroix


title: Ripetizione di valore da scelta in combobox.

text:
Buon pomeriggio,
in una maschera visualizzata come foglio dati (da utilizzare come
sottomaschera) ho due controlli: Causale (casella combinata con origine
query su tabella Causali) e descrizione causale (non associata).
Sull'evento After_Update del controllo causale (ma ho provato anche a
metterlo sull'evento Current della maschera) ho la seguente riga di codice:
Me!DescrizioneCausale = Me!Causale.Column(1)
in modo da visualizzare la descrizione dopo la scelta effettuata o, se ci
sono già record. Succede però che, ogni volta che scelgo dalla combo tutti
i controlli DescrizioneCausale cambiano valore, indipendentemente da
quello che già hanno.
Grazie per una dritta,
DEL_REC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Nick

text:
"DEL_REC" <domanda...@rispodnerecortes.ia> ha scritto nel messaggio news:cj1640$p7$1...@news.newsland.it...

se no è associata ovviamente prende l'ultimo valore che gli dai e vale per tutti i record.
l'unica soluzione è un qualcosa di simile della formatazione condizionata (vedi esempio su sitocomune)
oppure un campo di appoggio per aver eun valore diverso per ogni record
ciao
Nick


text:
Nick ha scritto:


> ciao
> Nick
Ciao Nick,
mi sembra alquanto strano che non si possa associare ad un campo non
associato un valore diverso da record a record. Perchè dovrei essere
costretto a creare un campo di appoggio (che mi amplierebbe la quantità di
dati da gesire e la dimensione del DB) invece che effettuare una gestione
diretta?
Grazie,



author: Roberto dalla campagna

text:
"DEL_REC" <domanda...@rispodnerecortes.ia> ha scritto nel messaggio
news:cj1640$p7$1...@news.newsland.it...
> Buon pomeriggio,
>
> in una maschera visualizzata come foglio dati (da utilizzare come
> sottomaschera) ho due controlli: Causale (casella combinata con origine
> query su tabella Causali) e descrizione causale (non associata).
> Sull'evento After_Update del controllo causale (ma ho provato anche a
> metterlo sull'evento Current della maschera) ho la seguente riga di
codice:
>
> Me!DescrizioneCausale = Me!Causale.Column(1)
>
> in modo da visualizzare la descrizione dopo la scelta effettuata o, se ci
> sono già record. Succede però che, ogni volta che scelgo dalla combo tutti
> i controlli DescrizioneCausale cambiano valore, indipendentemente da
> quello che già hanno.
> Grazie per una dritta,
>
> DEL_REC
>
Se la casella combinata Causale è associata ad un campo della tabella che è
origine record della maschera con la visualizzazione Foglio dati,
nell'origine controllo della casella di testo non associata dove vuoi
visualizzare la descrizione della causale scrivi:
=[IDCausali].Column(1)
Visto che stai usando una maschera Foglio dati, non puoi usare del codice
VBA per impostare il valore di una casella di testo, altrimenti detto valore
verrà impostato per tutti i record visualizzati nella maschera.
Se poi pensi che anche la casella combinata sia NON associata, penso proprio
che tu non abbia molte possibilità di trovare una soluzione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Roberto dalla campagna ha scritto:


> =[IDCausali].Column(1)

Roberto,
grazie per l'intervento e per l'indicazione. In effetti Causale è
associata ad un campo della tabella origine-record della maschera.
Approfitterei della tua gentilezza e vorrei chiederti:
1. come mai se davanti a [Causale].[Column](1) metto [Me.] o [Me!] la
casella non associata mi restituisce #Nome? e senza mi restituisce il
valore corretto?
2. come mai se provo ad associare lo stesso valore (anche in
visualizzazione maschere continue da VB mi viene restituito "Error di
run-time '2448': impossibile assegnare un valore all'oggetto" mentre se
intercetto l'errore con "On Error Resume Next" tutto funziona bene?
Grazie ancora e buon fine settimana,



text:
"DEL_REC" <domanda...@rispodnerecortes.ia> ha scritto nel messaggio
news:cj1a7e$fvn$1...@news.newsland.it...

Nell'origine controllo di una casella di testo puoi far riferimento
solamente ad altri controlli della stessa maschera o a campi dell'origine
record della maschera, quindi è sintatticamente errato indicare anche il
riferimento alla maschera (Me fa riferimento appunto alla maschera corrente)
e quindi si riceve un errore.
> 2. come mai se provo ad associare lo stesso valore (anche in
> visualizzazione maschere continue da VB mi viene restituito "Error di
> run-time '2448': impossibile assegnare un valore all'oggetto" mentre se
> intercetto l'errore con "On Error Resume Next" tutto funziona bene?
L'errore 2448 ti sta ad indicare che NON verrà impostato un valore da VBA
per un controllo per il quale il valore è già determinato da quanto scritto
nell'origine controllo; con "On Error Resume Next" non cambia assolutamente
il risultato, ovvero il valore da VBA non viene impostato, solo che non
viene segnalato l'errore, ma l'errore continua ad esserci.
>
> Grazie ancora e buon fine settimana,
>
> DEL_REC
--



text:






Roberto,
esauriente e chiara la tua prima risposta. Da quanto dici nella seconda,
si potrebbe pensare che non vi è nessun cambiamento nel valore della
casella di testo appunto a causa dell'errore e che resume next impedisca
la visualizzazione del messaggio ma non cambi le cose: in realtà, però, il
valore nella mia casella di testo muta secondo la scelta che faccio nella
combo. Come mai?
Grazie,



text:
"DEL_REC" <domanda...@rispodnerecortes.ia> ha scritto nel messaggio
news:cj1dv1$rgt$1...@news.newsland.it...

Il valore della casella di testo cambia ESCLUSIVAMENTE per quanto hai
scritto nella sua origine controllo e non certo per effetto del codice VBA
generato a fronte di "Dopo aggiornamento" della casella combinata; per
convicerti che questo è vero elimina tutto il codice VBA che hai generato a
fronte dell'evento "Dopo aggiornamento" della casella cambinata, e lascia
solo ciò che hai scritto nell'origine controllo della casella di testo e ti
accorgerai che tutto funziona e senza segnalazioni di errore: questa è la
dimostrazione che il codice VBA è del tutto inutile e serve SOLO a provocare
un errore che poi sterilizzi con On Error Resume Next: ora non capisco
proprio che senso ha provocare un errore solo per poi bypassarlo: comunque
il database è tuo, quindi decidi tu.
> Grazie,



text:



> > Grazie,
> >
> > DEL_REC
Ciao Roberto
e buon inizio settimana. Ho verificato la tua, ineccepibile, disamina e
tutto corrisponde.
Grazie per avermi fatto evitare di sprecare spazio prezioso e codice
inutile.



text:
"DEL_REC" <domanda...@rispodnerecortes.ia> ha scritto nel messaggio
news:cj8htm$931$1...@news.newsland.it...
[CUT]
>
> Ciao Roberto
>
> e buon inizio settimana. Ho verificato la tua, ineccepibile, disamina e
> tutto corrisponde.
> Grazie per avermi fatto evitare di sprecare spazio prezioso e codice
> inutile.
>
> DEL_REC
Prego e buon inizio settimana anche a te.



title: Salvataggio valore predefinito su pulsante i opzione

text:
Ho la necessità in di salvare il valore di un pulsante d'opzione, in
modo predefinito, Ad esempio sempre "si", quando il record viene
salvato.
Per il salvataggio uso il codice seguente:
Private Sub Form_BeforeUpdate(Cancel As Integer)
   Dim retValue As Integer
   Dim strTtl As String
   Dim strMsg As String
   strTtl = "Salvare il record?"
   strMsg = "I dati sono cambiati." & vbCrLf & _
            "Vuoi salvare le modifiche?"
   retValue = MsgBox(strMsg, vbQuestion + vbYesNoCancel, strTtl)
       'questo dovrebbe aggiornare l'ora
    Ultima_Modifica___Data.Value = Date
    Ultimo_Inserimento___Data.Value = Date
    'questo dovrebbe aggiornare la data
    Ultima_Modifica___Ora.Value = Time
    Ultimo_Inserimento___Ora.Value = Time
   Select Case retValue
       Case vbYes
           'non fare nulla
       Case vbNo
           DoCmd.RunCommand acCmdUndo
       Case vbCancel
           Cancel = True
   End Select
End Sub
Ho provato con alcuni tentativi, ma senza successo!
Come posso fare?


author: Alessandro Baraldi

text:
karp...@gmail.com
 ha scritto:

Non hai definito lo scenario, è una Form Continua...?
IN qualsiasi modo per poter alvare uno stato serve avere un campo
associato
altrimenti l'impostazione và persa....!
Quindi se devi salvara lo stato di SAVE di un Record servirà avere un
Campo Boolean
 o Data nel quale memorizzare l'ultimo salvataggio.
Quì su evento Current di Form gestirai il condizionamento dello stato
del controllo
affincè ti restituisca l'indicazione che serve a seconda del valore
del campo.....!!
@Alex


author: Carlo Costarella

text:
<
karp...@gmail.com
> ha scritto nel messaggio
news:1155466795.4...@i42g2000cwa.googlegroups.com...
>Ho la necessità in di salvare il valore di un pulsante d'opzione, in
>modo predefinito, Ad esempio sempre "si", quando il record viene
>salvato.
Se nel Pulsante di Opzione hai impostato il valore predefinito (nelle
proprietà) a zero, questo codice potrebbe fare al caso tuo:
Me.PulsanteOpzione = Not Me.PulsanteOpzione
Se il pulsante ha valore "vero" lo cambia in "falso", se "Falso" lo cambia
in "Vero".
Più semplicemente:
Per impostarlo a "vero": Me.PulsanteOpzione = -1
Per impostarlo a "falso": Me.PulsanteOpzione = 0
E' questo che volevi?
Ciao, Carlo


text:
Ok forse ci siamo.
Dopo faccio un po di prove
Grazie


title: Dati "non sincronizzati" in report. (lunghetto)

author: Riccardo Baldinotti

text:
Ho le idee confuse e dovrò prenderla da lontano. Me ne scuso.
Abbiamo dipendenti di livello Dirigente, Capufficio e Funzionario (in
gergo: peones).
In una stanza può esserci:
- un Dirigente
- uno o più Capufficio
- uno o più Funzionario
- un Capufficio con uno o più Funzionario
Un report mi doveva stampare un foglio per ogni stanza, con i dati:
NumStanza
NomeUfficio
(Dirigente)
(Capufficio)
(Funzionario)
dove i dati fra parentesi possono esserci o meno, ma uno almeno
comparirà.
Ho realizzato una query "qStanze" che unisce il CodiceStanza con i
CodiceStruttura dei diversi uffici e ci ho anche messo l'eventuale
Dirigente.
Gli altri due campi dovevano essere riempiti con un sottoreport, e qui
cominciano i problemi.
Primo problema.
Il foglio deve avere un'immagine di sfondo ma non sono riuscito a
rendere trasparente il sottoreport.
Ho allora deciso di usare una casella di testo non associata,
popolandola con una routine all'evento SuPagina.
Chiamo il report con una Call, riempiendo la clausola stLinkCriteria
così:
"pia = '" & piano & "' and sta between '" & dal & "' and '" & al & "'"
piano, dal e al sono: numero di piano, da che stanza a che stanza
stampare i fogli. Sono valori di testo e perciò uso le virgolette
singole.
L'evento SuPagina contiene questo:
    Dim RST As Recordset, u As Integer, dati As String
    Set RST = CurrentDb.OpenRecordset(" & _
select peone from qstanzepeones where qstanzepeones.piasta = " & _
Me.num)
    If RST.RecordCount > 0 Then
    RST.MoveLast
    RST.MoveFirst
        dati = ""
        For u = 1 To RST.RecordCount
            dati = dati & RST!peone & vbCrLf
            RST.MoveNext
        Next
        dati = Left(dati, Len(dati) - 2)
        Testo22 = dati
    Else
        Testo22 = Null
    End If
La query "qStanzePeones" mi associa i CodiceStanza ai NomeFunzionario.
Testo22 è la casella del report che riporterà i vari nomi dei
Funzionario. La casella Me.num contiene il CodiceStanza del foglio
corrente, e qui comincia il...
Secondo problema.
Il primo foglio del report mi dà NumeroStanza, NomeUfficio e
CodiceStanza della prima stanza, ma non i dati degli occupanti. Gli
altri eventuali fogli sembrano corretti.
Seguendo il codice passo passo, vedo che il Me.num del codice SuPagina
ha due comportamenti.
Se chiedo un solo foglio prende all'apertura il codice giusto, cicla
sui nomi giusti, ma mi dà una casella vuota.
Se chiedo più fogli, all'apertura del primo foglio prende il codice
della SECONDA stanza, cicla sui nomi della seconda, e mi dà una
casella vuota. Cambiando pagina, cicla sui dati della TERZA e mi dà i
dati della seconda, e così via fino all'ultima stanza, allorché
ricicla i dati corretti.
L'aggiunta del comando (disperazione):
    DoCmd.RepaintObject acReport, "pStanze"
non ha dato esiti.
Pensavo di creare una tabella con i vari dati e associare il report a
questa, ma ho voluto prima sentire qualche parere sugli n errori (con n
tendente a "un po' troppo") che vo' compiendo.
Saluti e ringraziamenti.
Riccardo Baldinotti


author: Sergio MAZZA

text:
"Riccardo Baldinotti" <
riccardo....@poste.it
> ha scritto nel messaggio
news:1159522203.1...@m73g2000cwd.googlegroups.com...










[risposta]
Forse la faccio troppo facile ma; se hai progettato bene le tabelle con un sottoreport per ogni profilo: (Dirigente) (Capufficio)
(Funzionario) legato per campi master/secondari, dovresti risolvere.
Ma anche con un report diviso per gruppi, dovrebbe funzionare.
Il problema sono le tabelle...
Ciao.
--
Sergio MAZZA


text:
Sergio MAZZA ha scritto:
> Forse la faccio troppo facile ma; se hai progettato bene le tabelle con un sottoreport per ogni profilo: (Dirigente) (Capufficio)
> (Funzionario) legato per campi master/secondari, dovresti risolvere.
> Ma anche con un report diviso per gruppi, dovrebbe funzionare.
> Il problema sono le tabelle...
>
> Ciao.
> --
> Sergio MAZZA
Le Ta...belle vanno bene e come detto, se uso un sottoreport i dati
sono corretti. Ma appunto il primo problema è che il sottoreport mi
copre l'immagine di sfondo.
Da ciò l'idea di usare del codice al volo come l'ho descritto.
Successivamente ho cambiato il codice in modo da produrre una tabella
di origine dati per il report, ma il problema sussiste.
Il mio sospetto è che sia l'evento SuPagina a non essere quello
giusto, ma non so cos'altro usare.
Mi scuso per il ritardo nella risposta e ti ringrazio.
Ciao
Riccardo Baldinotti


text:
"Riccardo Baldinotti" <
riccardo....@poste.it
> ha scritto nel
messaggio news:1159949489.3...@m7g2000cwm.googlegroups.com...
Sergio MAZZA ha scritto:
Le Ta...belle vanno bene e come detto, se uso un sottoreport i dati
sono corretti. Ma appunto il primo problema è che il sottoreport mi
copre l'immagine di sfondo.
Da ciò l'idea di usare del codice al volo come l'ho descritto.
Successivamente ho cambiato il codice in modo da produrre una tabella
di origine dati per il report, ma il problema sussiste.
Il mio sospetto è che sia l'evento SuPagina a non essere quello
giusto, ma non so cos'altro usare.
Mi scuso per il ritardo nella risposta e ti ringrazio.
Ciao
Riccardo Baldinotti
[risposta]
Non credo sia possibile rendere trasparente un sottoreport; ma se l'immagine
la metti nel sottoreport?
O invece del sottoreport utilizzi il raggruppamento e inserisci l'immagine
nel report?
Ciao.
--
Sergio MAZZA


text:
Sergio MAZZA ha scritto:
> [risposta]
> Non credo sia possibile rendere trasparente un sottoreport; ma se l'immagine
> la metti nel sottoreport?
> O invece del sottoreport utilizzi il raggruppamento e inserisci l'immagine
> nel report?
>
> Ciao.
> --
> Sergio MAZZA
La seconda che hai detto, proprio perché l'immagine copre tutto lo
sfondo, e oltretutto mi hanno pure chiesto di riposizionare i dati a
seconda del contenuto.
Così, una casella con fondo trasparente, che contenga più righe di
dati, sembra adatta.
Vado convincendomi che sia sbagliato l'evento SuPagina.
Ciao
Riccardo Baldinotti


text:
Riccardo Baldinotti ha scritto:

Forse ci sono. Ho spostato le istruzioni di caricamento dati e di
posizionamento delle caselle dall'evento SuPagina del report a
Formattazione del corpo. Sembra che tutto fili.
Mi resta da capire, allora, ma ormai solo per istruzione personale (e
mi dici poco...!) il fatto strano che durante l'evento SuPagina mi
prendesse il valore del record successivo ma poi mi visualizzasse i
dati del record corrente.
Grazie e ciao.
Riccardo Baldinotti


text:
"Riccardo Baldinotti" <
riccardo....@poste.it
> ha scritto nel
messaggio news:1160060479.8...@i42g2000cwa.googlegroups.com...
Forse ci sono. Ho spostato le istruzioni di caricamento dati e di
posizionamento delle caselle dall'evento SuPagina del report a
Formattazione del corpo. Sembra che tutto fili.
Mi resta da capire, allora, ma ormai solo per istruzione personale (e
mi dici poco...!) il fatto strano che durante l'evento SuPagina mi
prendesse il valore del record successivo ma poi mi visualizzasse i
dati del record corrente.
Grazie e ciao.
Riccardo Baldinotti
[risposta]
Ti riporto alcuni paragrafi dell'help in linea dell'evento formattazione:
In Microsoft Access l'evento Format si verifica quando si determina quali
dati appartengono a una sezione di report, ma prima che la sezione venga
formattata per l'anteprima di stampa o la stampa.
...
Un evento Formattazione si verifica per ciascuna sezione di report. In
questo modo, č possibile creare calcoli parziali complessi utilizzando i
dati di ciascuna sezione, incluse le sezioni che non vengono stampate.
...
Per le modifiche che non interessano il layout di pagina o per le routine
evento o le macro che devono essere eseguite solo dopo aver formattato i
dati di una pagina, ad esempio una macro che stampa totali di pagine,
utilizzare l'evento Stampa per la sezione di report.
Ciao.
--
Sergio MAZZA


title: Re: Istruzione SELECT di combo non sincronizza i record

author: Potone

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1118324522.4...@f14g2000cwb.googlegroups.com...
Ciao, insieme a Cinzia stiamo litigando su una SELECT che non vuole
funzionare.
Praticamente ho tre tabelle e una form con oggetti.
Le tabelle:
tblClienti
idCliente - contatore, PK
Nome - testo
Cognome - testo
tblTelefono
idTelefono - contatore, PK
idCliente - numerico, EK
Telefono - testo
idTipoTelefono - numerico, combobox che punta a idTipoTelefono
tblTipoTelefono
idTipoTelefono - contatore, PK
Tipologia - testo
Le relazioni sono:
tblClienti.idCliente---uno a molti --->tblTelefono.idCliente
tblTipoTelefono.idTipoTelefono---uno a molti
--->tblTelefono.idTipoTelefono
frmUtenti ha tblClienti come origine record e tre controlli che puntano
ai campi della tabella:
idCliente
Nome
Cognome
più una combobox con la seguente SELECT come origine riga:
SELECT [Tipologia], [Telefono] FROM tblTelefono INNER JOIN
tblTipoTelefono ON
tblTelefono.idTipoTelefono=tblTipoTelefono.idTipoTelefono WHERE
idCliente=forms!frmUtenti!idCliente ORDER BY tblTipoTelefono.Tipologia;
il problema è che nela combo appaiono sempre i numeri di telefono
relativi al primo record. Dove si sbaglia?
Grazie mille!!!!
ciao,
fai il requery della combo al cambio di record (current)?
ciao
Mat.


author: Giulio Severini

text:
Ma ho CANCELLATO  questo post dall'archivio di Google...come mai appare
ancora?
Si, tutto ok era il requery :)))))))
Non risp. qui, l'ho eliminato...o almeno...lo AVREi...


author: ciroteo

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1118325158.9...@z14g2000cwz.googlegroups.com...

Giulio non ti offendere ti prego. Leggo volentieri i tuoi "numerosissimi"
post, ma spesso mi accorgo che sono farciti di
faccine, punti esclamativi, punti interrogativi, maiuscole ecc...
Questa cosa appesantisce molto la lettura e secondo me è superflua se messa
in continuazione in tutti i messaggi.
Se vuoi enfatizzare qualcosa, fallo in modo che sia una vera sottolineatura,
l'eccesso in queste cose produce il risultato opposto.
Ricordi la barzelletta di pierino e il lupo?
ciao e buon lavoro!


title: aiuto: user + pwd

author: dany xxx

text:
ciao a tutti come voi sapete io sono davvero negata con la programmazione
anche di cose semplici, sono autodidatta (o autoignorante se volete).
ecco il mio problema nella speranza che mi "imbocchiate" il codice avendo
questi elementi:
ho una tabella che si chiama "user_id" con 3 campi: "user" "pwd" "group".
ho una maschera costruita su questa tabella che si chiama "autenticazione"
con 4 campi: "seleziona gruppo" (casella comb)"inserisci user" (tramite
casella comb), "inserisci password" (da riempire), "pwd" (campo invisibile
che contiene la password della tabella "user id" una volta selezionati
user e gruppo con le casella comb).
io VORREI :_( che schiacciando un pulsante parta la routine che confronta
il campo "inserisci password" con il campo "pwd" e se corrisponde mi deve
aprire una maschera che si chiama "start".
so che vi sto annoiando con le mie domande banali ma ringrazio davvero
tanto chi deciderà di scrivere il codice che mi serve, forse non ci vorrà
+ di 5 minuti.
grazie ancora
Dany xxx
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: aiuto: user + pwd

author: MA

text:
"dany xxx" <
da...@li.it
> ha scritto nel messaggio
news:beeu94$st7$1...@news.newsland.it...
> ciao a tutti come voi sapete io sono davvero negata con la programmazione
> anche di cose semplici, sono autodidatta (o autoignorante se volete).
> ecco il mio problema nella speranza che mi "imbocchiate" il codice avendo
> questi elementi:
>
> ho una tabella che si chiama "user_id" con 3 campi: "user" "pwd" "group".
> ho una maschera costruita su questa tabella che si chiama "autenticazione"
> con 4 campi: "seleziona gruppo" (casella comb)"inserisci user" (tramite
> casella comb), "inserisci password" (da riempire), "pwd" (campo invisibile
> che contiene la password della tabella "user id" una volta selezionati
> user e gruppo con le casella comb).
> io VORREI :_( che schiacciando un pulsante parta la routine che confronta
> il campo "inserisci password" con il campo "pwd" e se corrisponde mi deve
> aprire una maschera che si chiama "start".
> so che vi sto annoiando con le mie domande banali ma ringrazio davvero
> tanto chi deciderà di scrivere il codice che mi serve, forse non ci vorrà
> + di 5 minuti.
> grazie ancora
> Dany xxx
>
Dim pippo as string
pippo = dlookup("[pwd]";"user_id", "user = '"& me.user & "'")
if me.pwd = pippo then
docmd.openform "start"
Considera però che se io premo F11 e poi apro start ci riesco senza lo stop
della pwd.
ciao MAssimiliano


title: aiuto: user + pwd

text:
> Dim pippo as string
> pippo = dlookup("[pwd]";"user_id", "user = '"& me.user & "'")
> if me.pwd = pippo then
> docmd.openform "start"
mi da errore di sintassi! :-(
ma "pippo" è il nome elemento della casella di testo? perchè mi da
quest'errore????
> Considera però che se io premo F11 e poi apro start ci riesco senza lo stop
> della pwd.
lo so che tu ci riesci senza lo stop, ma i miei utenti sanno che il tasto
F11 serve per bellezza sulla tastiera.
grazie e scusami x il disturbo!
dany xxx



title: aiuto: user + pwd

author: Antonio Biso

text:
"dany xxx" <
da...@li.it
> ha scritto nel messaggio
news:beeu94$st7$1...@news.newsland.it...
> ciao a tutti come voi sapete io sono davvero negata con la programmazione
Sono sicuro che tu abbia tante altre qualità, mon cherie...
Antonio


title: aiuto: user + pwd

text:
>
> > Dim pippo as string
> > pippo = dlookup("[pwd]";"user_id", "user = '"& me.user & "'")
> > if me.pwd = pippo then
> > docmd.openform "start"
>
>
> mi da errore di sintassi! :-(
> ma "pippo" è il nome elemento della casella di testo? perchè mi da
> quest'errore????
No pippo è il nome della variabile che ci siamo creati per il confronto. Usa
proprio pippo e dimmi dove ti dà errore
> > Considera però che se io premo F11 e poi apro start ci riesco senza lo
stop
> > della pwd.
>
> lo so che tu ci riesci senza lo stop, ma i miei utenti sanno che il tasto
> F11 serve per bellezza sulla tastiera.
Sì ma non ti conviene rischiare. Io al tuo posto li lascerei entrare senza
la richiesta psw di prima e inserirei una password nella maschera che rende
i controlli visibili oppure esplelle l'utente.
Considera che se rimani con il metodo di prima o se usi questo metodo dovrai
intercettare rispettivamente F11 e F7 e non fargli fare nulla.
>
> grazie e scusami x il disturbo!
Anch'io ti dirò queste stesse parole dopo che sarai andata in banca a farmi
un cospicuo bonifico.
;-)
> dany xxx
ciao MAssimiliano



title: aiuto: user + pwd

text:
> No pippo è il nome della variabile che ci siamo creati per il confronto. Usa
> proprio pippo e dimmi dove ti dà errore
c'era punto e virgola dopo - pippo = DLookup("[pwd]"; - ho messo la
virgola (ho fatto bene?) ed è andato avanti, ma ora mi dice - blocco if
senza endif -
forse non gli abbiamo detto cosa fare se la password è sbagliata, magari
possiamo semplicemente fare in modo che resti aperta la maschera senza
andare a "start".
> Sì ma non ti conviene rischiare. Io al tuo posto li lascerei entrare senza
> la richiesta psw di prima e inserirei una password nella maschera che rende
> i controlli visibili oppure esplelle l'utente.
buona idea
> Anch'io ti dirò queste stesse parole dopo che sarai andata in banca a farmi
> un cospicuo bonifico.
ok, numero C/C, ABI E CAB :-)
rispondimi presto così torno a casa ad un'ora decente.
grazieeeee
dany xxx



title: aiuto: user + pwd

text:
>
> > No pippo è il nome della variabile che ci siamo creati per il confronto.
Usa
> > proprio pippo e dimmi dove ti dà errore
>
> c'era punto e virgola dopo - pippo = DLookup("[pwd]"; - ho messo la
> virgola (ho fatto bene?)
Sì scusa
ed è andato avanti, ma ora mi dice - blocco if
> senza endif -
Infatti devi aggiungere dopo l'apertura end if
> forse non gli abbiamo detto cosa fare se la password è sbagliata, magari
> possiamo semplicemente fare in modo che resti aperta la maschera senza
> andare a "start".
Così già lo fa perchè apre solo se trova la corrispondenza
>
>
>
> > Sì ma non ti conviene rischiare. Io al tuo posto li lascerei entrare
senza
> > la richiesta psw di prima e inserirei una password nella maschera che
rende
> > i controlli visibili oppure esplelle l'utente.
>
>
> buona idea
> > Anch'io ti dirò queste stesse parole dopo che sarai andata in banca a
farmi
> > un cospicuo bonifico.
>
> ok, numero C/C, ABI E CAB :-)
>
> rispondimi presto così torno a casa ad un'ora decente.
> grazieeeee
ci vediamo domani.
MAssimilaino


title: aiuto: user + pwd

text:
GRAZIE MA!
sei stato davvero paziente e gentile!!!!
un'ultima domanda e per stasera chiudiamo.
č possibile creare una tabella che ad ogni log in scriva lo user in cui č
avvenuto?
grazie ancora e buona serata!



title: aiuto: user + pwd

text:
> GRAZIE MA!
> sei stato davvero paziente e gentile!!!!
> un'ultima domanda e per stasera chiudiamo.
> č possibile creare una tabella che ad ogni log in scriva lo user in cui č
> avvenuto?
> grazie ancora e buona serata!
>
> dany xxx
Certo dopo afetreupdate accodi alla tabella che vuoi e magari se ti va
aggiungi anche il campo ora_di_log con valore predefinito now()
MAssimiliano


title: aiuto: user + pwd

text:
> Certo dopo afetreupdate accodi alla tabella che vuoi e magari se ti va
> aggiungi anche il campo ora_di_log con valore predefinito now()
> MAssimiliano
un mega buongiorno caro Massimiliano!
x cortesia (sempre se non ti disturbo) mi diresti il comando da scrivere
per fare in modo che dopo aver aperto la maschera "start" si chiuda la
maschera dove avevo inserito user e pwd?
grazie 1000!!!



title: aiuto: user + pwd

text:
>
> > Certo dopo afetreupdate accodi alla tabella che vuoi e magari se ti va
> > aggiungi anche il campo ora_di_log con valore predefinito now()
> > MAssimiliano
>
> un mega buongiorno caro Massimiliano!
> x cortesia (sempre se non ti disturbo) mi diresti il comando da scrivere
> per fare in modo che dopo aver aperto la maschera "start" si chiuda la
> maschera dove avevo inserito user e pwd?
> grazie 1000!!!
> dany xxx
Docmd.close "Nometuamaschera"
MAssimiliano
P.s. Antonio, aggiungi alla lista "caro"


title: aiuto: user + pwd

text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:FdPOa.2811$B8....@news.edisontel.com...

Ancora non hai capito che Dany č un camionista dopolavorista che si diletta
di access?
Con certi baffetti (BAFFETTI) da sparviero...
Antonio


title: aiuto: user + pwd

text:
".....antonio....biso...che simpatico umoristaaaaaaa!"



title: aiuto: user + pwd

text:
> > > > Certo dopo afetreupdate accodi alla tabella che vuoi e magari se ti
va
> > > > aggiungi anche il campo ora_di_log con valore predefinito now()
> > > > MAssimiliano
> > >
> > > un mega buongiorno caro Massimiliano!
> > > x cortesia (sempre se non ti disturbo) mi diresti il comando da
scrivere
> > > per fare in modo che dopo aver aperto la maschera "start" si chiuda la
> > > maschera dove avevo inserito user e pwd?
> > > grazie 1000!!!
> > > dany xxx
> >
> > Docmd.close "Nometuamaschera"
> > MAssimiliano
> >
> > P.s. Antonio, aggiungi alla lista "caro"
>
> Ancora non hai capito che Dany č un camionista dopolavorista che si
diletta
> di access?
> Con certi baffetti (BAFFETTI) da sparviero...
>
> Antonio
Io non sono un condor come te, che appena annusa (o meglio, dopo gli EA,
"annusava" una gonnella) ci si fionda.
Gli altri vezzeggiativi venivano da uomini e li ho sottolineato lo stesso.
Domanda: si dice che prima correvi dietro le gonnelle, dopo gli EA corri
dietro i Kilt. Che c'č di vero???
MAssimiliano


title: aiuto: user + pwd

text:
> Docmd.close "Nometuamaschera"
> MAssimiliano
..va in bebug!!!!!
ho inserito come nome della maschera quello che vedo quando apro il db.
giusto?



title: aiuto: user + pwd

text:
>
>
> > Docmd.close "Nometuamaschera"
> > MAssimiliano
>
> ..va in bebug!!!!!
> ho inserito come nome della maschera quello che vedo quando apro il db.
> giusto?
>
> dany xxx
Sorry
docmd.close acform "tuamaschera"
ciao MAssimiliano


title: aiuto: user + pwd

text:
> Sorry
> docmd.close acform "tuamaschera"
> ciao MAssimiliano
purtroppo mi dice "errore di compilazione: previsto fine istruzione"
posso scriverti ad un indirizzo email privato?
grazie
dany



title: aiuto: user + pwd

text:
> > Sorry
> > docmd.close acform "tuamaschera"
> > ciao MAssimiliano
>
> purtroppo mi dice "errore di compilazione: previsto fine istruzione"
> posso scriverti ad un indirizzo email privato?
>
> grazie
> dany
Se vuoi farň io da mirror al Ng
keiko...@libero.it
ciao MAssimiliano


title: aiuto: user + pwd

text:
> Se vuoi farò io da mirror al Ng
>
keiko...@libero.it
> ciao MAssimiliano
va bene.
intanto ti ho scritto.



title: aiuto: user + pwd

text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:OAPOa.2822$B8....@news.edisontel.com...
> > Ancora non hai capito che Dany č un camionista dopolavorista che si
> diletta
> > di access?
> > Con certi baffetti (BAFFETTI) da sparviero...
> >
> > Antonio
>
> Io non sono un condor come te, che appena annusa (o meglio, dopo gli EA,
> "annusava" una gonnella) ci si fionda.
IO?!?!!!?
Ma quando mai?!?!?
Antonio


title: aiuto: user + pwd

text:
"dany xxx" <
da...@li.it
> ha scritto nel messaggio
news:beggi4$128$1...@news.newsland.it...
> ".....antonio....biso...che simpatico umoristaaaaaaa!"
C'ho preso eh?
Antonio


title: aiuto: user + pwd

text:
> > > Sorry
> > > docmd.close acform "tuamaschera"
> > > ciao MAssimiliano
> >
> > purtroppo mi dice "errore di compilazione: previsto fine istruzione"
> > posso scriverti ad un indirizzo email privato?
> >
> > grazie
> > dany
>
> Se vuoi farò io da mirror al Ng
>
keiko...@libero.it
> ciao MAssimiliano
A titolo di cronoca Dany sbagliava la casella di testo con cui verificare la
psw
MAssimiliano


title: Innovasys button - qualcuno li usa?

author: RobertoA

text:
Sto riprendendo in mano dei command button usati parecchi anni fa
Parlo della libreria gratuita Innovasys per i command button
Con piacevole sorpresa vedo che funzionano anche sulle recenti versioni
anche a 64 bit di Windows
Consentono di modificare il colore sfondo del tasto ed aggiungere
immaginetta oltre al testo sul tasto stesso
Qualcuno di voi li usa?
Sapete come cambiare dimensione/font della caption tasto?


title: Innovasys button - qualcuno li usa?

text:
Scusa ma ai button nativi, che già fanno tutto quello che hai detto, cosa manca ancora...?

@Alex


title: Innovasys button - qualcuno li usa?

text:
Il 07/04/2019 19:16, @Alex ha scritto:
> Scusa ma ai button nativi, che già fanno tutto quello che hai detto, cosa manca ancora...?
>
> @Alex
>

Manca colorare lo sfondo tasto cambiandogli il backColor
Manca caricare il testo della caption contemporaneamente all'immaginetta
e posizionare caption ed immagine dove vuoi all'interno del tasto
(destra, sinistra, centro, ...)


title: Innovasys button - qualcuno li usa?

text:
Tu sei sicuro di quello che vai dicendo...?

Le 3 cose che hai detto sono tutte fattibili... prova ad informarti meglio... le uso spesso e cambio immagine colore e caption.

@Alex


title: Innovasys button - qualcuno li usa?

text:

Si, potrei sbagliarmi
Usare i button standard sarebbe sicuramente meglio
Una libreria/componente in meno da caricare
Tu come faresti sui button nativi?


title: Innovasys button - qualcuno li usa?

text:
...
> Si, potrei sbagliarmi
> Usare i button standard sarebbe sicuramente meglio
> Una libreria/componente in meno da caricare
> Tu come faresti sui button nativi?

Come farebbe chiunque... ;-)
Quale sarebbe il tuo problema che non capisco...?
I CommandButton NATIVI consentono di accedere a tutte le proprietà basta Manipolarle.

@Alex


title: Innovasys button - qualcuno li usa?

author: BFS

text:

li usavo con access Xp che non permetteva di settare immagine e testo
nello stesso pulsante. idem il colore di sfondo.
Poi li rimpiazzai usando "finti" button che creavo tratite label
opportunamente settate

oggi, con le versioni recenti di access, il problema non si pone, tutte
proprietà del button banalmente impostabili come dice alex

ciao
BFS


title: Innovasys button - qualcuno li usa?

text:

Elora, ambiente Access 2013:
1- apro Access
2- creo nuovo file mdb (ver 2003)
3- butto dentro una form
4- nella form ci butto un command button
5- nelle proprieta' del button:
	immagine=nessuna
	stile sfondo=normale
	trasparente=no
6- su colore sfondo vado a selezionare un bel giallo canarino

a questo punto mi aspetterei di vedere il fondo tasto cambiare di colore
Tu dici che i command button nativi permettono di cambiare colore sfondo
Evidentemente ho dimenticato qualcosa
Che cosa?


title: Innovasys button - qualcuno li usa?

text:

Di che versioni stai parlando?
Perche' sul 2013 non mi sembra sia cosi'
Avrei bisogno quindi del vostro aiuto per capire se realmente il 2013
non possa farlo (e versioni successive si) oppure se sono io che non
trovo la giusta modalita' per ottenere quanto richiesto


title: Innovasys button - qualcuno li usa?

text:

access 2013

https://ibb.co/fXmtrMd

ciao
BFS


title: Innovasys button - qualcuno li usa?

text:

ovvio che poi se questo file lo salvo in formato compatibile con access
2000 e lo apro con access 2000 non vedo ne l'immagine del telefono ne lo
sfondo giallo

ciao
BFS


title: Innovasys button - qualcuno li usa?

text:

Eh si, ora e' ovvio anche per me
Grazie


title: forzare la sincronizzazione - cache penne usb - rimozione sicura hardware

author: tommy

text:
Ho un mdb su una penna usb e c'è il rischio che se l'utente scollega la penna senza usare la rimozione sicura dell'hardware che il database non venga scritto correttamente.
Vorrei allora sapere se c'è un modo per forzare la rimozione sicura dell'hardware dal mio programma, o con vba, o chiamando un'api o un programma esterno.
Ho pensato che all'uscita del programma posso fare una copia del file mdb sulla penna da tenermi come copia di sicurezza, ma questo mi occupa spazio nella penna, quindi cerco una soluzione migliore.


author: ZioPit (.com)

text:
Se stai utilizzando WinXP non hai problemi, in quanto di default le
periferiche rimovibili (penne, HD su USB ecc.) sono ottimizzati per la
rimozione rapida.
Ovviamente se l'mdb è aperto o, peggio ancora, il pc ci sta scrivendo...
sono guai, ma lo sarebbero anche su un pc che viene spento brutalmente.
Verifica che su quel pc questa impostazione non sia stata modificata:
1) clic destro su "Risorse del computer" e scegli "Gestione"
2) Voce Gestione periferiche (colonna sinistra) e quindi, in basso della
colonna destra,  "Unità disco"
3) Trova la tua penna (che ovviamente deve essere già inserita!), clic
destro e "Proprietà
4) Vai sulla linguetta: "Criteri" e vedi che sia selezionata la 1a voce
"tommy" <
tommyg...@leva.yahoo.it
> ha scritto nel messaggio
news:42bac748$0$17096$5fc...@news.tiscali.it...



title: Windows Desktop Search da codice

author: Ungi

text:
(Postato anche su it.comp.lang.visual-basic)
Salve,
è possibile utilizzare le funzionalità di Windows Desktop Search da
programma, cioè leggere il file indice di WDS, magari con qualche API?
In una maschera devo inserire un elenco di file di una determinata cartella
che non posso eseguire con Filesearch()
Grazie
Ciao


title: VBA: eseguire il codice legato ad una casella combinata

author: sd

text:
Salve a tutti,
dovrei far eseguire il codice after_update legato ad una
casella combinata;
la sintassi che utilizzo č: Forms!Copertura_Auto.select_agente_AfterUpdate
dove select_agente č la casella combinata
e Copertura_Auto la maschera
l'errore č:
"Erore runtime 2465  errore definito dall'applicazione o dall'oggetto"
grazie
sdamy


text:
Scrivi :
> dovrei far eseguire il codice after_update legato ad una
> casella combinata;
per far cosa?
> la sintassi che utilizzo č: Forms!Copertura_Auto.select_agente_AfterUpdate
questa č la sintassi di tutto il codice che usi sull'evento? E che č?
Dimmi cosa devi fare (sul serio)
--
Maurizio75


text:
"Maurizio75" <
e...@gevi.it
> ha scritto nel messaggio
news:PRNG8.1261$se2....@twister1.libero.it...

cliccando su di un bottone
devo far eseguire il codice di un evento
di una casella combinata...
ciao
sdamy


text:
> cliccando su di un bottone
> devo far eseguire il codice di un evento
> di una casella combinata...
>
> ciao
> sdamy
Potresti lavorare nelle Poste e Telecomunicazioni... sei un telegramma
quando scrivi...
Mi hai praticamente detto la stessa cosa di prima, il problema è che neanche
prima eri stato chiaro...
vediamo se ho tradotto bene le tue intenzioni...
Vuoi eseguire da un pulsante (quindi dall'evento Clik) il codice
(dell'evento modifica) di una casella combinata... che non si trova nella
stessa Form del pulsante?
Ho capito bene o no?
(Scommetto che al massimo criverai SI)
--
Maurizio75


text:
Mi devi dettagliatamente spiegare cosa ti serve, altrimenti tolgo del tempo
ad altre risposte per comprendere un tuo problema
--
Maurizio75


author: Alberto S.

text:
"sd" <
sd...@tiscalinet.it
> ha scritto nel messaggio
news:acg3lb$plo$1...@lacerta.tiscalinet.it...

Ciao Sdamy,
Io sono riuscito a riprodurre il tuo errore se:
- la maschera Copertura_Auto č in visualizzazione struttura
- la routine chiamata č stata dichiarata 'private' anziché 'public'
Addirittura, dopo aver generato l'errore nella seconda maniera, non riuscivo
piů - una volta ridichiarata 'public' la routine - a far riprendere a
funzionare correttamente il tutto.
Allora, memore di un suggerimento di Roberto, ho 'ripulito' il db con il
file 'pulibatch97.mdb' (Sezione General del Sito Comune - titolo "Ridurre le
dimensioni dell'mdb.").
E ora mi funziona tutto a puntino... prova a vedere se puň andare anche per
te.
Eventualmente, se ti puň servire, qualche giorno fa Karl Donaubauer, ha
anche spiegato come lanciare una routine che si trova in una maschera non
aperta.
Ciao
--
Alberto


text:
"Alberto S." <
sartor...@tin.it
> ha scritto nel messaggio
news:ach1p4$pn2pa$1...@ID-134626.news.dfncis.de...

Il problema era dovuto al fatto che avevo
dichiarato la procedura come Private.
Mettendo la procedura aPubblic il tutto funziona!
grazie
ciao ciao
sdamy


text:
"Maurizio75" <
e...@gevi.it
> ha scritto nel messaggio
news:n4PG8.1560$se2....@twister1.libero.it...

.... e tu potresti far concorrenza a Manzoni...
cmq come vedi Alberto S. aveva capito il problema
e ho risolto dichiarando 'Pubblic' la procedura.
grazie cmq!
ciao ciao
sdamy
P.S.: qui al lavoro non ho molto tempo
per scrivere dettagliatamente...


text:
> .... e tu potresti far concorrenza a Manzoni...
>
> cmq come vedi Alberto S. aveva capito il problema
> e ho risolto dichiarando 'Pubblic' la procedura.
>
> grazie cmq!
>
> ciao ciao
> sdamy
>
> P.S.: qui al lavoro non ho molto tempo
> per scrivere dettagliatamente...
>
Tutto è bene quel che finisce bene.
--
Maurizio75


text:
[CUT]
> Il problema era dovuto al fatto che avevo
> dichiarato la procedura come Private.
> Mettendo la procedura aPubblic il tutto funziona!
>
> grazie
>
> ciao ciao
> sdamy
Cioč vorresti dire che a me si č 'intorcolato' (veronesismo) il db e tu te
la sei cavata con un banalissimo 'Public' ????????????????
Beh, pazienza... ho avuto modo di verificare che il suggerimento di Roberto
era giusto :)
Ciao
--
Alberto


title: copiare una tabella

text:
Ho un programma suddiviso in BE e FE. Vorrei copiare le tabelle che ho
sul BE tramite codice dal FE. Le copie delle tabelle che devo creare
dovranno risiedere sul BE stesso (ad es. una tabella Clienti di
Archivio_BE.MDB dovrà essere copiata in NuovoClienti sempre su
Archivio_BE.MDB). Ho guardato CopyObject ma non mi sembra che mi sia
di aiuto.
Avete qualche suggerimento?
Grazie
Spartaco


title: copiare una tabella

text:
<
spartac...@tiscalinet.it
> ha scritto nel messaggio
news:39e23320...@news.tiscalinet.it...

Si! è proprio copyobject guardalo meglio nell'help!


title: Query a campi incrociati?

author: cancellami @libero.it glt

text:
Salve a tutti
Ho una tabella del tipo
[ID], [Nome],[Indirizzo]
devo fare una query del tipo
[indirizzo], [nome ID1,Nome ID5, Nome ID15]
i tre nomi devono essere nello stesso campo e separati dalla virgola
(ammesso che all'indirizzo corrispondano ID1,ID5 e ID15)
grazie a tutti x l'aiuto
NB con la creazione guidata di Q a Campi incrociati posso cereare una
colonna x ogni nome non mettere tutti i nomi in fila nello stesso campo! O
sbaglio?


title: Query a campi incrociati?

author: Roberto dalla campagna

text:
"glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
news:oim%c.81831$1V3.2...@twister2.libero.it...

Sicuramente non puoi risolvere il tuo problema con una query a campi
incrociati.
Ti consiglio di crearti una query di raggruppamento su Indirizzo e ricavarti
in un campo calcolato, con l'ausilio di una funzione in VBA, ciň che ti
serve.
Se la tabella che contiene i dati si chiama Tabella1, in un modulo del tuo
database memorizza la seguente funzione:
Public Function Nomi(Indirizzo As String) As String
Dim rst As DAO.Recordset
Nomi = ""
Set rst = CurrentDb().OpenRecordset("Tabella1")
rst.MoveFirst
Do Until rst.EOF
    If rst!Indirizzo = Indirizzo Then
        Nomi = Nomi & rst!Nome & ", "
    End If
    rst.MoveNext
Loop
Nomi = Left(Nomi, Len(Nomi) - 2)
Set rst = Nothing
End Function
Quindi creati una query di raggruppamento che abbia il seguente codice SQL:
SELECT Tabella1.Indirizzo, Nomi([Indirizzo]) AS TuttiNomi
FROM Tabella1
GROUP BY Tabella1.Indirizzo;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Query a campi incrociati?

text:
Ti ringrazio molto ho riprodotto con successo il tuo esempio.
avrei un ultima richiesta: ho provato ad applicare la funzione avendo 3
campi anziache uno ma senza successo.
in realtą ho tre campi id nella mia tebella1: Nome Cognome Titolo
potresti ricompilarmela TU? GRAZIE MOLTE ANCORA.
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:GIA%c.382$6b4....@twister1.libero.it...
>
> "glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
> news:oim%c.81831$1V3.2...@twister2.libero.it...
> > Salve a tutti
> >
> > Ho una tabella del tipo
> >
> > [ID], [Nome],[Indirizzo]
> >
> > devo fare una query del tipo
> >
> > [indirizzo], [nome ID1,Nome ID5, Nome ID15]
> >
> > i tre nomi devono essere nello stesso campo e separati dalla virgola
> > (ammesso che all'indirizzo corrispondano ID1,ID5 e ID15)
> >
> > grazie a tutti x l'aiuto
> >
> > NB con la creazione guidata di Q a Campi incrociati posso cereare una
> > colonna x ogni nome non mettere tutti i nomi in fila nello stesso campo!
O
> > sbaglio?
>
> Sicuramente non puoi risolvere il tuo problema con una query a campi
> incrociati.
>
> Ti consiglio di crearti una query di raggruppamento su Indirizzo e
ricavarti
> in un campo calcolato, con l'ausilio di una funzione in VBA, ciņ che ti



title: Query a campi incrociati?

text:
"glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
news:sZV1d.4180$zF3.1...@twister2.libero.it...
> Ti ringrazio molto ho riprodotto con successo il tuo esempio.
> avrei un ultima richiesta: ho provato ad applicare la funzione avendo 3
> campi anziache uno ma senza successo.
> in realtą ho tre campi id nella mia tebella1: Nome Cognome Titolo
> potresti ricompilarmela TU? GRAZIE MOLTE ANCORA.
>
Innanzitutto quando rispondi scrivi DOPO e non prima del testo dei messaggi
precedenti.
Per risolvere il tuo problema, nel codice del mio messaggio precedente
sostituisci la riga di codice VBA:
Nomi = Nomi & rst!Nome & ", "
con:
Nomi = Nomi & rst!Titolo & " " & _
rst!Nome & " " & rst!Cognome & ", "
[CUT]



title: Query a campi incrociati?

text:
Grazie mille
nella Rubrica tutto funziona x il meglio.
allettato dalla nuova possibilità mi sarebbe utile applicarla in un altro DB
con il quale gestisco un piccolo museo ma nonostante tentativi
fantascientifici non ne sono venuto a capo di niente
Tabella "Sinonimi"
ho 4 campi (anziche uno che nel vecchio esempio corrispondeva all'Indirizzo)
che sono Famiglia,Genere,Specie,Razza
da raggruppare in un unico campo sono i 3 campi (che nel vecchio esempio
corrispondevano al Nome Cognome e Titolo) GenereS,SpecieS,RazzaS (Esiste
anche un campo FamigliaS ma vorrei omettelo x risparmiare caratteri; questi
4 campi formano la chave primaria della tabella)
Tieni conto che in alcuni casi penso vengano superati i 255 caratteri ma
sarebbe sufficiente il campo venisse tagliato al 255 carattere.
----------------------------------
Non vorrei + romperti le scatole x questa faccenda quindi ti chiederei anche
di scrivermi le modifiche da apportare nel caso in cui i campi fossero
divisi da uno spazio (Fa miglia,Ge nere,Spe cie).
ho già fatto le prove e sono riuscito con successo a modificare il modulo x
separare con uno spazio i campi da raggruppare scrivendo No me, Co Gnome e
Ti Tolo
Così x confronto dovrei riuscire a gestire il modulo senza ulteriori
inconvenienti in tutte le altre combinazioni
Un grosso grazie...
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:S5Y1d.4465$zF3.1...@twister2.libero.it...
>
> "glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
> news:sZV1d.4180$zF3.1...@twister2.libero.it...
> > Ti ringrazio molto ho riprodotto con successo il tuo esempio.
> > avrei un ultima richiesta: ho provato ad applicare la funzione avendo 3
> > campi anziache uno ma senza successo.
> > in realtà ho tre campi id nella mia tebella1: Nome Cognome Titolo



title: Query a campi incrociati?

text:
"glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
news:pVb2d.5336$2T6.1...@twister1.libero.it...

A quanto pare proprio non ti va di rispettare una regola di questo NG,
ovvero di scrivere DOPO e non prima del testo dei messaggi precedenti.
Ti anticipo che se continuerai a fregartene di rispettare tale regola, mi
vedrò costretto ad abbandonare il thread.
Non riesco a capire quale sia, nella tabella Sininimi il/i campo/i su cui va
fatto il raggruppamento ed i campi che vanno visualizzati in un unico campo
calcolato della query scanditi da una virgola.
Penso sia bene che tu ci indichi la struttura esatta della tabella e la
funzione che hanno nella query i vari campi.



title: Query a campi incrociati?

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:rqd2d.5727$zF3.1...@twister2.libero.it...

Prova... sono andato in fondo al messaggio e ho scritto...
se sta volta funziona ieri ero un po inebetito


title: Query a campi incrociati?

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:rqd2d.5727$zF3.1...@twister2.libero.it...

Spero di avere sbagliato io ma ero convinto di essere andato in fondo al
messaggio prima di scrivere. scusa
Nella tabella Sinonimi devo raggruppare 4 campi Famiglia,Genere,Specie,Razza
I campi che devo unire in un unico campo sono GenereS,SpecieS,RazzaS
mi ero espresso male. Grazie


title: Query a campi incrociati?

text:
"glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
news:zUB2d.8054$zF3.1...@twister2.libero.it...

si avevo decisamente sbagliato io!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!scusate


title: Query a campi incrociati?

text:
"glt" <glt75 cancellami @
libero.it
> ha scritto nel messaggio
news:3YB2d.8060$zF3.1...@twister2.libero.it...

> Spero di avere sbagliato io ma ero convinto di essere andato in fondo al
> messaggio prima di scrivere. scusa
>
> Nella tabella Sinonimi devo raggruppare 4 campi
Famiglia,Genere,Specie,Razza
> I campi che devo unire in un unico campo sono GenereS,SpecieS,RazzaS
> mi ero espresso male. Grazie
In un modulo del database memorizza questa funzione:
Public Function GenSpecRaz(Famiglia As String, _
Genere As String, Specie As String, _
Razza As String) As String
Dim rst As DAO.Recordset
GenSpecRaz = ""
Set rst = CurrentDb().OpenRecordset("Sinonimi")
rst.MoveFirst
Do Until rst.EOF
    If rst!Famiglia = Famiglia And rst!Genere = Genere _
    And rst!Specie = Specie And rst!Razza = Razza Then
        GenSpecRaz = GenSpecRaz & rst!GenereS & " " _
        & rst!SpecieS & " " & rst!RazzaS & ", "
    End If
    rst.MoveNext
Loop
GenSpecRaz = Left(GenSpecRaz, Len(GenSpecRaz) - 2)
Set rst = Nothing
End Function
e creati una query di raggruppamento che abbia il seguente codice SQL:
SELECT Famiglia, Genere, Specie, Razza,
GenSpecRaz([Famiglia],[Genere],[Specie],[Razza]) AS Espr1
FROM Sinonimi
GROUP BY Famiglia, Genere, Specie, Razza;



title: record senza corrispondenze in tab collegata

author: giovanni ferrante

text:
Salve, ho due tabelle collegate da una relazione uno a molti
tipo: un cliente prende molti libri,
come faccio a crearmi una query con tutti i clienti che non hanno preso
nessun libro?
grazie per l'attenzione
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Roberto dal portatile

text:
"giovanni ferrante" <
mia...@miosito.it
> ha scritto nel messaggio
news:87Z10Z71Z203Y1...@usenet.libero.it...
> Salve, ho due tabelle collegate da una relazione uno a molti
>
> tipo: un cliente prende molti libri,
>
> come faccio a crearmi una query con tutti i clienti che non hanno preso
> nessun libro?
Creati una query con l'Autocomposizione ricerca dati non corrispondenti.
>
> grazie per l'attenzione
Prego
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


text:
Il 26 Mar 2007, 10:23, "Roberto dal portatile" <
r.ma...@libero.it
> ha
scritto:

Grazie



title: [Access & SQL Server] Stored Procedure come RecordSource

author: Pablitomf

text:
Ciao a tutti...
ho creato una SP parametrica (parametro multiplo) sul mio Server SQL che
richiamo ed eseguo da codice VBA (sotto allegato)... l'unico problema è che
non riesco a utilizzare direttamente il risultato della SP come Recordsource
di una mia Form, per cui (per arrangiare - sono napoletano lo sapete :-D - )
scorro i risultati della SP e accodo i singoli campi in una tab di
appoggio... aggiungendo per ottenere i dati filtrati i relativi tempi di
esecuzione dell'accodamento... chi sa darmi qualche dritta per ovviare a ciò
e tenere direttamente il Rst della SP come source?
----
Ciao
Pablitomf (Maurizio Facciuti)
Web master
www.accessgroup.it
===============================
Codice VBA :
    Dim Xstart As Date
    Xstart = Now()
    Dim x As Integer
    x = 0
    DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE * from Tbl_Appoggio"
    DoCmd.SetWarnings True
    Dim objConn, objCmd, objRs
    Set objConn = CreateObject("ADODB.Connection")
    Set objCmd = CreateObject("ADODB.Command")
    Dim strCONNESSIONE As String
    strCONNESSIONE = "driver={SQL Server};" & _
                     "Server=mioServer; " & _
                     "Database=mioDb; " & _
                     "Uid=mioUid;" & _
                     "Pwd=miaPwd;"
    objConn.ConnectionString = strCONNESSIONE
    Call objConn.Open
    Set objCmd.ActiveConnection = objConn
    objCmd.CommandType = 4 'Che è la stored, 1 invece è la normale select...
    objCmd.CommandText = "Nome_miaStoredProcedure"
    objCmd.Parameters("@strFiltro") = "comune in
('Milano','CICCIO','Murizio')"
    Set objRs = objCmd.Execute
    '=======================================================
    ' Apri recordset per inserire i risultati
    ' in Tbl_Appoggio
    Dim db As DAO.Database
    Set db = CurrentDb
    Dim rs As DAO.Recordset
    Set rs = db.OpenRecordset("Tbl_Appoggio")
    Do While Not objRs.EOF
        With objRs
            With rs
                .AddNew
                !ChiaveSQL = objRs("ChiaveSQL")
                !Comune = objRs("Comune")
                .Update
            End With
            objRs.MoveNext
        End With
        x = x + 1
    Loop
    Set rs = Nothing
    Set db = Nothing
    ' Chiudi
    '=======================================================
    SubFrm.Requery
    Dim Xstop As Date
    Xstop = Now()
    MsgBox "Totale record filtrati : " & x & vbCrLf & "in " & DateDiff("s",
Xstart, Xstop) & " sec."
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj4k47$l6c$1...@tdi.cu.mi.it...
> Ciao a tutti...
> ho creato una SP parametrica (parametro multiplo) sul mio Server SQL che
> richiamo ed eseguo da codice VBA (sotto allegato)... l'unico problema è
> che
> non riesco a utilizzare direttamente il risultato della SP come
> Recordsource
> di una mia Form, per cui (per arrangiare - sono napoletano lo sapete
> :-D - )
> scorro i risultati della SP e accodo i singoli campi in una tab di
> appoggio... aggiungendo per ottenere i dati filtrati i relativi tempi di
> esecuzione dell'accodamento... chi sa darmi qualche dritta per ovviare a
> ciò
> e tenere direttamente il Rst della SP come source?
>
> ----
> Ciao
> Pablitomf (Maurizio Facciuti)
> Web master
www.accessgroup.it
>
Non so se possa esservi utile, ma nel caso vi allego anche la SP del server
:
USE [ProvaSQL]
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[FNC_FILTRO] (@strFiltro varchar(500))
AS
BEGIN
SET NOCOUNT ON;
DECLARE @v varchar(1000)
SET @v = 'SELECT * from dbo.Tbl_Comuni'
SET @v = @v + ' WHERE '
SET @v = @v + @strFiltro
EXEC (@v)
END


text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj4k47$l6c$1...@tdi.cu.mi.it...
> Ciao a tutti...
> ho creato una SP parametrica (parametro multiplo) sul mio Server SQL che
> richiamo ed eseguo da codice VBA (sotto allegato)... l'unico problema è
> che
> non riesco a utilizzare direttamente il risultato della SP come
> Recordsource
> di una mia Form, per cui (per arrangiare - sono napoletano lo sapete
> :-D - )
> scorro i risultati della SP e accodo i singoli campi in una tab di
> appoggio... aggiungendo per ottenere i dati filtrati i relativi tempi di
> esecuzione dell'accodamento... chi sa darmi qualche dritta per ovviare a
> ciò
> e tenere direttamente il Rst della SP come source?
>
Non mi fucilare se è una osservazione stupida, ma non potresti usare una
Funzione definita dall'utente?
La SP deve fare delle operazioni sui dati o deve solo eseguire delle select?


author: ALESSANDRO Baraldi

text:
> ALTER PROCEDURE [dbo].[FNC_FILTRO] (@strFiltro varchar(500))
> AS
> BEGIN
> SET NOCOUNT ON;
> DECLARE @v varchar(1000)
> SET @v = 'SELECT * from dbo.Tbl_Comuni'
> SET @v = @v + ' WHERE '
> SET @v = @v + @strFiltro
> EXEC (@v)
> END
Una cosa così fa schifo...?
ALTER PROCEDURE [dbo].[FNC_FILTRO] (@strFiltro varchar(500))
AS
IF @strFiltro=''
    SELECT * from dbo.Tbl_Comuni
ELSE
    SELECT * from dbo.Tbl_Comuni
    WHERE @strFiltro
RETURN
La chiami come ti dissi a suo tempo... e restituisce il Recordset che puoi
associare
ad una FORM oppure ad una LISTBOX.
' Dichiari a livello di FORM
Private RunSP as DAO.Recordset
' Dichiari nella funzione:
    Dim qdf As DAO.QueryDef
    Set qdf = DBEngine(0)(0).CreateQueryDef("")
    With qdf
        .Connect = CNNSTR
        .ReturnsRecords = true
        .SQL = strSQL
    End With
    Set RunSPT = qdf.OpenRecordset(dbOpenSnapshot)
    Set Me.Recordset=RunSPT
    ' Anulla solo qdf.... il RECORDSET DEVE RIMANERE APERTO... FINCHE' la
FORM
    ' è aperta... lo chiudi su UNLOAD.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


text:
Ho forse abbreviato un pò... troppo...?
CNNSTR è la stringa di connessione al SERVER SQL per la Query PassTrought
TEMPORANEA
mentre :
.SQL = strSQL
dove strSQL è la chiamata alla SP
strSQL = "EXEC FNC_FILTRO '" & strCONDIZIONE & "'
a sua volta strCONDIZIONE sarà la tua struttura...!
Speriamo bene...
;-)



text:
> Non mi fucilare se è una osservazione stupida, ma non potresti usare una
> Funzione definita dall'utente?
> La SP deve fare delle operazioni sui dati o deve solo eseguire delle
> select?
Ti lascio scegliere... Baionetta o canna mozza? :-D


author: Alessandro Cara

text:
Pablitomf wrote:
>> Non mi fucilare se č una osservazione stupida, ma non potresti usare una

Perche' non una atomica tattica?
--
ac
y-1=x


text:
"Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
news:CXk5j.656$8j3...@tornado.fastwebnet.it...

Xkč siam vicini a Natale ;)


text:
Pablitomf wrote:
> "Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
> news:CXk5j.656$8j3...@tornado.fastwebnet.it...
>> Pablitomf wrote:
>>>> Non mi fucilare se è una osservazione stupida, ma non potresti usare una
>>>> Funzione definita dall'utente?
>>>> La SP deve fare delle operazioni sui dati o deve solo eseguire delle
>>>> select?
>>> Ti lascio scegliere... Baionetta o canna mozza? :-D
>> Perche' non una atomica tattica?
>
> Xkè siam vicini a Natale ;)
>
>
Appunto.
Hai visto il film di De Crescenzo (non mi ricordo il titolo, e tratto
comunque da un suo libro) nell'episodio di quel tuo conterraneo che fa
appunto scoppiare una quasi "atomica tattica" dopo capodanno. Mi ha
fatto piegare in due dalle risate.
--
ac
y-1=x


text:
> Speriamo bene...
ci avevo già provato...
forse sbaglio qualcosa?
Private RunSP As DAO.Recordset
Private Sub cmdAlex_Click()
    On Error GoTo Err_RunSPT
    Dim strCONDIZIONE As String
    strCONDIZIONE = "comune in ('napoli','milano')"
    Dim strSql As String
    strSql = "EXEC dbo.FNC_FILTRO " & Chr(34) & strCONDIZIONE & Chr(34)
    Dim db As DAO.Database
    Dim qdf As DAO.QueryDef
    Set db = DBEngine(0)(0)
    Set qdf = db.CreateQueryDef("")
    Dim CNNSTR As String
    CNNSTR =
"ODBC;DSN=ProvaDB;Description=ProvaDB;UID=sa;PWD=sys64738raq;DATABASE=ProvaSQL"
    With qdf
        .Connect = CNNSTR
        .ReturnsRecords = fReturnRecords
        .SQL = strSql
    End With
    If fReturnRecords = True Then
        Set RunSPT = qdf.OpenRecordset(dbOpenSnapshot)
        Set Me.Recordset = RunSPT
    Else
        DoCmd.SetWarnings False
        qdf.Execute
        DoCmd.SetWarnings True
        RunSPT = True
    End If
Exit_RunSPT:
    Exit Sub
Err_RunSPT:
    MsgBox Err.Description
    Resume Exit_RunSPT
End Sub


text:
strSql = "EXEC dbo.FNC_FILTRO '" & strCONDIZIONE & "'"
mi sa errore di connessione ODBC :


author: giorgio rancati

text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj4nst$p1v$1...@tdi.cu.mi.it...
>> Speriamo bene...
>
> ci avevo già provato...
> forse sbaglio qualcosa?
>
> Private RunSP As DAO.Recordset
>
> Private Sub cmdAlex_Click()
>    On Error GoTo Err_RunSPT
>    Dim strCONDIZIONE As String
>    strCONDIZIONE = "comune in ('napoli','milano')"
>
>    Dim strSql As String
>    strSql = "EXEC dbo.FNC_FILTRO " & Chr(34) & strCONDIZIONE & Chr(34)
[CUT]
Ciao Maurizio,
Come scriveresti la EXEC in Management Studio ?
Così giusto ?
----
EXEC dbo.FNC_FILTRO 'comune in (''napoli'',''milano'')'
----
quindi per comporre la stringa equivalente da VBA....
----
 strSql = "EXEC dbo.FNC_FILTRO '" & Replace(strCONDIZIONE,"'","''")  & "'"
----
:-)
--
Giorgio Rancati
[Office Access MVP]


author: MA

text:
Alessandro Cara wrote:
>>>> Ti lascio scegliere... Baionetta o canna mozza? :-D
>>> Perche' non una atomica tattica?
>>
>> Xkè siam vicini a Natale ;)
>>
>>
> Appunto.
> Hai visto il film di De Crescenzo (non mi ricordo il titolo, e tratto
> comunque da un suo libro) nell'episodio di quel tuo conterraneo che fa
> appunto scoppiare una quasi "atomica tattica" dopo capodanno. Mi ha
> fatto piegare in due dalle risate.
32 dicembre
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4755e5fa$0$21196$5fc...@news.tiscali.it...

Maròòò mi ero perso in un bicchiere d'acqua! :-D
l'ora tarda che fa fare! :-D
DENGHIU a all around...
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


author: Alessandro Baraldi

text:
On 5 Dic, 10:10, "Pablitomf" <
pablit...@hotmail.it
> wrote:
> "giorgio rancati" <
giorgio_No_Spalmer_ranc...@tiscali.it
> ha scritto nel
> messaggionews:4755e5fa$0$21196$5fc...@news.tiscali.it...
>
>
>
>
>
>
>
> > "Pablitomf" <
pablit...@hotmail.it
> ha scritto nel messaggio

Bene sono pure contento che ci ho preso...!
Ciao
@Alex


text:
>Bene sono pure contento che ci ho preso...!
sai invece cosa non riesco ad ottenere ? il numero dei record restituiti
della SP... ho provato ad inserire una variabile di outpup che calcolasse il
@@ROWCOUNT ma poi non va + la chiamata ODBC...
ho provato per cui ad eseguire nella SP una seconda select (uguale alla
prima ma con raggruppamento conteggio) sul filtro generico... bene, funzia
sta cosa se la eseguo dal Manager tool, nel senso che dati i parametri, mi
visualizza come risultato 2 qry.. 1 con tutti i record, e l'altra con il
conteggio degli stessi... con il metodo usato, il Set me.recordset si piazza
sulla prima select effettuata... la seconda, come la richiamo per avere il
conteggio dei records?
Ovviamente se c'è un modo migliore, che ben venga
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


text:

fai un'altra SP e calcoli solo quello



text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj622r$rl0$1...@tdi.cu.mi.it...
> >Bene sono pure contento che ci ho preso...!
>
> sai invece cosa non riesco ad ottenere ? il numero dei record restituiti
> della SP... ho provato ad inserire una variabile di outpup che calcolasse
> il @@ROWCOUNT ma poi non va + la chiamata ODBC...
[CUT]
scusa, ma visto che popoli un recordset, ti basta leggere la proprietą
recordcount.
no ?



text:
> scusa, ma visto che popoli un recordset, ti basta leggere la proprietą
> recordcount.
> no ?
in teoria č quello che pensavo anche io... ma in pratica non funge


text:
>fai un'altra SP e calcoli solo quello
sarebbe risolutiva ma DONGIPIACE... fare 2 chiamate al server per fare un
operazione comune che di fatto dovrebbe già esserci non è un
ottimizzazione... devo per forza fare diversamente


text:
> deve fungere, hai fatto un movelast prima di leggere recordcount ?
certo!


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4756a8e9$0$16031$5fc...@news.tiscali.it...
>
> "Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
> news:fj6821$3ck$1...@tdi.cu.mi.it...

> deve fungere, hai fatto un movelast prima di leggere recordcount ?
>
Aspč--- ma tu č di questa che parli? (perchč č questa che mi popola il
form... + precisamente Set Me.Recordset = RunSPT)
    Set db = DBEngine(0)(0)
    Set qdf = db.CreateQueryDef("")
    Dim CNNSTR As String
    CNNSTR = "mia stringa"
    With qdf
        .Connect = CNNSTR
        .ReturnsRecords = fReturnRecords
        .SQL = strSQL



text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj6a1r$6bh$1...@tdi.cu.mi.it...
>
> Aspè--- ma tu è di questa che parli? (perchè è questa che mi popola il
> form... + precisamente Set Me.Recordset = RunSPT)
non ha importanza cosa usi, un DAO recordset è sempre un DAO recordset.
Puoi anche fare
Me.RecordsetClone.Movelast
MsgBox Me.RecordsetClone.RecordCount
Ciao



text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4756be4a$0$21204$5fc...@news.tiscali.it...
>
> "Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
> news:fj6a1r$6bh$1...@tdi.cu.mi.it...
>>
>> Aspè--- ma tu è di questa che parli? (perchè è questa che mi popola il
>> form... + precisamente Set Me.Recordset = RunSPT)
>
> non ha importanza cosa usi, un DAO recordset è sempre un DAO recordset.
> Puoi anche fare
> Me.RecordsetClone.Movelast
> MsgBox Me.RecordsetClone.RecordCount
si in effetti avevo già fatto così... infatti così va... ma mi sembrava
strano che il recordcount diretto non andasse e non va


text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fj6h21$gi6$1...@tdi.cu.mi.it...
>
> si in effetti avevo giŕ fatto cosě... infatti cosě va... ma mi sembrava
> strano che il recordcount diretto non andasse e non va
mha.. a me funziona anche cosě, pur collegandomi a Db remoti via VPN.
----
   ...
   ...
   If fReturnRecords = True Then
        Set RunSPT = qdf.OpenRecordset(dbOpenSnapshot)
        RunSPT.MoveLast
        MsgBox RunSPT.RecordCount
        Set Me.Recordset = RunSPT
    Else
        ecc ecc
    End If
----



title: Controllo di Word con Access97

author: Enrico

text:
Ho creato un DB con Access97 dove inserisco in Word una serie di campi
contenuti in una tabella.
Il problema è che vorrei incolonnarli come in una tabella, ma non saprei
come fare.
Qualcuno potrebbe darmi qualche suggerimento ?
Ciao e grazie a tutti
Enrico


title: Controllo di Word con Access97

author: Stefano

text:
Ti consiglio di generare un report basato sulla tabella ed esportare il
report in formato Word. I dati ti verranno incolonnati con la tabulazione.
Utilizzando il codice in un pulsante puoi visualizzare direttamente il file
di Word senza passare per il report
 DoCmd.OutputTo acOutputReport, "NomeReport", acFormatRTF,
"C:\NomeReport.rtf", True
Ciao
Stefano
--
Posted from root@[212.104.51.2]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: campo CAP che inizia con lo zero in Report

text:
Nonostante abbia seguito i diversi post sull'argomento, continuo ad
avere problemi con i campi del CAP che iniziano con lo zero (es.
00100...viene visualizzato 100) quando compilo un report.
Il campo è in formato STANDARD mentre nella tabella è visualizzato
correttamente come Numerico.
Grazie


author: Karl Donaubauer

text:

CAP sono ciffre alfanumeriche non numeri per calcoli ecc.
Cioè non usa un tipo numerico nella tabella ma il tipo testo.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:

...ma non capisco...io nella tabella ho messo tipo testo. Nel report
come devo impostarlo?


author: RobertoA

text:
"skate2k5" <
skat...@fastwebnet.it
> ha scritto nel messaggio
news:57d1f8b4-f539-40cd...@e1g2000yqh.googlegroups.com...


-------------------------------
Cava via el   'standard'


text:
On 24 Mar, 05:46, "RobertoA" <
amoro...@tiscalinet.it
> wrote:
> "skate2k5" <
skate...@fastwebnet.it
> ha scritto nel messaggionews:57d1f8b4-f539-40cd...@e1g2000yqh.googlegroups.com...

Denghiu!


title: pagine html e query

author: gioeassueisa

text:
          salve a tutti, e grazie per la montagna di materiale ...
la domanda č:
č possibile lanciare da una pagina html il codice VB associato ad un
pulsante di comando in una form?
il comando apre una query e poi la stampa: vorrei farlo fare da un utente
senza che metta mano direttamente al database quindi da una pagina html
grazie per la collaborazione.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: pagine html e query

author: Gaspare

text:
[CUT]
Ciao,
forse intendevi dire che vuoi farlo da codice asp visto che html si
posteggia sul web...sai è un pò pigro in questo senso ! ;-)


title: pagine html e query

text:
[CUT]
Ciao,
spero di non averti messo paura -> quello che intendevo dirti č che non puoi
combinare vb con html almeno che tu non voglia crearti un controllo ActiveX
da far girare su pagina web.
Se vuoi rimanere a casa dello zio "Bill" puoi cercare di combinare asp
(
asp.net
) con html...non sņ se sono stato chiaro! :-)


title: pagine html e query

author: Giacomo Alessandroni

text:

Se invece conosci il php non cambia nulla, solo che php non supporta
nativamente Access e lo dovrai richiamare via ODBC. Il tutto dipende
da quali linguaggi sono istallati sul tuo web server. Se sono
servizi di hosting di massa [leggi virgilio & co.] non dovresti
avere problemi. Non e' pero' scontato che tutti supportino tutti i
linguaggi.
--
Giacomo Alessandroni
g.aless...@peacelink.it
Associazione PeaceLink
http://www.peacelink.it/
VoIP @ Skype
callto://galessandroni


title: EAN13

author: beks

text:
Qualcuno mi potrebbe inviare od indicare dove reperire il font per stampare
i barcode EAN13
ringrazio fin d'ora
beck


title: [3/4 ot] Come fareste per registrare lo schermo pc + audio conversazione al cellulare?

text:
Portate pazienza per il mezzo ot, ma sicuramente a molti di voi, dovendo
fare assistenza da remoto, sara' capitato lo stesso problema, e magari
avete trovato una soluzione ottimale
Ipotizziamo siate collegati via teleassistenza con la postazione di un
vostro cliente/amico/semplice conoscente  :)
Per ricordarvi di quel che vi state dicendo, registrate il video con uno
dei tanti registratori di schermo, ad esempio Bandicam
Pero' siete in comunicazione col vostro interlocutore via cellulare
La domanda e':  come fare per inserire nella registrazione video anche
l'audio della conversazione telefonica?

Una possibilita' e' usare un semplice microfono audio su pc, mettere in
vivavoce il telefono e far 'sentire' al microfono pc la conversazione

Gia' provato, e non mi soddisfa perche' la mia voce si sente bella
chiara, quella dell'interlocutore molto bassa
Quindi mi chiedevo quale sistema usare per 'trasferire' in realtime
l'audio della conversazione telefonica sul pc in modo che possa essere
acquisito dal registratore video


title: connessione ODBC

author: Agos

text:
Ok!
Ho imparato un'altra cosa
Grazie, ciao
Agos


title: connessione ODBC

author: Ivan da casa

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:4677f42b$0$36444$4faf...@reader5.news.tin.it...

esultiamo esultiamo !
Ha imparato un'altra cosa !
Ma ..... cosa ? mah! chissà!
Ivan


title: connessione ODBC

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:46782af9$0$4797$4faf...@reader4.news.tin.it...

>Ma quanto sei divertente!
E' vietato sbagliare? E' obbligatorio pigliare per il c... chi ha meno
pratica di te?


title: connessione ODBC

author: Ammammata

text:
"Agos" <
aga...@alice.it
> wrote in
news:4678e1d8$0$10626$
4faf...@reader2.news.tin.it
:

penso che la 'critica' di Ivan fosse rivolta al tuo post, assolutamente
inutile su questo niusgruppo in quanto privo di informazioni
se tu hai imparato a gestire le connessioni odbc grazie a un libro o a un
sito dovresti quantomeno segnalarlo in modo che altri possano trarne
giovamento
ma come scrivo bene... ;)
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\


title: connessione ODBC

author: Sergio MAZZA

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:4678e1d8$0$10626$4faf...@reader2.news.tin.it...
> Ma quanto sei divertente!
> E' vietato sbagliare? E' obbligatorio pigliare per il c... chi ha meno
> pratica di te?
Mhmm...
Non male come proposta; potrebbe essere inserita nelle regole di questo NG:
www.sitocomune.com
 Sezione ICAA - Come comportarsi in questo NG.
Ciao.
--
Sergio MAZZA


title: connessione ODBC

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:4678e1d8$0$10626$4faf...@reader2.news.tin.it...

non prendertela a male.
Forse adesso ti sei messo un semplice dubbio, o forse no.
Il tuo post sembra una risposta a qualche discussione, che forse è presente,
ma sparato così non ha nessun senso.
Volevo fare un pò di ironia e comunque non voglio accendere polemiche o
'flames'.
Anche nel secondo post non hai proposto nessun chiarimento al tuo primo e
quindi ritieni che queste info siano riservate a te e chi ha condiviso con
te la discussione originale.
Perchè non ci metti al corrente ? non temere se la complessità del oggetto è
smisurata, semmai ti chiediamo ulteriori chiarimenti.
Siamo tutti qui a 'condividere' i nostri bagagli. Io 'leggo' per il il 99% e
se posso propongo una mia soluzione. Mi ritengo un 'leecher', uno che prende
senza dare...
Dai ! facci sapere ! ;))
IvanDaBologna


title: connessione ODBC

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio news:467953ba$0$37196$4faf...@reader3.news.tin.it...
---omissis---
> Dai ! facci sapere ! ;))
Occhio alle incitazioni eheee...

> IvanDaBologna
Ciao.
--
Sergio MAZZA


title: connessione ODBC

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:467953ba$0$37196$4faf...@reader3.news.tin.it...

In realtà volevo ringraziare Giorgio Rancati che mi aveva aiutato con un
problema di connessione a db MySQL. Per errore non ho risposto a lui ma mi è
'sfuggita' una risposta al NG. Mi sono sentito deriso dalla tua battuta e ho
reagito male. Mi scuso quindi con il NG e con te che, adesso l'ho appreso,
non avevi intenzione di prendermi in giro, quanto piuttosto di scherzare un
po'.
Ciao, Agos


title: connessione ODBC

text:
[..]
>
> In realtà volevo ringraziare Giorgio Rancati che mi aveva aiutato con un
> problema di connessione a db MySQL. Per errore non ho risposto a lui ma mi
> è 'sfuggita' una risposta al NG. Mi sono sentito deriso dalla tua battuta
> e ho reagito male. Mi scuso quindi con il NG e con te che, adesso l'ho
> appreso, non avevi intenzione di prendermi in giro, quanto piuttosto di
> scherzare un po'.
> Ciao, Agos
LOL  ;))
ciao, grazie e buone connessioni :D
IvanDaBologna


title: Menu strumenti - opzioni - Modifica\Trova -Forzare flag da codice

author: MC

text:
Salve,
come da oggetto, avrei bisogno che alla partenza del DB, questo vada a
verificare che i flag:
Modifica Record
Eliminazione Documento
Query di comando
presenti nel menu Strumenti - Opzioni - Modifica\Trova -> siano tutti
forzati a False.
Bene, questo è quello che vorrei poter ottenere, potete darmi qualche
dritta per favore?
Grazie mille.
MCX


author: Marco Pizzamiglio

text:
MC ha scritto:
> Salve,
> come da oggetto, avrei bisogno che alla partenza del DB, questo vada a
> verificare che i flag:
> Modifica Record
> Eliminazione Documento
> Query di comando
> presenti nel menu Strumenti - Opzioni - ModificaTrova -> siano tutti
> forzati a False.
> Bene, questo č quello che vorrei poter ottenere, potete darmi qualche
> dritta per favore?
> Grazie mille.
> MCX
Cerca sull'help <F1>: GetOption, SetOption, "Impostare le opzioni da
Visual Basic", esempi e argomenti correlati.
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
[cut]
Ottimo, grazie!


title: AIUTOOOOOOOOO

author: Pino

text:
Come faccio ad evitare lo sfarfallio del monitor quando passo da una mashera
ad un altra?
uso una macro che ingrandisce la maschera a tutto schermo sbaglio?
grazie


title: AIUTOOOOOOOOO

text:
"Pino" <
fox...@tin.it
> ha scritto nel messaggio
news:mNHY6.4473$8R5....@news.infostrada.it...

Prima di tutto evita di scrivere messaggi con oggetto del tipo:
- aiuto;
- sono un principiante;
- affogo!
etc. etc.
A tal proposito leggiti le poche regole di questo NG:
http://www.sitocomune.com/netiquette.htm
Per tornare al tuo problema puoi provare a disabilitare l'echo prima di
aprire una maschera per riabilitarlo in seguito:
Es.
'----------------
DoCmd.Echo False
DoCmd.OpenForm "nomeMaschera"
DoCmd.Maximize
DoCmd.Echo True
'----------------
Ciao.


title: altezza massima colonna report

author: Alberto Santarelli

text:
Salve,
Win XP Pro
Office XP
domanda: esiste un'altezza massima per la colonna del report?
Avendo impostato il formato pagina su A4, non mi si schioda da una lunghezza
massima di 55,873 cm.
Grazie


title: altezza massima colonna report

author: RoDAgo

text:
"Alberto Santarelli" scrisse...

Tratto dall'help in linea:
Proprietà Altezza, Larghezza (italiano)
Proprietà Height, Width (inglese)
...
cut
...
Impostazione
Immettere un numero per l'altezza o la larghezza desiderata utilizzando
l'unità di misura corrente. Per utilizzare un'unità di misura diversa da
quella impostata nella finestra di dialogo Proprietà - Impostazioni
internazionali del Pannello di controllo di Windows, specificarla in
centimetri o pollici, ad esempio 5 cm o 3 in. L'impostazione per la
proprietà Larghezza deve essere un valore compreso tra 0 e 22 pollici (55,87
cm).
Cià
RoDAgo


title: problema orientamento stampa

author: Maurizio

text:
salve a tutti
ho realizzato un'applicazione con A2000 e devo stampare un report su
una stampante lexmark ad aghi
La stampante è configurata per stampare su modulo continuo con
orientamento orizzontale. Nelle proprietà del report ho impostato
l'orintamento orizzontale ma ... quando stampo il report viene
stampato in verticale. Non capisco cosa devo controllare
grazie a tutti
Maurizio


title: problema orientamento stampa

author: miciomao

text:
Io inizierei a creare il modulo nel server di stampa
Impostazioni->Stampanti->File->Proprietà server
A meno che il tuo modulo abbia un formato standard già presente
nell'elenco
Cmq il problema potrebbe essere l'impostazione della stampante stessa
Ha un menù proprio sullo chassis?


title: Maschere

author: Mik Mark

text:
E' possibile passare il focus al campo della sottomascherà?
Forms!M1!M2!Allievo.SetFocus
Forms!M1!CampodiRicerca.Enabled = False
Mi da errore "Impossibile disattivare il controllo che ha lo stato attivo!"
(CampodiRicerca)
Ma io lo stato glielo ho tolto!
        Ciao


title: Maschere

author: Roberto dal portatile

text:
"Mik Mark" <
marcheso...@trentino.net
> ha scritto nel messaggio
news:9jp2o3$pta$1...@news.flashnet.it...

Se M2 oltra ad essere il nome della sottomaschera è anche il nome del
controllo sottomaschera contenuto nella maschera M1 e se il codice VBA è
contenuto in M1, prova così:
Me!M2.SetFocus
Me!M2!Allievo.SetFocus
Me!CampoRicerca.Enabled = False
Quando vuoi spostare il fuoco da un controllo di una maschera principale ad
un controllo di una sottomaschera, devi prima spostare il fuoco sul
controllo sottomaschera che contiene la sottomaschera e solo dopo spostare
il fuoco sul controllo contenuto nella sottomaschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Messaggi di conferma per Macro e Eliminazione record su access runtime [urgente]

author: madas

text:
ciao
ho fatto  un pakage di installazione di un db access, che installa sul
pc del cliente anche il runtime di access.
E' possibile disattivare nel runtime i messaggi di conferma di
eliminazione record, e i messaggi di conferma apertura macro..etc etc?
Nel mio pc li disattivo andando nelle opzioni di access, che pero
ovviamente non ci sono nel runtime.
grazieee


text: provo con docmd.setwarnings false


author: Karl Donaubauer

text:

www.donkarl.com/it
 FAQ 2.4 Eliminare i messaggi d'avviso
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + CISA1, Arezzo, 4+5/6/2005
la prima Conferenza Italiana per Sviluppatori di Access


text:
ok..grazie.
ma i messaggi relativi alle macro restano..e sono veramente fastidiosi
all'avvio del db.
sapete mica come levarli?


text:
madas wrote:
>
> ma i messaggi relativi alle macro restano..e sono veramente fastidiosi
> all'avvio del db.
Se ti capisco bene la tua versione segreta è Access 2003
e parli del avviso di protezione.
La risposta detagliata sarebbe pronta da tanti mesi nella FAQ 2.28
sul mio sito. Purtroppo non l'abbiamo ancora tradotto dal tedesco.
Nel frattempo forse ti basta:
http://groups.google.com/groups?&selm=2jqmejF14ce2fU1%40uni-berlin.de



text:
madas wrote:
> Karl Donaubauer wrote:
>> madas wrote:
>>
>>> ma i messaggi relativi alle macro restano..e sono veramente
>>> fastidiosi all'avvio del db.
>>
>> Se ti capisco bene la tua versione segreta è Access 2003
>> e parli del avviso di protezione.
>>
>> La risposta detagliata sarebbe pronta da tanti mesi nella FAQ 2.28
>> sul mio sito. Purtroppo non l'abbiamo ancora tradotto dal tedesco.
>> Nel frattempo forse ti basta:
>>
http://groups.google.com/groups?&selm=2jqmejF14ce2fU1%40uni-berlin.de
> ...
> mi par di capire che (non potendo metter le mani sul menu "macro"
> poiche e' un runtime di access) non mi resta che andare a smanettare
> tramite api sul registro pe rdisattivare la protezione macro.
Con la versione runtime i chiavi del registro sono diversi della
versione completta di Access. È necessario di creare 2 chiavi
nuovi sul registro per uccidere tutti messaggi:
per il livello di sicurezza
\\HKEY_LOCAL_MACHINE\Software\Microsoft\Office\11.0\Access\Security
nuovo chiave: level
valore: #00000001
per il SandboxMode:
\\HKEY_LOCAL_MACHINE\Software\Microsoft\Jet\4.0\Engines
nuovo chiave: SandBoxMode
valore: #00000002



text:
Karl Donaubauer wrote:
> madas wrote:
>
>>ma i messaggi relativi alle macro restano..e sono veramente fastidiosi
>>all'avvio del db.
>
>
> Se ti capisco bene la tua versione segreta è Access 2003
> e parli del avviso di protezione.
>
> La risposta detagliata sarebbe pronta da tanti mesi nella FAQ 2.28
> sul mio sito. Purtroppo non l'abbiamo ancora tradotto dal tedesco.
> Nel frattempo forse ti basta:
>
http://groups.google.com/groups?&selm=2jqmejF14ce2fU1%40uni-berlin.de
>
mi par di capire che (non potendo metter le mani sul menu "macro" poiche
e' un runtime di access) non mi resta che andare a smanettare tramite
api sul registro pe rdisattivare la protezione macro.
che skifff


text:
qualuno che non conosco wrote:
> ...i chiavi ...
> ...nuovo chiave...
*Arghh*, visto che mi trovo nella città di Freud non mi
abituarò mai al fatto che è feminile.


title: File Guida

author: Calogero Di Lorenzo

text:
dovendo realizzare una mini guida ho due possibilità:
1° Microsoft Help WorkShop (quello fornito con ODE)
2° HTML Help WorkShop (Trovato chissà dove)
Il primo è un casino dono anni ancora non sono riuscito a capire come
funziona l'ipertesto,
Il secondo è immediato bello facile. Ha un inconveniente non si riesce di
collegarlo ad access.
Che faccio??
Cordialità
Calogero Di Lorenzo


title: File Guida

author: AntoGal

text:
Calogero Di Lorenzo <calo...@NOSPAMdilonet.com> wrote in message
8570ns$ij$1...@nslave1.tin.it...
> dovendo realizzare una mini guida ho due possibilità:
> 1° Microsoft Help WorkShop (quello fornito con ODE)
> 2° HTML Help WorkShop (Trovato chissà dove)
entrambi sono della MS e disponibili gratuitamente un po' ovunque.
> Il primo è un casino dono anni ancora non sono riuscito a capire come
> funziona l'ipertesto,
io sono riuscito a creare un file di help (il tempo per settare tutto è
stato 4 volte quello per scrivere tutto l'help) ma ho avuto un sacco di
problemi per inserire immagini tra il testo.
> Il secondo è immediato bello facile. Ha un inconveniente non si riesce di
> collegarlo ad access.
Il formato degli help in HTML dovrebbe essere quello adottato da tutte le
nuove applicazioni, e naturalmente è supportato da Access 2000.
> Che faccio??
Io credo di fare così:
Scrivo l'help nel nuovo formato (perchè tanto prima o poi lì si arriva) e
non lo collego argomento per argomento ad Access 97, ma lo faccio richiamare
dal programma sempre alla pagina iniziale, come se fosse un manuale in
formato elettronico. Nel frattempo, inizio a farmi il porting ad Access 2000
col mio tempo, tanto ODE 2000 ITA funzionante ancora non esiste, e quando
alla Microsoft rimetteranno in commercio ODE2000 io ho già la mia
applicazione in A2000, mi collego l'help, e "fine dei giochi" (© by Llbo).
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.tin.it/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


title: File Guida

author: Carlo Ve

text:
Calogero Di Lorenzo ha scritto nel messaggio <8570ns$ij$
1...@nslave1.tin.it
>...
>dovendo realizzare una mini guida ho due possibilità:
>1° Microsoft Help WorkShop (quello fornito con ODE)
>2° HTML Help WorkShop (Trovato chissà dove)
3°  Help Scribble
      e' il prodotto che adopero io con buoni risultati (iperlink
inserimento immagini ecc)
prova a vedere su questo sito
www.ping.be/jp/
 magari l'avranno anche
migliorato
Carlo Ve
>Il primo è un casino dono anni ancora non sono riuscito a capire come
>funziona l'ipertesto,
>Il secondo è immediato bello facile. Ha un inconveniente non si riesce di
>collegarlo ad access.



title: File Guida

author: Gisco

text:
Carlo Ve ha scritto nel messaggio <85qfga$i9t$
1...@serv1.iunet.it
>...
>
>Calogero Di Lorenzo ha scritto nel messaggio
<8570ns$ij$
1...@nslave1.tin.it
>...
>>dovendo realizzare una mini guida ho due possibilità:
>>1° Microsoft Help WorkShop (quello fornito con ODE)
>>2° HTML Help WorkShop (Trovato chissà dove)
>
>3°  Help Scribble
>      e' il prodotto che adopero io con buoni risultati (iperlink
>inserimento immagini ecc)
>>Il primo è un casino dono anni ancora non sono riuscito a capire come
>>funziona l'ipertesto,
>>Il secondo è immediato bello facile. Ha un inconveniente non si riesce di
>>collegarlo ad access.
>>Che faccio??
>>Cordialità
>>Calogero Di Lorenzo
>>
>
Per richiamare i topic dei file .chm sul ng it.comp.lang.visual-basic Rogis
ha pubblicato questa routine, forse ti potrebbe essere utile, io non ho
ancora avuto il tempo di provarla:
>Nelle dichiarazioni di un form metti quanto segue per accedere al >file
help
>di tipo CHM (Compiled HTML):
>Private Declare Function HtmlHelp Lib "hhctrl.ocx" _
>   Alias "HtmlHelpA" (ByVal hwnd As Long, _
>    ByVal lpHelpFile As String, _
>    ByVal wCommand As Long, _
>    ByVal dwData As String) As Long
>
>Poi nel form metti due pulsanti e chiamali "cmdHelp" e >"cmdHelpTopic".
>Quindi aggiungi il seguente codice:
>
>Private Sub cmdHelp_Click()
>
>    HtmlHelp Me.hwnd, "TitoloHelp.chm", 1, ""
>
>End Sub
>
>Private Sub cmdHelpTopic_Click()
>
>    HtmlHelp Me.hwnd, "TitoloHelp.chm", 0, "TopicSpecifico.htm"
>
>End Sub
>
>Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
>
>    On Error Resume Next
>
>    If KeyCode = vbKeyF1 Then
>        HtmlHelp Me.hwnd, "TitoloHelp.chm", 1, ""
>    End If
>
>End Sub
>
>La prima sub ti richiama la prima pagina dell'HELP, ovvero quella >che hai
>settato come default.
>La seconda sub ti richiama un argomento specifico, ovvero un certo >topic
>(pagina HTML).
>La terza sub serve per richiamare l'help CHM con il tasti F1.
>
>Soddisfatto?
>
>ALOHA!
>
>Rogis
Saluti
Gisco


title: File Guida

text:
Gisco <
gios...@iol.it
> wrote in message
6_mg4.17563$D3.1...@news.infostrada.it...
> Per richiamare i topic dei file .chm sul ng it.comp.lang.visual-basic
Rogis
> ha pubblicato questa routine, forse ti potrebbe essere utile, io non ho
> ancora avuto il tempo di provarla:
Allora... ho fatto qualche prova. Intanto non c'è verso di far riconoscere
ad Access 97 il file CHM sfruttando le proprietà della maschera "File Guida"
e "ID Argomento Guida", ma questo già si sapeva. Per evitare di gestire un
pulsante apposito su ogni form per richiamare l'help, conviene usare il
terzo caso (premendo F1).
>Nelle dichiarazioni di un form metti quanto segue per accedere al
>file help
> >di tipo CHM (Compiled HTML):
> >Private Declare Function HtmlHelp Lib "hhctrl.ocx" _
converrebbe allora metterla in un modulo esterno e dichiarare la funzione
Public, se si vuole richiamare da ogni maschera.
> >Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
> >
> >    On Error Resume Next
> >
> >    If KeyCode = vbKeyF1 Then
> >        HtmlHelp Me.hwnd, "TitoloHelp.chm", 1, ""
> >    End If
> >
> >End Sub
Per fare in modo che questo funzioni in Access, va gestito l'evento KeyDown,
altrimenti sul KeyUp viene già richiamata la guida di Windows.
Inoltre, la proprietà della maschera AnteprimaTasti va impostata a Sì,
altrimenti non becca la pressione di F1.
HtmlHelp Me.hwnd, "MioHelp.chm", 1, ""
questa funziona, e richiama la pagina di default.
HtmlHelp Me.hwnd, "MioHelp.chm", 0, "Argomento.htm"
questa a me non funziona, mi richiama il file CHM, ma mi appare una pagina
standard con scritto "Impossibile visualizzare la pagina". Forse c'è una
sintassi particolare da rispettare.
Se fai qualche altra prova, posta sul NG.



title: Selezione distinta per utenti contemporanei

author: Maicol

text:
Un saluto a tutti. Ho un mdb in cui l'utente attraverso criteri vari
individua in passaggi anche diversi dei records e li seleziona attraverso un
campo si\no . Quando ha selezionato quelli che gli interessano ne stampa
l'elenco attraverso un report collegato alle selezioni. Tutto funge bene.
Ora da qualche giorno il database e' usato da tre persone anche
contemporaneamente per cui succede che nella stampa di uno ci finiscono pure
le selezioni di un altro e viceversa ( o almeno parte delle selezioni).
Avevo pensato ad utilizzare una tabella temporanea , ma nel realizzare la
cosa mi sono impicciato. Potete aiutarmi ??? Grazie e buonanotte


author: MA

text:
"Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
news:C99Zb.18795$Kc3.5...@twister2.libero.it...

Purtroppo non hai definito la struttura del db.
la soluzione piů semplice č quella di assegnare 1 tasto di spunta diverso ad
ognuno
MAssimiliano


title: come proteggere il db

text:
Vorrei creare un sistema di protezione per evitare la copia del db.
Non voglio usare chiavi hardware.
Nel sito comune ho trovato una routine per il controllo della matricola del
disco.
Chiedo: non esiste qualcosa che consenta di controllare il numero di serie
del sistema?  mi sembrerebbe meno vincolante per il cliente.
Grazie.
Antonio


title: come proteggere il db

author: Emyr

text:


vedi su sitocomune la parte relativa alle informazioni sul sistema
Saluti.
Emanuele.


title: come proteggere il db

author: Antonio

text:
Emyr <
fan...@lavoro.com
> wrote in message
p845bu86847kcluk6...@4ax.com...

Grazie Emanuele , ho trovato veramente interessante alcuni esempi
sull'utilizzo di Api pubblicati su sitocomune, ma purtroppo non riesco a
trovare, anche consultando il sito
api.com
 un'api che mi consenta di
reperire il seriale di un disco o un'informazione di sistema tale per ci si
possa costruire sopra un sistema di protezione.
Nel sito comune tra l'altro ho trovato tempo fa un esempio sul controllo del
serial hd ma purtroppo questo mdb non si apre per problemi di autorizzazione
(forse!)
Cmq grazie ancora
Antonio F.


title: come proteggere il db

text:
Antonio <
af0...@inwind.it
> wrote in message
bSdu8.31537$SR5.8...@twister1.libero.it...

> Scusa ma solo adesso ho visto che mi hai già dato anche la risposta per il
db di esempio, grazie e scusa.
Antonio F.


title: Stampa e Controllo Struttura a schede

author: Bucketful

text:
Potreste aiutarmi a capire come posso stampare il contenuto di una Form
in cui è presente un Controllo Struttura a schede?
Io vorrei sapere se è possibile, ad esempio mediante un MsgBox,
controllare se mandare o meno una pagina del controllo in stampa.
Grazie.
Ciao
--
Ciao.
Buck


title: Stampa e Controllo Struttura a schede

author: Sergio MAZZA

text:
"Bucketful" <
buck...@gmail.com
> ha scritto nel messaggio
news:mn.9bf97d75d...@gmail.com...

Per favore, indica che lo stesso messaggio è stato inviato anche all'altro
NG; tanto il più delle persone rispondono sia qui che li...
Ciao.
--
Sergio MAZZA


title: liste opzioni e scelta con CASE

author: ^luigi^

text:
ho una sottomaschera in cui vi sono una casella di controllo (scelta) con
opzioni (vero,falso,neutro) ed un pulsante che apre un'altra maschera.
Su quest'altra maschera vi sono 15 pulsanti di opzione (si, no)
Quello che voglio ottenere è questo: se in questa maschera seleziono tutti
o anche uno solo di NO, la casella di controllo (scelta) mi evidenzia la
spunta sull'opszione falso, mentre se sono TUTTI SI, la casella (scelta)
mi spunta l'opzione vero. (l'Opzione neutro la vado ad aggiornare
manualmente per altri motivi non legati ad altre opzioni.
Come fare? che codice adottare?
avevo pensato a CASE, ma mi perdo nella sintassi!
oppure devo usare tanti if quanti sono i SI-NO, ma questo mi sembra poco
fattibile.
SOS
grazie
l.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it