title: Aggiunta record via query

author: Lawrence Oluyede

text:
Avrei bisogno di creare una query di inserimento ma ho
qualche problema...finchè la query agisce su una sola
tabella...riesco ma poi... :(
la tabella in questione è questa
Nome: Vendita
ID (PK - Contatore)
Data (Data/ora - solo data)
Importo (Valuta - €)
CodiceMateriale (FK - Numerico)
CodiceNazione (FK - Numerico)
questa tabella è collegata tramite le FK a due altre
tabelle:
Nome: Materiale
ID (PK - Contatore) che è collegato a CodiceMateriale
Descrizione (Testo)
Nome: Nazione
ID (PK - Contatore) che è collegato a CodiceNazione
Nazione (Testo)
Ciò che voglio realizzare è una query parametrica che
domandi all'utente la data, l'importo, la descrizione del
materiale e il nome della nazione e aggiunga alla tabella
vendita un record nuovo composto dalla data inserita
dall'utente, dall'importo inserito dall'utente ma
_ovviamente_ al posto della descrizione e del nome
sostituisca gli ID corrispondenti
--
Lawrence Oluyede
rhy...@myself.com


title: Concatenamenti

author: cristiano 1972

text:
Salve a tutti,
ho una questione interessante, penso.
In una tabella ho un elenco di persone (Nome, cognome, città) e vorrei
esportare questo elenco dopo aver fatto la selezione in base alla città in
word per meglio gestirlo e stamparlo.
Per il collegamento in word ho usato i vostri suggerimenti con stampa unione
e mi funzionano bene.
Però avviene che ogni nominativo viene creato su una pagine diversa, mentre
io vorrei un elenco (come la tabella di access)
Sto faticando molto per riuscire a farlo attraverso una serie di query tra
loro collegate e così, dopo aver controllato sul sito comune e non aver
trovato niente, provo a chiedere a voi se esiste un sistema più semplice per
riuscirci.
Mentre vi scrivo mi permetto di sottoporvi anche un'altra domanda: è
possibile inserire in Word la città in base alla quale effettuare la
selezione e poi richiedere i dati da Access sulla stessa pagina?
Capisco che la seconda questione è un po' lunga, mi accontenterei di un si o
un no con, a grandi linee, i passi da eseguire.
Grazie infinite a chiunque sarà così gentile da rispondere.
Cristiano 1972


title: Concatenamenti

author: Namor

text:
"cristiano 1972" <
crist...@virgilio.it
> ha scritto nel messaggio
news:kftn8.19547$pT1.5...@news1.tin.it...
> Salve a tutti,
> ho una questione interessante, penso.
> In una tabella ho un elenco di persone (Nome, cognome, città) e vorrei
> esportare questo elenco dopo aver fatto la selezione in base alla città in
> word per meglio gestirlo e stamparlo.
> Per il collegamento in word ho usato i vostri suggerimenti con stampa
unione
> e mi funzionano bene.
> Però avviene che ogni nominativo viene creato su una pagine diversa,
mentre
> io vorrei un elenco (come la tabella di access)
> Sto faticando molto per riuscire a farlo attraverso una serie di query tra
> loro collegate e così, dopo aver controllato sul sito comune e non aver
> trovato niente, provo a chiedere a voi se esiste un sistema più semplice
per
> riuscirci.
Per passare ad un nuovo record rimanendo sulla stessa pagina di Word devi
inserire un campo <Next>, lo trovi premendo il pulsante "Inserisci campo
Word", fai un'elenco simile su un'unica pagina in Word:
<COGNOME> <NOME><Next>
<COGNOME> <NOME><Next>
<COGNOME> <NOME><Next>
<COGNOME> <NOME><Next>
<COGNOME> <NOME>
> Mentre vi scrivo mi permetto di sottoporvi anche un'altra domanda: è
> possibile inserire in Word la città in base alla quale effettuare la
> selezione e poi richiedere i dati da Access sulla stessa pagina?
> Capisco che la seconda questione è un po' lunga, mi accontenterei di un si
o
> un no con, a grandi linee, i passi da eseguire.
Puoi usare un parametro come criterio in una query, ti verrà chiesto il
valore quando viene aperta.
Si può anche creare una query di volta in volta e pilotare la stampa unione
interamente da una maschera access con VBA ma è più complicato.



title: Concatenamenti

author: OndaMax

text:
"cristiano 1972"  ha scritto nel messaggio ...
> Mentre vi scrivo mi permetto di sottoporvi anche un'altra domanda: è
> possibile inserire in Word la città in base alla quale effettuare la
> selezione e poi richiedere i dati da Access sulla stessa pagina?
La finestra di dialogo della Stampa Unione dovrebbe disporre di un pulsante
"Opzioni Query" con conseguente scheda "Filtra Record" che potrebbe servire
allo scopo. Almeno, in Office 2000 c'è ...
Ciao
Marco


title: Concatenamenti

text:
Namor ha scritto nel messaggio ...
>
>"cristiano 1972" <
crist...@virgilio.it
> ha scritto nel messaggio
>news:kftn8.19547$pT1.5...@news1.tin.it...
>> Salve a tutti,
[Cut]
>Per passare ad un nuovo record rimanendo sulla stessa pagina di Word devi
>inserire un campo <Next>, lo trovi premendo il pulsante "Inserisci campo
>Word", fai un'elenco simile su un'unica pagina in Word:
><COGNOME> <NOME><Next>
><COGNOME> <NOME><Next>
><COGNOME> <NOME><Next>
><COGNOME> <NOME><Next>
><COGNOME> <NOME>
>
[Cut]
Anche se con ritardo grazie per l'aiuto, sto cercando di mettere in pratica
i consigli.
Cristiano 1972


title: è corretto l'utilizzo di querydef e recordset nei cicli?

author: Nicky

text:
Scusate magari la banalità,
ho delle tabelle collegate via odbc ad un db SqlServer
Devo ciclare una tabella anagrafica di circa 2000 record.
Per ognuno di questi record devo andare su tre tabelle a ricercare tale
anagrafica e, se esiste aggiornare dei campi, altrimenti aggiungere un
record
Volevo capire se sto 'cappellando' o se è corretto l'utilizzo degli
oggetti querydef e recordset
(vado a memoria e non curo la sintassi vba)
set dbs=currentdb
set qdf=dbs.createquerydef(bla bla bla)
set rst=qdf.openrecordset()
do while non rst.eof
    set qdf1=dbs.createquerydef(select.... where a=rst.anagrafica)
    set rst1=qdf1.openrecorset
    miei test...
    rst1.close
    qdf1.close
    set qdf2=dbs.createquerydef(select.... where a=rst.anagrafica)
    set rst2=qdf2.openrecorset
    miei test...
    rst2.close
    qdf2.close
    etc per terza tabella
    rst.movenext
loop
close tutto
set nothing tutto
in particolare quello che volevo sapere è se è corretta la creazione
degli oggetti querydef e recordset tutte le volte (circa 2000)
ciao
Nicoletta


author: Karl Donaubauer

text:

No, creare alcune mille di querydef e recordset sarebbe
una catastrofe per la memoria e prestazione. Invece devi
creare uno o pochi recordset sulla base di un enunciato SQL
con le tabelle rilevanti combinate con JOIN, e poi ciclare i
record di questo recordset. Forse sono necessario due
o tre recordset (niente querydef) per lo tuo scopo ma non
due o sei mille.
Il principio è di usare tanto SQL quanto possibile per
operazioni di massa e oggetti di VBA o DAO solo per
lavori detagliati o complicati. Modello:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String
Set db = Currentdb
strSQL = "SELECT... " & _
                " FROM Tabella1 INNER (o OUTER) JOIN Tabella2" & _
                " ON Tabella1.Id = Tabella2.FKId" & _
                " WHERE..."
Set rs = db.Openrecordset(strSQL, dbopendynaset)
Do Until rs.EOF
    ...
Loop
rs.Close: Set rs = Nothing
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
Karl Donaubauer ha scritto:

Capito Karl,
però non riesco ad usare le join perchè per me sono tutti aggiornamenti
che devo fare in queste altre 3 o 4 tabelle partendo dall'originale
Nicoletta


title: Codice Fiscali

author: Giovanni

text:
Salve a tutti,
presso il sito qui indicato
http://members.xoom.it/it_db_access/
ho trovato il seguente codice per la verifica del Codice Fiscale.
Mi potreste gentilmente indicare come  collegarlo alla maschera che contiene
il campo Codice Fiscale.
Lo riporto nel caso possa servire a qualcuno
Public Function CheckCodFiscale(CFis As String) As Boolean
    'Autore: Federico Luciani
    'Accetta: CFis = Codice fiscale da verificare
    'Restituisce: true se il Codice fiscale è corretto
    If Len(CFis) <> 16 Then
       CheckCodFiscale = False
       Exit Function
    End If
    Dim i As Integer, p As Integer, D As Integer
    Dim SumDisp As Integer, SumPari As Integer
    Dim SumTot As Integer, Check As String
    Dim Resto(1 To 26) As String
    Resto(1) = "A"
    Resto(2) = "B"
    Resto(3) = "C"
    Resto(4) = "D"
    Resto(5) = "E"
    Resto(6) = "F"
    Resto(7) = "G"
    Resto(8) = "H"
    Resto(9) = "I"
    Resto(10) = "J"
    Resto(11) = "K"
    Resto(12) = "L"
    Resto(13) = "M"
    Resto(14) = "N"
    Resto(15) = "O"
    Resto(16) = "P"
    Resto(17) = "Q"
    Resto(18) = "R"
    Resto(19) = "S"
    Resto(20) = "T"
    Resto(21) = "U"
    Resto(22) = "V"
    Resto(23) = "W"
    Resto(24) = "X"
    Resto(25) = "Y"
    Resto(26) = "Z"
    For i = 2 To 14 Step 2
        Select Case Mid$(CFis, i, 1)
            Case "0": p = 0
            Case "1": p = 1
            Case "2": p = 2
            Case "3": p = 3
            Case "4": p = 4
            Case "5": p = 5
            Case "6": p = 6
            Case "7": p = 7
            Case "8": p = 8
            Case "9": p = 9
            Case "A": p = 0
            Case "B": p = 1
            Case "C": p = 2
            Case "D": p = 3
            Case "E": p = 4
            Case "F": p = 5
            Case "G": p = 6
            Case "H": p = 7
            Case "I": p = 8
            Case "J": p = 9
            Case "K": p = 10
            Case "L": p = 11
            Case "M": p = 12
            Case "N": p = 13
            Case "O": p = 14
            Case "P": p = 15
            Case "Q": p = 16
            Case "R": p = 17
            Case "S": p = 18
            Case "T": p = 19
            Case "U": p = 20
            Case "V": p = 21
            Case "W": p = 22
            Case "X": p = 23
            Case "Y": p = 24
            Case "Z": p = 25
        End Select
        SumPari = SumPari + p
    Next i
    For i = 1 To 15 Step 2
        Select Case Mid$(CFis, i, 1)
            Case "0": D = 1
            Case "1": D = 0
            Case "2": D = 5
            Case "3": D = 7
            Case "4": D = 9
            Case "5": D = 13
            Case "6": D = 15
            Case "7": D = 17
            Case "8": D = 19
            Case "9": D = 21
            Case "A": D = 1
            Case "B": D = 0
            Case "C": D = 5
            Case "D": D = 7
            Case "E": D = 9
            Case "F": D = 13
            Case "G": D = 15
            Case "H": D = 17
            Case "I": D = 19
            Case "J": D = 21
            Case "K": D = 2
            Case "L": D = 4
            Case "M": D = 18
            Case "N": D = 20
            Case "O": D = 11
            Case "P": D = 3
            Case "Q": D = 6
            Case "R": D = 8
            Case "S": D = 12
            Case "T": D = 14
            Case "U": D = 16
            Case "V": D = 10
            Case "W": D = 22
            Case "X": D = 25
            Case "Y": D = 24
            Case "Z": D = 23
        End Select
        SumDisp = SumDisp + D
    Next i
    SumTot = SumPari + SumDisp
    Check = Resto((SumTot Mod 26) + 1)
    If Check = UCase$(Right(CFis, 1)) Then
       CheckCodFiscale = True
    Else
       CheckCodFiscale = False
    End If
End Function


title: Codice Fiscali

author: AntoGal

text:
Giovanni scrisse...
> presso il sito qui indicato
>
http://members.xoom.it/it_db_access/
> ho trovato il seguente codice per la verifica del Codice Fiscale.
> Mi potreste gentilmente indicare come  collegarlo alla maschera che
contiene
> il campo Codice Fiscale.
Banale: gestisci l'evento "DopoAggiornamento" del controllo sulla maschera,
legato al campo Codice Fiscale. Ad esempio:
Private Sub CodFis_AfterUpdate()
  If Not CheckCodFiscale(Me!CodFis) Then
   MsgBox "Il codice fiscale immesso è errato.", vbExclamation
  End If
End Sub
> Lo riporto nel caso possa servire a qualcuno
grazie... ;-)
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


title: Codice Fiscali

text:
Ringrazio del suggerimento, che per uno alle prime armi, risulta essere
molto prezioso.
Grazie ancora
Giovanni


title: Ricerca (e anche un problema)

author: Darkbyte [Work]

