title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Roberto dal portatile

text:
"Luciano (DOC)" <
mc5...@mclink.it
> ha scritto nel messaggio
news:8t7dpg$fl$1...@news.mclink.it...
> Dunque, faccio un po' il punto della situazione.
Per me è OK.
Penso che qualche dolce portato da chi viene da fuori Roma non sarebbe male.
(sono un pò goloso :o) ).
Ricordati che arriveranno anche le mie bottiglie.
Roberto


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Alessia

text:
> a proposito di grappa.
> sai mica dove trovare della grappa di piccolit?
>
> --
> Federico
>
Dovresti trovarla c/o Cantina Produttori Cormons tel 0481/60579/61798,
comunque questa sera esco con un mio amico che lavora li, e mi faccio dare
delle dritte.
Ti aggiorno domani.
Ale


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Sergio MAZZA

text:
Ok anche per me...
Ciao.


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Lorenzo Coronati

text:
Scrisse "Luciano (DOC)" <
mc5...@mclink.it
>:
>Dunque, faccio un po' il punto della situazione.
Hai tutta la mia approvazione :-)
Cmq non esagerare con i dolci, vedrai che non mancheranno
(vero, RoDAgo?)
:-P
--
Lorenzo Coronati
--
<<Come posso dunque sprotegere il database?
Esiste un crack o qualcosa del genere
che mi faccia accedere ai dati?>>
(Cocco, 17/10/2000)
--


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Federico Luciani

text:

ti ringrazio.



title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: RoDAgo

text:
"Lorenzo Coronati" scrisse
> Cmq non esagerare con i dolci, vedrai che non mancheranno
> (vero, RoDAgo?)
> :-P
Quelli che riesco a mettere in valigia e che entrano nel vano bagagli
dell'aereo.
Ho pensato di portare dei dolci secchi (come martorana o dolci misti a base
di mandorle) e qualche specialità dolciaria fresca, spero che 50 minuti in
aereo non creino prob.
L'unica mia preoccupazione è quella di mettere i dolci in frigo subito dopo
l'arrivo in aereoporto.
Per risolvere questo problema spero che qualche nativo del luogo possa
aiutarmi. (come cavolo si fa la faccina fiduciosa?)
Non riuscirò a portare molte paste, al limite razionerò il tutto in base a
criteri del tutto soggettivi, che ho maturato grazie all'esperienza sul NG.
Mi raccomando comportatevi bene in questi pochi giorni che rimangono!  8-)
Cià regà!
--
RoDAgo


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
"RoDAgo" <
rodago...@tiscalinet.it
> ha scritto nel messaggio
news:8t9n9t$ftd$1...@lacerta.tiscalinet.it...
> "Lorenzo Coronati" scrisse
>
[CUT]
>
> Quelli che riesco a mettere in valigia e che entrano nel vano bagagli
> dell'aereo.
> Ho pensato di portare dei dolci secchi (come martorana o dolci misti a
base
> di mandorle) e qualche specialità dolciaria fresca, spero che 50 minuti in
> aereo non creino prob.
> L'unica mia preoccupazione è quella di mettere i dolci in frigo subito
dopo
> l'arrivo in aereoporto.
> Per risolvere questo problema spero che qualche nativo del luogo possa
> aiutarmi. (come cavolo si fa la faccina fiduciosa?)
[CUT]
In che giorno e a che ora pensi di arrivare all'aereoporto di Fiumicino?
(come cavolo si fa la faccina golosa?)
Roberto
PS Se riesco ad andare a prendere RoDAgo in aereoporto, non garantisco che
tutte le paste arriveranno a casa di Luciano :-)))))


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Silvio Berruti

text:
"Luciano (DOC)" <
mc5...@mclink.it
> ha scritto nel messaggio
news:8t7dpg$fl$1...@news.mclink.it...
Anche x me è OK!
Vedo di farmi preparare qualcosa di tipico e particolare...
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
"RoDAgo" <
rodago...@tiscalinet.it
> ha scritto nel messaggio
news:8t9n9t$ftd$1...@lacerta.tiscalinet.it...

Io parto da Ostia, arrivare a Fiumicino non sarebbe un problema; se può
interessarti fammi sapere a che ora atterri...
Ciao.


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Antonio Biso

text:
Luciano (DOC) <
mc5...@mclink.it
> wrote in message
8t7dpg$fl$1...@news.mclink.it...
> Ah, della (neo) famiglia Biso e' invitata solo la signora e LBO paga due
> quote!
La signora non legge il NG.
Antonio


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
--------------------------------------------------------------
"Sergio MAZZA" ha scritto nel messaggio ...
> Io parto da Ostia, arrivare a Fiumicino non sarebbe un problema; se può
> interessarti fammi sapere a che ora atterri...
--------------------------------------------------------------
--------------------------------------------------------------
"Roberto dal portatile" ha scritto nel messaggio ...
> In che giorno e a che ora pensi di arrivare all'aereoporto di Fiumicino?
> (come cavolo si fa la faccina golosa?)
> Roberto
> PS Se riesco ad andare a prendere RoDAgo in aereoporto, non garantisco che
> tutte le paste arriveranno a casa di Luciano :-)))))
--------------------------------------------------------------
Scusate il ritardo nel reply ma ultimamente tiscali fa più schifo del
solito. :-(
Risposta Stereo, per il Dolby-Surround ci stiamo attrezzando.  :)
Ragazzi, innanzitutto grazie per la vs disponibilità :-) (ringrazio
pubblicamente anche Lbo per quanto concerne l'alloggio e tutto il resto),
parto da Palermo alle 14:15 (di giorno 4) e calcolando un'oretta di volo
dovrei essere a Fiumicino alle 15:15.
Non sò a chi dei due risulti più facile venire a Fiumicino ma l'importante è
la disponibilità di un frigo in cui conservare le leccornie per la serata.
Certo non sarò insensibile a questo aiuto, qualche pastarella la beccherete
prima degli altri!  :-P
In ogni caso forse è meglio scambiarsi i numeri di cell via e-mail, per
informarvi di un'eventuale partenza in ritardo da Palermo.
Cià omonimo, cià Sergio.
RoDAgo


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Roberto da casa

text:
"RoDAgo" <
rodago...@tiscalinet.it
> ha scritto nel messaggio
news:8te5qo$sbq$1...@lacerta.tiscalinet.it...

Sicuramente Sergio è più di strada rispetto a me, ma, se lui non potrà
essere in aereoporto per quell'ora, dai per scontato che ci sarò io; intanto
mi dò da fare per rimediare in frizer portatile adatto a contenere un
vassoio di paste.
Ciao
Roberto


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Luciano (DOC)

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
%UfK5.35533$3K3.9...@news.infostrada.it...
> > Ah, della (neo) famiglia Biso e' invitata solo la signora e LBO paga due
> > quote!
>
> La signora non legge il NG.
Lo so, per questo l'ho invitata personalmente....
Saluti.
Luciano
(DOC)


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
"RoDAgo" <
rodago...@tiscalinet.it
> ha scritto nel messaggio
news:8te5qo$sbq$1...@lacerta.tiscalinet.it...

Che bello! Mi becco le pastarelle!! Cio' già l'acquolina in bocca...
Ciao.


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:8tjh49$hf8$1...@suite03.caspur.it...
[CUT]
> >
> Che bello! Mi becco le pastarelle!! Cio' gią l'acquolina in bocca...
>
> Ciao.
>
>
Visto che l'anteprima delle pastarelle erano per chi andava in aereoporto a
prendere RoDAgo, significa che a Fiumicino ci vai tu.
Mi rendo comunque disponibile come autista per altre necessitą.
Roberto


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

author: Lbo da casa

text:
>Mi rendo comunque disponibile come autista per altre necessità.
ehm, io ciavrei da fà un traslochino...
---------------
molti umani che conosco non passerebbero il test di Turing. (Lbo)
---------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


title: OT - RADUNO NAZIONALE ICAA 4/11/2000

text:
"Lbo da casa " <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:3a03ed70...@news.edisons.it...
> >Mi rendo comunque disponibile come autista per altre necessitą.
>
> ehm, io ciavrei da fą un traslochino...
>
>
Se tutti i tuoi mobili entrano in un'auto, e non vuoi traslocare mentre
siamo questa sera a cena, se pņ fą. ;o)
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: Mantenere le impostazioni di pagina

author: Salvatore Renzo Calabrese

text:
Mi capita spesso che le impostazioni di pagina da me predisposte per query e
report, vadano perse, soprattutto quando apro access su pc diversi dal mio.
Da cosa dipende e come posso evitarlo?
renzo


title: Maschera ordini Database Northwind

author: Claudio

text:
Vorrei tanto ricreare una maschera ordini come quella del database di
esempio
ho iniziato con la creazione di una relazione tra Idfornitori (della tabella
fornitori) e Idfornitori (della tabella ordini)
dopo ho creato una query con emtrabe le tabelle, ho poi una maschera con una
sottomaschera
la maschera contenente i campi FOrnitori e la sottomaschera contenente i
campi ordini
fin qui tutto ok direte, il problema è che:
quando converto il campo fornitori in una casella combinata, anche se ho
l'elenco dei fonritori
ando a selezionarne uno a caso non mi aggiorna i dati relativi (qauli
indirizzo ecc). Infatti per vedere tutti i record fornitori devo utilizzare
i tasti in basso (quelli record successivo, precedente, crea record, per
intenderci)
quei tasti in northwind non ci sono
spero di essere stato chiaro, vi prego aiutatemi
grazie
Claudio


title: Maschera ordini Database Northwind

author: cidi

text:
"Claudio" <
cre...@tiscali.it
> ha scritto nel messaggio
news:tlkLa.155377$pR3.3...@news1.tin.it...
> Vorrei tanto ricreare una maschera ordini come quella del database di
> esempio
> ho iniziato con la creazione di una relazione tra Idfornitori (della
tabella
> fornitori) e Idfornitori (della tabella ordini)
> dopo ho creato una query con emtrabe le tabelle, ho poi una maschera con
una
> sottomaschera
> la maschera contenente i campi FOrnitori e la sottomaschera contenente i
> campi ordini
> fin qui tutto ok direte, il problema è che:
Non hai guardato nella struttura della tabella ordini.
Prova a cliccare sul campo idcliente e poi in basso su ricerca.
saluti Daniele


title: rowsource

text:
ciao a tutti

la proprietà rowsource si può applicare anche alla forms?

grazie


title: rowsource

author: Karl Donaubauer

text:
Francodellavalle28 ha scritto:
> la proprietà rowsource si può applicare anche alla forms?

No, l'equivalente per Forms si chiama Recordsource.

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: rowsource

text:

grazie Karl


title: rowsource

text:

ho provato cosi su caricamento
della form "M_Fornitori"

Forms!M_Fornitori.Rercordsource = "SELECT * " _
  & "FROM TbFornitori " _
  & "ORDER BY NomeFornitore"

  Forms!M_Fornitori_1.Requery

ma ho l'errore 2465


title: rowsource

author: RobertoA

text:

Ma M_Fornitori_1  e' diversa da M_Fornitori ?


title: rowsource

text:

grazie RobertoA

ora la Maschera si apre
ma sebbene sia a visualizzazione maschere continue
mi mostra solo un record e a volte pure a metà,

perchè?


title: rowsource

text:
Salve,

Francodellavalle28 ha scritto:
>>> ...
>>> ho provato cosi su caricamento
>>> della form "M_Fornitori"
>>>
>>> Forms!M_Fornitori.Rercordsource = "SELECT * " _
>>>     & "FROM TbFornitori " _
>>>     & "ORDER BY NomeFornitore"
>>>
>>>     Forms!M_Fornitori_1.Requery
>
> ora la Maschera si apre
> ma sebbene sia a visualizzazione maschere continue
> mi mostra solo un record e a volte pure a metà,

Invece di "su caricamento" usa "su apertura" della maschera e lascia
perdere il Requery inutile. Non esiste un Requery più forte del cambio
del Recordsource.
Cioè solo questo:

Me.Rercordsource = "SELECT * " _
   & "FROM TbFornitori " _
   & "ORDER BY NomeFornitore"




title: rowsource

text:

grazie Karl
non capisco perchè la maschera mi si apre
per l'altezza di un record sebbene
ci siano circa 400 record
mostrandomi un solo record per volta
sebbene la maschera sia impostata
in visualizzazioni maschere continue


title: rowsource

text:
Il giorno martedì 17 novembre 2015 11:19:24 UTC+1,
francodel...@gmail.com
 ha > non capisco perchè la maschera mi si apre
> per l'altezza di un record sebbene
> ci siano circa 400 record
> mostrandomi un solo record per volta
> sebbene la maschera sia impostata
> in visualizzazioni maschere continue

A me lo fa quando apro una maschera messa a "maschere continue" ma senza RecordSource, anche se poi glielo metto come fai tu.
Una soluzione è avere una qualunque origine registrata, per esempio TbFornitori, e sostituirla da codice come fai.
Riccardo Baldinotti


title: rowsource

text:

grazie Riccardo
ora cosi funziona


title: rowsource

text:
Salve,

Francodellavalle28 ha scritto:
>
bari...@gmail.com
 ha scritto:
>>> per l'altezza di un record sebbene
>>> ci siano circa 400 record
>>> mostrandomi un solo record per volta
>>> sebbene la maschera sia impostata
>>> in visualizzazioni maschere continue
>>
>> A me lo fa quando apro una maschera messa a "maschere continue" ma senza RecordSource, anche se poi glielo metto come fai tu.
>> Una soluzione è avere una qualunque origine registrata, per esempio TbFornitori, e sostituirla da codice come fai.
>
> ora cosi funziona