text:
Salve a tutti.
Ho creato una maschera in Access2000 che mi consente di fare l'input di
una serie di dati abbastanza ampia (le voci sono un bel po').
Ora avrei la necessità di poter fare una ricerca fra tutti i dati del DB
in base a Cognome e nome.
Come faccio? Non ditemi che devo crearmi un report perchè l'idea di
ricostruire l'aspetto della maschera mi fa venire un infarto!
La mia intenzione è quella di ottenere i dati della persona così come si
presentano nella maschera di input, e magari poterli modificare.
Come faccio?
E poi ho un problema: ho aggiunto altri campi in una tabella così ho
modificato le proprietà della maschera aggiungendo i campi nell'origine
record. Solo che poi mi dice che c'è un errore nella posizione di FROM.
Ho guardato la stringa sql ed è mooooolto lunga... non sarà mica che
Access ha problemi con query di molti caratteri? Come posso risolvere?
Thx in anticipo!
--
Dato che non sappiamo quando moriremo, siamo soliti pensare che la vita
sia una fonte inesauribile. Eppure ogni cosa accade soltanto un certo
numero di volte, quasi raramente ad essere sinceri.
Quante volte ti ricorderai di un certo pomeriggio della tua infanzia, un
pomeriggio che è una parte così profonda di te senza il quale non
potresti dare un senso alla tua vita? Forse quattro o cinque volte.
Forse anche di meno...
E quante volte nella tua vita guarderai la luna piena? Forse venti...
Eppure tutto sembra non debba mai finire...


title: Ricerca (e anche un problema)

author: cidi

text:
"Darkbyte [Work]" <
asepran_que...@tin.it
> ha scritto nel messaggio
news:4058...@x-privat.org...
> Salve a tutti.
>
> Ho creato una maschera in Access2000 che mi consente di fare l'input di
> una serie di dati abbastanza ampia (le voci sono un bel po').
>
> Ora avrei la necessità di poter fare una ricerca fra tutti i dati del DB
> in base a Cognome e nome.
> Come faccio? Non ditemi che devo crearmi un report perchè l'idea di
> ricostruire l'aspetto della maschera mi fa venire un infarto!
> La mia intenzione è quella di ottenere i dati della persona così come si
> presentano nella maschera di input, e magari poterli modificare.
> Come faccio?
>
> E poi ho un problema: ho aggiunto altri campi in una tabella così ho
> modificato le proprietà della maschera aggiungendo i campi nell'origine
> record. Solo che poi mi dice che c'è un errore nella posizione di FROM.
> Ho guardato la stringa sql ed è mooooolto lunga... non sarà mica che
> Access ha problemi con query di molti caratteri? Come posso risolvere?
Cominciando a separare le due domande.
Possibilmente con subject(oggetto) chiari e significativi del problema
Daniele


title: Ricerca (e anche un problema)

author: knives

text:
> Dato che non sappiamo quando moriremo, siamo soliti pensare che la vita
> sia una fonte inesauribile. Eppure ogni cosa accade soltanto un certo
> numero di volte, quasi raramente ad essere sinceri.
> Quante volte ti ricorderai di un certo pomeriggio della tua infanzia, un
> pomeriggio che č una parte cosě profonda di te senza il quale non
> potresti dare un senso alla tua vita? Forse quattro o cinque volte.
> Forse anche di meno...
> E quante volte nella tua vita guarderai la luna piena? Forse venti...
> Eppure tutto sembra non debba mai finire...
Cmq una bellissima riflesione!! mi č piaciuta un sacco! Ciauz!


title: Ricerca (e anche un problema)

author: Darkbyte

text:
> Cmq una bellissima riflesione!! mi č piaciuta un sacco! Ciauz!
Veramente č di Brandon Lee... e comunque rispondendo a "cidi" non mi
pare giusto darmi cosě addosso... ho pensato di fare un posto unico
perchč magari facendone due pensavo di sentirmi dire "E HAI APERTO DUE
THREAD DIVERSI? NON POTEVI FARNE UNO SOLO?"...
Quindi nessuno sa dirmi come posso fare?


title: Ricerca (e anche un problema)

author: Sergio MAZZA

text:
"Darkbyte" <
liberofree198108...@libero.it
> ha scritto nel
messaggio news:4058cdd1$1...@x-privat.org...
> > Cmq una bellissima riflesione!! mi è piaciuta un sacco! Ciauz!
>
> Veramente è di Brandon Lee... e comunque rispondendo a "cidi" non mi
> pare giusto darmi così addosso... ho pensato di fare un posto unico
> perchè magari facendone due pensavo di sentirmi dire "E HAI APERTO DUE
> THREAD DIVERSI? NON POTEVI FARNE UNO SOLO?"...
>
> Quindi nessuno sa dirmi come posso fare?
Non è "darti addosso" è una regola di questo NG (
www.sitocomune.com
), cidi
ti ha suggerito bene; 2 problemi, 2 messaggi (con oggetti significativi)...
Ciao.
--
Sergio MAZZA


title: tenere traccia degli accessi

author: Lucky

text:
ciao a tutti,
ho un sito
asp.net
 con un pagina di login le cui credenziali sono conservate in una tabella di un db access. Vorrei tenere traccia degli accessi di ogni utente che si logga, nome data e ora. La tabella ha i campi:

ID
username
password

E' possibile secondo voi? Ho visto in rete la procedura per creare pagine di login con Visual Studio ma non mi danno la possibilità di controllare su un file di log informazioni sugli accessi di cui ho bisogno (a meno di non aver letto male). Come posso fare?

grazie mille

Luciano


title: tenere traccia degli accessi

text:
Non si capisce cosa vuoi...
Lavori su applicazioni WEB o su DESKTOP...?

In entrambi i casi dovrai fare in modo che oltre al LOGIN vengano salvati Data/Ora non mi pare serva una cosa particolare... chiaramente se lavori su APP. di tipo DESK hai tutto in Locale o in LAN altrimenti via WEB dovrai provvedere ad un'interfaccia di Manutenzione...

Mi pare tu abbia le idee poco chiare...

@Alex


title: query con parametri

author: luca

text:
salve ragazzi! ho un problema!
Ho una normalissima query e nei criteri di un campo devo inserire il
risultato di un'altra query.
Es
Query:
  citta       signor
Milano       rossi
brugherio    verdi
Roma          Giovanni
Torino         Esposito
Nei criteri devo specificare il risultato di un'altra query
Citta
milano
Brugherio
ho provato ad inserire la stringa della querysql ma access accetta solo
valori univoci nel vampo e cioe solo "Milano" o "Brugherio" e non entranbi o
anche piu.
Come posso fare ?


title: query con parametri

author: Paj

text:
"luca" <
luc...@tiscalinet.it
> ha scritto nel messaggio
news:93s7an$hts$1...@lacerta.tiscalinet.it...

Devi usare piu' sottoquery ed ognuna la metti su righe differenti dei
criteri
cioe'
nei criteri metti una sottoquery con un risultato
nella riga successiva "oppure" metti un'altra sottoquery con un altro
risultato
Pietro


title: query con parametri

author: Antonio Biso

text:
luca <
luc...@tiscalinet.it
> wrote in message
93s7an$hts$1...@lacerta.tiscalinet.it...
> salve ragazzi! ho un problema!
>
> Ho una normalissima query e nei criteri di un campo devo inserire il
> risultato di un'altra query.
>
> Es
>
> Query:
>   citta       signor
> Milano       rossi
> brugherio    verdi
> Roma          Giovanni
> Torino         Esposito
>
> Nei criteri devo specificare il risultato di un'altra query
>
> Citta
> milano
> Brugherio
La seconda query sarà qualcosa tipo "Select tab.città from tab where ..."
La prima query sarà qualcosa tipo
Select tab2.città, tab2.signor from tab2 where tab2.città IN Select
tab.città from tab where ...
Antonio


title: Problemi con l'esempio 6.19 del SC

author: carla

text:
Salve
ho provato l'esempio 6.19 Come evitare che l'utente chiuda l'applicativo
tramite Alt-F4?
(compreso 3.17 Controllare se una maschera è aperta.)
e all'uscita del programma (con l'apposito tasto crato ad hoc) mi dà questo
errore.
Impossibile aprire il database c:\pippo.mdb. È possibile che il database non
sia riconoscibile dall'applicazione oppure che il file sia danneggiato.
(3049).
se commento tutto il codice degli esempi, l'errore sparisce.
Dove sbaglio?
Ho access 2003 su xp sp2: devo caricare qualche libreria exta?
Grazie
Carla


title: Problemi con l'esempio 6.19 del SC

text:
"carla" <carl...@NOSPAMhotmail.com> ha scritto nel messaggio
news:43592d3b$0$13350$4faf...@reader2.news.tin.it...

Scusate, mi sono dimenticata di dire che se lancio pippo.mdb  -->
maskprincipale --> uscita tutto ok
se  invece pippo.mdb  --> maskprincipale --> mask2 --> mask3 -->
maskprincipale --> uscita  dà l'errore di sopra.
Ciao
Carla


title: msde 2000 + adp xp migrare a sql express

author: Alex

text:
è traumatico il passaggio tra i due motori sql ? in particolare spostare mdf
già fatti da un motore all'altro?
I file adp di access xp possono connetterci a sql express? (no odbc ma in
modo nativo)
grazie
Alex


author: Cinzia

text:
Ciao Alex,
"Alex" <
adasdasd...@tin.it
> ha scritto nel messaggio
news:46ed7ac6$0$4784$4faf...@reader4.news.tin.it...
>è traumatico il passaggio tra i due motori sql ? in particolare
>spostare mdf già fatti da un motore all'altro?
no, copi il  file e lo ricarichi su SQL Express
> I file adp di access xp possono connetterci a sql express? (no odbc
> ma in modo nativo)
Access 2003 si connette a SQL Express ma non ti consente di
modificare/creare tebelle, stored o viste, queste operazioni devi
farle con SQL Server  Mangement Studio Express
> grazie
>
> Alex
>
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
----------------------------------------


text:
"Cinzia" <
cinziapagani-...@tiscali.it
> ha scritto nel messaggio
news:46eda187$0$16028$5fc...@news.tiscali.it...
> Ciao Alex,
> "Alex" <
adasdasd...@tin.it
> ha scritto nel messaggio
> news:46ed7ac6$0$4784$4faf...@reader4.news.tin.it...
>>è traumatico il passaggio tra i due motori sql ? in particolare spostare
>>mdf già fatti da un motore all'altro?
> no, copi il  file e lo ricarichi su SQL Express
>
>> I file adp di access xp possono connetterci a sql express? (no odbc ma in
>> modo nativo)
>
> Access 2003 si connette a SQL Express ma non ti consente di
> modificare/creare tebelle, stored o viste, queste operazioni devi farle
> con SQL Server  Mangement Studio Express
>
neppure via script come faccio ora ?
ciao, ale


text:
"Alex" <
adasdasd...@tin.it
> ha scritto nel messaggio
news:46eda498$0$36452$4faf...@reader5.news.tin.it...
>
> "Cinzia" <
cinziapagani-...@tiscali.it
> ha scritto nel
> messaggio
[..]
>> Access 2003 si connette a SQL Express ma non ti consente di
>> modificare/creare tebelle, stored o viste, queste operazioni devi
>> farle con SQL Server  Mangement Studio Express
>>
>
>
> neppure via script come faccio ora ?
> ciao, ale
>
Cosa intendi per "via script"?



author: Mat

text:
"Cinzia" <
cinziapagani-...@tiscali.it
> ha scritto nel messaggio
news:46ee423c$0$21194$5fc...@news.tiscali.it...
>
>
> "Alex" <
adasdasd...@tin.it
> ha scritto nel messaggio
> news:46eda498$0$36452$4faf...@reader5.news.tin.it...
>>
>> "Cinzia" <
cinziapagani-...@tiscali.it
> ha scritto nel
>> messaggio
> [..]
>>> Access 2003 si connette a SQL Express ma non ti consente di
>>> modificare/creare tebelle, stored o viste, queste operazioni devi farle
>>> con SQL Server  Mangement Studio Express
>>>
>>
>>
>> neppure via script come faccio ora ?
>> ciao, ale
>>
> Cosa intendi per "via script"?
>
set dmoDb=dmoServer.databases(.....connessione...)
dmoDB.executeImmediate  "alter table pippo add ciao nvarchar(10)"
ciao,


text:
"Mat" <
fasdfsad...@tin.it
> ha scritto nel messaggio
news:46ee4fad$0$36444$4faf...@reader5.news.tin.it...
>>>
>>> neppure via script come faccio ora ?
>>> ciao, ale
>>>
>> Cosa intendi per "via script"?
>>
>
> set dmoDb=dmoServer.databases(.....connessione...)
> dmoDB.executeImmediate  "alter table pippo add ciao nvarchar(10)"
>
Ciao Mat,
si così puoi ancora!, quello che non puoi usare è l'interfaccia
grafica di access, via codice fai quel che vuoi...



title: Problemi simbolo decimali

author: Ivan

text:
Mi trovo alle prese con  questo problema:
Dim totale As Currency
totale = DSum("[qta]", "arrivi", "[articolo]='pere'")
DoCmd.RunSQL ("Update magazzino set qta=" & totale _
            & " Where articolo = 'pere'")
Mi compare sempre il messaggio "Errore di sintassi nell'espressione SQL"
Il campo [qta] contiene un numero con 2 decimali (es. 128,75) e come
separatore di decimali access mette una virgola, ma l'istruzione SQL  di
Update non accetta la virgola ma vuole il punto (ho provato con una query).
Come faccio a convertire i 2 simboli?
Grazie


title: Problemi simbolo decimali

author: Pablitomf (Maurizio Facciuti)

text:
Ivan ha scritto:

> Dim totale As Currency




> Grazie
Sicuro sicuro sia questo il problema?
Mhà... cmq, vedi FORMAT.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Problemi simbolo decimali

author: wlady

text:
Ivan ha scritto:

mi sembra strano che tu definisca un tipo currency (usato per valute)
per un campo che, apparentemente, serve per definire una quantità
numerica. Io avrei usato un tipo double. A parte questo usa questa
sintassi:
DoCmd.RunSQL ("Update magazzino set qta=" & replace(totale,",",".") _
           & " Where articolo = 'pere'")

ciao


title: Problemi simbolo decimali

text:
wlady ha scritto:
> Ivan ha scritto:



Gli hai chiesto che versione di Access ha?... mica il Replace funzia con
tutte... ;-)
ma poi, scusa, basta che lo formatti +/- in questo modo #.00
> ciao



title: Problemi simbolo decimali

text:
[CUT]
mi sembra strano che tu definisca un tipo currency (usato per valute)
per un campo che, apparentemente, serve per definire una quantità
numerica. Io avrei usato un tipo double. A parte questo usa questa
sintassi:
DoCmd.RunSQL ("Update magazzino set qta=" & replace(totale,",",".") _
           & " Where articolo = 'pere'")
ciao
E' vero posso usare tranquillamente il double, ma non cambierebbe.
Il problema è che ho provato ad usare il Replace, ma non so perchè anzichè
sostituirmi la virgola con il punto mi restituisce il numero intero. ( es.
128,75  me lo trasforma in 12875)
Non è che replace funziona solo con le stringhe e non con i numeri ?
Dimenticavo! Uso access 2003


title: Problemi simbolo decimali

text:
Ivan ha scritto:

sì replace funziona solo con le stringhe
modifica il comando così:
> DoCmd.RunSQL ("Update magazzino set qta=" & replace(str(totale),",",".") _
>            & " Where articolo = 'pere'")
P.S.: ho provato con il format  "#.00" ma restituisce sempre il numero
con la virgola
ciao


title: Problemi simbolo decimali

text:




ciao
OK Funziona!!
Grazie 1000


title: Problemi simbolo decimali

text:
Ivan ha scritto:
[CUT]
> P.S.: ho provato con il format  "#.00" ma restituisce sempre il numero
> con la virgola
> ciao
> OK Funziona!!
> Grazie 1000
Funziona con quale soluzione?



title: Problemi simbolo decimali

author: sv

text:
Ivan ha scritto:

> Dim totale As Currency




> Grazie
Utilizza al posto di ' il  Chr(34) e  riscrivila così:
Dim totale As Double
totale = DSum("[qta]", "arrivi", "[articolo]= & Chr(34) & "pere" & Chr(34))
DoCmd.RunSQL ("Update magazzino set qta = " & Chr(34) & totale & Chr(34) _
             & " Where articolo =" & Chr(34) & "pere" & Chr(34) & ";")
L'ho già provata e funziona.
--
rgrds
SC
--



title: Problemi simbolo decimali

author: giorgio rancati

text:
"Ivan" <
bell_...@tin.it
> ha scritto nel messaggio
news:4487d25d$0$36926$4faf...@reader3.news.tin.it...

Ciao Ivan,
come avrai capito l'errore č dovuto alla virgola generata dalla conversione
del numero in stringa.
La virgola nel linguaggio SQL č il separatore di elemento, per passare
adeguatamente il valore usa la funzione STR()
----
totale = DSum("[qta]", "arrivi", "[articolo]='pere'")
DoCmd.RunSQL ("Update magazzino set qta=" & STR(totale) _
            & " Where articolo = 'pere'")
----
maggiori dettagli li trovi nell'help di Access.
Ciao
--
Giorgio Rancati
[Office Access MVP]


title: Problemi simbolo decimali

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:448808f4$0$1003$5fc...@news.tiscali.it...
>
> maggiori dettagli li trovi nell'help di Access.
>
guarda anche qui.
----
6.21 Passare un numero decimale ad una stringa SQL
http://www.donkarl.com/it/
----



title: Problemi simbolo decimali

text:
[CUT]
Alla fine ho utilizzato la soluzione proposta da wladi :
DoCmd.RunSQL ("Update magazzino set qta=" & replace(str(totale),",",".") _
           & " Where articolo = 'pere'")
ho provato anche  con format  "#.00" ma restituisce sempre il numero con la
virgola.
Grazie a tutti


title: esco matto, campo in giapponese

author: AP

text:
access 97 su Seven:
nella tabella e' in italiano, nella query me lo trovo scrittto in
giapponese... che caspita e'?


title: esco matto, campo in giapponese

author: Karl Donaubauer

text:

Non è giapponese ma cinese. ;-)
http://support.microsoft.com/kb/889490/it
http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/61ef8171b1dbac2b
ecc.
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: mdb Access 2000 con Windows Server 2003

author: TG

text:
Salve,
fino ad oggi ho gestito un mdb in rete su pc con XP o Vista.
Ogni pc aveva il suo programma che puntava all'mdb che si trovava su di un
pc + potente.
Ora metteremo un Server "vero" con Windows Server 2003.
1) Vi risultano problemi di incompatibilità tra Access 2000 o 2007 con
Windows Server 2003?...
2) La connessione all'mdb conviene farla direttamente da codice, come
fin'ora era fatta, o conviene utilizzare gli Odbc?...
Grazie,
TG


title: mdb Access 2000 con Windows Server 2003

author: MA

text:
TG wrote:
> Salve,
> fino ad oggi ho gestito un mdb in rete su pc con XP o Vista.
> Ogni pc aveva il suo programma che puntava all'mdb che si trovava su
> di un pc + potente.
> Ora metteremo un Server "vero" con Windows Server 2003.
>
> 1) Vi risultano problemi di incompatibilità tra Access 2000 o 2007 con
> Windows Server 2003?...
>
No, tranquillo
> 2) La connessione all'mdb conviene farla direttamente da codice, come
> fin'ora era fatta, o conviene utilizzare gli Odbc?...
Tutto come prima
>
> Grazie,
> TG
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: [CISA1] Considerazioni "filosofiche"

author: VT @ home

text:
Nell'associarmi ai complimenti ed agli apprezzamenti positivi fatti dagli altri partecipanti all'iniziativa, vorrei fare
alcune considerazioni del tutto personali.
1) E' ovvio che chi partecipa ad eventi di questo tipo abbia l'aspettativa di un arricchimento prima di tutto in termini
professionali di conoscenze e competenze tecniche.
Purtroppo in generale l'esito non è così scontato, ma nel caso di CISA1 credo che nessuno sia tornato a casa senza avere
imparato qualcosa.
2) Poi di solito vengono le motivazioni professionali più generali: stabilire nuovi contatti, "rimanere nel giro" ecc.
3) Infine ci sono gli aspetti ludici: pranzi, cene, discussioni notturne ecc.
Personalmente però ho riportato a casa qualcosa che non mi sarei mai aspettato: una lezione di vita.
Infatti io vivo perennemente in rincorsa di qualcosa di urgente da fare, vuoi per soddisfare le esigenze (più spesso i
capricci) di qualche cliente, vuoi per esigenze personali o familiari, anche se queste sono limitate dato che non ho
figli (per scelta).
Il tempo "libero" è quasi inesistente e non è mai completamente libero: alcune buone idee per risolvere alcuni problemi
tecnici mi sono venute durante le vacanze o comunque in momenti assolutamente estranei al contesto lavorativo.
La lezione di vita di CISA1 è proprio questa: "Per quanto poco ti sembri il tempo a disposizione, se lo vuoi c'è sempre
tempo per fare qualcosa d'altro, magari per condividere le proprie esperienze".
Infatti a CISA1 hanno partecipato persone che, nonostante credo vivano più o meno le mie stesse esperienze professionali
con ritmi paragonabili, hanno una famiglia con figli anche piccoli, svolgono attività sportive e/o di volontariato,
frequentano con regolarità il NG (e magari non solo ICAA), hanno trovato il tempo di preparare relazioni per la
conferenza, gestiscono siti web a titolo assolutamente gratuito ... e chissà cos'altro.
Hanno il tempo di valutare nuove tecnologie e nuovi prodotti solo per "vedere come sono fatti dentro", io invece ho
comprato Office 2003 e Visual Sudio Tools x Office da oltre un mese ed ancora non ho avuto il tempo di installare nè
l'uno nè gli altri.
Come tutte le lezioni di vita, il primo impatto non è stato molto piacevole: hanno prevalso il disappunto e lo scorno.
Però a mente fredda sta emergendo  piano piano la reazione e spero che alla fine ne nasca qualcosa di buono; per me
sarebbe già un buon risultato se soltanto riuscissi a frequentare ICAA con l'assiduità di qualche anno fa ...
Grazie a tutti
Vincenzo Turturro
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400
http://www.faq400.com/
---------------------------------------------


title: [CISA1] Considerazioni "filosofiche"

text:
Un attimo prima di skippare tutto mi sono accorto che  VT @ home ha scritto:
> Personalmente però ho riportato a casa qualcosa che non mi sarei mai
> aspettato: una lezione di vita.
Concordo con te in pieno.
Il fatto è che vorrei capire dove trovarlo il tempo. Sono messo anche io
come te e per
installare come voglio io il mio portatile ho trovato il tempo... però ieri
sera dalle 20.00 alle 0.15,
insomma 1-2 volte lo faccio la 3a mi rompo... spero che un domani che non
abiterò più solo
avrò più tempo per molte cose (non dovrò uscire di casa spesso per vedere la
fidanzata e già non
è male come tempo guadagnato :-))
> Vincenzo Turturro
Scusa la domanda ma di dove sei? C'era un Turturro in classe con me alle
superiori, chissà...
--
Alex {per email metti '[IOPOSSO]' nell'oggetto}
"Prima di dedicarti all'impossibile accertati di aver fatto tutto il
possibile" (Alex1980)


title: [CISA1] Considerazioni "filosofiche"

text:

Quante cose e quanto belle è stato Cisa.
Che peccato se l'avessimo persa.
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Info:
www.donkarl.com/it


title: [CISA1] Considerazioni "filosofiche"

text:
[CUT]
>
> Quante cose e quanto belle è stato Cisa.
> Che peccato se l'avessimo persa.
>
Parli di me? :-P :-D


title: [CISA1] Considerazioni "filosofiche"

author: ciroteo

text:
"Pablitomf (Maurizio Facciuti)" <
maurizio...@accessgroup.it
> ha scritto
nel messaggio news:d86780$ddb$1...@domitilla.aioe.org...

ti rode eh?


title: [CISA1] Considerazioni "filosofiche"

author: VT @ Work

text:
On Wed, 8 Jun 2005 07:54:40 +0200, "Alex1980" <
ba...@jumpy.it
> wrote:
>(...)
>Scusa la domanda ma di dove sei? C'era un Turturro in classe con me alle
>superiori, chissà...
Toscana (Firenze e zone limitrofe)


title: [CISA1] Considerazioni "filosofiche"

text:
[CUT]
>>> Quante cose e quanto belle è stato Cisa.
>>> Che peccato se l'avessimo persa.
>>>
>>
>> Parli di me? :-P :-D
>
> ti rode eh?
Altrochè ;-)


title: [CISA1] Considerazioni "filosofiche"

text:
Un attimo prima di skippare tutto mi sono accorto che  VT @ Work ha scritto:
>> Scusa la domanda ma di dove sei? C'era un Turturro in classe con me
>> alle superiori, chissà...
> Toscana (Firenze e zone limitrofe)
Quindi direi di  no :-) ma lo immaginavo!



title: Impostare segno negativo in campi calcolati

author: Rcapoint

text:
Ciao a tutti
Ho una query la quale contiene parecchi campi calcolati, ora io tramite una
query di accodamento copio tutti i dati che mi servono in un altra tabella
che apparentemente contiene gli stessi dati però la differenza che mi serve
è cercare di imppstare i valori negativi delle varie sespressioni. es:
Preventivo (100?)
Commissione (30?)
totale (130?)
nella tabella dove io ho copiato tutti i record tramite la query di
accodamento, deve risultare questo:
Preventivo (-100?)
Commissione (-30?)
totale (-130?)
come posso fare???
ovviamente i campi calcolati sono parecchi e molto complessi....esiste una
funzione che mi converta il segno "+" ???
Grazie anticipatamente.


author: Roberto - Syd

text:
"Rcapoint" <
rcap...@ibanordest.it
> ha scritto nel messaggio
news:uoCs8.6239$m41.1...@twister2.libero.it...

Per invertire il segno di un numero basta moltiplicare il numero per -1 es.:
Preventivo (100 * -1) = -100
Ciao Roberto - Syd


title: Come lanciare una query da una combo?

author: Pancio

text:
Ciao a tutti,
sono nuovo di questo gruppo e scusate se la domanda è banale.
Come posso lanciare una query a partire dal valore selezionato da una
combo?
Mi spiego meglio: ho una combo contenente i valori restituiti da una
select distinct su di un campo x di una tabella y. Vorrei lanciare una
query che utilizzi il valore selezionato dalla combo nell'istruzione
SQL di un'altra query del tipo:
SELECT ...
FROM ...
WHERE ... = "valore selezionato dalla combo";
Con il generatore di espressioni non ci sono riuscito. Ho provato
intervenendo sul codice vb della Combo usando metodi che mi
restituiscono il testo o l'indice della Casella combinata ma ogni
volta che seleziono un valore dalla combo mi si apre una finestrella
in cui devo inserire a mano il valore.
Grazie a tutti coloro che vorranno rispodermi


title: Come lanciare una query da una combo?

author: Alex