In alternativa se non vuoi impostare un RecordSource prima puoi aprire
la maschera in vis. struttura, impostare l'altezza della maschera come
vuoi e la sua proprietà "Dimensioni automatiche" a No.

Così la maschera mantiene l'altezza come salvata in vis. struttura.



title: rowsource

text:

grazie


title: Ricalcolo record

author: Saint N.7

text:
Devo creare una query per rinumerare un campo da un certo numero ad un altro
ordinandoli per un secondo campo.
Esempio mettere in ordine cronologico degli ordini rinumerando i numeri di
bolla, senza ripartire necessariamente da 0.
Sapete aiutarmi?
Grazie.
Saint n.7


title: Ricalcolo record

author: Sib

text:
"Saint N.7" <leti...@NOSPAMtin.it> ha scritto nel messaggio

--
http://www.sitocomune.com
Query con campo progressivo
Sib


title: Ricalcolo record

text:
Non ci riesco.
Non so come dare l'ordinamento per il quale poi fare la rinumerazione della
bolla.
Saint n.7
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:c_O%a.94155$cl3.2...@news2.tin.it...



title: Ricalcolo record

text:
"Saint N.7" <leti...@NOSPAMtin.it> ha scritto nel messaggio
news:C720b.248244$Ny5.7...@twister2.libero.it...
> Non ci riesco.
Eppure è facile, basta scrivere DOPO il quoting!!!
Antonio


title: Ricalcolo record

text:
Mi spiace ma non sono un professionista di access e non capisco quello che
dici.
Puoi essere piů chiaro?
Grazie 6544
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:V930b.248653$lK4.7...@twister1.libero.it...
> "Saint N.7" <leti...@NOSPAMtin.it> ha scritto nel messaggio
> news:C720b.248244$Ny5.7...@twister2.libero.it...
> > Non ci riesco.
>
> Eppure č facile, basta scrivere DOPO il quoting!!!
>
> Antonio
>
>


title: Ricalcolo record

text:
"Saint N.7" <leti...@NOSPAMtin.it> ha scritto nel messaggio
news:uGN0b.253339$Ny5.7...@twister2.libero.it...
> Mi spiace ma non sono un professionista di access e non capisco quello che
> dici.
>
> Puoi essere più chiaro?
Sì, prova a leggere il post periodico di Roberto "Istruzioni per l'uso"
Antonio


title: Selezionare un record in un report

author: Adanedhel

text:
Salve,
ho un database tipo agenda con contatti. Ho un problema, forse
semplice da risolvere ma finora non sono riuscito nell'intento.
Si tratta di questo, ho una maschera che costituisce un front-end per
le modifiche dei record ed un report che mi stampa i campi del record
secondo un disegno da me stabilito.
Ora vorrei che se nella mia maschera sto lavorando su record numero X
quando attivo il pulsante Stampa (che mi apre il report) venga
visualizzato, pronto per la stampa il report con il record X invece mi
compare sempre il report con il primo record del database.
Finora non sono riuscito a risolvere la situazione.
L'idea sarebbe anche saltare la visualizzazione del report ma far si
che quando attivo la stampa dalla maschera che mi sta visualizzando il
record X mi parta la stampa del report con su il record X e non la
stampa del report con tutti i record del database come accade ora.
Come posso fare?
Grazie in anticipo per l'aiuto.


title: Selezionare un record in un report

text:
"Adanedhel" <
Adan...@tolkien.nu
> ha scritto nel messaggio
news:mk8ef01s2j8foa5so...@4ax.com...
> Salve,
> L'idea sarebbe anche saltare la visualizzazione del report ma far si
> che quando attivo la stampa dalla maschera che mi sta visualizzando il
> record X mi parta la stampa del report con su il record X e non la
> stampa del report con tutti i record del database come accade ora.
> Come posso fare?
docmd.openreport
parametro criteriWHERE
"ID=" &
me.id
Antonio


title: Selezionare un record in un report

text:
On Fri, 16 Jul 2004 06:16:11 GMT, "Antonio Biso" <
ch...@etruria.net
>
wrote:

Grazie mille.
Funziona tutto, ma ho dovuto togliere il WHERE perché mi dava errore.
Ciao,
Adanedhel
**************
ICQ: 173677613
**************


title: Selezionare un record in un report

text:
"Adanedhel" <
Adan...@tolkien.nu
> ha scritto nel messaggio
news:gp7ff0d45n5pnsn6k...@4ax.com...

Il where era il nome del parametro come lo chiama l'help
Antonio


title: Visualizzare il formato euro dopo immissione dati

author: Sergio

text:
Ciao a tutti.
In una maschera ho un controllo Importo. Il campo sottostante è di tipo
Valuta, formato euro con due decimali.
Vorrei che, nella maschera, il controllo si presentasse bianco (e non nella
forma ? 0,00) finchè non inserisco i dati al suo interno; dopo invece deve
assumere il formato euro.
Si può fare?
Grazie, ciao.
Sergio


author: Alessandro Cara

text:

Probabilmente hai  default=0 nella definizione del campo (struttura
tabella). Se e' cosi', toglilo
--
ac


text:
Era proprio cosě, grazie!
Sergio


title: RECUPERARE INDIRIZZO EMAIL DA CASELLA DI RIEPILOGO

text:
CIAO,
ho una maschera con diverse caselle di riepilogo che si riempiono
tramite query,
ho creato un tasto per inviare un report ad un indirizzo email.
l'indirizzo email lo dovrebbe prendere dalla casella di riepilogo.
se prendo una casella di testo e la compilo funziona, cliccando sul
tasto mi crea la email e ci inserisce l'indirizzo email corretto,
se invece uso la casella di riepilogo non lo fa..
come mai?


text:

Prova così
xmail = Me.TuacasellaRiepilogo.Column(0)
 ' ovviamente in questo caso la casella di riepilogo a una sola
colonna
DoCmd.SendObject acReport, "tuoreport", "*.snp", xmail
Ciao


title: Importazione da csv

text:
Buongiorno a tutti,
vorrei sapere se è possibile durante l'importazione di un file valorizzare contemporaneamente un campo, per tutti i record importati,  con un dato che non è presente nel file oggetto dell'importazione.

Grazie

Alfio


title: Importazione da csv

text:

Se importi in una Tabella già esistente, si definendo la proprietà DefaultValue del campo in oggetto..., altrimenti no, ma puoi effettuare una Query UPDATE e forzare il Valore su titti i Records con 1 riga di comando...

Dim strQRY  As String
strQRY="UPDATE NomeTab SET [NomeCampo]=TuoValore"  ' Attenzione alla sintassi per Valori Testo/Numeri e Date

Poi lanci con il metodo Execute membro dell'Oggetto Database, magari in gestione Transazionale e gestione errori.

Public Sub TransactionQuery()
    On Error GoTo tran_Err
    Dim strQRY  As String
    strQRY="UPDATE NomeTab SET [NomeCampo]=TuoValore"  ' Attenzione alla sintassi per Valori Testo/Numeri e Date

    DAO.DBEngine.BeginTrans
    CurrentDb.Execute strQRY, dbFailOnError
    DAO.DBEngine.CommitTrans

Exit Sub

tran_Err:

    DAO.DBEngine.Rollback
    MsgBox "Transaction failed. Error: " & Err.Description
End Sub

@Alex


title: Importazione da csv

author: Bruno Campanini

text:
@Alex wrote on 29-01-20 :

[...]
> Poi lanci con il metodo Execute membro dell'Oggetto Database, magari in
> gestione Transazionale e gestione errori.

Quanta prosopopea!

Bruno


title: Importazione da csv

text:
> Se importi in una Tabella già esistente, si definendo la proprietà defaultValue del campo in oggetto...,

Grazie Alex,
in effetti devo importare tutto in una tabella esistente per cui, nell'ipotetico DoCmd.TransferText acImportDelim,.ecc ecc ....
quale sarebbe la sintassi per il DefaultValue del campo X che dovrebbe ricevere il valore Y?

Grazie


title: Importazione da csv

text:

Se il valore è fisso, vai in struttura Tabella ed inserisci il Valore di DEFAULT nel campo di cui parli.

Se il valore è dinamico su condizione, prima di Importare, ti basta accederer alla Tabella da DAO con l'oggetto Tabledef ed andare nel Campo sempre con DAO alla proprietà DefaultValue.

Quì trovi un discreto esempio:

https://docs.microsoft.com/en-us/office/client-developer/access/desktop-database-reference/field-defaultvalue-property-dao

A te bastano 2 righe...

Dim tdfEmployees As TableDef

Set tdfEmployees = CurrentDb.TableDefs("NomeTabella")
tdfEmployees.Fields("NomeCampo").DefaultValue = "98052"

Set tdfEmployees =Nothing

.... quì poi inserisci il resto...

@Alex


title: Importazione da csv

text:
> Dim tdfEmployees As TableDef
>
> Set tdfEmployees = CurrentDb.TableDefs("NomeTabella")
> tdfEmployees.Fields("NomeCampo").DefaultValue = "98052"
>
> Set tdfEmployees =Nothing
>
> .... quì poi inserisci il resto...
>
> @Alex

Grazie mille Alex... ;)

Alfio


title: Importazione da csv

text:
> Dim tdfEmployees As TableDef
>
> Set tdfEmployees = CurrentDb.TableDefs("NomeTabella")
> tdfEmployees.Fields("NomeCampo").DefaultValue = "98052"
>

Ciao Alex,
tutto bene, importo il file e tramite TableDef passo la stringa che mi deve valorizzare il campo. L'unica cosa che non mi torna è che il testo passato (tramite inputbox) pur se impostato a stringa (campo in tabella=testo)  me lo trasforma nell'esito della divisione essendo inserito nel formato 9999/99, ma se è una stringa perché mi esegue la divisione? Dove sbaglio?

Alfio


title: Importazione da csv

text:
messa...@gmail.com
 brought next idea :

Prova questa:
========================================
Dim tDef As TableDef, SF As String, TD As String, TT As String
Dim SQL As String, Y As String, Fld As Object, NewField As String
Dim db As Database

' --- Definizioni ------------------------------------
SF = "D:\aa0.csv"          ' File sorgente
TD = "DestinationTable"    ' Tabella di destinazione
TT = "TempTab"             ' Tabella temporanea
'-----------------------------------------------------

NewField = "Y"
Y = InputBox("Value for X field in DestinationTable")
Set db = CurrentDb
On Error Resume Next
DoCmd.DeleteObject acTable, TT
On Error GoTo 0
DoCmd.TransferText acImportDelim, , TT, SF
Set tDef = db.TableDefs(TT)
Set Fld = tDef.CreateField(NewField, dbText, 255)
tDef.Fields.Append Fld
SQL = "INSERT INTO DestinationTable ( Field1, Field2, Field3, X ) "
SQL = SQL & "SELECT F1, F2, F3, '" & Y & "' AS X FROM TempTab;"
CurrentDb.Execute SQL

End Sub
========================================

Bruno

PS
Sarebbe più opportuno avere il TransferText completo
delle specifiche ImportSpecs:

DoCmd.TransferText acImportDelim, ImportSpecs, TT, SF


title: Importazione da csv

text:
...
> Ciao Alex,
> tutto bene, importo il file e tramite TableDef passo la stringa che mi deve valorizzare il campo. L'unica cosa che non mi torna è che il testo passato (tramite inputbox) pur se impostato a stringa (campo in tabella=testo)  me lo trasforma nell'esito della divisione essendo inserito nel formato 9999/99, ma se è una stringa perché mi esegue la divisione? Dove sbaglio?
>
> Alfio

Se il Campo è stringa serve la sintassi differente, basta aggiungere il CHR(34)

tdfEmployees.Fields("NomeCampo").DefaultValue = chr/34) & strDaInputBox & chr(34)

@Alex


title: Importazione da csv

text:
Bruno Campanini wrote:
>
messa...@gmail.com
 brought next idea :
>> Buongiorno a tutti,
>> vorrei sapere se è possibile durante l'importazione di un file valorizzare
>> contemporaneamente un campo, per tutti i record importati,  con un dato che
>> non è presente nel file oggetto dell'importazione.
>
Vorrei proprio che tu provassi tale versione completamente
automatizzata. Basta infatti unicamente definire SF e DT
come sotto indicato.

=======================================
Private Sub Command22_Click()
Dim tDef As TableDef, SF As String, DT As String, TT As String
Dim SQL As String, Y As String, Fld As Object, NewField As String
Dim db As Database, i As Integer

' --- Definizioni ------------------------------------
SF = "D:\aaa.csv"          ' File sorgente
'    Da Excel il foglio salvato in formato CSV (Comma delimited)(*.csv)
'    non viene regolarmente importato da Access 2019; occorre
'    salvarlo nel formato CSV (MSDOS)(*.csv)
DT = "DestinationTable"    ' Tabella di destinazione
'    Deve avere, nello stesso ordine, gli stessi campi di SF, ed
inoltre
'    un campo supplementare (X) che verrà compilato ad ogni
importazione
'    con riferimento all'InputBox
'------------------------------------------------------

TT = "TempTab"     ' Tabella temporanea
NewField = "X"     ' Nuovo campo da creare in TT