text:
"Pancio" <
pan...@bresciaonline.it
> wrote in message
news:5d7da2fd.0212...@posting.google.com
> Ciao a tutti,
>
> sono nuovo di questo gruppo e scusate se la domanda è banale.
>
> Come posso lanciare una query a partire dal valore selezionato da una
> combo?
>
> Mi spiego meglio: ho una combo contenente i valori restituiti da una
> select distinct su di un campo x di una tabella y. Vorrei lanciare una
> query che utilizzi il valore selezionato dalla combo nell'istruzione
> SQL di un'altra query del tipo:
>
> SELECT ...
> FROM ...
> WHERE ... = "valore selezionato dalla combo";
Non spieghi cosa vuoi fare poi con la QUERY visto che non è complilata
a cosa ti serve, non puoi visualizzarla, ma solo usarla come BaseDati
in un RECORDSET o altro.....!!!
In ogni caso....
Su evento After_Update della Combo:
Docmd.RunSQL "SELECT * FROM TuaTabella WHERE TuoCAMPO='" & Me.TuaCombo &
"'"
Mah..............
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Come lanciare una query da una combo?

author: Carlo Costarella

text:
"Pancio" <
pan...@bresciaonline.it
> ha scritto nel messaggio
news:5d7da2fd.0212...@posting.google.com...

Accertati che la combo abbia la colonna associata con il valore che dovrai
passare alla query.
Poi costruisci una query del tipo:
SELECT Bolla.IDBolla, Bolla.*
FROM Bolla
WHERE (((Bolla.IDBolla)=[Forms]![TuaMaschera]![Combo1]));
A questo punto il gioco è fatto e potrai aprire la query quando vuoi a patto
di aver selezionato un valore nella combo.
Ciao, Carlo


title: Come lanciare una query da una combo?

text:
Grazie ad entrambe, ma scusate se non ci sono riuscito. Ho fatto cosě:
Private Sub CasellaCombinata0_AfterUpdate()
MsgBox ("SELECT * FROM Tabella1 WHERE Nome = '" & Me.CasellaCombinata0
& "'")
DoCmd.RunSQL ("SELECT * FROM Tabella1 WHERE Nome = '" &
Me.CasellaCombinata0 & "'")
'DoCmd.RunMacro ("Macro1")
End Sub
Subito dopo la scelta del valore dalla combo mi appare la message box
con l'istruzione SQL (che ho provato ad eseguire e che fornisce esito
positivo anche senza il ; finale). Dopo aver dato l'OK alla msgbox
l'Access mi spara il seguente errore
Errore di run-time '2342'
Un'azione EseguiSQL richiede un argomento costituito da un'istruzione
SQL.
Lo stesso errore mi compare se uso Me.CasellaCombinata0.Text al posto
di Me.CasellaCombinata0
Addirittura lo stesso errore mi esce quando semplicemente uso
DoCmd.RunSQL ("SELECT * FROM Tabella1")
al posto di
DoCmd.RunSQL ("SELECT * FROM Tabella1 WHERE Nome = '" &
Me.CasellaCombinata0 & "'")
il che mi lascia supporre che l'errore non dipende dalla combo.
Ho provato anche l'altro metodo consigliato dal gentile Sig. Carlo
facendo eseguire la macro1 quando si verifica l'evento
CasellaCombinata0_AfterUpdate (come da ultima riga commentata). La
macro1 lancia la query2 cosě fatta:
SELECT Tabella1.*, Tabella1.ID
FROM Tabella1
WHERE (((Tabella1.ID)=[Maschere]![Maschera1]![CasellaCombinata0]));
ma quando scelgo un valore dalla combo mi esce il valore giusto nella
msgbox e quando faccio ok mi si apre una finestra con intestazione
Maschere!Maschera1!CasellaCombinata0
in cui devo inserire a mano il valore scelto dalla combo.
Grazie e scusate il disturbo. Ciao


title: Come lanciare una query da una combo?

text:
"Pancio" <
pan...@bresciaonline.it
> wrote in message
news:5d7da2fd.02120...@posting.google.com
> Grazie ad entrambe, ma scusate se non ci sono riuscito. Ho fatto cosě:
>
> Private Sub CasellaCombinata0_AfterUpdate()
> MsgBox ("SELECT * FROM Tabella1 WHERE Nome = '" & Me.CasellaCombinata0
> & "'")
> DoCmd.RunSQL ("SELECT * FROM Tabella1 WHERE Nome = '" &
> Me.CasellaCombinata0 & "'")
> 'DoCmd.RunMacro ("Macro1")
> End Sub
>
[CUT]
Quello che hai provato a fare č solo una QRY Action, delle
quali non fanno parte le QRY di Selezione.
Per quello che devi fare forse il sistema di CARLO č il piů
semplice.
Creati una QRY, e dinamicamente da QBE inserisci nei CRITERI
il Riferimento alla COMBO, cosě come ti suggeriva CARLO.



title: Come lanciare una query da una combo?

text:
"Alex" <
ik2...@libero.it
> wrote in message news:<
af838a826c3747aaf6...@mygate.mailgate.org
>...
> "Pancio" <
pan...@bresciaonline.it
> wrote in message
>
news:5d7da2fd.02120...@posting.google.com
>
> > Grazie ad entrambe, ma scusate se non ci sono riuscito. Ho fatto così:
> >
> > Private Sub CasellaCombinata0_AfterUpdate()
> > MsgBox ("SELECT * FROM Tabella1 WHERE Nome = '" & Me.CasellaCombinata0
> > & "'")
> > DoCmd.RunSQL ("SELECT * FROM Tabella1 WHERE Nome = '" &
> > Me.CasellaCombinata0 & "'")
> > 'DoCmd.RunMacro ("Macro1")
> > End Sub
> >
> [CUT]
>
> Quello che hai provato a fare è solo una QRY Action, delle
> quali non fanno parte le QRY di Selezione.
>
> Per quello che devi fare forse il sistema di CARLO è il più
> semplice.
> Creati una QRY, e dinamicamente da QBE inserisci nei CRITERI
> il Riferimento alla COMBO, così come ti suggeriva CARLO.
>
> @Alex.
Grazie ancora ad Alex per il consiglio, anche a te usciva lo stesso
errore di run-time sulla stringa sql?
Ho già provato anche il metodo di Carlo. Dopo aver selezionato un
elemento dalla combo mi si apre una finestrella in cui devo reinserire
a mano il valore selezionato dalla combo.
Carlo, ci sei ancora? A te la query viene effettivamente lanciata
subito dopo la selezione di un valore dalla combo o anche a te si apre
la finestrella di inserimento del valore?
Grazie a chi mi può dare una soluzione.
Ciao


title: Come 'riconoscere' una textbox predisposta per Data e prendere numeri da tastierino?

author: RobertoA

text:
Tutti i contabili usano il tastierino numerico per inserire numeri
A volte e' col block-num a volte e' senza

ANOMALIA: quando il focus e' dentro una textbox che deve contenere una
data, ed il block-num e' disattivato, l'operatore si incazza
(poi scopri che ha una tastiera wireless senza led del block-num)

RICHIESTA: come 'intercettare' le pressioni del tastierino quando il
focus e' su una textbox che conterra' una data, e 'prendere' sempre i
numeri, anche se il block-num e' disattivato?

Attenzione: non sono valide ipotesi 'grezze' del tipo "..su ogni textbox
metti del codice nell'evento _keypress.." ma solamente codice di grande
eleganza  tipo funzioni a livello di form o roba del genere    :)  :)


author: Silvio Berruti

text:

Vediamo se questo codice è abbastanza ELEGANTE ;-))

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  'Debug.Print KeyCode
  Select Case KeyCode
    Case 45: KeyCode = vbKey0
    Case 35: KeyCode = vbKey1
    Case 40: KeyCode = vbKey2
    Case 34: KeyCode = vbKey3
    Case 37: KeyCode = vbKey4
    Case 12: KeyCode = vbKey5
    Case 39: KeyCode = vbKey6
    Case 36: KeyCode = vbKey7
    Case 38: KeyCode = vbKey8
    Case 33: KeyCode = vbKey9
  End Select
End Sub

Private Sub Form_Open(Cancel As Integer)
  Me.KeyPreview = True
End Sub

Cioè in apertura della form imposto l'anteprima tasti (obbligatorio per il funzionamento) e nell'evento KeyDown della form, valido quindi per qualsiasi controllo, vado ad intercettare la pressione dei tasti del tastierino numerico e li trasformo negli equivalenti numerici.
Ti ho lasciato  'Debug.Print KeyCode perché, se togli l'apostrofo, puoi controllare il codice del tasto premuto.
I codici che vedi sono quelli relativi al tastierino numerico del mio portatile, ma non sono sicuro che siano sempre uguali (dovrebbero credo).
Ciao


title: Criterio Query : se uguale nome listbox

author: gianluca minenna

text:
Buongiorno  a tutti,
qualcuno sa dirmi se sia possibile creare un criterio di selezione per
una query access che selezioni:
tutti i record che hanno al proprio interno un attributo con lo stesso
nome della listbox alla quale è associata la query stessa? Mi spiego
meglio ora riesco a farlo specificando il valore dell'attributo che mi
serve per filtrare, se però questo nome corrispondesse al nome della
listbox, posso dirgli di confrontare anziche il valore specifico, il
valore contenuto nel nomedella listbox?
grazie


title: Criterio Query : se uguale nome listbox

text:

Questa domanda mi pare di averla già sentita...
@Alex


title: esportare da access a .dbf

author: Tyler Durden

text:
devo esportare una tabella di access a un file .dbf tramite codice...
come posso fare?
grazie per chi volesse rispondere.
______________________________________
In fondo anche l'amore è un sovvrappensiero...
Togli 666 dall'e-mail per rispondere.


title: esportare da access a .dbf

author: Maurizio

text:
Esempio:
Function EsportaDBIII(strtab, Destinazione, NomeFile)
DoCmd.TransferDatabase acExport, "dBase III", Destinazione, acTable, strtab,
NomeFile, False
End Function
Destinazione: metti il nome della directory
strtab: nome tabella da esportare
NomeFile:nome del file in dbf
Ciao Maurizio
Tyler Durden <
m.quer...@sis-ter.it
> wrote in message
780tbs4emq18ig2gr...@4ax.com...



title: La casella ri riepilogo restituisce il valore del record?

author: Filippo

text:
Salve al NG
In una maschera Rubrica, con i vari campi Nome, Cognome, Indirizzo, Telefono
(controlli TextBox) ecc. ho aggiunto un controllo ListBox (casella di
riepilogo) con l'elenco di tutti i record.
Vorrei raggiungere rapidamente il record selezionato ma non so come fare.
Io credo di dover fare qualcosa di simile: all'evento Click o DoppioClick
della ListBox si accede ad una routine di codice più o meno del tipo:
DoCmd.GoToRecord , , acGoTo, NumeroDiRecord
ma questo NumeroDiRecord (Long) dove lo prendo?
Spero di essere stato chiaro.
Grazie
Filippo


text:
"Filippo" <
f....@panservice.it
> ha scritto nel messaggio
news:9pd804$spj$1...@news.panservice.it...

Non so se sei pratico di DAO, ma io affronterei in altro modo:
La ListBox restituirà un valore che utilizzerai come ricerca nel
RecordsetClone della Form.
Supponi che ListBox Restituisca IdProgressivo
Su evento Click inserisci
      Me.Recordsetclone.FindFirst "[Id]=" & Me.TuaListBox
      Me.Bookmark = Me.RecordsetClone.Bookmark
Automaticamente ad ogni selezione si sposta....
E' la stessa tecnica che avresti visto utilizzando l'Autocomposizione della
ListBox--->Trova Campo....ecc..
@Alex.


author: Roberto da casa