Y = InputBox("Value for X field in " & DT)
Set db = CurrentDb
On Error Resume Next
DoCmd.DeleteObject acTable, TT
On Error GoTo 0
DoCmd.TransferText acImportDelim, , TT, SF
Set tDef = db.TableDefs(TT)
Set Fld = tDef.CreateField(NewField, dbText, 255)
tDef.Fields.Append Fld
SQL = "UPDATE TempTab SET TempTab.X = '" & Y & "'"
db.Execute SQL
For i = 0 To db.TableDefs(TT).Fields.Count - 1
    db.TableDefs(TT).Fields(i).Name = _
    db.TableDefs(DT).Fields(i).Name
Next
SQL = "INSERT INTO " & DT & " SELECT " & TT & ".* FROM " & TT
db.Execute SQL

End Sub
==============================================

Grazie
Bruno


title: Importazione da csv

text:
> Se il Campo è stringa serve la sintassi differente, basta aggiungere il CHR(34)
>
> tdfEmployees.Fields("NomeCampo").DefaultValue = chr/34) & strDaInputBox & chr(34)
>
> @Alex

Infatti ho fatto così, ma quello che chiedevo è se è normale se una valore impostato come testo divenga numerico o trattato come tale... ;)

Saluti

PS: Ringrazio anche Bruno per la soluzione prospettata, ma ho adottato quella più semplice come proposto da Alex.... ;)


title: Importazione da csv

text:
È normale... il carattere chr(34) serve proprio ad imporre il casting del dato prima dell'applicazione del valore...
Se non lo indichi il valore viene calcolato e poi applicato in quanto originariamente lo vede come numero.

Per le date stessa cosa sintassi dedicata.

Ciao
@Alex


title: Importazione da csv

text:
messa...@gmail.com
 presented the following explanation :

> PS: Ringrazio anche Bruno per la soluzione prospettata, ma ho adottato quella
> più semplice come proposto da Alex.... ;)

Capisco.
Una domanda, poi mi taccio per sempre:

Il dato da inserire nel campo X della tabella di destinazione
durante il TranferText è sempre e solo data, sempre e solo
numero, etc?

O può avvenire che per un TarnsferText sia una data,
per un altro TransferText sia un numero, etc?

Bruno


title: Importazione da csv

text:
> Il dato da inserire nel campo X della tabella di destinazione
> durante il TranferText è sempre e solo data, sempre e solo
> numero, etc?
>
 Ciao Bruno,
si è sempre nello stesso formato, in pratica è un nr di fattura, 9999/99.

Ciao


title: Condizione OR

author: rubatti mario

text:
Ho bisogno di 10 condizioni OR in una query di accodamento ma ce ne
sono a disposizione solo 9. Come posso fare? Mi servono per
implementare uno strumento di ricerca basato su un tesauro che preveda
10 descrittori per ciascun articolo di rivista catalogato.
Ringraziando chi vorrą aiutarmi fraternamente vi saluto.
Mario Rubatti


title: Condizione OR

author: mino

text:

vai nella struttura della query e sulla barra dei menu usa inserisci righe.
ciao
--------------------------------
Inviato via
http://usenet.libero.it


title: Condizione OR

author: Fabrizio

text:
"rubatti mario" <
ruba...@hotmail.com
> ha scritto nel messaggio
news:97ea033d.0208...@posting.google.com...
> Ho bisogno di 10 condizioni OR in una query di accodamento ma ce ne
> sono a disposizione solo 9. Come posso fare? Mi servono per
> implementare uno strumento di ricerca basato su un tesauro che preveda
> 10 descrittori per ciascun articolo di rivista catalogato.
> Ringraziando chi vorrà aiutarmi fraternamente vi saluto.
> Mario Rubatti
-->inserisci-->righe ( in visualizzazione struttura)
Ciao. Fabrizio.
p.s.puoi aggiungere la cond. 'OR' da codice SQL, vedrai poi che access ti da
qualche riga in più in visualizzazione struttura ( il bastardo).


title: Condizione OR

author: Daniele Meante

text:

Se non ho capito male intendi che hai solo 9 righe (in verticale)
in cui inserire le condizioni.
Se č cosi, puoi usare una sola "riga" inserendo:
Condiz1 OR Condiz2 OR Condiz2.....
Ciao
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Condizione OR

text:
mino.z...@libero.it
 (mino) wrote in message news:<
80Z16Z45Z126Y1...@usenet.libero.it
>...
> Il 14 Ago 2002, 11:04,
ruba...@hotmail.com
 (rubatti mario) ha scritto:
> > Ho bisogno di 10 condizioni OR in una query di accodamento ma ce ne
> > sono a disposizione solo 9. Come posso fare? Mi servono per
> > implementare uno strumento di ricerca basato su un tesauro che preveda
> > 10 descrittori per ciascun articolo di rivista catalogato.
> > Ringraziando chi vorrà aiutarmi fraternamente vi saluto.
> > Mario Rubatti
> vai nella struttura della query e sulla barra dei menu usa inserisci righe.
> ciao
>
> --------------------------------
> Inviato via
http://usenet.libero.it
Grzie, sei stato prezioso


title: aprire un link da pulsante di comando

author: Antonio

text:
ciao, vorrei fare aprire un  file, il cui link è salvato in un record,
premendo un pulsante di comando, mi sapreste dire qual è il codice vb?
ho provato con call shell path, 1
ma non funziona.. :(
grazie


title: aprire un link da pulsante di comando

author: Alessandro Baraldi

text:
"Antonio" <
semplic...@yahoo.it
> wrote in message
news:43e0a15e$0$4161$
4faf...@reader3.news.tin.it

Chiama questa:
Public Sub ExecuteFile(FilePath As String)
'Esegue file
On Error GoTo error
Dim ret As Integer
ret = Shell("rundll32.exe url.dll,FileProtocolHandler " & (FilePath))
Exit Sub
error:  MsgBox Err.Description, vbExclamation, "Error"
End Sub
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: aprire un link da pulsante di comando

author: Pablitomf

text:
Antonio ha scritto:


> ma non funziona.. :(
> grazie
Me.Tuo_Nome_Comando.HyperlinkAddress = Me.Tuo_Campo_Link
--
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: aprire un link da pulsante di comando

author: MA

text:

Me.tuopulsante.hyperlinkaddress = "Tuopercorso"
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: re i recordset per sib

author: Simone

text:
Ciao,
Scusate se mi rivolgo ad una sola persona, ma è per una spiegazione ad una
sua risposta.
Grazie per il suggerimento, non lo sapevo che nel codice VB nelle stringhe
sql il forms non funzionava nello stesso modo, in ogni caso, ho apportato le
modifiche che mi hai detto, e ora mi appare il messaggio "tipo non
corrispondente".
Io dovrei aprire mediante recordset una tabella "ANAG_NUME" nella quale vi
sono due campi ANNO che è un campo numerico, intero lungo, e  NUME_TRAS,
ricercare il record che contiene nel campo anno un valore uguale a quello
contenuto un una casella di testo con proprietà impostate a numero generico,
posizioni decimali = 0 ed incrementare il valore del campo NUME_TRAS di una
unità. Per fare questo uso il seguente codice:
...
Dim Wintras1 As Database
Dim Numeratore As TableDef
Dim Temp As Variant
Set Wintras1 = CurrentDb
Set Numeratore = Wintras1.OpenRecordset("select anag_nume.nume_tras from
anag_nume where (((anag_nume.anno)= " & [Forms]![maschera1]![anno] & "));")
Temp = Numeratore!NUME_TRAS
Numeratore!NUME_TRAS = Temp + 1
...
Una volta eseguito mi visualizza l'errore "tipo non corrispondente", sulla
5^ riga perche?
Mi sembra di avere impostato tutti i valori correttamanete o no ?
La rimanente parte del codice secondo tè è corretta o potrebbe generarmi
altri errori?


title: re i recordset per sib

author: GT

text:
"Simone" <
sip...@tin.it
> ha scritto nel messaggio
news:qELo6.3694$yl2....@news1.tin.it...

perchè Dim numeratore as tabledef
e non
Dim numeratore as recordset   ?


title: re i recordset per sib

text:
"Simone" <
sip...@tin.it
> ha scritto nel messaggio
news:qELo6.3694$yl2....@news1.tin.it...
cut
> in ogni caso, ho apportato le
> modifiche che mi hai detto, e ora mi appare il messaggio "tipo non
> corrispondente".
come giustamente ti fa notare GT (Gran Turismo?) hai definito come
"tabledef" un oggetto che dovrebbe essere definito come "recordset". Questo
certamente ti genera un errore.
Per il resto il tuo campo [anno] e' numerico o stringa?
Sib


title: problema con allowedits=no

author: alex

text:
Ho una maschera in proprieta' gli metto allowedit= no, e per miracolo quando
apro la maschera posso fare tutte le modifche che voglio mi pare strano.
Non capisco sembro impazzito ma non e' cosi'.
Vi risulta che per un qualche motivo ci sia un caso in cui questa propireta'
non ha valenza sull'apertura della maschera??
IL database e' con access 2003 e win xp.


title: problema con allowedits=no

author: Sergio MAZZA

text:
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46dfff4c$0$10627$4faf...@reader2.news.tin.it...

A me non risulta il comportamento che descrivi.
Non è che per caso volevi dire che, anche se metti allowedit= no puoi
comunque inserire dei nuovi record?
Ciao.
--
Sergio MAZZA


title: problema con allowedits=no

text:
A me non risulta il comportamento che descrivi.
> Non è che per caso volevi dire che, anche se metti allowedit= no puoi
> comunque inserire dei nuovi record?
No no proprio mi lascia variare tutto, e se pero' alla maschera gli lascio
la proprieta' selettore record= si allora non mi fa fare modifiche, ma se
invece lo metto a no, posso scrivere all'interno delle caselle senza che
succeda nulla.


title: problema con allowedits=no

text:
> No no proprio mi lascia variare tutto, e se pero' alla maschera gli lascio
> la proprieta' selettore record= si allora non mi fa fare modifiche, ma se
> invece lo metto a no, posso scrivere all'interno delle caselle senza che
> succeda nulla.
correggo anche con selettore record a si e consenti modifiche a no, mi
lascia modificare tutto.
>
>


title: problema con allowedits=no

author: Access

text:
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e006b8$0$10619$4faf...@reader2.news.tin.it...

ma sta proprieta' dove che la vai ad impostare?
AllowEdits non si puo' impostare a "no", al massimo a "true" o "false"
Magari dalle proprieta' della form puo' impostare "consenti modifiche" a
"no".
Se vuoi impostarla da codice allora:
private sub form_load()
allowedits = false
end sub
--
Ciao
Access


title: problema con allowedits=no

author: alessandro

text:
> Magari dalle proprieta' della form puo' impostare "consenti modifiche" a
> "no".
>
> Se vuoi impostarla da codice allora:
>
> private sub form_load()
 allowedits = false
> end sub
> Ciao
> Access
eh bravo io ho fatto cosi' ma non funziona, perche' all'interno diella sub
form ci sono altre cose tipo me.txtimporto.enabled=false
ecc.ecc. se tolgo quelle cose li allowedits funziona
>
>


title: problema con allowedits=no

text:
Ciao Alessandro,
"alessandro" <alex> ha scritto nel messaggio
news:46e0654a$0$37206$4faf...@reader3.news.tin.it...

Non credo che questo possa influenzare quella proprieta', forse tu
nell'aprire la form valorizzi qualche controllo?
Cioe' qualcosa del tipo:
NomeTuoControllo = "valore"
In questo caso la proprieta' allowedits viene ignorata.
Se cosi fosse, nell'evento load della form inserisci:
refresh
vedrai che cosi allowedits sara impostato correttamente.
--
Ciao
Access


title: problema con allowedits=no

text:
 Non credo che questo possa influenzare quella proprieta', forse tu
> nell'aprire la form valorizzi qualche controllo?
> Cioe' qualcosa del tipo:
> NomeTuoControllo = "valore"
> In questo caso la proprieta' allowedits viene ignorata.
> Se cosi fosse, nell'evento load della form inserisci:
> refresh
> vedrai che cosi allowedits sara impostato correttamente.
CONTROllo un attimo, ma mi pareva ci fossereo solo dei controlli a enabled=
fale, e forse qualche chk box valorizzata a false non ricordo altro.
Grazie provo a vedere poi ti dico.
>
> --
> Ciao
> Access
>
>
>


title: problema con allowedits=no

text:
Cioe' qualcosa del tipo:
> NomeTuoControllo = "valore"
> In questo caso la proprieta' allowedits viene ignorata.
> Se cosi fosse, nell'evento load della form inserisci:
> refresh vedrai che cosi allowedits sara impostato correttamente.
niente da fare. ecco un pezzo di codice all'apertura della form:
Private Sub Form_Load()
Me.AllowEdits = False
Me.Refresh
If Me.chk_completa = True Then
 Me.cbo_banca.Enabled = False
 Me.cbo_cliente.Enabled = False
 Me.cbo_professionista.Enabled = False
Me.ID_CLIENTE.Enabled = False
Me.Fattura_data.Enabled = False
Me.Fattura_numero.Enabled = False
Me.Fattura_DataPagamento.Enabled = False
Me.ID_CLIENTE.Enabled = False
Me.IDProfessionista.Enabled = False
Me.Ing_Cap.Enabled = False
Me.ING_CITTA.Enabled = False
Me.Ing_Indirizzo.Enabled = False
Me.Ing_PIVA.Enabled = False
Me.Ing_RagSoc.Enabled = False
Me.Ing_Provincia.Enabled = False
Me.Cliente_Cap.Enabled = False
Me.Cliente_Citta.Enabled = False
Me.Cliente_Indirizzo.Enabled = False
Me.Cliente_Piva.Enabled = False
Me.Cliente_Provincia.Enabled = False
Me.Cliente_RagSoc.Enabled = False
Else
 Me.cbo_banca.Enabled = True
 Me.cbo_cliente.Enabled = True
 Me.cbo_professionista.Enabled = True
Me.ID_CLIENTE.Enabled = True
Me.Fattura_data.Enabled = True
Me.Fattura_numero.Enabled = True
Me.Fattura_DataPagamento.Enabled = True
Me.ID_CLIENTE.Enabled = True
Me.IDProfessionista.Enabled = True
Me.Ing_Cap.Enabled = True
Me.ING_CITTA.Enabled = True
Me.Ing_Indirizzo.Enabled = True
Me.Ing_PIVA.Enabled = True
Me.Ing_RagSoc.Enabled = True
Me.Ing_Provincia.Enabled = True
Me.Cliente_Cap.Enabled = True
Me.Cliente_Citta.Enabled = True
Me.Cliente_Indirizzo.Enabled = True
Me.Cliente_Piva.Enabled = True
Me.Cliente_Provincia.Enabled = True
Me.Cliente_RagSoc.Enabled = True
End If


title: problema con allowedits=no

text:
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e1088f$0$4788$4faf...@reader4.news.tin.it...

Secondo me fai prima a marcare i controlli che vuoi boloccare/sbloccare
utilizzando il Tag e ciclando nell'insieme dei controlli:
es.
dim oCtrl as Control
for each oCtrl in Me.Controls
    if oCtrl.Tag = "daBloccare" Then
        oCtrl.Enabled = Me!chk_completa
    end if
next
Set oCtrl = nothing
Ciao.
--
Sergio MAZZA


title: problema con allowedits=no

text:
Ciao Alex,
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e1088f$0$4788$4faf...@reader4.news.tin.it...

no, questo codice non influenza assolutamente la proprieta' allowedits,
piuttosto da qualche parte esegui un'operazione che va ad effettuare qualche
operazione sul record corrente.
fai cosi sull'evento load inserisci questo:
if me.dirty = true then
   msgbox"record corrente modificato"
end if
se ti esce il messaggio vuol dire che vengono effettuate operazioni su
record corrente da qualche parte e per questo la proprieta allowedits non
funziona.
--
Ciao
Access


title: problema con allowedits=no

text:
Secondo me fai prima a marcare i controlli che vuoi boloccare/sbloccare
> utilizzando il Tag e ciclando nell'insieme dei controlli:
> es.
> dim oCtrl as Control
> for each oCtrl in Me.Controls
>    if oCtrl.Tag = "daBloccare" Then
>        oCtrl.Enabled = Me!chk_completa
>    end if
> next
> Set oCtrl = nothing
>
gRAzie non la sapevo questa soluzione,praticamente vado sulle proprieta' dei
controlli e li marco con da bloccare nel tag e poi da codice....
Grazie
>


title: problema con allowedits=no

text:
fai cosi sull'evento load inserisci questo:
>
> if me.dirty = true then
>   msgbox"record corrente modificato"
> end if se ti esce il messaggio vuol dire che vengono effettuate operazioni
> su record corrente da qualche parte e per questo la proprieta allowedits
> non funziona.
Grazie provo a cercare grazie mille veramente!


title: problema con allowedits=no

text:
> if me.dirty = true then
>   msgbox"record corrente modificato"
> se ti esce il messaggio vuol dire che vengono effettuate operazioni su
> record corrente da qualche parte e per questo la proprieta allowedits non
> funziona.
provato anche questo,ma non mi da il mex
>
> --
> Ciao
> Access
>


title: problema con allowedits=no

text:
 Secondo me fai prima a marcare i controlli che vuoi boloccare/sbloccare
> utilizzando il Tag e ciclando nell'insieme dei controlli:
> es.
> dim oCtrl as Control
> for each oCtrl in Me.Controls
>    if oCtrl.Tag = "daBloccare" Then
>        oCtrl.Enabled = Me!chk_completa
>    end if
> next
> Set oCtrl = nothing
>
Sergio non capisco solo il passaggio octrl.enable= me!chk_completa
cioe' dov'e' che metto a enable= false i controlli??  enabled=
me!chk_completa cosa fa?
Grazie
> --
> Sergio MAZZA
>


title: problema con allowedits=no

text:
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e4f3cd$0$37207$4faf...@reader3.news.tin.it...
> Sergio non capisco solo il passaggio octrl.enable= me!chk_completa
> cioe' dov'e' che metto a enable= false i controlli??  enabled=
> me!chk_completa cosa fa?
Se provi ad interpretare le righe di codice vedrai che è semplice:
1 dim oCtrl as Control
2 for each oCtrl in Me.Controls
3  if oCtrl.Tag = "daBloccare" Then
4   oCtrl.Enabled = Me!chk_completa
5  end if
6 next
7 Set oCtrl = nothing
1 creo e dichiaro il tipo di variabile oggetto come un controllo (Control)
2 per (for) ogni (each) oggetto presente nella collezione dei controlli
(Me.Controls), assegnalo alla variabile oCtrl
3 se (if) nella proprietà Tag dell'oggetto assegnato è presente la stringa
"daBloccare" allora
4 imposta la proprietà Enabled con il valore presente nel controllo
"chk_completa" sulla form
5 chiusura if
6 chiusura for
7 distruzione oggetto creato
Lo stato dei controlli (false/true), io ho capito che lo devi impostare in
base al valore del controllo "chk_completa".
Se non è così, descrivi come o modifica il codice...
> Grazie
Ciao.
--
Sergio MAZZA


title: problema con allowedits=no

text:
Ciao Alex,
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e4f2cc$0$37196$4faf...@reader3.news.tin.it...

A questo punto, non avendo il tuo db sottomano, non so cos'altro dirti.
Altrimenti, poichè con sto allowedits non ne usciamo fuori, per rendere le
textbox di sola lettura potresti sfruttare la soluzione di Sergio MAZZA,
usando la proprieta' locked in questo modo:
Private Sub form_load()
Dim oCtrl As Control
For Each oCtrl In Me.Controls
    If oCtrl.Tag = "daBloccare" Then
        oCtrl.Enabled = Me!chk_completa
End If
    If oCtrl.ControlType = acTextBox Then
        If oCtrl.Enabled = True Then
     oCtrl.Locked = True
End If
End If
Next
Set oCtrl = Nothing
End Sub
E' ovvio che per poter inserire un nuovo record o modificarlo devi gestire
nel modo opportuno la proprieta' locked.
--
Ciao
Access


title: problema con allowedits=no

text:
 3 se (if) nella proprietà Tag dell'oggetto assegnato è presente la stringa
> "daBloccare" allora
> 4 imposta la proprietà Enabled con il valore presente nel controllo
> "chk_completa" sulla form
> 5 chiusura if
> 6 chiusura for
> 7 distruzione oggetto creato
> Lo stato dei controlli (false/true), io ho capito che lo devi impostare in
> base al valore del controllo "chk_completa".
> Se non è così, descrivi come o modifica il codice...
si esatto sergio, ma dove gli hai detto che e' a enabled= true o false?
grazie


title: problema con allowedits=no

text:
Private Sub form_load()
>
> Dim oCtrl As Control
> For Each oCtrl In Me.Controls
>    If oCtrl.Tag = "daBloccare" Then
>        oCtrl.Enabled = Me!chk_completa
>
> End If
>    If oCtrl.ControlType = acTextBox Then
>        If oCtrl.Enabled = True Then
>     oCtrl.Locked = True
> End If
> End If
> Next
> Set oCtrl = Nothing
>
> End Sub
>
>
> E' ovvio che per poter inserire un nuovo record o modificarlo devi gestire
> nel modo opportuno la proprieta' locked.
>
ok ti ringrazio riprovo.


title: problema con allowedits=no

text:
"alex" <aiaiai...@aiaiaiaiaai.jak> ha scritto nel messaggio
news:46e508e9$0$10624$4faf...@reader2.news.tin.it...
>
> si esatto sergio, ma dove gli hai detto che e' a enabled= true o false?
...
4   oCtrl.Enabled = Me!chk_completa
...
Se Me!chk_completa = -1 (true), il ciclo imposta tutti i controlli con il
tag "daBloccare" a -1 (true). E viceversa...
Mhmm... Mi sfugge qualcosa?
> grazie
Ciao.
--
Sergio MAZZA


title: problema con allowedits=no

text:
Se Me!chk_completa = -1 (true), il ciclo imposta tutti i controlli con il
> tag "daBloccare" a -1 (true). E viceversa...
>
> Mhmm... Mi sfugge qualcosa?
>
non credo ti sfugga qualche cosa a parte il fatto che io sia un somaraccio
ma forse non ti e' sfuggito nemmeno quello :)


title: Varie su Maschere

author: asukuo

text:
Salve a tutti i partecipanti del NG.
Chiedo cortesemente spiegazione ai seguenti quesiti:
Ho una serie di tabelle cosě strutturate:
Portafogli                Dettagli              Clienti
Titoli                    Borsa
----------                --------              ------                   ---
---                   ------
IdMov   Univoco    IdNum  Indice    Cliente (Univoco)  Titolo (Univoco)
Data
Cliente                    Titolo                  Indirizzo
Titolo
Data                        Valore                Comune
Valore
Relazione Portafogli.IdMov-Dettagli.IdNum    1 a molti
Relazione Titoli.Titolo-Borsa.Titolo                  1 a molti
Ordunque i miei quesiti:
a)Ho creato la maschera Portafogli con Sottomaschera Dettagli in formato
maschere continue.
Gradirei che, selezionando dalla combo Cliente il valore di interesse, mi si
aggiornasse automaticamente la Sottomaschera Dettagli coi records relativi.
Attualmente, mi funziona solo dal selettore records.
b) Gradirei inoltre che, su apertura della maschera Borsa (ho scelto formato
maschere continue...ho fatto bene?),relativa all'omonima tabella, il
controllo Titolo venisse riempito automaticamente da tutti i records
presenti nella tabella Titoli campo Titolo in modo che quotidianamente, una
volta settato il controllo Data a valore predefinito Date(), devo solo
riempire il controllo Valore.
Non ho la minima idea su come procedere....
Grato di un cortese riscontro.
Gianni


title: Varie su Maschere

author: Roberto dal portatile

text:
"asukuo" <
crp...@tin.it
> ha scritto nel messaggio
news:8mgrgc$rdl$1...@nslave2.tin.it...
> Salve a tutti i partecipanti del NG.
> Chiedo cortesemente spiegazione ai seguenti quesiti:
> Ho una serie di tabelle cosě strutturate:
> Portafogli                Dettagli              Clienti
> Titoli                    Borsa
> ----------                --------              ------                   -
--
> ---                   ------
> IdMov   Univoco    IdNum  Indice    Cliente (Univoco)  Titolo (Univoco)
> Data
> Cliente                    Titolo                  Indirizzo
> Titolo
> Data                        Valore                Comune
> Valore
>
> Relazione Portafogli.IdMov-Dettagli.IdNum    1 a molti
> Relazione Titoli.Titolo-Borsa.Titolo                  1 a molti
>
> Ordunque i miei quesiti:
> a)Ho creato la maschera Portafogli con Sottomaschera Dettagli in formato
> maschere continue.
Quale campo indichi come "Collega campi secondari" del controllo
sottomaschera?
Quale campo indichi come "Collega campi master" del controllo sottomaschera?
-----------------------------
> Gradirei che, selezionando dalla combo Cliente il valore di interesse,
Cosa metti come "Origine riga" della combo?
------------------------------
> mi si
> aggiornasse automaticamente la Sottomaschera Dettagli coi records
relativi.
Se come "Origine record" della sottomaschera Dettagli hai la la tabella
Dettagli, in base a quale campo di questa tabella capisci di quale cliente
sono i record dettagli?
-----------------------------
> Attualmente, mi funziona solo dal selettore records.
> b) Gradirei inoltre che, su apertura della maschera Borsa (ho scelto
formato
> maschere continue...ho fatto bene?),relativa all'omonima tabella, il
> controllo Titolo venisse riempito automaticamente da tutti i records
> presenti nella tabella Titoli campo Titolo in modo che quotidianamente,
una
> volta settato il controllo Data a valore predefinito Date(), devo solo
> riempire il controllo Valore.
Non capisco
----------------------------
> Non ho la minima idea su come procedere....
ed io non ho la minima idea di cosa vuoi fare
----------------------------
> Grato di un cortese riscontro.
> Gianni
>
>
>
Roberto


title: Varie su Maschere

author: Giuseppe

text:
le indicazioni mi sembrano incomplete.
ti invio il seguente ipotetico percorso nel caso potrebbe esserti di aiuto.
Per la richiesta a)
forse si potrebbe seguire questo percorso :
1- Dalla Barra dei menu: Record > Filtro > Filtro in base maschera
2- Seleziona o digita il o i valori da cercare
3- Barra dei menu: Filtro > Applica filtro/ordina
 Per la richiesta b)