text:
"Filippo" <
f....@panservice.it
> ha scritto nel messaggio
news:9pd804$spj$1...@news.panservice.it...
> Salve al NG
> In una maschera Rubrica, con i vari campi Nome, Cognome, Indirizzo,
Telefono
> (controlli TextBox) ecc. ho aggiunto un controllo ListBox (casella di
> riepilogo) con l'elenco di tutti i record.
> Vorrei raggiungere rapidamente il record selezionato ma non so come fare.
> Io credo di dover fare qualcosa di simile: all'evento Click o DoppioClick
> della ListBox si accede ad una routine di codice piů o meno del tipo:
>
> DoCmd.GoToRecord , , acGoTo, NumeroDiRecord
>
> ma questo NumeroDiRecord (Long) dove lo prendo?
>
> Spero di essere stato chiaro.
> Grazie
> Filippo
>
Anziché il metodo GoToRecod prova ad usare, dopo aver spostato il fuoco sul
controllo su cui effettuare la ricerca, il metodo FindRecord (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Vi ringrazio dell'aiuto.
In effetti con l'autocomposizione viene fuori questo codice
 Dim rs As Object
 Set rs = Me.Recordset.Clone
 rs.FindFirst "[Cognome] = '" & Me![lstElencoNomi] & "'"
 Me.Bookmark = rs.Bookmark
che, con un passaggio in più, è lo stesso indicato da @Alex.
Il punto è che in entrambe le soluzioni si usa una procedura di riferca
FindFirst (di Alex) o FindRecord (di Roberto) che, al di là del fatto che
potrebbe essere più lenta, è comunque ridondante rispetto a quello che mi
interessa. Tra l'altro, se nell'elenco ci sono più cognomi uguali, ad es.
Rossi Maria, Rossi Giulia, Rossi Alessandra etc, il metodo punta sempre al
primo record trovato, indipendentemente da quello che è stato selezionato
nella listbox.
Ora io mi chiedo: nella ListBox appare la lista di tutti i record,
supponiamo soltanto il campo Cognome (che è quello che mi interessa). Io
seleziono un elemento della lista che ovviamente avrà un numero d'ordine
che, credo, corrisponderà a quello dei record ammesso che siano ordinati con
il medesimo criterio. E' mai possibile allora che questo numero d'ordine
della lista non venga restituito da qualche parte, in modo da usare al click
sul nome dell'elenco molto semplicemente,  il comando:
DoCmd.GoToRecord, , stramaledettissimonumerorestituito?
Che voi sappiate questo non si può fare? A me sembra strano essere costretti
ricorrere ad una ricerca su tutti i record anziché ad un banale GoTo.
A questo punto, lo ammetto, il problema è teorico e di puntiglio, ma voi che
ne dite?
Grazie,
Filippo


author: Roberto dal portatile

text:
"Filippo" <
f....@panservice.it
> ha scritto nel messaggio
news:9phrje$rn$1...@news.panservice.it...
> Vi ringrazio dell'aiuto.
>
> In effetti con l'autocomposizione viene fuori questo codice
>  Dim rs As Object
>  Set rs = Me.Recordset.Clone
>  rs.FindFirst "[Cognome] = '" & Me![lstElencoNomi] & "'"
>  Me.Bookmark = rs.Bookmark
>
> che, con un passaggio in più, è lo stesso indicato da @Alex.
>
> Il punto è che in entrambe le soluzioni si usa una procedura di riferca
> FindFirst (di Alex) o FindRecord (di Roberto) che, al di là del fatto che
> potrebbe essere più lenta, è comunque ridondante rispetto a quello che mi
> interessa. Tra l'altro, se nell'elenco ci sono più cognomi uguali, ad es.
> Rossi Maria, Rossi Giulia, Rossi Alessandra etc, il metodo punta sempre al
> primo record trovato, indipendentemente da quello che è stato selezionato
> nella listbox.
Beh, io ti ho detto di adoperare il metodo FindRecord, ma non ho detto di
usarlo ricercando il cognome, proprio per il problema dei sinonimi; io lo
userei ricercando la chiave primaria (che nella casella di riepilogo può
essere contenuta in Column(0) non visualizzata); così ti posizioni
direttamente sul record cercato.
> Ora io mi chiedo: nella ListBox appare la lista di tutti i record,
> supponiamo soltanto il campo Cognome (che è quello che mi interessa). Io
> seleziono un elemento della lista che ovviamente avrà un numero d'ordine
> che, credo, corrisponderà a quello dei record ammesso che siano ordinati
con
> il medesimo criterio.
> E' mai possibile allora che questo numero d'ordine
> della lista non venga restituito da qualche parte, in modo da usare al
click
> sul nome dell'elenco molto semplicemente,  il comando:
>
> DoCmd.GoToRecord, , stramaledettissimonumerorestituito?
>
> Che voi sappiate questo non si può fare? A me sembra strano essere
costretti
> ricorrere ad una ricerca su tutti i record anziché ad un banale GoTo.
Secondo me non è vero che la lista contenuta nella casella di riepilogo è
nello stesso ordine dei record della tabella: la casella di riepilogo riesci
ad usarla efficacemente solo se l'elenco è in ordine alfabetico, mentre i
record in tabella sono nell'ordine in cui li hai inseriti.
Se poi riesci ad avere lo stesso ordine sia per il recordset che è origine
record della maschera che per l'oggetto che è origine riga della casella di
riepilogo, siccome come origine riga della casella di riepiolgo, a causa
dell'ordinamento alfabetico, avrai una query, nessuno ti vieta di inserire
in tale query un campo calcolato che ti numera progressivamente le righe;
tale campo, che sarà contenuto non visibile nella casella di riepilogo,
rappresenta il tuo "stramaledettissimonumerorestituito", e finalmente potrai
usare il tuo metodo GoToRecord. :-)
O sbaglio?
> A questo punto, lo ammetto, il problema è teorico e di puntiglio, ma voi
che
> ne dite?
Normalmente, in casi simili al tuo, non mi posiziono sul record ma filtro la
maschera per visualizzare solo il record cercato: insomma, a fronte del clic
della casella di riepilogo, imposto la proprietà Filter della maschera con
l'ID rilevato da una colonna nascosta della casella di riepilogo, quindi
imposto a True la proprietà FilterOn della maschera.
Così non potrò scorrere i record nella maschera cliccando sui Pulsanti
spostamento (che nasconderei) ma cliccando sulle righe della casella di
riepilogo: che cambia?
> Grazie,
> Filippo
Questo naturalmente é solo il mio pensiero; quanto a quale soluzione sia più
performante non saprei che dire: comunque, quando c'è di mezzo la manualità
dell'operatore, penso che la differenza non sarebbe apprezzabile.



author: The-real-Isaac

text:
"Filippo" <
f....@panservice.it
> ha scritto nel messaggio
news:9phrje$rn$1...@news.panservice.it...
> Vi ringrazio dell'aiuto.
>
> In effetti con l'autocomposizione viene fuori questo codice
>  Dim rs As Object
>  Set rs = Me.Recordset.Clone
>  rs.FindFirst "[Cognome] = '" & Me![lstElencoNomi] & "'"
Il problema è che tu dici ad Access di trovare il primo record dove il
cognome è uguale a quello che hai selezionato, quindi se ci sono più
nominativi con lo stesso cognome ...
>  Me.Bookmark = rs.Bookmark
>
> che, con un passaggio in più, è lo stesso indicato da @Alex.
>
> Il punto è che in entrambe le soluzioni si usa una procedura di riferca
> FindFirst (di Alex) o FindRecord (di Roberto) che, al di là del fatto che
> potrebbe essere più lenta, è comunque ridondante rispetto a quello che mi
> interessa. Tra l'altro, se nell'elenco ci sono più cognomi uguali, ad es.
> Rossi Maria, Rossi Giulia, Rossi Alessandra etc, il metodo punta sempre al
> primo record trovato, indipendentemente da quello che è stato selezionato
> nella listbox.
[CUT]
> Grazie,
> Filippo
>
Possibili soluzioni:
1) Se nella tua tabella c'è una chiave primaria, inseriscila - a larghezza
zero - nella tua ListBox e fai la ricerca su quella
2) Altrimenti fai la ricerca su cognome e nome, utilizzando la proprietà
Column della ListBox
Bye
--
Alberto


text:
"Roberto dal portatile" <
r.ma...@repubblica.it
> ha scritto nel messaggio
news:9pibbs$341c$1...@stargate1.inet.it...
> Beh, io ti ho detto di adoperare il metodo FindRecord, ma non ho detto di
> usarlo ricercando il cognome, proprio per il problema dei sinonimi; io lo
> userei ricercando la chiave primaria (che nella casella di riepilogo può
> essere contenuta in Column(0) non visualizzata); così ti posizioni
> direttamente sul record cercato.
> CUT
>
> Questo naturalmente é solo il mio pensiero; quanto a quale soluzione sia
più
> performante non saprei che dire: comunque, quando c'è di mezzo la
manualità
> dell'operatore, penso che la differenza non sarebbe apprezzabile.
>
> --
> Roberto
Ti ringrazio molto, mi hai chiarito diversi aspetti della questione
Ciao, Filippo


title: Disabilitare Pgdown e pgUp. E il Mouse?

author: Antonio

text:
Salve a
tutti.

Ho disabilitaro l'effetto dei tasti PgDw e PgUp
impostando a Sì la proprietà "Anteprima tasti" e assegando all'evento "Su tasto
giù" il codice ad Hoc (vedi Sito Comune).

Il problema è che anche se da tastiera non è più
possibile spostarsi di pagina, lo è con determinati tipi di mouse, per
intenderci quelli dotati di rotellina.

Qualcuno sa se c'è una soluzione che non sia quella
di chiedere all'utente di non usare la rotellina?

Grazie, Antonio.

P.S.

Anche se in anticipo, buona Pasqua a
tutti.

ant.digen.@katamail.com


title: protezione database microsft access

author: sim

text:
Qualcuno mi sa dire dove posso trovare on line una guida decente in
italiano che mi spieghi come usare la protezione da modifiche nelle
strutture che ho creato?
Per adesso ho fatto in modo che quando chi dovrà
immettere i dati aprirà il file, si troverà direttamente davanti la
maschera di immissione dati. Ho notato però che chiudendo il file e
riaprendolo direttamente dal menu a tendina mi appare invece la schermata
normale.
Qualcuno mi sa spiegare perchè?
Ancora, ho letto da qualche
parte che la gestione della protezione è un po' difficoltosa. Perchè?
Conviene usarla comunque?
Grazie
Sim
--------------------------------
Inviato via
http://usenet.iol.it


title: protezione database microsft access

author: massimiliano

text:
>Per adesso ho fatto in modo che quando chi dovrà
>immettere i dati aprirà
il file, si troverà direttamente davanti la
>maschera di immissione dati.
Ho notato però che chiudendo il file e
>riaprendolo direttamente dal menu
a tendina mi appare invece la schermata
>normale.
scusa ma stai
parlando di un mdb o di un mde?
prova con quest'ultimo, dovrebbe già
risolverti il problema



title: protezione database microsft access

text:


Ovviamente di un mdb, perchè
fino ad ora non sapevo nemmeno che esistessere mde (bella figura no?). Va
beh! Comunque già che ci sei, perchè non spieghi come fare a salvare in
mde?
Grazie
Simona



title: CHI E QUANDO MODIFICA TABELLE

text:
AVREI BISOGNO DEL VOSTRO AIUTO.
COME POSSO FARE PER SAPERE CHI E QUANDO ABBIA MODIFICATO/INSERITO DEI RECORD
IN UNA TABELLA IN ACCESS97?
SIAMO PIU' UTENTI COLLEGATI ALLO STESSO DATABASE.
UTILIZZIAMO TUTTI WINDOWS XP.
GRAZIE!!
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: CHI E QUANDO MODIFICA TABELLE

text: o t a l g i a ?


title: CHI E QUANDO MODIFICA TABELLE

text:
Non ripeto il 3d per educazione:
2 metodi (fra i tanti diversi):
1) Crei una tabella a parte che punta gli id della tabella che "subisce"
modifiche.
Aggiungi alla tabella che "subisce" 4 campi
DataInserimento
UtenteInseritore
DataModifica
UtenteModificatore
(Si potrebbe anche mettere cosa modifica coon un campo memo ma per ora
lasciamo stare)


title: CHI E QUANDO MODIFICA TABELLE

author: Bruno Campanini

text:
"...........................................................................
."
<...........................................................................
..........................................................@.................
............................................................................
.................> wrote in message
news:rOMgd.104034$b5.50...@news3.tin.it...
> Non ripeto il 3d per educazione:
Educazione per educazione, come dovrei chiamarti
Puntini @ Puntini?
Bruno


title: CHI E QUANDO MODIFICA TABELLE

text:
Non ho capito, cosa vuoi?
            Il 30 Ott 2004, 16:20, "Bruno Campanini" <
bruno.XXX...@tin.it
> ha
scritto:




title: CHI E QUANDO MODIFICA TABELLE

text:
"alby77" <
alb...@libero.it
> wrote in message
news:80Z183Z45Z138Y...@usenet.libero.it...
> AVREI BISOGNO DEL VOSTRO AIUTO.
> COME POSSO FARE PER SAPERE CHI E QUANDO ABBIA MODIFICATO/INSERITO DEI
RECORD
> IN UNA TABELLA IN ACCESS97?
> SIAMO PIU' UTENTI COLLEGATI ALLO STESSO DATABASE.
> UTILIZZIAMO TUTTI WINDOWS XP.
> GRAZIE!!
Il vezzo di scriver tutto maiuscolo è solo un po' meno
antipatico (sto usando un eufemismo) di quello di scrivere
in maniera completamente anonima.
Se ti interessa ho un programmino in Access2003
(convertibile credo in Access97) che tiene conto di tutte le
operazioni di inserimento, modifica, cancellazione
che attraverso una Form vengono fatte in una
tabella.
È solo richiesto che l'inserimento venga fatto attraverso
una Form (una qualunque, quella che di solito si trova
già predisposta) e che venga creata una copia della
tabella delle cui variazione si vuol tener traccia.
Free of charge, of course.
Ciao
Bruno


title: CHI E QUANDO MODIFICA TABELLE

author: ALESSANDRO Baraldi

text:
"alby77" <
alb...@libero.it
> ha scritto nel messaggio
news:80Z183Z45Z138Y...@usenet.libero.it...

Vai sul mio sito (
http://www.mantuanet.it/alessandro.baraldi/
)
e trovi un demo di come gestire un File di LOG completamente AUTOMATICO
che salva gli eventi di Modifica dei Dati molto flessibile e potente.
Sezione     [GENERAL]
        Articolo [Gestione Completa di Logs File ad Eventi]    di Namor
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Somma di una Colonna nella query

author: Koala

text:
Salve,
Ho un problemino, all'inizio sembrava una cosa semplice, poi ho trovato
parechhie difficolta'
allora ho una casella di riepilogo che punta su una query (molto semplice).
ora io vorrei inserire nella stessa maschera una casella di testo che mi
visualissi la SOMMA di una colonna della casella di riepilogo ( o della
query)
in pratica:
Casella di riepilogo:
colonna1    colonna2    colonna3
Casella di testo:
=somma(colonna3)
come posso fare?


title: Somma di una Colonna nella query

text:
"Koala" <
koa...@freemail.it
> ha scritto nel messaggio
news:u7VzwdS$$GA...@news1.galactica.it...

Ipotizziamo che la "query (molto semplice)" che è origine riga della tua
casella di riepilogo si chiami Query1, e che contenga un campo chiamato
Colonna3 (quello che ti compare anche nella terza colonna della casella di
riepilogo).
Creati una seconda queri che chiami Query2 che abbia il seguente codice SQL:
SELECT Sum(Query1.Colonna3) AS SommaDiColonna3
FROM Query1;
Inserisci nella maschera, sotto l'attuale casella di riepilogo (incolonnata
nel modo giusto), una seconda casella di riepilogo nella cui origine riga
indichi Query2.
Roberto