1- Forse è da costruire una maschera con Origine record:tabella Borsa
2- Nella maschera Portafogli si potrebbe aggiungere un Pulsante di comando e
Nell'evento Su clic:
Private Sub cmdMascherafrmBorsa_Click()
Dim str As String
str = Me.fsubDettagli!titolo 'fsubDettagli è la sottomaschera
DoCmd.OpenForm "frmBorsa"
DoCmd.GoToRecord acDataForm, "frmBorsa", acNewRec
Forms!frmborsa!titolo = str
Forms!frmborsa!valore.SetFocus
End Sub
"asukuo" <
crp...@tin.it
> ha scritto nel messaggio
news:8mgrgc$rdl$1...@nslave2.tin.it...
> Salve a tutti i partecipanti del NG.
> Chiedo cortesemente spiegazione ai seguenti quesiti:
> Ho una serie di tabelle così strutturate:
> Portafogli                Dettagli              Clienti
> Titoli                    Borsa
> ----------                --------              ------                   -
--
> ---                   ------
> IdMov   Univoco    IdNum  Indice    Cliente (Univoco)  Titolo (Univoco)
> Data
> Cliente                    Titolo                  Indirizzo
> Titolo
> Data                        Valore                Comune
> Valore
>
> Relazione Portafogli.IdMov-Dettagli.IdNum    1 a molti
> Relazione Titoli.Titolo-Borsa.Titolo                  1 a molti
>
> Ordunque i miei quesiti:
> a)Ho creato la maschera Portafogli con Sottomaschera Dettagli in formato
> maschere continue.
> Gradirei che, selezionando dalla combo Cliente il valore di interesse, mi
si
> aggiornasse automaticamente la Sottomaschera Dettagli coi records
relativi.
> Attualmente, mi funziona solo dal selettore records.
> b) Gradirei inoltre che, su apertura della maschera Borsa (ho scelto
formato
> maschere continue...ho fatto bene?),relativa all'omonima tabella, il
> controllo Titolo venisse riempito automaticamente da tutti i records
> presenti nella tabella Titoli campo Titolo in modo che quotidianamente,
una
> volta settato il controllo Data a valore predefinito Date(), devo solo
> riempire il controllo Valore.
> Non ho la minima idea su come procedere....
> Grato di un cortese riscontro.
> Gianni
>
Le indicazioni mi sembrano incomplete.
ti invio il seguente ipotetico percorso nel caso potrebbe esserti di aiuto.
Per la richiesta a)
forse si potrebbe seguire questo percorso :
1- Dalla Barra dei menu: Record > Filtro > Filtro in base maschera
2- Seleziona o digita il o i valori da cercare
3- Barra dei menu: Filtro > Applica filtro/ordina
 Per la richiesta b)
1- Forse è da costruire una maschera con Origine record:tabella Borsa
2- Nella maschera Portafogli si potrebbe aggiungere un Pulsante di comando e
Nell'evento Su clic:
Private Sub cmdMascherafrmBorsa_Click()
Dim str As String
str = Me.fsubDettagli!titolo 'fsubDettagli è la sottomaschera
DoCmd.OpenForm "frmBorsa"
DoCmd.GoToRecord acDataForm, "frmBorsa", acNewRec
Forms!frmborsa!titolo = str
Forms!frmborsa!valore.SetFocus
End Sub
la  Relazione Titoli.Titolo-Borsa.Titolo                  1 a molti
impostata così penso che potrebbe darti dei problemi
giuseppe


title: Varie su Maschere

text:
Giuseppe <
ebq...@tin.it
> wrote in message 8mj799$b28$1...@nslave2.tin.it...


Grazie per il cortese interessamento, ho risolto il problema.
Gianni


title: Varie su Maschere

text:
Roberto dal portatile <
r.ma...@libero.it
> wrote in message
op%i5.20562$dF5.3...@news.infostrada.it...
>
> "asukuo" <
crp...@tin.it
> ha scritto nel messaggio
> news:8mgrgc$rdl$1...@nslave2.tin.it...
> > Salve a tutti i partecipanti del NG.
> > Chiedo cortesemente spiegazione ai seguenti quesiti:
> > Ho una serie di tabelle cosě strutturate:
> > Portafogli                Dettagli              Clienti
> > Titoli                    Borsa
>
          --------              ------                   -
> --
> > ---                   ------
> > IdMov   Univoco    IdNum  Indice    Cliente (Univoco)  Titolo (Univoco)
> > Data
> > Cliente                    Titolo                  Indirizzo
> > Titolo
> > Data                        Valore                Comune
> > Valore
> >
> > Relazione Portafogli.IdMov-Dettagli.IdNum    1 a molti
> > Relazione Titoli.Titolo-Borsa.Titolo                  1 a molti
> >
> > Ordunque i miei quesiti:
> > a)Ho creato la maschera Portafogli con Sottomaschera Dettagli in formato
> > maschere continue.
>
> Quale campo indichi come "Collega campi secondari" del controllo
> sottomaschera?
> Quale campo indichi come "Collega campi master" del controllo
sottomaschera?
> -----------------------------
> > Gradirei che, selezionando dalla combo Cliente il valore di interesse,
>
> Cosa metti come "Origine riga" della combo?
> ------------------------------
> > mi si
> > aggiornasse automaticamente la Sottomaschera Dettagli coi records
> relativi.
>
> Se come "Origine record" della sottomaschera Dettagli hai la la tabella
> Dettagli, in base a quale campo di questa tabella capisci di quale cliente
> sono i record dettagli?
> -----------------------------
>
> > Attualmente, mi funziona solo dal selettore records.
>
>
> > b) Gradirei inoltre che, su apertura della maschera Borsa (ho scelto
> formato
> > maschere continue...ho fatto bene?),relativa all'omonima tabella, il
> > controllo Titolo venisse riempito automaticamente da tutti i records
> > presenti nella tabella Titoli campo Titolo in modo che quotidianamente,
> una
> > volta settato il controllo Data a valore predefinito Date(), devo solo
> > riempire il controllo Valore.
>
> Non capisco
> ----------------------------
>
> > Non ho la minima idea su come procedere....
>
> ed io non ho la minima idea di cosa vuoi fare
> ----------------------------
> > Grato di un cortese riscontro.
> > Gianni
> >
> >
> >
>
> Roberto



title: Varie su Maschere

text:
"asukuo" <
crp...@tin.it
> ha scritto nel messaggio
news:8mo30g$lhj$3...@nslave1.tin.it...



title: Varie su Maschere

text:
"asukuo" <
crp...@tin.it
> ha scritto nel messaggio
news:8mo30g$lhj$3...@nslave1.tin.it...
[CUT]
> >
> Grazie per il cortese interessamento, ho risolto il problema.
> Gianni
>
>
Prego
Roberto


title: Dati da excel ad access con DDE e API

author: Sgnapolo

text:
Devo importare su access dei dati da excel e ho utilizzato le DDE per far
'parlare' tra loro access e excel.
Per quel che riguarda l'importazione tutto OK, ma non so come chiudere il
file Excel una volta che ho terminato di importare i dati. Ho pensato
(male?) di utilizzare le API, ma nulla da fare.
La domanda a questo punto è: dove sbaglio? (Esiste un metodo per killare un
processo? Può essere quello sotto?)
Scrivo il listato (è un po' scopiazzato da sitocomune (grazie! sempre utile)
e un po' di qua di là su internet)
'setto l'oggetto Database al database corrente
    Set cdb = CurrentDb
'nella variabile app di tipo stringa salvo il percorso dove è memorizzato
nel mio pc l'EXCEL.EXE
    app = "C:\Programmi\Microsoft Office\OFFICE11\EXCEL.EXE"
'nella variabile file di tipo stringa salvo il percorso del foglio Excel dal
quale prenderò i dati
    file = CurrentProject.Path & "\mio.xls"
'lancia in esecuzione il file Excel
    idprocess= Shell(app, 6)
'apre il canale di comunicazione con il file Excel
    chan = DDEInitiate("Excel", "System")
'RIGHE DI IMPORTAZIONE RIGHE E COLONNE.......
'chiude il canale (oltre ai vari riferimenti alla tabella del DB in cui sono
finiti i dati)
    DDETerminate chan
'Prelevo l 'ID del processo lanciato
'Creo un Handle per quel processo
 hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, False, idprocess)
!!!!!----->>> Questa è la parte di cui non sono sicuro della sintassi (cmq
non funziona)
 Call TerminateProcess(hProcess, STILL_ACTIVE)
 Call CloseHandle(hProcess)
'---->>> il file Excel rimane comunque aperto! Pecchè? Why?
Queste sono le API:
Declare Function OpenProcess Lib "kernel32" _
(ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long) As Long
Declare Function TerminateProcess Lib "kernel32" _
(ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Declare Function CloseHandle Lib "kernel32" _
(ByVal hObject As Long) As Long
Const STILL_ACTIVE = &H103
Const PROCESS_QUERY_INFORMATION = &H400
Grazie per l'aiuto. (e scusate la lungaggine, ma un esempio è meglio di 1000
parole)
Rick


title: IMMAGINI SU MASCHERA

author: cecilia

text:
Ciao a tutti
ho 100 foto e vorrei creare una maschera per visualizzare le foto in
miniatura per poi stampare quella scelta.
la tabella ha un campo testo "PATHFOTO" dove è indicato il percorso ed il
nome della foto.
avevo idea di inserire 6/10 foto per pagina poter scorrere le foto per
visualizzare tutte e 100 le foto.
potete darmi uno spunto ed un aiuto
grazie del vs. sempre prezioso aiuto
cecilia

--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: IMMAGINI SU MASCHERA

author: Roberto dalla campagna

text:
"cecilia" <
c.me...@libero.it
> ha scritto nel messaggio
news:213Z215Z167Z15Y...@usenet.libero.it...
> Ciao a tutti
> ho 100 foto e vorrei creare una maschera per visualizzare le foto in
> miniatura per poi stampare quella scelta.
> la tabella ha un campo testo "PATHFOTO" dove è indicato il percorso ed il
> nome della foto.
> avevo idea di inserire 6/10 foto per pagina poter scorrere le foto per
> visualizzare tutte e 100 le foto.
> potete darmi uno spunto ed un aiuto
Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la mia
FAQ intitolata "6.162 Browser per navigare tra i file immagine contenuti in
una directory". Vengono visualizzate 12 foto per pagina (3 righe di 4 foto
ciascuna).
Quando clicchi sulle miniature la foto viene evidenziata leggermente
ingrandita nel riquadro di sinistra; con un clic sull'immagine del riquadro
di sinistra ottieni un ulteriore ingrandimento aprendo una maschera di zoom;
naturalmente tu invece di aprire una maschera dovrai eseguire un report che
stampa la foto contenuta nel riquadro di sinistra.
La navigazione avviene per pagina o per riga agendo sui pulsanti di comando
posti nella maschera in alto a sinistra.
> grazie del vs. sempre prezioso aiuto
Prego.
> cecilia
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: IMMAGINI SU MASCHERA

author: Ceci

text:
                    Il 05 Ott 2005, 18:50, "Roberto dalla campagna" <
r.masso...@libero.it
>
ha scritto:

Grazie Rovberto
del tuo consiglio ci sono riuscita però adesso ho un nuovo problema.
Nella tabella ho inserito un flag (vero/falso) per visualizare o meno le
foto
nella maschera browse - su caricamento ho aggiunto il comando ApplyFilter
ma non filtra nulla i visualizza tutte le foto dove sbaglio ??
****************************
Private Sub Form_Load()
DoCmd.ApplyFilter , "flag = False"
DoCmd.Maximize
DoCmd.Hourglass False
Dim rst As DAO.Recordset
Dim Conta As Long
Set rst = Me.RecordsetClone
Me.RecordsetClone.MoveLast
Me!Tutti = rst.RecordCount
Me!Letti = 0
Me!InID1 = 1
rst.MoveFirst
    Dim rst1 As DAO.Recordset
    Set rst1 = CurrentDb.OpenRecordset("tblconta")
    Call BarraProgressione(0, rst1, 1)
For Conta = 1 To 12
If Conta <= Me!Tutti Then
    Me("Imma" & Trim(Conta)).Picture = rst!PathFoto
    Me("Imma" & Trim(Conta)).BorderStyle = 1
    Me("Imma" & Trim(Conta)).BorderWidth = 1
    Me("Imma" & Trim(Conta)).BorderColor = 0
    Me("ID" & Trim(Conta)) = rst!ID
    rst.MoveNext
    Me!Letti = Me!Letti + 1
Else
    Me("Imma" & Trim(Conta)).Picture = ""
End If
    Call BarraProgressione(1)
    rst1.MoveNext
Next Conta
    Set rst1 = Nothing
    Call BarraProgressione(2)
Me!Imma1.BorderColor = 255
Me!Imma1.BorderWidth = 2
Set rst = Nothing
End Sub
******************************************
grazie
Ceci
> -----------------------------------------------------
> il Sito Comune di it.comp.appl.access
>
http://www.sitocomune.com
> ----------------------------------------------------
>




title: IMMAGINI SU MASCHERA

text:
"Ceci" <
c.me...@libero.it
> ha scritto nel messaggio
news:81Z211Z236Z43Y1...@usenet.libero.it...

Invece di:
DoCmd.ApplyFilter , "flag = False"
prova a scrivere:
Me.Filter = "flag = False"
Me.FilterOn = True
> grazie
Prego
> Ceci
--
Roberto



title: Compattare chiavi primarie

author: Lawrence Oluyede

text:
Ho notato che successi inserimenti e cancellazioni
di record tramite query relative non garantiscono
l'integrità delle chiave primaria.
Com'è possibile riordinare le chiavi primarie?
la tabella è cosi strutturata
ID(PK)	Descrizione
ID è un campo contatore
--
Lawrence Oluyede
rhy...@myself.com


title: Compattare chiavi primarie

author: Emyr

text:
On Tue, 16 Apr 2002 11:57:24 +0200, Lawrence Oluyede
<
rhy...@myself.com
> wrote:
>
>Ho notato che successi inserimenti e cancellazioni
>di record tramite query relative non garantiscono
>l'integrità delle chiave primaria.
>
>Com'è possibile riordinare le chiavi primarie?
>
>la tabella è cosi strutturata
>
>ID(PK)	Descrizione
>
>ID è un campo contatore
esegui compatta database
Saluti.
Emanuele.


title: Compattare chiavi primarie

author: Luciano (DOC)

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:62roguo7e3drtof4g...@4ax.com...
> esegui compatta database
Attenzione, se ha tabelle relazionate gli ID rimangono tali e quali.
Saluti.
Luciano


title: Compattare chiavi primarie

author: Sib

text:
"Lawrence Oluyede" <
rhy...@myself.com
> ha scritto nel messaggio
> Ho notato che successi inserimenti e cancellazioni
> di record tramite query relative non garantiscono
> l'integritą delle chiave primaria.
sarei molto preoccupato se le query potessero alterare "l'integrita' " delle
chiavi primarie.
Che intendevi dire in realta'?
> Com'č possibile riordinare le chiavi primarie?
Con un filtro di ordinamento crescente/decrescente
Se intendevi riferirti a eventuali buchi nella numerazione allora non
preoccuparti, e' tutto normale. Il contatore non e' stato creato per creare
una numerazione uniforme e continua, ma solo per garantire ID univoci.
Sib


title: Compattare chiavi primarie

author: Goldmund

text:
On 16 Apr 2002 10:45:25 GMT, Emyr <
fan...@lavoro.com
> wrote:
>esegui compatta database
>Saluti.
>Emanuele.
Scusate, probabilmente è un argomento già trattato a sufficienza, ma
non sono riuscito a trovare nulla con Google.
C'è un modo di compattare in automatico un db, in particolare Access?
A me capita che il db cresca spaventosamente anche di 1 Mbyte in un
giorno a fronte di un aumento di dati (dopo il compattamento) di
100-150 Kbyte.
Attualmente sono obbligato a scaricare e ricare molto spesso il db
(per fortuna ho una linea veloce), però è assurdo.
Grazie e scusate in anticipo se è un quesito molto richiesto.
Goldmund -
on Usenet since 1997


title: Compattare chiavi primarie

text:
"Sib" <si...@SPAMiol.it> wrote:
>Se intendevi riferirti a eventuali buchi nella numerazione allora non
>preoccuparti, e' tutto normale. Il contatore non e' stato creato per creare
>una numerazione uniforme e continua, ma solo per garantire ID univoci.
ok grazie mi sento piů sollevato :)
--
Lawrence Oluyede
rhy...@myself.com


title: Compattare chiavi primarie

author: Roberto da casa

text:
"Goldmund" <
us...@provider.com
> ha scritto nel messaggio
news:3cbc126a...@nsnmpen2-lo.nuria.telefonica-data.net...

Vai sul Sito Comune (link qui sotto); nella Sezione General troverai almeno
due o tre FAQ che ti indicano come compattare un database da codice: decidi
tu l'evento in cui devi effettuare la compattazione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Compattare chiavi primarie

author: André le Pčtomane

text:
"Goldmund" <
us...@provider.com
> ha scritto nel messaggio
news:3cbc126a...@nsnmpen2-lo.nuria.telefonica-data.net...

piu' che compattare converrebbe non fare crescere a dismisura l'archivio.
Questo succede quando hai degli oggetti ole nelle tabelle (detto e ridetto)
ma non ho mai sentito considerare come possibile causa quanto segue:
Facendo una query di accodamento su un gran numero di records di una tabella
con gli stessi records già esistenti, cioè violando la chiave con
conseguente conteggio dei records scartati (ma il piu' delle volte si
nasconde col setwarnings.false), oltre a rallentare enormemente l'esecuzione
anche per tutti quelli che condividono il database in rete, fa crescere
molto la dimensione del mdb (proporzionalmente al numero dei tentati records
"forzati"), non chidetemi il perchè, alla microsoft hanno ammesso il
problema ma non hanno saputo darmi una spiegazione dopo una mattina passata
al telefono con loro.
Un buon accorgimento sarebbe per pesanti elaborazioni filtrare i records da
accodare, verificando che non esistano già prima di andarli a scrivere.
Ciao, Ale.


title: Compattare chiavi primarie

text:
On Tue, 16 Apr 2002 15:31:48 +0200, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>Vai sul Sito Comune (link qui sotto); nella Sezione General troverai almeno
>due o tre FAQ che ti indicano come compattare un database da codice: decidi
>tu l'evento in cui devi effettuare la compattazione.
Grazie mille.



title: Rileva Aggiornamento Campo

author: Ferrari Rino

text:
Salve a tutto il Ng
Pongo un quesito che potrebbe essere comune ad un po' di persone:
Dunque supponiamo di avere due campi(con o senza origine dati) il primo  lo
chiamiamo Txt1,ed il secondo Txt2,bene presumiamo che il campo Txt2 debba
prendere il valore del campo Txt1, magari con un pulsante il cui evento su
click e quello di copiare  il valore di Txt1 in Txt2,fin qui niente di più
facile , ma se dobbiamo verificare il cambiamento di valore nel campo Txt2 ,
naturalmente il campo Txt2 non deve essere toccato la modifica di valore
deve essere rilevata durante il suo cambiamento (attenzione il campo Txt2
non dovrà avere nessun evento!) come procedere?
Grazie
RINO


title: Rileva Aggiornamento Campo

author: Silvio Berruti

text:
"Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
news:sM6y8.63252$vF6.1...@news2.tin.it...

Premessa: nelle maschere e nei report non ci sono campi, bensì controlli.
Non credo di aver capito bene cosa desideri ottenere, ma se desideri sapere
se il valore del controllo Txt2 è cambiato puoi saperlo scrivendo
    If Me.Txt2 <> Me.Txt2.OldValue then
        ' il valore è cambiato
    Else
        ' il controllo non è stato variato
    End If
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Rileva Aggiornamento Campo

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:VJ9y8.13517$W9.3...@twister2.libero.it...

> Ciao Silvio
bene accetto la correzione ho omesso  la  parte "controllo " a Txt, ma
quello che mi serve e rilevare  il  cambio di valore  di un controllo che
non e nientaltro che la somma di due altri controlli
spero di essere stato più chiaro
Ciao
Rino


title: Rileva Aggiornamento Campo

author: Alberto S.

text:
"Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
news:_Wdy8.65273$vF6.1...@news2.tin.it...