title: Maschera di imput

author: FrancoK

text:
Nel db Ordini nella maschera Inserimento Ordini la casella
combinata IDProdotti (la cui maschera di imput è
AAA\(00")     "CCCCCCCCCC;;_), quando la apro
per selezionare il prodotto mi elenca i dati con lettere e cifre
tutte attaccate, cioè AAA00CCCCCCCCCC.
Il che crea un po' di difficoltà nel cercare il prodotto da
selezionare perchè l'elenco sembra tutto uguale.
Una volta selezionato l'articolo lo visualizzo regolarmente
come da maschera di input: AAA(00)    CCCCCCCCCC.
C'è un sistema per far visualizzare l'elenco delle caselle
combinate come da maschera di input?
Saluti Franco


title: Maschera di imput

author: Nicola Ardito

text:
"FrancoK" <
Fra...@mclink.it
> ha scritto nel messaggio
news:8prbj9$jlq$1...@news.mclink.it...

Non credo,comunque puoi sempre costruire nella origine riga della casella
combinata un campo calcolato costruito con un po' di left e mid al posto
giusto e visualizzare questo invece dell'originale.
Ciao Nicola
--
email:sostituire tin a NOSPAM


title: Corretto ordinamento dei mesi in un report (e un'altra domandina...)

text:
Ho creato una query che partendo da una tabella con dei campi data
(01/01/04, 05/01/04, 02/02/04, 10/02/04, ecc.) mi restituisce dei valori
raggruppati in base al mese. Ho utilizzato la funzione Format$. Nella query
i mesi sono stati ordinati correttamente (Gennaio, Febbraio, Marzo Aprile).
In pratica:
Tabella:                                            Query:
Data            Importi                          Periodo        Importi
01/01/04      100                              Gennaio            150
05/01/04        50                              Febbraio             30
07/02/04        20                              Ecc.
15/02/04        10
ecc..
Fin qui nessun problema. Il problema nasce quando creo il report partendo
dalla query, infatti nel report i mesi vengono ordinati in base alla lettera
iniziale (agosto, aprile, ecc.ecc.). Domanda: a) Perché? b)Come faccio ad
ordinarli come i mesi del calendario (nel report)?
Approfittando della vostra sapienza, vi chiedo inoltre (non centra niente
con il problema di sopra):
Come si fa a riportare l'intestazione dei report su tutte le pagine anziché
solo sulla prima (sicuramente è una bischerata)?
Dove si può trovare qualche "trattato" sulle funzioni Format e DSum? (La
guida in linea è abbastanza scarna)
Grazie mille!


text:
"s_takk" <
s_t...@tin.it
> ha scritto nel messaggio
news:sExQc.77221$OR2.4...@news3.tin.it...

Sulla intestazione report mi son già risposto da solo: basta mettere i dati
da riportare nell'intestazione pagina (la risposta era nella domanda),
chiedo venia!


author: Carlo Costarella

text:
"s_takk" <
s_t...@tin.it
> ha scritto nel messaggio
news:sExQc.77221$OR2.4...@news3.tin.it...

Io creo una tabella "Mesi" e vi aggiungo un altro campo numerato da uno a
dodici.
Aggiungo questa tabella alla query che mi interessa avendo cura di fare il
join tra "mesi"
e poi ordino in base alla numerazione "dozzinale"
Ciao, Carlo


author: namor

text:
s_takk ha scritto:
> Ho creato una query che partendo da una tabella con dei campi data
> (01/01/04, 05/01/04, 02/02/04, 10/02/04, ecc.) mi restituisce dei valori
> raggruppati in base al mese. Ho utilizzato la funzione Format$. Nella query
> i mesi sono stati ordinati correttamente (Gennaio, Febbraio, Marzo Aprile).
> In pratica:
> Tabella:                                            Query:
> Data            Importi                          Periodo        Importi
> 01/01/04      100                              Gennaio            150
> 05/01/04        50                              Febbraio             30
> 07/02/04        20                              Ecc.
> 15/02/04        10
> ecc..
> Fin qui nessun problema. Il problema nasce quando creo il report partendo
> dalla query, infatti nel report i mesi vengono ordinati in base alla lettera
> iniziale (agosto, aprile, ecc.ecc.). Domanda: a) Perché? b)Come faccio ad
> ordinarli come i mesi del calendario (nel report)?
Crea un campo calcolato con Format([campo mese];"mm") e usalo per
l'ordinamento. Lo puoi creare nella query o direttamente nella sezione
"ordinamento e raggruppamento" del report.
> Approfittando della vostra sapienza, vi chiedo inoltre (non centra niente
> con il problema di sopra):
> Come si fa a riportare l'intestazione dei report su tutte le pagine anziché
> solo sulla prima (sicuramente è una bischerata)?
> Dove si può trovare qualche "trattato" sulle funzioni Format e DSum? (La
> guida in linea è abbastanza scarna)
> Grazie mille!
Altra domanda andrebbe su altro post comunque per l'intestazione ti sei
già risposto. Per Format, Dsum e tutte le altre funzioni vba la guida in
linea è il posto migliore dove cercare, ti dice tutto quel che c'è da
sapere. Se c'è scritto poco è perchè quelle funzioni sono semplici e non
c'è altro da dire. Se hai dei dubbi specifici chiedi (su un nuovo post).
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Sergio MAZZA

text:
"s_takk" <
s_t...@tin.it
> ha scritto nel messaggio news:pKxQc.77239$OR2.4...@news3.tin.it...

Eh! Eh! Ho capito la domanda ma non la risposta; comunque se nella query ti crei un campo calcolato che ti restituisce il numero del
mese è più semplice;
es.
numeroMese: month(tuaData)
Ciao.
--
Sergio MAZZA


text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:iNFQc.104096$5D1.5...@news4.tin.it...

Grazie a voi per le risposte, anch'io avevo già adottato le vostre
soluzioni, però speravo ci fosse un modo un più "professionale". Ma va bene
lo stesso. Ciao


text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:cevaks$32r$1...@news.newsland.it...

Many thanks, ciao


title: Form Aperta

author: Guido Esposito

text:
Ciao a tutti...
Vorrei sapere se esiste una funzione VBA di Access XP che mi restituisca se
una Form è aperta oppure no...
Grazie a tutti e Buon Natale.
Guido


title: Form Aperta

text:
"Guido Esposito" <
xent...@inwind.it
> ha scritto nel messaggio
news:yMXEb.203057$e6.76...@twister2.libero.it...
> Ciao a tutti...
>
> Vorrei sapere se esiste una funzione VBA di Access XP che mi restituisca
se
> una Form č aperta oppure no...
>
> Grazie a tutti e Buon Natale.
>
> Guido
Public Function IsLoaded(ByVal strFormName As String) As Integer
'*****************************************************************
'Name      : IsLoaded (Function)
'Purpose   : Verifie if Form passed is already OPEN
'Called by :
'Calls     :
'Inputs    : String=Form.Name
'Output    : Return True if Form is Open
'*****************************************************************
    Const conObjStateClosed = 0
    Const conDesignView = 0
    If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <>
conObjStateClosed Then
        If Forms(strFormName).CurrentView <> conDesignView Then
            IsLoaded = True
        End If
    End If
End Function
Ciao.
@Alex.


title: Scadenza dopo 30 giorni

author: Giuseppe

text:
Ciao a tutti.
Vorrei sapere se č possibile impostare le condizioni di una macro in modo da
compiere una azione ad una certa data ed ora. Per esempio vorrei far
apparire una maschera dopo 15 giorni di utilizzo del DB che avvisa della
scadenza di utilizzo e, dopo altri 15 giorni, vorrei si eliminasse tutto
l'archivio della tabella clienti.
Ho provato in "condizione" nella macro a digitare qualcosa del genere:
[date]= 12/01/02 and [time]= 12.00  e in "Azione" ovviamente "Aprimaschera"
ma credo di essere fuori strada.
Per essere piů preciso, vorrei dare un dimostrativo utilizzabile per 30
giorni circa. come posso fare?
Grazie a tutti. Ciao
Giuseppe


title: Scadenza dopo 30 giorni

author: Massimo

text:
io fatto semplicemente così:
ti crei una funzione che ad ogni avvio fa questo:
ogni avvio il db controlla la presenza di un file es c:\windows\prova.dll
questo file ovviamente  non esiste ed allora fai si che il tuo db, in
conseguenza di questa ricerca negativa, lo crei, ( può essere un file di
qualunque genere e fai si che il none di questo file abbia una estensione
comune e che si confondi insieme agl'altri 10.000 file della cartella di
windows o altro).
Supponendo che questo file esista, il db legge le proprietà di questo file,
legge la data e la confronta con quella odierna, poi penso che a questo
punto puoi fare tutto quello che vuoi....
Io ne sono soddisfatto e se fa al caso tuo sono contento.
Max


title: Origine Controllo di una casella di testo

author: Marco Dell'oste

text:
Ciaoo
ho un form con origine dati da una tabella ARTICOLI,
nell' "origine controllo" ad una casella di testo di questo form ho
assegnato il campo NOMEarticolo.
Poiche voglio visualizzare solo i primi 5 caratteri di questo articolo, ho
utilizzato la seguente sintassi:
'Origine controllo'     =left(NOMEarticolo;5)
risultato visualizzato   #Errore
come mai??   in un altra form, tutto funziona regolarmente...  da cosa può
dipendere???
Mi è capitato di inserire anche espressioni più complesse altre volte senza
avere alcun problema,
cose del tipo   =IIF (CHENESO=X;"QUALCOSA;QUALCOSALTRO)
ma in questa form niente...
Grazie
Tony


author: Maurizio Borrelli

text:
> "Marco Dell'oste" [...]:
> ho un form con origine dati da una tabella ARTICOLI,
> nell' "origine controllo" ad una casella di testo
    Che nome hai assegnato a questa casella di testo?
> di questo form ho
> assegnato il campo NOMEarticolo.
> Poiche voglio visualizzare solo i primi 5 caratteri di questo articolo, ho
> utilizzato la seguente sintassi:
> 'Origine controllo'     =left(NOMEarticolo;5)
> risultato visualizzato   #Errore
> come mai??
    Verifica che casella di testo e campo non abbiano lo stesso nome.
> in un altra form, tutto funziona regolarmente...  da cosa può
> dipendere???
> Mi è capitato di inserire anche espressioni più complesse altre volte
> senza avere alcun problema,
> cose del tipo   =IIF (CHENESO=X;"QUALCOSA;QUALCOSALTRO)
> ma in questa form niente...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ambcc8$4ailk$3...@ID-52090.news.dfncis.de...
> > "Marco Dell'oste" [...]:
> > ho un form con origine dati da una tabella ARTICOLI,
> > nell' "origine controllo" ad una casella di testo
>
>     Che nome hai assegnato a questa casella di testo?
>
> > di questo form ho
> > assegnato il campo NOMEarticolo.
> > Poiche voglio visualizzare solo i primi 5 caratteri di questo articolo,
ho
> > utilizzato la seguente sintassi:
> > 'Origine controllo'     =left(NOMEarticolo;5)
> > risultato visualizzato   #Errore
> > come mai??
>
>     Verifica che casella di testo e campo non abbiano lo stesso nome.
>
ECCO, ci si rende conto di essere ignoranti proprio quando succedono di
queste cose...
Mille grazie, era proprio cosi!!!!!!!
> Ciao :-)
> Maurizio
Ciao ed ancora Grazie
Tony


title: Gestione campi BLOB e FBLOB

author: asterix

text:
Salve a tutti
ho creato un db con Oracle 9i e sto gestendo l'interfaccia facendo un
accesso da access al db oracle.
In oracle ho inserito dei campi BLOB e FBLOB, ora vorrei sapere come li devo
gestire con le maskere di access?
Ringrazio tutti per le risp


title: Gestione campi BLOB e FBLOB

text:
"asterix" <
asterix20...@libero.it
> ha scritto nel messaggio
news:9Dnae.814987$b5.36...@news3.tin.it...

I campi Binary Large Object (BLOB) sono solitamente delle immagini.
In Access non conviene usare i campi in formato oggetto ole perchè
appesantiscono il db.
Conviene usare il riferimento al percorso dell'immagine.
Comunque nelle maschere puoi visualizzare tali immagini (se sono immagini)
usando il controllo Immagine o i controlli Cornice oggetto associato e
Cornice oggetto non associato.
Ciao, Carlo


title: Gestione campi BLOB e FBLOB

text:
> I campi Binary Large Object (BLOB) sono solitamente delle immagini.
> In Access non conviene usare i campi in formato oggetto ole perchè
> appesantiscono il db.
Di access uso solo le maskere, la struttura del data base è tutto oracle.
E oracle gira su una makkina dual processor con circa 400GB di hd e 2GB di
ram
> Conviene usare il riferimento al percorso dell'immagine.
> Comunque nelle maschere puoi visualizzare tali immagini (se sono immagini)
si sono immagini
a me interessa in un campo mantenere il percorso del file e in un altro
proprio il file e la sua anteprima



title: Gestione campi BLOB e FBLOB

text:
"asterix" <
asterix20...@libero.it
> ha scritto nel messaggio
news:TCoae.815189$b5.36...@news3.tin.it...

Allora in
www.sitocomune.com
 troverai molto materiale su come gestire un
archivio di immagini.
Anche il sito di
www.lebans.com
 può esserti utile per simulare un controllo
picture o gestire le immagini da Access.
Anche il sito di A.Baraldi offre degli spunti notevoli.
Sono molte le possibilità.
Ciao, Carlo


title: Gestione campi BLOB e FBLOB

text:
>
> Allora in
www.sitocomune.com
 troverai molto materiale su come gestire un
> archivio di immagini.
> Anche il sito di
www.lebans.com
 puņ esserti utile per simulare un
> controllo picture o gestire le immagini da Access.
> Anche il sito di A.Baraldi offre degli spunti notevoli.
> Sono molte le possibilitą.
>
Ti ringrazio delle info, ora vado a vedere i link
A me interessa ke il DB in oracle mi accetta i dati messi attraverso le
maskere di access


title: Gestione campi BLOB e FBLOB

text:
> Conviene usare il riferimento al percorso dell'immagine.
a me interessa anke memorizzare e visualizzare il percorso del file, come
devo fare?
> Comunque nelle maschere puoi visualizzare tali immagini (se sono immagini)
> usando il controllo Immagine o i controlli Cornice oggetto associato e
> Cornice oggetto non associato.
con questi controlli il DB oracle non accetta i valori ke gli vengono
immessi dalla maskera access....


title: Gestione campi BLOB e FBLOB

author: Alessandro Baraldi

text:
"asterix" <
asterix20...@libero.it
> wrote in message
news:Iwuae.1280977$
35.47...@news4.tin.it

Usando i Campi Blob la tecnica da adottare è questa:
1)Inglobare il file in formato Binario nel Campo
  e quì trovi le istruzioni sul SC relative alla gestione
  dei AppendChunk, io userei ADO per questo, se non ricordo
  male DAO necessita di spezzare il Dato in pezzetti.
  Con ADO:
    rsFile("filedata").AppendChunk (DataBinaryFile)
    Dove rsFile è un Recordset aperto sulla tabella
    e Filedata è il campo BLOB