Inizio con una frase banale: non sono sicuro di aver capito bene...
Credo tu voglia un sistema per accorgerti che il valore di Txt2 è cambiato,
indipendentemente da quale [azione-evento-intervento dell'operatore] sia
stato causato il cambiamento.
Se è così io utilizzerei l'evento 'Su timer', memorizzerei in una variabile
static il valore di Txt2 e andrei a controllarlo ad intervalli regolari.
Se hai problemi nel realizzare la routine dillo, se non ho capito una beata
spiegati meglio.
Ciao
--
Alberto


title: Rileva Aggiornamento Campo

text:
"Alberto S." <
sartor...@tin.it
> ha scritto nel messaggio
news:aac9at$9ikgq$1...@ID-134626.news.dfncis.de...
>
> "Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
> news:_Wdy8.65273$vF6.1...@news2.tin.it...
> >
> > "Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
> > news:VJ9y8.13517$W9.3...@twister2.libero.it...
> > >
> > > "Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
> > > news:sM6y8.63252$vF6.1...@news2.tin.it...
> > > > Salve a tutto il Ng
> > > > Pongo un quesito che potrebbe essere comune ad un po' di persone:
> > > > Dunque supponiamo di avere due campi(con o senza origine dati) il
> primo
> > > lo
> > > > chiamiamo Txt1,ed il secondo Txt2,bene presumiamo che il campo Txt2
> > debba
> > > > prendere il valore del campo Txt1, magari con un pulsante il cui
> evento
> > su
> > > > click e quello di copiare  il valore di Txt1 in Txt2,fin qui niente
di
> > piů
> > > > facile , ma se dobbiamo verificare il cambiamento di valore nel
campo
> > Txt2
> > > ,
> > > > naturalmente il campo Txt2 non deve essere toccato la modifica di
> valore
> > > > deve essere rilevata durante il suo cambiamento (attenzione il campo
> > Txt2
> > > > non dovrŕ avere nessun evento!) come procedere?
> > >
> > > Premessa: nelle maschere e nei report non ci sono campi, bensě
> controlli.
> > >
> > > Non credo di aver capito bene cosa desideri ottenere, ma se desideri
> > sapere
> > > se il valore del controllo Txt2 č cambiato puoi saperlo scrivendo
> > >     If Me.Txt2 <> Me.Txt2.OldValue then
> > >         ' il valore č cambiato
> > >     Else
> > >         ' il controllo non č stato variato
> > >     End If
> > >
> > > --
> > >
> > > Silvio
> > >
> > >
> > > il sito comune di it.comp.appl.access:
> > >
http://www.sitocomune.com
> > >
> > >
> > > Ciao Silvio
> > bene accetto la correzione ho omesso  la  parte "controllo " a Txt, ma
> > quello che mi serve e rilevare  il  cambio di valore  di un controllo
che
> > non e nientaltro che la somma di due altri controlli
> > spero di essere stato piů chiaro
> > Ciao
> > Rino
> >
> Inizio con una frase banale: non sono sicuro di aver capito bene...
> Credo tu voglia un sistema per accorgerti che il valore di Txt2 č
cambiato,
> indipendentemente da quale [azione-evento-intervento dell'operatore] sia
> stato causato il cambiamento.
> Se č cosě io utilizzerei l'evento 'Su timer', memorizzerei in una
variabile
> static il valore di Txt2 e andrei a controllarlo ad intervalli regolari.
> Se hai problemi nel realizzare la routine dillo, se non ho capito una
beata
> spiegati meglio.
> Ciao
> --
> Alberto
>
> Si diciamo che il concetto e questo, se potresti farmi un esempio io uso
l'evento su time per un form di inizio ma no penso che sia la stessa cosa .
Grazie per la collaborazione.
RINO


title: Rileva Aggiornamento Campo

text:
[CUT]
> > Credo tu voglia un sistema per accorgerti che il valore di Txt2 è
> cambiato,
> > indipendentemente da quale [azione-evento-intervento dell'operatore] sia
> > stato causato il cambiamento.
> > Se è così io utilizzerei l'evento 'Su timer', memorizzerei in una
> variabile
> > static il valore di Txt2 e andrei a controllarlo ad intervalli regolari.
> > Se hai problemi nel realizzare la routine dillo, se non ho capito una
> beata
> > spiegati meglio.
> > Ciao
> > --
> > Alberto
> >
> > Si diciamo che il concetto e questo, se potresti farmi un esempio io uso
> l'evento su time per un form di inizio ma no penso che sia la stessa cosa
.
> Grazie per la collaborazione.
> RINO
>
Allora...
Imposti nella proprietà 'intervallo timer' ogni quanti millisecondi vuoi che
venga effettuato il controllo.
Crei nella maschera un controllo nascosto (checkTxt2) e, a fronte
dell'evento 'su apertura' della maschera, lo imposti allo stesso valore di
Txt2 (Me.checkTxt2 = Me.Txt2).
A fronte dell'evento 'su timer' scriverai delle istruzioni del tipo di
quelle che seguono:
    Private Sub Form_Timer()
        If Me.checkTxt2 <> Me.Txt2 Then
            Me.checkTxt2 = Me.Txt2
            MsgBox "Il valore è cambiato"
        End If
    End Sub
Probabilmente, al momento dell'apertura della maschera, Txt2 sarà vuoto e tu
non vorrai intercettare la prima occorrenza in cui verrà modificato; ma
credo che ovviare a questo non costituirà una difficoltà.
Ciao
--
Alberto


title: Rileva Aggiornamento Campo

text:
"Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
news:_Wdy8.65273$vF6.1...@news2.tin.it...

Ciao Rino,
se Txt2 è un controllo calcolato, somma di altri 2 controlli, non puoi
mettere la verifica della variazione degli altri 2 controlli, utilizzando
l'evento Dopo Aggiornamento di entrambi?



title: Rileva Aggiornamento Campo

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:fU5z8.110854$SR5.2...@twister1.libero.it...

> Vi ringrazio per le risposte a tutti.
Alla prossima
Ciao RINO


title: filtro data

author: Claude MERELL

text:
ciao a tutti!!
ho trovato sul sito comune form di ricerca da implementare in un
db..esiste qualcosa per fare dei filtri data da/a?
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: filtro data

author: Pablitomf

text:
Claude MERELL ha scritto:
> ciao a tutti!!
> ho trovato sul sito comune form di ricerca da implementare in un
> db..esiste qualcosa per fare dei filtri data da/a?
> grazie
Certo...
Nei criteri della query inserisci un bel [Digita data] al campo relativo e
il gioco č fatto... se vuoi invece fare un filtro del tipo dal / al, bhč
guarda nell'help "Between... and ..."
--
Pablitomf
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)



title: apertura tabella back-end

author: goose

text:
Un saluto a tutto il NG.
Ho diviso il db nella versione back-end ed in quella front-end.
Quando perň all'interno di una maschera, via codice, provo ad aprire una
tabella per lavorare su un record, il sistema va in errore, compare la
finestra di Invalid Operation, facendo riferimento all'errore di runtime n.
3219.
Le righe che mandano in 'tilt' il sistema sono le seguenti:
Set db = CurrentDb
Set ord = db.OpenRecordset("tabella1", dbOpenTable)
Dove tabella1 č, ovviamente,  la tabella in cui effettuare le modifiche.
Qualcuno sa dirmi dov'č l'errore?
Un ringraziamento anticipato.
Goose


title: apertura tabella back-end

text:
goose <
goose...@hotmail.com
> wrote in message
news:4mYy6.4023$5Y1....@news1.tin.it...
[cut]
> Le righe che mandano in 'tilt' il sistema sono le seguenti:
>
> Set db = CurrentDb
> Set ord = db.OpenRecordset("tabella1", dbOpenTable)
>
> Dove tabella1 è, ovviamente,  la tabella in cui effettuare le modifiche.
>
[cut]
Ragazzi, grazie lo stesso. Come al solito, guardando meglio sul sitocomune,
si scoprono tante cose... eheheheh
un saluto a tutti!
Goose


title: impossibile èassare al record specificato

author: Piero

text:
ciao a tutti

con questo codice ho errore nel caso in cui non ho record avanti

impossibile �assare al record specificato

    If Me.Recordset.RecordCount > 1 Then
        DoCmd.GoToRecord , , acPrevious
    Else
        DoCmd.GoToRecord , , acLast
    End If

come poso risolvere?
grazie


text:
Secondo me il problema lo hai quando sei con POINTER a ZERO o meglio quando cerchi di andare al PREVIOUS essendo già a ZERO.

Il controllo che fai è solo se ci sono RECORD ma non controlli in che POSIZIONE TRI TROVI... quindi ottieni l'errore.

Verifica ABSOLUTEPOSITION prima di fare il PREVIOUS...

@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:06f8e14b-27a4-4f8f...@googlegroups.com...

ciao Alex
è proprio cosi'
ma non sono in grado
di metterlo in pratica


text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:521b0ad7$0$1379$4faf...@reader1.news.tin.it...
>
> "@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
> news:06f8e14b-27a4-4f8f...@googlegroups.com...
> Secondo me il problema lo hai quando sei con POINTER a ZERO o meglio
> quando cerchi di andare al PREVIOUS essendo gi� a ZERO.
>
> Il controllo che fai � solo se ci sono RECORD ma non controlli in che
> POSIZIONE TRI TROVI... quindi ottieni l'errore.
>
> Verifica ABSOLUTEPOSITION prima di fare il PREVIOUS...
>
> @Alex
> ciao Alex
> � proprio cosi'
> ma non sono in grado
> di metterlo in pratica
>
>
ho fatto
    If Me.Form.Recordset.AbsolutePosition > 0 Then
     DoCmd.GoToRecord , , acPrevious
    End If
ma il cursore non si muove


title: Compilatore

author: Rosario Manto

text:
Dove posso reperire un compilatore per Access(VB6.0)?
E quali funzionalitą ha questo compilatore?
Grazie


title: Compilatore

author: LaLo

text:
Rosario Manto <
rosari...@citiesonline.it
> wrote in message
8s2621$di1$1...@serv1.iunet.it...
> Dove posso reperire un compilatore per Access(VB6.0)?
> E quali funzionalitą ha questo compilatore?
> Grazie
>
>
Il compilatore per VB 6 c'č gią ma per quello di Access guarda il sito
comune. (Scommetto 100 a 1 che non esiste).
--
Se i costruttori costruissero edifici nello stesso modo in cui i
programmatori hanno scritto programmi, un solo picchio
basterebbe per distruggere il mondo intero.
(Seconda legge di Weinberg)


title: Compilatore

author: Lbo da casa

text:
>Dove posso reperire un compilatore per Access(VB6.0)?
>E quali funzionalitą ha questo compilatore?
cosa ti fa pensare che esista?
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Compilatore

author: warp

text:
LaLo ha scritto nel messaggio <8s2bpt$mha$
1...@nslave3.tin.it
>...
>
>Rosario Manto <
rosari...@citiesonline.it
> wrote in message
>8s2621$di1$1...@serv1.iunet.it...
>> Dove posso reperire un compilatore per Access(VB6.0)?
>> E quali funzionalitą ha questo compilatore?
>> Grazie
>>
>>
>
>Il compilatore per VB 6 c'č gią
Vero solo al 50%: anche le Applicazioni VB vengono distribuite con una modalitą Runtime del tutto
simile a quella di Access.
L'unica sostanziale differenza č la possibilitą di compilare il codice in Native code piuttosto che
in P-Code.
E' anche vero che la distribuzione Runtime dell'ultima edizione di Access č afflitta da vari
problemi.
Ciao, warp


title: Compilatore

author: Antonio Biso

text:
Rosario Manto <
rosari...@citiesonline.it
> wrote in message
8s2621$di1$1...@serv1.iunet.it...
> Dove posso reperire un compilatore per Access(VB6.0)?
Sul sito dei compilatori per i linguaggi interpretati
> E quali funzionalitą ha questo compilatore?
Compila il codice...
Antonio


title: Compilatore

text:
"Rosario Manto" <
rosari...@citiesonline.it
> ha scritto nel messaggio
news:8s2621$di1$1...@serv1.iunet.it...
> Dove posso reperire un compilatore per Access(VB6.0)?
> E quali funzionalità ha questo compilatore?
Prova su:
www.chesogno.org
--
Silvio



title: eliminare TUTTE le barre degli strumenti via VB

author: Mx

text:
ciao
vorrei da codice Vb eliminare tutte le barre degli strumenti di access.
In pratica deve restarmi solo la barra blu in alto.
Ho provato con gli esempi del sitocomune ma mi resta una barra grigia in
alto.
grazie


author: ALESSANDRO Baraldi

text:
"Mx" <
a...@aa.com
> ha scritto nel messaggio
news:FcH3c.30242$O31.1...@news4.tin.it...

Puoi provare con questo, ma non sempre funziona anche perchè ci
sono dubbi sul fatto che la "Barra dei Menù" sia una ToolBar.
    DoCmd.ShowToolbar "Barra dei menu", acToolbarNo
    DoCmd.ShowToolbar "DataBase", acToolbarNo
Ho notato che alcune volte funziona, altre no(ho semplificato
in realtà non è banale o casuale, ma di fatto è così).
Un'altra possibilità molto pericolosa è usare l'oggetto
CommandBar e disabilitare quelle abilitate, ma se
non ti rocordi di riabilitarle e/o con una OTTIMA gestione
errori le riabiliti ti tocca crearti un'applicazione che te le riabiliti
dall'esterno......!!!
Application.CommandBar(NomeBarra).Enabled=False
(Per questo devi inserire i riferimenti alle Lib OFFICE)
Ciao.
@Alex.


text:
ALESSANDRO Baraldi wrote:
>
> Puoi provare con questo, ma non sempre funziona anche perchè ci
> sono dubbi sul fatto che la "Barra dei Menù" sia una ToolBar.
>
>     DoCmd.ShowToolbar "Barra dei menu", acToolbarNo
>     DoCmd.ShowToolbar "DataBase", acToolbarNo
>
> Ho notato che alcune volte funziona, altre no
in sintesi se apro il db tramite l'icona ( e le maschere si aprono
automaticamente)il codice vb non funziona, mentre se entro in
visualizzazione struttura...e poi apro la maschera...funziona.
la stessa cosa si ottiene andando su strumenti->personalizza->e levando
la spunta su "barra dei menu": se provo ad aprire la maschera senza
chiudere il db...funziona. Ma se chiudo il db e lo riapro (caricanod in
automatico le maschere) la barra resta LI.
non c'è soluzione?


title: OT Codici come fossero parole crociate

author: Fabrizio

text:
"Private Sub WhatsLoaded()
Dim intCtr As Integer
For intCtr = 0 To Forms.Count - 1
    Debug.Print Forms(intCtr).NomeMaschera
Next intCtr
End Sub"
Tale codice è su un libro dove sto studiando , dov è l'errore ?
A dire il vero l'ho trovata alla fine, la soluzione , ma volevo solo
farvi un esempio delle traduzioni "spinte" che fanno certe case
editrici.
Ciao. Fabrizio


title: OT Codici come fossero parole crociate

author: Harry da ufficio

text:

Forms(intCtr).NomeMaschera  --> NomeMaschera non esiste, è "Name"


title: OT Codici come fossero parole crociate

text:


Oppure scrivere FormName di cui NomeMaschera è la traduzione.
Ripeto, cmq , che avevo già risolto , volevo solo riportare le
sciocchezze con le quali chi studia è costretto a confrontarsi.
Ciao. Fabrizio


title: OT Codici come fossero parole crociate

author: Maurizio Borrelli

text:
> "Fabrizio" news:bmd0pucfm3pv0nrqq...@4ax.com...:
> "Private Sub WhatsLoaded()
> Dim intCtr As Integer
> For intCtr = 0 To Forms.Count - 1
>     Debug.Print Forms(intCtr).NomeMaschera
> Next intCtr
> End Sub"
> Tale codice è su un libro dove sto studiando
[...]
    Vogliamo i nomi!...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: OT Codici come fossero parole crociate

text:
On Wed, 25 Sep 2002 18:14:02 +0200, "Maurizio Borrelli"
<
maurizio...@freepass.it
> wrote:
>> "Fabrizio" news:bmd0pucfm3pv0nrqq...@4ax.com...:
>> "Private Sub WhatsLoaded()
>> Dim intCtr As Integer
>> For intCtr = 0 To Forms.Count - 1
>>     Debug.Print Forms(intCtr).NomeMaschera
>> Next intCtr
>> End Sub"
>> Tale codice è su un libro dove sto studiando
>[...]
>
>    Vogliamo i nomi!...
Proprio non posso , si rischia la querela ..... bah visto che insisti:
"Guida all'uso Access 2002 -Argomenti avanzati" Roger Jennings
Mondadori Informatica : è un libro pieno zeppo di errori , è
sicuramente da sconsigliare a chi si aspetta di "avanzare" con sto'
mattone, ma che fare mentre aspetto che mi arrivi quello che ho
ordinato a gorilla ?
Cmq se vi interessa, sempre in questo 3d, vi potrei fare un esempio
del codice che mi sta facendo perdere la testa da ieri ... ops mi
viene un dubbio : forse non è corretto postare codice che non ci
appartiene , anche se è semplice semplice tipo: Mario mangia la mela.
Ciao. Fabrizio


title: Controllo su report

author: Franco

text:
Salve a tutti
Ho un controllo a piè di pagina con la funzione somma che deve semplicemente
sommare il risultato di un controllo sulla parte corpo che ricava il valore
da una tabella usando lookup.
Alla visualizzazione mi chiede un paramentro per quel controllo e quindi non
funziona
è possibile che questo problema sia legato alla funzione lookup? e come
posso ovviare?
Grazie per le indicazione
Ciao Franco


title: Controllo su report

author: Roberto da casa

text:
"Franco" <
s16...@inwind.it
> ha scritto nel messaggio
news:4FAnf.82796$65.24...@twister1.libero.it...

Non esiste la funzione lookup ma la funzione DLookup: sicuramente se usi
DLookup eviti che si apra la finestra di dialogo per chiederti di digitare
un valore.
> Grazie per le indicazione
Prego.
> Ciao Franco
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Pulsante in/visibile su maschera continua

author: Eradicator

text:
Ciao a tutti,
Ho una maschera continua così strutturata:
O   [Stato]
dove O è un pulsante
[stato] è un campo collegato alla tab. Articoli
Quello che vorrei fare è:
rendere invisibile il pulsante come valore predefinito (qui è banale)
rendere visibile il pulsante se il campo [Stato] del relativo record è
diverso da "Evaso"
Come posso fare?
Grazie.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Salvatore

text:
"Eradicator" <
m.enteza...@virgilio.it
> ha scritto nel messaggio
news:bnavg2$87a$1...@news.newsland.it...
> Ciao a tutti,
>
> Ho una maschera continua così strutturata:
>
> O   [Stato]
>
>
> dove O è un pulsante
> [stato] è un campo collegato alla tab. Articoli
>
> Quello che vorrei fare è:
>
> rendere invisibile il pulsante come valore predefinito (qui è banale)
>
> rendere visibile il pulsante se il campo [Stato] del relativo record è
> diverso da "Evaso"
>
>
> Come posso fare?
>
>
>
> Grazie.
>
SE trasformi il pulsante in una casella di testo, puoi sfruttare la
formattazione condizionale, modificandone il colore dello sfondo.
Ciao
Salvatore


title: trovare punteggio più basso della giornata

author: Zut

text:
Problema:
3 persone ogni giorno lanciano 1 dado  e chi ha il punteggio più basso
perde.
Volendo tenere uno storico dei punteggi di ognuno e volendo che il
perdente mi venga calcolato ... come devo impostare la tabella e la formula?

Pensavo a qualcosa di simile ...

giorno=Now()
giocatore=combo(g1;g2;g3)
Punteggio= n

perdente=?


title: Problema con maschere continue

author: Insider

text:
Ho la neccessità di valutare, dopo un certo tempo T1 l'esito di un Azione
implementata in data D1. Se l'esito dell'azione è negativo, devo
implementare una nuova Azione che andrò a valutare fra T2 giorni a partire
dalla data D2. Questo fino a tanto che l'esito dell'Azione diventa positivo.
Nella gestione della storicità vorrei che la sottomaschera contenente i
campi Azione(i), DataImplementazione(i), Tempo(i),ecc venisse aperta con i
primi (n-1) record bloccati (quelli relativi ad azioni già valutate) e con
il solo record (n) abilitato all'immissione dei dati relativi alla
valutazione dell'Azione implementata. Nel caso di Azione con ulteriore esito
negativo dovrei avere la possibilità di inserire un nuovo record con una
nuova Azione bloccando in tal caso il record (n). Sempre che abbiate capito
quale è il mio problema, come posso risolverlo?


title: Problema con maschere continue

author: MegaMax

text:
>Sempre che abbiate capito
> quale è il mio problema, come posso risolverlo?
crei una maschera nascosta che è sempre aperta quando è aperto il tuo
programma; in questa tu usi l'evento Timer; che ogni tot secondi (decidi tu
quanti) fa tutti i tuoi controlli ed agisce di conseguenza.
Ciao, Max