2)Per poter vedere il file in anteprima devi esportarlo
  in una TempFolder quindi sfruttare la proprietà Picture
  di un controllo Immagine.
  Tieni presente che Access(se usato con il Runtime) non dispone
  dei filtri di conversione, pertanto sarà possibile visualizzare
  solo BMP, a meno di sfruttare una DLL di WIN GDI+ per la conversione
  del formato.
  A tal proposito trovi un Demo sul sito di LEBANS
www.lebans.com
  L'esportazione può avvenire su evento Current della Form.
Se invece non inglobi l'immagine nel DB puoi strutturare
una Cartella parallela nella quale hai tutte le tue Immagini
e nella tua Tabella memorizzi solo ed esclusivamente il Percorso
completo, oppure il Nome ed il Percorso potrebbe essere salvato
in una Chiave di Registro se sempre il medesimo.
In entrambi i casi il problema BMP sussiste.
In entrambi i casi la gestine và effettuata su evento Current.
Saluti.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Gestione campi BLOB e FBLOB

text:
>  A tal proposito trovi un Demo sul sito di LEBANS
www.lebans.com
>
Ho visto su questo sito ma l'esempio non sono riuscito a trovarlo :-(


title: Gestione campi BLOB e FBLOB

text:
"asterix" <
asterix20...@libero.it
> wrote in message
news:i9vae.1281244$
35.47...@news4.tin.it
>
> >  A tal proposito trovi un Demo sul sito di LEBANS
www.lebans.com
> >
>
> Ho visto su questo sito ma l'esempio non sono riuscito a trovarlo :-(
Beh non hai cercato molto...!!!!
http://www.lebans.com/loadjpeggif.htm
Ciao



title: da Access 2000 a SQL Server, come?

text:
Ci sono problemi se porto un DB Access 2000 su SQL Server? Sto facendo
un'applicazione in ASP, VBScript e utilizzo ADO. Secondo voi il passaggio è
indolore, oppure dovrò fare qualche cosa in più?
Grazie
Ken


title: Restituzione nome macchina o IP in Access

author: Ernesto Fantini

text:
Salve a tutti,
C'è una funzione in Access, che mi restituisce il nome della macchina in rete
LAN oppure il suo indirizzo IP ? Mi servirebbe per una query. Se è un API come
dovrei implementarla nel codice ?
Grazie in anticipo
--
Posted from  [217.59.183.5]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Paolo opg

text:
sul sitocomune c'č.
Ernesto Fantini <
sotto...@yahoo.com
> wrote in message
news:134909861ea18ae3341...@mygate.mailgate.org...
> Salve a tutti,
>
> C'č una funzione in Access, che mi restituisce il nome della macchina in
rete
> LAN oppure il suo indirizzo IP ? Mi servirebbe per una query. Se č un API



title: Programma di contabilità semplice gratuito.

author: Figaroli Fernando

text:
    Dove posso reperire un programma di contabilità semplice gratuito ??
grazie.


text:
"Figaroli Fernando" <
fern...@figaroli.it
> ha scritto nel messaggio
news:5ak%7.6549$aD.2...@twister2.libero.it...
>     Dove posso reperire un programma di contabilità semplice gratuito ??
>
> grazie.
>
Alla Caritas?
Ciao.
--
Sergio MAZZA


author: Silvia

text:
"Figaroli Fernando" <
fern...@figaroli.it
> ha scritto nel messaggio
news:5ak%7.6549$aD.2...@twister2.libero.it...
>     Dove posso reperire un programma di contabilità semplice gratuito ??
>
> grazie.
>
>
Perché non provi ad acquistare il programma che cerchi da una di quelle
collane che vendono le applicazioni di giovani programmatori e che non
essendo pubblicizzate o con confezioni estrose hanno prezzi più che
ragionevoli.
Ne ho trovati anche agli ipermercati che hanno reparti di giochi per PC e
materiale informatico vario; la spesa era di circa 10/20 mila LIRE (beh se
per te non è troppo!)


author: Antonio Biso

text:
Silvia <
nospam-...@yahoo.com
> wrote in message
a1u7ak$dk8$1...@newsreader.mailgate.org...
>
> "Figaroli Fernando" <
fern...@figaroli.it
> ha scritto nel messaggio
> news:5ak%7.6549$aD.2...@twister2.libero.it...
> >     Dove posso reperire un programma di contabilità semplice gratuito ??
> >
> > grazie.
> >
> >
>
> Perché non provi ad acquistare il programma che cerchi da una di quelle
> collane che vendono le applicazioni di giovani programmatori e che non
> essendo pubblicizzate o con confezioni estrose hanno prezzi più che
> ragionevoli.
Beh, certo, per delle ciofeghe sono sì ragionevoli...
Antonio


title: perso in un bicchier d'acqua...

author: Umin

text:
mi sto perdendo in un bicchier d'acqua, temo, ma e' da stamani alle 7
che sono davanti al pc... :(
in pratica ho questa routine
Private Sub Cristallo_Change()
[...]
EuroCode = DLookup("[EuroCode]", "Magazzino", "[Modello]= '" &
Me!Modello & "' AND [Marca] ='" & Me!Marca & "' AND [Specifiche] ='" &
Me!Specifiche & "' AND [Cristallo] = '" & Me!Cristallo & "'")
Form_Insert_Preventivo_Vetro.CodGuarnizione = Mid(EuroCode, 1, 4)
Me!ListaGuarnizioni.RowSource = "SELECT ID_Magazzino, Cristallo,
EuroCode FROM Magazzino WHERE EuroCode LIKE '" & Me!CodGuarnizione &
"*' AND Cristallo LIKE 'Guar.*';"
Me!ListaGuarnizioni.Requery
End Sub
_______________________________________________________________________
Private Sub ListaGuarnizioni_AfterUpdate()
Me!Guarnizione = True
Me!ListAniaGuarnizione = DLookup("[ListAnia]", "Magazzino",
"[ID_Magazzino]= '" &
[Form_Insert_Preventivo_Vetro].[ListaGuarnizioni].[ID_Magazzino] & "'")
End Sub
_______________________________________________________________________
a me servirebbe che l'ID_Magazzino scelto nella casella combinata
ListaGuarnizioni mi imposti il prezzo (ListAnia) nella casella di testo
ListAniaGuarnizione
per quanto riguarda la routine Cristallo non ho erriri
soltanto che nel momento in cui vado a fare l'AfterUpdate di
ListaGuarnizioni, il campo Guarnizione viene giustamente settato a true
ma il campo ListAniaGuarnizione mi ritorna errore per quanto, in debug,
l'id compaia corretto
credo sia una cavolata perche' si tratta solo di recuperare
l'ID_Magazzino da ListAniaGuarnizione ma adesso sono... "nel pallone" e
mi sono arenato
grazie a chi mi potra' aiutare
--
Umin
n. p.: Coldplay - X & Y


title: perso in un bicchier d'acqua...

text:
Sembra che Umin abbia detto :
> mi sto perdendo in un bicchier d'acqua, temo, ma e' da stamani alle 7 che
> sono davanti al pc... :(
[...]
ho risolto da me
grazie comunque
--
Umin
n.p.: Mogwai - 2 Rights Make 1 Wrong [stop]


title: perso in un bicchier d'acqua...

author: MA

text:
Umin wrote:
> mi sto perdendo in un bicchier d'acqua, temo, ma e' da stamani alle 7
> che sono davanti al pc... :(
Tutto sto tempo per cercare un subject???
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: sintassi di notnull

author: tonidrummer

text:
Ciao a tutti.
Qual è la sintassi per dire:
Se il campo "ftnumero" non è nullo then ecc.
Ho provato if not isnull (ftnumero) ma non funziona
Grazie


title: sintassi di notnull

author: geppo

text:
Ciao "tonidrummer" <
tonia...@fastwebnet.it
> ha scritto nel messaggio
news:4d2a40e8-f684-4245...@3g2000yqk.googlegroups.com...
Ciao a tutti.
Qual � la sintassi per dire:
Se il campo "ftnumero" non � nullo then ecc.
Ho provato if not isnull (ftnumero) ma non funziona
Cio�? errori?
a me funziona alla grande......... non so prova:
if ftnumero <> vbnull then
   .....
end if
Grazie
prego
--
Ciao
Geppo


title: sintassi di notnull

text:
On 24 Mag, 23:00, "geppo" <c...@tin.it.invalid> wrote:
> Ciao "tonidrummer" <
toniaven...@fastwebnet.it
> ha scritto nel messaggionews:4d2a40e8-f684-4245...@3g2000yqk.googlegroups.com...
> Ciao a tutti.
> Qual è la sintassi per dire:
> Se il campo "ftnumero" non è nullo then ecc.
> Ho provato if not isnull (ftnumero) ma non funziona
>
> Cioè? errori?
>
> a me funziona alla grande......... non so prova:
>
> if ftnumero <> vbnull then
>    .....
> end if
>
> Grazie
> prego
>
> --
> Ciao
> Geppo
No, non funge.
Mi fa vedere lo stesso tutti i record, come se il campo non fosse null


title: sintassi di notnull

text:
Ciao "tonidrummer" <
tonia...@fastwebnet.it
> ha scritto nel messaggio
news:600ba364-85c2-4e58...@l12g2000yqo.googlegroups.com...
---cut---
No, non funge.
Mi fa vedere lo stesso tutti i record, come se il campo non fosse null
ma parli di una query?
spiega meglio cosa ci devi fare con sto null
--
Ciao
Geppo


title: sintassi di notnull

text:
On 24 Mag, 23:20, "geppo" <c...@tin.it.invalid> wrote:
> Ciao "tonidrummer" <
toniaven...@fastwebnet.it
> ha scritto nel messaggionews:600ba364-85c2-4e58...@l12g2000yqo.googlegroups.com...
> ---cut---
>
> No, non funge.
> Mi fa vedere lo stesso tutti i record, come se il campo non fosse null
>
> ma parli di una query?
>
> spiega meglio cosa ci devi fare con sto null
>
> --
> Ciao
> Geppo
Maschera fatturazione.
Vorrei che, se non c'è nulla nel campo FTNUMERO altri 4 controlli
fossero non visibili.


title: sintassi di notnull

text:
Ciao "tonidrummer" <
tonia...@fastwebnet.it
> ha scritto nel messaggio
news:86eb5bcb-b032-4e2d...@x5g2000yqk.googlegroups.com...
On 24 Mag, 23:20, "geppo" <c...@tin.it.invalid> wrote:
> Ciao "tonidrummer" <
toniaven...@fastwebnet.it
> ha scritto nel
> messaggionews:600ba364-85c2-4e58...@l12g2000yqo.googlegroups.com...
> ---cut---
>
> No, non funge.
> Mi fa vedere lo stesso tutti i record, come se il campo non fosse null
>
> ma parli di una query?
>
> spiega meglio cosa ci devi fare con sto null
>
> --
> Ciao
> Geppo
Maschera fatturazione.
Vorrei che, se non c'� nulla nel campo FTNUMERO altri 4 controlli
fossero non visibili.
Dunque sei sicuro che ftnumero quando non c'� "nulla" � vuoto o magari
contiene uno "zero"?
Perch� il codice che hai usato deve funzionare, altrimenti la textbox
ftnumero non � vuota.
--
Ciao
Geppo


title: sintassi di notnull

author: Pablitomf

text:
> Maschera fatturazione.
> Vorrei che, se non c'� nulla nel campo FTNUMERO altri 4 controlli
> fossero non visibili.
>
> Dunque sei sicuro che ftnumero quando non c'� "nulla" � vuoto o magari
> contiene uno "zero"?
>
> Perch� il codice che hai usato deve funzionare, altrimenti la textbox
> ftnumero non � vuota.
o semplicemente e probabilmente, non � null ma � vuoto, ovvero ""
quindi :
If Is NotNull(ftnumero) or ftnumero<>"" or ftnumero<>0 then
...
Else
...
End if
--
---
Ciao
Pablitomf
FORZA NAPOLI - - - SEMPRE!
Tifosi Napoletani, gente fantastica
http://it.youtube.com/watch?v=gUqFHOXrK-M&feature=related


title: sintassi di notnull

text:
Ciao "Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:gvcgf7$qcs$1...@tdi.cu.mi.it...
---cut---
> o semplicemente e probabilmente, non � null ma � vuoto, ovvero ""
> quindi :
si hai ragione, effettivamente potrebbe contenere anche una stringa di
lunghezza 0.
qui forse volevi scrivere:
 If Not isNull(ftnumero) or ftnumero<>"" or ftnumero<>0 then
> ...
> Else
> ...
> End if
--
Ciao
Geppo


title: sintassi di notnull

text:
> If Not isNull(ftnumero) or ftnumero<>"" or ftnumero<>0 then
si si ovviamente ;)



title: sintassi di notnull

text:
On 25 Mag, 00:07, "Pablitomf" <
pablit...@hotmail.it
> wrote:
> > Maschera fatturazione.
> > Vorrei che, se non c'è nulla nel campo FTNUMERO altri 4 controlli
> > fossero non visibili.
>
> > Dunque sei sicuro che ftnumero quando non c'è "nulla" è vuoto o magari
> > contiene uno "zero"?
>
> > Perchè il codice che hai usato deve funzionare, altrimenti la textbox
> > ftnumero non è vuota.
>
> o semplicemente e probabilmente, non è null ma è vuoto, ovvero ""
> quindi :
>
> If Is NotNull(ftnumero) or ftnumero<>"" or ftnumero<>0 then
> ...
> Else
> ...
> End if
>
> --
> ---
> Ciao
> Pablitomf
Forse potrebbe bastare una condizione...?
If Len(ftnumero + "")>0 Then
Ciao
@Alex


title: Field exist ?

author: Giorgio Mura

text:
Basjlico wrote:
> Try with
...
Anvedi come s'aizza sulla tedescona ;))))
G


title: Field exist ?

author: Basjlico

text:
in Tue, 30 May 2000 20:32:39 +0200 , Mr. "Karine De Munter"
<
karine....@syscom.be
> wrote:
>Hello,
>
>I have a problem in Microsoft Access.
>
>I have the following details:
>
>    - A database: "ScmRre"
>    - A table: "Rekeningen"
>    - Field 1: "Code"
>    - Field 3: "Omschrijving"
>    - Field ...
>
>I want to know, in code (DAO) , if some fields exist in a specific table.
>
>When you think you can help me and need more information, please contact me.
>
>Karine.
>Karine....@Syscom.be
>
Try with
Dim Dbs as dao.database
Dim Rcs as dao.recordset
Dim Fld as dao.field
Set dbs = currentdb
set rcs = dbs.openrecordset("Rekeningen")
for each fld in rcs.fields
	if
fld.name
 = "Code" or
fld.name
 = "Omschrijving" then
	  msgbox "Do something"
	end if
next fld
rcs.close
dbs.close
set rcs = nothing
set dbs = nothing
Ciao


title: Field exist ?

author: warp

text:
>> Try with
>
>...
>Anvedi come s'aizza sulla tedescona ;))))
>G
Non posso dargli torto!! :-D
CIAO.


title: Filtro nella maschera con doppia selezione

author: andrea

text:
Ho il seguente passaggio per poter selezionare nella maschera du opzioni la
prima denominazione e la seconda l'anno
Il campo anno ho dovuto farlo in testo per inserire e poi selezionare es
95/96
La selezione va bene nella denominazione pero quando scelgo la campagna
questa mi blocca il tutto
Dove è che sbaglio presumo a mettere le virgolette?
Grazie a chi mi da una tiratina di orecchi nell'errore
Andrea
Option Compare Database
Option Explicit
Dim strFiltro1, strFiltro2 As String
****
Private Sub cmd_all_Click()
    DoCmd.ShowAllRecords
End Sub
***********
Private Sub CMD_DENOMINAZIONE_AfterUpdate()
    If Me.CMD_DENOMINAZIONE <> "" Then
        strFiltro1 = "[DENOMINAZIONE]='" & Me.[CMD_DENOMINAZIONE] & "' AND "
    Else
        strFiltro1 = ""
    End If
  Filtra
End Sub
***********
Private Sub CMD_CAMP_AfterUpdate()
    If Me.CMD_CAMP <> "" Then
         strFiltro2 = "[CAMPVIT]=" & Me.CMD_CAMP
     Else
        strFiltro2 = ""
    End If
  Filtra
End Sub
***********
Private Sub Filtra()
    Dim strfiltroTOT As String
        If strFiltro2 <> "" Then
            strfiltroTOT = strFiltro1 & strFiltro2
        Else
            strfiltroTOT = Left$(strFiltro1, Len(strFiltro1) - 5)
        End If
    Me.FilterOn = True
    Me.Filter = strfiltroTOT
End Sub
*****
Private Sub Form_Resize()
    DoCmd.Maximize
End Sub


author: Cinzia

text:
"andrea" <
tientela...@tin.it
> ha scritto nel messaggio
news:43554f0a$0$29541$4faf...@reader1.news.tin.it...

Ciao Andrea,
siccome anche il campo campagna è un campo di tipo testo devi usare le
virgolette:
Private Sub CMD_CAMP_AfterUpdate()
    If Me.CMD_CAMP <> "" Then
         strFiltro2 = "[CAMPVIT]='" & Me.CMD_CAMP & "'"
     Else
        strFiltro2 = ""
    End If
  Filtra
End Sub
Saluti
Cinzia


text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:43555178$0$8479$5fc...@news.tiscali.it...

Innazitutto grazie della risposta sollecita ma mi da mi da il seguente
errore "Errore di Compilazione Previsto: fine istruzione"
Ho cercato di modificare le virgolette, anche prima di postare, pero si
blocca sempre li
Grazie Andrea


text:
"andrea" <
tientela...@tin.it
> ha scritto nel messaggio
news:435553e1$0$29558$4faf...@reader1.news.tin.it...

Scusa ma nel frattempo ho provato ed ha cominicato a funzionare ho inserito
un azzerramento del filtro e gira abbastanza bene
Grazie e scusa se ho postato prima di fare piu tentativi
Andrea.


title: GESTIONE DI UNO SCANNER

author: STEFANO POZZAGLIO

text:
Ciao,
devo fare in maniera che da una maschera di Access ci sia un pulsante che
attivato mi faccia partire uno scanner e salvi automaticamente l'immagine in
un formato jpg a bassa risoluzione in una determinata cartella del disco c
senza che l'operatore non debba fare alcuna operazione o selezione.
Grazie anticipatamente,
Stefano


title: GESTIONE DI UNO SCANNER

author: MegaMax

text:
"STEFANO POZZAGLIO" <
stefano....@jumpy.it
> ha scritto nel messaggio
news:9u653b$fi2$1...@serv1.albacom.net...
> Ciao,
> devo fare in maniera che da una maschera di Access ci sia un pulsante che
> attivato mi faccia partire uno scanner e salvi automaticamente l'immagine
in
> un formato jpg a bassa risoluzione in una determinata cartella del disco c
> senza che l'operatore non debba fare alcuna operazione o selezione.
Hai detto poco....
Prova    InfranView , è freeware e supporta anche la gestione del batch
scanning, magari si riesce a fare anche da linea di comando, oppure vai
avanti di "sendkeys" e lo fai funzionare te.
Okkio che però come sistema è un tantinello critico, se cambia un'opzione
del driver dello scanner sei fregato e devi rifare il prog, o rimettere il
driver giusto.
Max


title: GESTIONE DI UNO SCANNER

author: Sergio MAZZA

text:
"STEFANO POZZAGLIO" <
stefano....@jumpy.it
> ha scritto nel messaggio
news:9u653b$fi2$1...@serv1.albacom.net...

Puoi provare con i controlli activex della Kodak (Wang) presenti in
windows...
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -


title: Calcolare tasso di mora in un report

author: fausto

text:
fino a pochi giorni fa calcolavo il tasso di mora in un reportmediante
questa formula
me.scaduto*me.giorniritardo/365*[interesse]
adesso volevo fare in modo che mi calcolarre l'interesse legale dato dalla
bce
il problema è che cambia ogni 6 mesi anche se i dati li ho tutti per me
diventa molto difficile proseguire.
Ho una tabella che contiene i seguenti campi
data scadenza        data pagamento        importo
30/05/03                30/09/03                1000
30/06/03                31/10/03                1000
ecc
e una tabella che contiene i tassi
data inizio         data fine         tasso d'interesse
01/01/03            30/06/03             8
01/07/03            31/12/03             8.5
ecc
in pratica per il primo pagamento la formula da fare sarebbe
1000*30/365*8/100
1000*90/365*8.5/100
e la seconda
1000*90/365*8.5/100
il problema è con le date
deve capire in che periodo si trova e se deve dividere in due la formula.
grazie


title: Problema prestazioni pc in lan

author: RobertoA

text:
Ho un'installazione con 4 pc, uno dei quali, un intel core2 3 GHz, con 2
Gb ram, e' particolarmente lento ad eseguire le operazioni di una
procedura realizzata con Access
La classica generazione fatture da ddt, se avviata dagli altri pc
viaggia a circa 1 riga/sec, se lanciata dal pc lumaca viaggia a 0,1 riga/sec
Ho provato a controllare l'impiego cpu, la rete locale, la
disponibilita' di ram, ma sembra tutto allineato sotto-sfruttato
Il pc lumaca, come altri pc, accedono ai dati sul server db via odbc,
tramite tabelle collegate
Anche verificando l'impegno del db server, il processo visibile da task
manager di Windows e' sul 10-20%, il resto va tutto nel ciclo idle sistema
Inzomma, 'sto pc funziona correttamente ma e' una lumaca, anche se con
'credenziali' hardware simili ad altri pc della stessa rete
Cosa posso controllare per aumentare le prestazioni del pc lumaca?
Ciao e grazie
RobertoA


title: Problema prestazioni pc in lan

author: Simone Calligaris

text:
"RobertoA" <

> Inzomma, 'sto pc funziona correttamente ma e' una lumaca, anche se con
> 'credenziali' hardware simili ad altri pc della stessa rete
> Cosa posso controllare per aumentare le prestazioni del pc lumaca?

Driver odbc obsoleti solo su quel PC?  (magari gli altri hanno a bordo il
Native Client)

Tanto per...


title: Problema prestazioni pc in lan

text:

Ringrazio per la riposta
Non si tratta del db server Microsoft, quell'installazione usa Firebird
Il driver odbc ho gia' provato ad aggiornarlo, senza nessun miglioramento


title: Problema prestazioni pc in lan

text:

Alla fine si e' rivelato essere il pc una lumaca
Anche se con cpu e ram adeguate, probabilmente il chipset scheda madre
e' una fetecchia
Fatto sta che anche con altre applicazioni, browser, office ed altro e'
molto piu' lento di altri suoi simili come caratteristiche


title: Calendario di outlook

author: FERRO

text:
qualcuno mi sa dire se si puo fare e come si può aprire da un db il
calendario di outlook per aggiornarlo con gli appuntamenti
ciao e grazie


title: Calendario di outlook

author: Pat

text:
"FERRO" <
fer...@libero.it
> ha scritto nel messaggio
news:22ZIg.86099$zy5.1...@twister1.libero.it...
> qualcuno mi sa dire se si puo fare e come si puņ aprire da un db il
> calendario di outlook per aggiornarlo con gli appuntamenti
> ciao e grazie
>
Ciao FERRO,
non l'hai specificato, ma se tu avessi Access 2003 e Outlook 2003:
in access:
File\Carica dati esterni\Collega tabelle
nel tipo di file selezionare Outlook
seguire le istruzioni a video.
Ciao
--
Pat [Microsoft Office Project MVP]
.........................

www.riolab.org
.........................


title: Ancora problema 'OutputSu' non disponibile. - N. 2046

text:
Ho ancora il problema di non riuscire a generare i file pdf con le dll di
Lebans.
L'errore che mi dà è:
Comando o azione 'OutputSu' non disponibile. - N. 2046
Ho modificato Formato Snapshot in Snapshot format e viceversa, ma il
problema sussiste.
C'e qualche altra differenza tra le lingue?
Il comando per me è Docmd.OutputTo anche se il messaggio di errore
dell'oggetto err è tradotto in italiano.
Cosa posso verificare?
ciao
Nicoletta
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Roberto da Parma

text:
--
Roberto da Parma
"Nicoletta2" <
frt...@virgilio.it
> ha scritto nel messaggio
news:g1mgc3$vm9$1...@news.newsland.it...

Forse non sono il diretto interessato ma...basta che copy i moduli nel tuo
DB e lanci il comando
dim blRet as boolean
blRet = ConvertReportToPDF("rptTuo", vbNullString, percorso &
"Tuoreport.pdf", False, False)
Ciao
--
Roberto da Parma


author: Nicky

text:
Roberto da Parma ha scritto:
E' quello che faccio io.
Credevo come da post precedenti che il problema fosse la stringa del
formato snapshot (italiano/inglese) in base alla versione di access
installata.
Allora ho modificato in entrambi i modi la scritta, ma non funziona lo
stesso, generando l'errore indicato nell'oggetto del post.
Credo che possa dipendere ancora da qualcosa riguardante la traduzione
Outputto ma non posso provarlo in quanto non arrivo fino alla macchina
del cliente e posso solo inviare a lui gli n tentativi che faccio di
modifica e non vorrei farne troppi.
Nicoletta


text:
--
Roberto da Parma
"Nicky" <
frt...@virgilio.it
> ha scritto nel messaggio
news:483f8a3a$0$35952$4faf...@reader2.news.tin.it...

Devi lasciare ill codice così com'è...il motivo dell'errore è che forse sul
pc non hai installato lo snapshot wiever (presente nel cd di office) ...
Prova a controllare...