title: Campi obbligatori, ma autoescludenti se...

author: M. Rick

text:
Ho una maschera di immissione dati, suddivisa in più schede (6 schede)
Ognuna di queste schede possiede circa il 70 % di campi ad immissione
obbligatoria.
Due di queste schede, però, possiedono dei campi che dovrebbero
autoescludersi, pur essendo obbligatori, se si verifica una certa
condizione.
Spiegazione:
Scheda "Cedente" e scheda "Acquirente". Il cedente e l'acquirente possono
essere sia una società che un privato, per cui ogni scheda avrà due sezioni
relative ai dati della società e del privato. Sono campi obbligatori, cioè
in ogni scheda dovrà figurare un soggetto (se uno cede uno acquista); non si
verifica mai che due cedono (ad esempio cedono sia una società che un
privato); stesso discorso per l'acquirente.
Se io inserisco campi obbligatori (onde evitare di "dimenticarli"), però,
come faccio, se si può fare, a dire ad access: I campi sono obbligatori, ma
se io riempio i campi relativi al privato nella scheda Cedente, allora non
sono obbligato a riempire i campi relativi alla società nella stessa scheda
(stesso discorso per la scheda Acquirente).
Così sono sicuro di non dimenticare di compilare almeno una delle due
sezioni di ogni scheda.
Spero di essere stato chiaro nell'esposizione del problema.
Grazie
Andrea


text:
"M. Rick" <
now...@libero.it
> ha scritto nel messaggio
news:rCZca.18306$Lr4.5...@twister2.libero.it...

A fronte dell'evento "Prima di aggiornare" effettua tutte le verifiche
incrociate tra campi e la loro significabilità.
Se i controlli danno esito negativo annulla l'evento di regostrazione
(Cancel = True) e segnalalo con un messaggio all'operatore.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: collegamento ODBC - vista di SQL server - problema

author: pfmarro

text:
salve

ho collegato ad un .mdb 2 tabelle SQL server e 1 vista

non capisco come mai se si modifica la vista da sql server e poi da access Gestione tabelle collegate si ricollegano a volte la vista diventa di sola lettura.
solo se cancello il collegamanto alla vista e ricreo il collegamento nel .mdb torna ad essere lettura e scrittura.

Come fare a testare da codice se e' lettura e scrittura?

Grazie anticipatamente


author: Mancini

text:
> Come fare a testare da codice se e' lettura e scrittura?

Il problema nasce dal fatto che quello che colleghi da SQLServer ( che sia una tabella o Vista ) per essere editabile deve avere un indice NOTO ad Access.

Per le tabelle il problema generalmente non si pone in quanto Access prende di default la Key a lato SQLServer

Per le viste invece questo non succede,   Infatti quando colleghi una Vista di SQLServer ad Access la procedura ti chiede di indicare il campo Chiave

Ora tu dici che le viste che modifichi in SQLServer "alle volte" diventano in sola lettura,    Forse quelle volte sono quelle in cui la modifica della vista implica i suoi indici ......

Tieni presente che se vuoi via codice dire ad access quale sia l'indice della vista
        ssql = "CREATE UNIQUE INDEX NomInd ON dbo_Vis1 (Id)"
        CurrentDB.Execute ssql
              dove
                  NomInd  è il nome che dai dell'indice
                  dbo_Vis1  è il nome della tabella collegata
                  Id   è il campo che indichi come indice

Invece per verificare se una tabella collegata è editabile
ricirdo che lo avevo gia fatto.
la strada era  ( vado a memoria a annaspando )

Dim Tdf As ......
Set Tdf = "NomeTabella"
msgbox Tdf.Index.Count

Ti dovrebbe rispondere quanti indici ci sono nella tabella collegata,
per cui se non hai indici .....

Questa sera potro essere piu preciso se non hai ancora risolto ..........

leggi questo
http://support.microsoft.com/kb/209123/en-us

.


text:
> Questa sera potro essere piu preciso se non hai ancora risolto ..........

    Dim Tdf As DAO.TableDef
    Set Tdf = DBEngine(0)(0).TableDefs("NomeTabella")
    MsgBox Tdf.Indexes.Count
    MsgBox Tdf.Updatable
    MsgBox Tdf...........


text:

grazie molte per i 2 messaggi

in effetti quando collego la vista via odbc ad MsAccess mi chide qual e' il campo chiave: lo seleziono e tutto procede regolarmente fin quando mi accorgo che i dati non vengono aggiornati. Allora cancello il collegamento e lo ricreo.

- la vista di SQL server puo' avere degli indici? come si creano? se e' off topics possiamo scambiarci delle mail direttamente?

- mi consigli una procedura per testare se il collegamento alla vista e' diventato di sola lettura? per aggiornare il recordset eseguo da VBA delle query di aggiornamento o accodamento

Grazie anticipatamente


text:
[quote]
> - la vista di SQL server puo' avere degli indici? come si creano? se e' off topics possiamo scambiarci delle mail direttamente?
[/quote]
Ma non credo che sia troppo OffTopics,   magari questa sera provo a postare uno scriptino ( che dovrei avere a casa ) per creare una View di SQLServer2008 indicizzata  ( WITH SCHEMABINDING .... )

Non h mai provato a connettere una vista indicizzata di SQLServer ad Access

ma a parer mio la domanda da porsi è:
Perchi una tabella collegata a una vista a un certo punto perde il suo indice e non è piu editabile ??????
Se sono modifiche che fai te alla struttura della vista allora Ok
diversamente ......

[quote]
> - mi consigli una procedura per testare se il collegamento alla vista e' diventato di sola lettura? per aggiornare il recordset eseguo da VBA delle query di aggiornamento o accodamento
[/quote]
Premesso che a regime NON DEVE succedere che all'improvviso la tabella perde la sua editabilita
Io farei in contemporanea il test e mettere a posto se necessario,
prima di lanciare le tue query di accodamento/aggiornamento
[code]
' ........
    Dim Tdf As DAO.TableDef
    Set Tdf = DBEngine(0)(0).TableDefs("NomeTabella")
    If (Tdf.Indexes.Count) = 0 Then
        DBEngine(0)(0).Execute "CREATE UNIQUE INDEX NomInd ON NomeTabella (NomeCampoDaIndicizzare)"
    EndIf
[/code]

.


text:
[quote]
> Ma non credo che sia troppo OffTopics,   magari questa sera provo a postare uno scriptino ( che dovrei avere a casa ) per creare una View di SQLServer2008 indicizzata  ( WITH SCHEMABINDING .... )
[/quote]

Caso strano lo avevo anche qui dove lavoro.
Lo ho testato e funziona,  poi durante la connessione ODBC con Access NON ti chiede di indicare il CampoChiave .....

Ma ti ripeto il problema è scoprire perche perdi la Editabilita. ....

[code]

/*

Questo script  di esempio  ( SQL2008R2 ) genera:
___ un DB
___ 2 Tabelle con Key
___ 1 Relazione
___ 1 Vista con Schemabinding
___ 1 indice sulla vista

*/

--   Creo il DB
USE master;
GO

CREATE DATABASE VI01;
GO

--   Uso il DB appena creato

USE VI01;
GO

--   Creo una  tabella   Fo  ( Fornitori )

CREATE TABLE [dbo].[Fo]
(
	[FoId] [int] IDENTITY(1,1) NOT NULL,
	[Fornit] [varchar](50) NULL,
	[FoCitt] [varchar](50) NULL,
	[FoTele] [nchar](10) NULL,
 CONSTRAINT [KFo] PRIMARY KEY CLUSTERED

(
[FoId] ASC
)

WITH
(
PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON
) ON [PRIMARY]
) ON [PRIMARY]

GO

--   Creo una  tabella   OD  ( Ordini )

CREATE TABLE [dbo].[Od]
(
	[OdId] [int] IDENTITY(1,1) NOT NULL,
	[OdNume] [varchar](50) NULL,
	[OdFo] [int] NULL,
	[OdMate] [varchar](50) NULL,
	[OdImpo] [int] NULL,
 CONSTRAINT [KOr] PRIMARY KEY CLUSTERED

(
	[OdId] ASC
)

WITH
(
PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON
) ON [PRIMARY]
) ON [PRIMARY]

GO

-- Creo la relazione

ALTER TABLE [dbo].[Od]  WITH CHECK ADD  CONSTRAINT [ReFoOr] FOREIGN KEY([OdFo])
REFERENCES [dbo].[Fo] ([FoId])
GO

ALTER TABLE [dbo].[Od] CHECK CONSTRAINT [ReFoOr]
GO

--   Inserisco un po di Dati

SET IDENTITY_INSERT [dbo].[Fo] ON

INSERT [dbo].[Fo]
([FoId], [Fornit], [FoCitt], [FoTele])
VALUES

(1, N'Forn1', N'Milano', NULL),
(2, N'Forn2', N'Bologna', NULL),
(3, N'Forn3', N'Firenze', NULL),
(4, N'Forn4', N'Roma', NULL),
(5, N'Forn5', N'Napoli', NULL);

SET IDENTITY_INSERT [dbo].[Fo] OFF

-- _______________________________________________________________

SET IDENTITY_INSERT [dbo].[Od] ON

INSERT [dbo].[Od]
([OdId], [OdNume], [OdFo], [OdMate], [OdImpo])
VALUES

(1, N'20', 2, N'Mele', 500),
(3, N'20', 2, N'Pere', 14),
(4, N'30', 3, N'Ananas', 150),
(5, N'22', 2, N'Castagne', 120);

SET IDENTITY_INSERT [dbo].[Od] OFF

GO

-- Creo la vista indicizzata

CREATE VIEW
[dbo].[ViInd01]
WITH SCHEMABINDING
AS

SELECT
  dbo.Od.OdId,
  dbo.Od.OdNume,
  dbo.Od.OdFo,
  dbo.Od.OdMate,
  dbo.Od.OdImpo,
  dbo.Fo.Fornit
FROM
  dbo.Fo
INNER JOIN
  dbo.Od
ON
  dbo.Fo.FoId = dbo.Od.OdFo

GO

--  Creo l'indice

CREATE UNIQUE CLUSTERED INDEX NomeIndice
ON dbo.ViInd01
(
  [OdId] ASC
)

GO

/*

CREATE UNIQUE CLUSTERED INDEX idx_campo
ON dbo.VIEWxxx
(orderid)

*/

[/code]

.


text:

appena sono in ufficio la provo
SEI VERAMENTE GENTILE

GRAZIE


title: Combo particolare

author: Ebo

text:
In applicazione non Access ho visto una casella combinata con 3
colonne(Codcliente stringa alfanumerica,RagSociale stringa,Alias stringa):si
può indifferentemente digitare nella parte casella uno dei tre valori e
verrà selezionata la riga che lo contiene. Per esempio  il record in
anagrafica CodCliente="27", Ragsociale="The Coca Cola Company",
Alias="Cocacola" può essere trovato digitando uno qualsiasi dei 3 valori
nella casella combinata che poi registrerà su tabella il valore CodCliente.
Appena aperto, l'elenco risulta ordinato per Codcliente ma basta cliccare
sulla intestazione di una colonna perchè questultima risulti ordinata:ora
normalmente in Access le intestazioni colonna non rispondono all'evento
click!
Qualcuno sa dirmi come modificare le proprietà e metodi dell'oggetto
combobox? Mi accontento del fatto che punti al record da un valore presente
in una qualsiasi delle 3 colonne.Grazie Ebo


title: Combo particolare

author: Carlo Costarella

text:
"Ebo" <
eberle....@tiscali.it
> ha scritto nel messaggio
news:cnnuir$685$1...@lacerta.tiscalinet.it...

Penso si possa fare.
Ho bisogno di sapere qualche cosa.
I tipi di dati nelle tre colonne sono identici?
Vuoi cercare parole intere o parte?
Nell'elenco ci sono duplicati?
Il risultato restituito deve essere uno ed un solo record?
Quale è la finalità di tale operazione?
Ciao, Carlo


title: Combo particolare

author: Michele

text:

Scrivo solo per dire che conosco anch'io un programma di fatturazione con lo
stesso identico modo triplo di ricerca nell'anagrafica clienti.
Un solo campo per cercare su tre diversi tipi di campo: un sistema molto
semplice per l'operatore e arguto per il programmatore.
Saluti
Michele