author: Giuseppe

text:
"°_Bova_°" <
in...@labbondanza.it
> ha scritto nel messaggio
news:8mm07c$9mj$1...@fe2.cs.interbusiness.it...
> Volevo aggiungere valori ad una combo box da VBA con il metodo additem ma
mi
> dice che non lo trova. Qual'è la sintassi corretta?
> Ad ogni modo se la combo è impostata su un origine SQL posso aggiungervi
da
> codice dei valori a mano?
>
> grazie
> --
> <***********************************>
> Vigna Federico...CED L'Abbondanza
> Email:
in...@labbondanza.it
> Http:
www.labbondanza.it
> <***********************************>
>
>
Un metodo per aggiungere un valore alla lista di una combo box è la
seguente:
1- imposta come Origine riga della Combo box  una tabella
2- seleziona la proprietà Solo in elenco: si
3- nell'evento , Su non in elenco puoi aggiungere una apposita routine  che
permette di aggiungere , dopo la digitazione , il valore mancante alla lista
di origine se si tratta di un campo; altrimenti aprire un maschera per
inserire valori in più campi.
giuseppe


title: [?] aggiungere valori a una combo box...

author: lbo dal portatile

text:
>Volevo aggiungere valori ad una combo box da VBA con il metodo additem ma mi
>dice che non lo trova. Qual'è la sintassi corretta?
additem funziona con le combo di vb, quelle di access sono un'altra
cosa.
o le colleghi dritte per dritte ad una query, anche ad una stringa
sql, oppure prepari una stringa con i valori delimitati da punto e
virgola.
se devi fare spesso dei metti e leva ti conviene giostrarti questa
stringa.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


author: Sandro

text:
in...@labbondanza.it
 (°_Bova_°) ha scritto il lun 07 ago 2000 11:49:35a
>Volevo aggiungere valori ad una combo box da VBA con il metodo additem
>ma mi dice che non lo trova. Qual'è la sintassi corretta?
>Ad ogni modo se la combo è impostata su un origine SQL posso aggiungervi
>da codice dei valori a mano?
>
>grazie
>--
><***********************************>
>Vigna Federico...CED L'Abbondanza
>Email:
in...@labbondanza.it
>Http:
www.labbondanza.it
><***********************************>
>
>
>
>
Nel caso possa servire a qualcuno.
Una soluzione interessante, nel caso la tua combo non e' legata ad una
query e usi molto aggiungere e levare  item, consiste nel crearsi un nuovo
oggetto tramite un modulo di classe.
Ti allego il codice prelevato da internet sotto.
Il modulo di classe  chiamalo come vuoi
per esempio myComboClass
Definisci a livello di modulo della maschera una variabile
oggetto:
dim varCombo as myComboClass
Sull'evento apertura della maschera:
Private Sub Form_Open(Cancel As Integer)
  Set varCombo = New myComboClass
  Set varCombo.Control = Me!nomeCasellaCobinataDellaMaschera
.
.
.
End Sub
il primo set istanzia un nuovo oggetto della classe myComboClass
il secondo set fa in modo che la nuova variabile oggetto punti al controllo
sulla maschera.(setta la proprieta' Control del nuovo oggetto)
Dopo di che puoi utilizzare i metodi che trovi nel codice allegato.
varCombo.AddItem
varCombo.RemoveItem
varCombo.Clear
varCombo.RemoveSelected
varCombo.Sort
Per metodi mancanti (che non modificano la combo) o utilizzi direttamente
 Me!nomeCasellaCobinataDellaMaschera (non e' pero' corretto)
o aggiugi al modulo di classe i metodi e proprieta' che vuoi
clonandoli dal controllo originale.
Se a qualcuno interessano ulteriori informazioni posso provare a cercare la
pagina internet relativa all'argomento, anche se la cosa migliore e'
studiarsi il codice.
Sandro
'---------------------------------------------------
Option Compare Database
Option Explicit
Private mcolItems As Collection
Private mControl As Control
Private Sub Class_Initialize()
    Set mcolItems = New Collection
End Sub
Public Property Set Control(Control As Control)
  If (Not TypeOf Control Is ListBox) And _
     (Not TypeOf Control Is ComboBox) Then
    MsgBox "Please assign only list boxes or " & _
           "combo boxes to this property"
  Else
    Set mControl = Control
    mControl.RowSourceType = "Value List"
  End If
End Property
Public Sub AddItem(varItem As Variant)
    Dim varTest As Variant
    Dim bFound As Boolean
    Dim intCounter As Integer

    If Not IsNull(varItem) Then
      If InStr(varItem, ";") Then
        MsgBox "Item may not contain " & _
               "';' characters"
      Else
        For Each varTest In mcolItems
          If varTest = varItem Then
            bFound = True
          End If
        Next varTest

        If Not bFound Then
          mcolItems.Add varItem
          mControl.RowSource = _
            ConcatRowSourceStrings()
        End If

      End If
    End If

End Sub
Public Sub RemoveItem(intItem As Integer)
  Dim intRemoveItem As Integer

  'to emulate VB's RemoveItem method,
  'assume a zero-based index
  'rather than a 1-based index
  intRemoveItem = intItem + 1

  If intRemoveItem >= 1 And _
     intRemoveItem <= mcolItems.Count Then
    mcolItems.Remove intRemoveItem
    mControl.RowSource = ConcatRowSourceStrings()
  End If

End Sub
Private Function ConcatRowSourceStrings() As Variant
  Dim varItem As Variant
  Dim varResult As Variant
  For Each varItem In mcolItems
    varResult = varResult & varItem & ";"
  Next varItem
  If Len(varResult) Then
    varResult = Left(varResult, Len(varResult) - 1)
  End If
  ConcatRowSourceStrings = varResult
End Function
Public Sub Clear()
  Set mcolItems = Nothing
  Set mcolItems = New Collection
  mControl.RowSource = ""
End Sub
Public Sub RemoveSelected()

  Dim varCurItem As Variant
  Dim intCounter As Integer

  If TypeOf mControl Is ListBox Then
    If mControl.MultiSelect = 0 Then
      If mControl.ListIndex <> -1 Then
        RemoveFromCollection mControl.Value
      End If

    Else  '1=Simple, 2=Extended
      For Each varCurItem In mControl.ItemsSelected
        RemoveFromCollection _
          mControl.ItemData(varCurItem)
      Next varCurItem

    End If

    mControl.RowSource = ConcatRowSourceStrings()
  ElseIf TypeOf mControl Is ComboBox Then
    Me.RemoveItem mControl.ListIndex
  End If

End Sub
Public Sub Sort()
    Dim intCounter As Integer

    ReDim avaritems(1 To mcolItems.Count) _
          As Variant

    For intCounter = 1 To mcolItems.Count
      avaritems(intCounter) = _
      mcolItems.Item(intCounter)
    Next intCounter

    QSArray avaritems, 1, mcolItems.Count

    Set mcolItems = Nothing
    Set mcolItems = New Collection

    For intCounter = 1 To UBound(avaritems)
      mcolItems.Add avaritems(intCounter)
    Next intCounter

    mControl.RowSource = ConcatRowSourceStrings()

End Sub
Private Sub RemoveFromCollection( _
            varItem As Variant)
  Dim intCounter As Integer

  For intCounter = 1 To mcolItems.Count
    If mcolItems.Item(intCounter) = _
       varItem Then
      mcolItems.Remove intCounter
      Exit For
    End If
  Next intCounter
End Sub
Private Sub QSArray(arrIn() As Variant, _
  ByVal intLowBound As Integer, _
  ByVal intHighBound As Integer)

  Dim intX As Integer
  Dim intY As Integer
  Dim varMidBound As Variant
  Dim varTmp As Variant
  If intHighBound > intLowBound Then
    varMidBound = arrIn((intLowBound + _
                         intHighBound) \ 2)
    intX = intLowBound
    intY = intHighBound

    Do While intX <= intY
      If arrIn(intX) >= varMidBound And _
         arrIn(intY) <= varMidBound Then
        varTmp = arrIn(intX)
        arrIn(intX) = arrIn(intY)
        arrIn(intY) = varTmp
        intX = intX + 1
        intY = intY - 1
      Else
        If arrIn(intX) < varMidBound Then
          intX = intX + 1
        End If
        If arrIn(intY) > varMidBound Then
          intY = intY - 1
        End If
      End If
    Loop

    Call QSArray(arrIn(), intLowBound, intY)
    Call QSArray(arrIn(), intX, intHighBound)
  End If
End Sub


author: Mauro

text:
>
>Per aggiungere valori, ad una combo basata su una query, quei valori devono
>trovarsi nella query, quindi, al limite, li accodi alla tabella di
>riferimento e fai un requery della combobox (nomecombo.requery).
>Se la combo si basa su un elenco di valori, la sintassi è la seguente:
>
>"valore1";"valore2";"....";"valoreN";
>
>Quindi, se vuoi aggiungere un valore, scrivi:
>nomecombo.RowSource = nomecombo.RowSource & "valorenuovo;"
>
Però lo devi fare con prudenza .... altrimenti rischia di piantarsi tutto :-D


author: Andrea Sciamanna

text:
> Perň lo devi fare con prudenza .... altrimenti rischia di piantarsi tutto
:-D
Questo dimostra quanto hai capito bene quello che ho detto, no?
Caspita, se il mondo fosse pieno di gente come te... peccato perň che non
sia cosě, vero?


text:
Andrea Sciamanna ha scritto nel messaggio <8mqurv$ie4$
1...@serv1.iunet.it
>...
>> Però lo devi fare con prudenza .... altrimenti rischia di piantarsi tutto
>:-D
>
>Questo dimostra quanto hai capito bene quello che ho detto, no?
>Caspita, se il mondo fosse pieno di gente come te... peccato però che non
>sia così, vero?
>
Già, invece  *fortunatamente* è zeppo di tipi come te.


text:
> >Questo dimostra quanto hai capito bene quello che ho detto, no?
> >Caspita, se il mondo fosse pieno di gente come te... peccato però che non
> >sia così, vero?
>
> Già, invece  *fortunatamente* è zeppo di tipi come te.
Vedi? Siamo di nuovo a "Tu sei brutto!", "No, sei più brutto tu!". Non sai
fare di meglio?


text:
Andrea Sciamanna ha scritto nel messaggio >> Già, invece  *fortunatamente* è zeppo di tipi come te.
>
>Vedi? Siamo di nuovo a "Tu sei brutto!", "No, sei più brutto tu!". Non sai
>fare di meglio?
In questo periodo no, è questione di bioritmi...
A settembre di solito risalgo su standard accettabili.


title: Pulsante, ad ogni click colora o blu o rosso

author: robviv

text:
E' possibile (sicuramente con VBA) fare in modo
che, ad ogni click , un pulsante assegna colore blu allo sfondo
di una textbox o rosso se prima era blu?
Inoltre, in riapertura maschera, nella txtbox viene mantenuto
l'ultimo colore assegnato; quindi se ripremo sul
pulsante, viene riconosciuto l'ultimo colore assegnato e quindi
viene applicato l'altro??
Ciao
robviv


text:
On Mon, 14 Aug 2000 09:54:00 GMT, robviv <
XXXv...@usa.net
> wrote:
>E' possibile (sicuramente con VBA) fare in modo
>che, ad ogni click , un pulsante assegna colore blu allo sfondo
>di una textbox o rosso se prima era blu?
sul click del pulsante:
if me.textbox.backcolor=rgb(255, 0, 0) then
	me.textbox.backcolor=rgb(0,0,255)
else
	me.textbox.backcolor=rgb(255,0,0)
end if
>Inoltre, in riapertura maschera, nella txtbox viene mantenuto
>l'ultimo colore assegnato; quindi se ripremo sul
>pulsante, viene riconosciuto l'ultimo colore assegnato e quindi
>viene applicato l'altro??
fatti una tabella di configurazione, cioe' una tabella che abbia un
campo per ognuna delle caratteristiche che vuoi "salvare".  quando
setti una certa caratteristica scrivi anche un valore adeguato nel
campo, chesso', un valore sì/no (booleano), un numerico...  in questo
modo conservi le impostazioni anche quando chiudi l'applicazione,
oltre che, ovviamente, all'interno dell'applicazione stessa quando
apri o chiudi maschere.
in apertura dell'applicazione o delle maschere leggi i valori che ti
servono dalla tabella e setti adeguatamente le proprietà dei i
controlli.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


author: Roberto dal portatile

text:
"robviv" <
XXXv...@usa.net
> ha scritto nel messaggio
news:3997C1EC...@usa.net...
> E' possibile (sicuramente con VBA) fare in modo
> che, ad ogni click , un pulsante assegna colore blu allo sfondo
> di una textbox o rosso se prima era blu?
> Inoltre, in riapertura maschera, nella txtbox viene mantenuto
> l'ultimo colore assegnato; quindi se ripremo sul
> pulsante, viene riconosciuto l'ultimo colore assegnato e quindi
> viene applicato l'altro??
>
> Ciao
> robviv
>
>
Ipotiziamo che sia il campo della tabella che il controllo della maschera
che deve cambiare colore di sfondo si chiamino Campo.
Dichiarati nella tabella un campo di tipo Si/No di nome Colore; nella
maschera inserisci una casella di controllo di nome Colore associata al
campo Colore della tabella; a questo controllo imposta la proprietą Visibile
a NO e il colore di sfondo a 255 (rosso).
Inserisci nella maschera un pulsante di comando e a fronte dell'evento "Su
clic" genera il seguente codice VBA:
If Me![Campo].BackColor = 255 Then
    Me![Campo].BackColor = 16711680
    Me![Colore] = False
Else
    Me![Campo].BackColor = 255
    Me![Colore] = True
End If
Inoltre, a fronte dell'evento "Su corrente" della maschera, genera il
seguente codice VBA:
If Me![Colore] Then
    Me![Campo].BackColor = 255
Else
    Me![Campo].BackColor = 16711680
End If
Ciao
Roberto


title: Gestione di runsql

author: Geppo

text:
Salve,
  Da un modulo access eseguendo un cmd.runsql è  possibile far ritornare il
  risultato in una variabile (al momento scrivo su file indi lo leggo
  sequenzialmente...e perdo un sacco di tempo).
   grazie Geppo


title: Gestione di runsql

author: VT @ work

text:


Guarda l'help per le funzioni
DLookUp()
DCount()
DAvg()
DSum()
Vincenzo Turturro
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: Gestione di runsql

author: Alessandro

text:
"Geppo" <
Ge...@tin.it
> wrote in message
news:adkmhg$bd7$
1...@newsserver.cilea.it

Potresti spiegare meglio cosa devi fare.....!!!
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: documentazione nella rete

author: stefano

text:
ciao, altre due domande:
dove posso trovare un buon manuale sql standard in rete ???
e' possibile fare le viste con access 97 ???
ciao e grazie in anticipo!!!
--
Posted from  [213.82.129.50]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: documentazione nella rete

author: Emyr

text:
On Wed, 19 Dec 2001 15:43:10 +0000 (UTC), "stefano"
<
vbst...@tiscalinet.it
> wrote:
CUT
>e' possibile fare le viste con access 97 ???
se non ho letto male gli altri thread dei vecchi del NG le viste su
access  dovrebbero essere le Query di selezione.
al limite qualcuno mi corregga!
Saluti Emanuele


title: Campi Ole di access con visual basic 6

author: Ronny

text:
Salve a tutti.
Mi è capitato sotto mani un db access con oltre ai campi resto e
numerici, 3 campi OLE.In questi tre campi copiano e incollano del testo
e delle immagini.
Come posso importarli in vb6? Ho provato con gli oggetti ole ma non
sono riuscito,inoltre non riesco a fare neppure il controllo dei
possibili valori Null che normalmente faccio con i campi.
Se qualcuno ha risolto o sa come si possa risolvere questo problema lo
ringrazio fin da ora.
Ronny.


title: poter accodare solo la stringa più lunga

author: Gigi

text:
salve,
vorrei accodare alcune stringhe.
Il problema �: se due o piu' stringhe sono uguali, come posso fare per
accodare
solo quella piu' lunga?
Grazie


author: Alessandro Cara

text:
Il 13/10/2011 19.45, Gigi ha scritto:
> salve,
>
> vorrei accodare alcune stringhe.
> Il problema ï¿œ: se due o piu' stringhe sono uguali, come posso fare per
> accodare
> solo quella piu' lunga?
> Grazie
>
>
se la regola e' la lunghezza, non trovi che fra le due lunghezze uguali
basta prenderne una  a caso?
--
ac (x=y-1)


author: Antonio Biso

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:NrGlq.84876$GZ3....@tornado.fastwebnet.it...
> Il 13/10/2011 19.45, Gigi ha scritto:
>> salve,
>>
>> vorrei accodare alcune stringhe.
>> Il problema �: se due o piu' stringhe sono uguali, come posso fare per
>> accodare
>> solo quella piu' lunga?
>> Grazie
>>
>>
> se la regola e' la lunghezza, non trovi che fra le due lunghezze uguali
> basta prenderne una  a caso?
ROTFL
com'era quella cosa che c'� qualcuno pi� uguale degli altri?
Antonio


author: Popi - TheBadHabits

text:
On 13 Ott, 22:42, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Alessandro Cara" <
alessandro.c...@ay-1anetwork.it
> ha scritto nel messaggionews:NrGlq.84876$GZ3....@tornado.fastwebnet.it...
>
> > Il 13/10/2011 19.45, Gigi ha scritto:
> >> salve,
>
> >> vorrei accodare alcune stringhe.
> >> Il problema è: se due o piu' stringhe sono uguali, come posso fare per
> >> accodare
> >> solo quella piu' lunga?
> >> Grazie
>
> > se la regola e' la lunghezza, non trovi che fra le due lunghezze uguali
> > basta prenderne una  a caso?
>
> ROTFL
>
> com'era quella cosa che c'è qualcuno più uguale degli altri?
Stia bravo, lei, sig. Maiale ...
G. O.


title: Riportare l’icona e apertura file di Access a quella originale

text:
(Sist. oper. win MilleniumEdition)
Avendo installato due access 97, da due cd rom diversi, una sotto
programmi/office e un’altra sotto programmi/office1 (ho creato una nuova
directory per installare il 2° access) praticamente quando clicco sul
file di access non mi apre più in automatico il file e mi chiede con
quale programma voglio aprirlo.
questo è successo anche quando ho tolto il 2° access.
a tale richiesta, ho scelto di aprirlo con access ed ho selezionato però
anche l’opzione:
 aprire questo file sempre con lo stesso programma.
solo che ora l’icona del file e di tutti gli altri database non sono più
quelli standard cioè il tipico foglio con la chiave ma è un foglio senza
nessuna chiave, con alcune righettine blu e in basso a destra un
triangolino rosso.
come posso ritornare alla condizione standard:
cioè icona tipica di access
e fare in modo che si apra con access normalmente, senza ogni volta
chiedermi con cosa lo voglio aprire
(questo però senza usare l’opzione apri  sempre con tale applicazione
che, come spiegato sopra mi ha cambiato l’icona, oltre al fatto che non
è sicuramente il modo normale di aprire tali file
(p.s. trovo meraviglioso access (il 97) che uno solo non mi
bastava!!!!!!!1)


title: query sul mese selezionato e anno corrente

author: Fux

text:
come  posso creare una querry che mi estrae dei campi . divisi per per mese
.
cioe' ho la data 31/05/05 ecc devo creare una querry che mi estrae i dati
per mese(che seleziono) e anno corrente.
ciao grazie 1000


author: ciroteo

text:
"Fux" <
fux...@virgilio.it
> ha scritto nel messaggio
news:429c2c51$1...@x-privat.org...

metti come criterio una funzione di raggruppamento per mese: vedi guida:
month, date, day ecc...


author: MA

text:

Creati un campo calcolato con Mese:Month(Tuadata) dove ovviamente tuadata è
il nome del tuo campo
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: errore conteggio record su applica filtro a maschera

text:
con un menu a tendina applico un filtro alla mia maschera
in fondo riporto il numero dei record trovati dopo aver applicato il filtro
ma se record con quel valore non sono presenti non conteggia correttamente i
record, resta l'ultimo valore conteggiato.
qualcuno sa dirmi perchč?


text:
"Stero72" <
ste...@email.it
> ha scritto nel messaggio
news:457e815e$0$19101$4faf...@reader4.news.tin.it...

come fai a riportare il valore?
potrebbe essere un problema del requery del campo.
prova inserendo nell'evento dopo aggiornamento della combo un
me.nomecampoconteggiorecord.requery


text:
"ciroteo" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
news:457e8928$0$19103$4faf...@reader4.news.tin.it...

ho risolto grazie, mettevo il riconteggio in un punto sbagliato nel codice.


title: SOS

author: postazione 4

text: come si crea una sottomaschera


title: Query con parametri variabili

author: Lucio

text:
Salve a tutto il NG,
spero per voi che abbiate passato buone ferie.
Il mio problema è questo:
ho una query nella quale vi sono i seguenti campi: [DataIntervento],
[CodiceOperatore], [TipoIntervento];
il campo [TipoIntervento] può contenere 2 valori "Servizio" o
"Trattamento".
La query in questione serve a visualizzare lo storico sui clienti però mi
deve visualizzare solo i servizi dei precedenti 14 giorni ed i trattamenti
dei precedenti 4 mesi.
Come faccio a dare questo parametro nel campo data affinchè vari la
visualizzazione in tal modo?
Purtroppo non posso utilizzare 2 query differenti.
Grazie anticipatamente.
Lucio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Query con parametri variabili

author: Roberto dalla campagna

text:
"Lucio" <nap...@NOSPAMtin.it> ha scritto nel messaggio
news:df9gkm$e81$1...@news.newsland.it...
> Salve a tutto il NG,
> spero per voi che abbiate passato buone ferie.
> Il mio problema è questo:
> ho una query nella quale vi sono i seguenti campi: [DataIntervento],
> [CodiceOperatore], [TipoIntervento];
> il campo [TipoIntervento] può contenere 2 valori "Servizio" o
> "Trattamento".
> La query in questione serve a visualizzare lo storico sui clienti però mi
> deve visualizzare solo i servizi dei precedenti 14 giorni ed i trattamenti
> dei precedenti 4 mesi.
> Come faccio a dare questo parametro nel campo data affinchè vari la
> visualizzazione in tal modo?
> Purtroppo non posso utilizzare 2 query differenti.
Alla query aggiungi il seguente campo calcolato non visibile:
IIf([TipoIntervento]="Servizio" And
[DataIntervento]>=(Date()-14);1;IIf([TipoIntervento]="Trattamento" And
[DataIntervento]>=DateSerial(Year(Date());Month(Date())-4;Day(Date()));1;0))
e nei suoi criteri scrivi 1.
> Grazie anticipatamente.
> Lucio
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Aggiornamento sottomaschera

author: carla

text:
Salve,
Ho una  maschera MASK1 collegata ad una sottomaschera SOTTOM tramite il
campo codiceutente
In MASK1 ho inserito il pulsante cerca.
Quando faccio la ricerca di un dato in MASK1 tramite il pulsante cerca, non
mi aggiorna il collegamento ai dati della SOTTOM ma mi continua a far vedere
i dati dell'utente precedente.
Mi sono accorta che questo probabilmente lo fa perchè la sottomaschera è
visualizzata come "maschere continue". Infatti se metto la visualizzazione
in "foglio dati" sembrebbe funzionare.
Avevo messo la visualizzazione "maschere continue" perchè ho avuto la
necessità di inserire nella SOTTOM 2 pulsanti che in visualizzazione "foglio
dati" non mi permetteva di inserire.
Come posso fare per farsì che mi aggiorni il collegamento tenendo nella
SOTTOM i pulsanti necesari?
Grazie e .....auguri a tutti
Carla


title: Aggiornamento sottomaschera

text:

Un minimo di pazienza. Hai gia' postato lo stesso circa mezz'ora prima
Non mi risulta che le maschere continue non vengono sincronizzate,
probabilmente commetti qualche errore.
Posso sapere per quale motivo hai necessita' dei due bottoni sulla
sottomaschera?
--
a.cara


title: Aggiornamento sottomaschera

text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:JzAtf.11105$av6....@tornado.fastwebnet.it...

Scusa se ho scritto due volte ma a me non appariva il mio messaggio.
I due pulsanti inseriti nella sottomaschera mi permettono, dopo
l'inserimento di password, di fare il collegamento ipertestuale e di
cancellarlo.
ciao e grazie
Carla


title: Controllo Immagine

text:
Buongiorno,

Volevo risolvere questo problema (se ci riesco)

Ho un controllo Immagine (Immagine10) che mi permette di visualizzare
l'immagine del prodotto corrente sulla form, da una cartella  \Immagini\  .

su corrente della maschera ho:

Private Sub Form_Current()
On Error GoTo 10

mydir = CurrentProject.PATH
mypath = mydir & "\Immagini\" & Me.CodiceProdotto.Value & ".jpg"
Me.Immagine10.Picture = mypath
GoTo 20

10 'errore per foto non trovata
mydir = CurrentProject.PATH
mypath = mydir & "\Immagini\" & "no.jpg"
Me.Immagine10.Picture = mypath

20 'tutto ok

End Sub

ora il problema è che ho dei  CodiceProdotto 30 40 anche 50  che hanno sempre la stessa immagine
per non inserire sempre la stessa immagine nella cartella " \Immagini\" quindi appesantirla inutilmente
come si può ovviare ?

esempio ( sono delle corone trasmissione con dentature diverse )
Codice Prodotto
1022 32
1022 33
1022 34
1022 35
dove 1022 è sostanzialmente il codice del prodotto e 32-33-34-35 sono il numero dei denti
ma l'immagine è sempre la stessa .

puoi vedere questa pagina :
https://we.tl/t-A3VIgYSYV9

Giuseppe


title: Controllo Immagine

author: BFS

text:

io per una ferramenta ho risolto cosi, magari può essere uno spunto:

Ho un archivio articoli con relativa jpeg che come nel tuo caso hanno
nome=a codice articolo

ho un archivio categorie al quale associo una foto che vale per tutta la
categoria.

nel programma se presente una foto a livello di singolo articolo la
visualizzo, se non presente vedo se è disponibile quella a livello di
categoria, se manca pure quella non mostro nulla

nel tuo caso quindi abbineresti alla categoria "corona" una jpeg
generica. Che verrà mostrata solo nel caso non sia presente la foto
specifica del articolo

ciao
BFS


title: Controllo Immagine

text:
>
> ho un archivio categorie al quale associo una foto che vale per tutta la
> categoria.
>
> nel programma se presente una foto a livello di singolo articolo la
> visualizzo, se non presente vedo se è disponibile quella a livello di
> categoria, se manca pure quella non mostro nulla
>
> nel tuo caso quindi abbineresti alla categoria "corona" una jpeg
> generica. Che verrà mostrata solo nel caso non sia presente la foto
> specifica del articolo
>
>
> ciao
> BFS

Si avevo fatto una CategoriaImmagine
ma come procedo per stabilire quale immagine vedere , dopotutto
l'istruzione per vedere l'immagine è:

su corrente della maschera

Private Sub Form_Current()
On Error GoTo 10

mydir = CurrentProject.PATH
mypath = mydir & "\Immagini\" & Me.CodiceProdotto.Value & ".jpg"
Me.Immagine10.Picture = mypath
GoTo 20

10 'errore per foto non trovata
mydir = CurrentProject.PATH
mypath = mydir & "\Immagini\" & "no.jpg"
Me.Immagine10.Picture = mypath

20 'tutto ok

Giuseppe


title: Controllo Immagine

text:

supponendo che la jpg della categoria abbia come nome file idcategoria.jpg

con un if then else nidificato

If l'immagine del articolo esiste then
	mydir = CurrentProject.PATH
  	mypath = mydir & "\Immagini\" & Me.CodiceProdotto.Value & ".jpg"
  	Me.Immagine10.Picture = mypath

else
	'se entri qui vuol dire che l'articolo non ha una foto
	if la categoria ha una immagine  then
		 mydir = CurrentProject.PATH
		 mypath = mydir & "\Immagini\" & me.idcategoria   & ".jpg"
  		 Me.Immagine10.Picture = mypath

	else
		 mydir = CurrentProject.PATH
		 mypath = mydir & "\Immagini\" & "no.jpg"
  		 Me.Immagine10.Picture = mypath

	end if

end if

per testare se un file esiste usi la funzione Dir

https://support.office.com/it-it/article/funzione-dir-1a1a4275-f92f-4ae4-8b87-41e4513bba2e

esempio

If Len(Dir("c:\pippo.mdb")) = 0 Then
    Msgbox "esiste"
Else
    Msgbox "non esiste"
End If

BFS


title: Controllo Immagine

text:
 scusami ma non mi è chiaro questo, cosa intendi

> supponendo che la jpg della categoria abbia come nome file idcategoria.jpg

e questo

> If l'immagine del articolo esiste then

> else
> 	'se entri qui vuol dire che l'articolo non ha una foto
> 	if la categoria ha una immagine  then
> 		 mydir = CurrentProject.PATH
> 		 mypath = mydir & "\Immagini\" & me.idcategoria   & ".jpg"
>   		 Me.Immagine10.Picture = mypath
>

Scusami ma io ho pochissime conoscenze del VBA

Ciao  Giuseppe


title: Controllo Immagine

text:

intendo che se hai una tabella categorie con id e nome tipo

1	catene ducati
2	pignoni ducati
3	corone ducati

puoi mettere nella tua cartella  una immagine generica per tutti i
pignoni e la chiami 2.jpg
quella delle catene 1.jpg
quella delle corone 3.jpg

quando richiami l'articolo se non è presente il file immagine
dell'articolo, vai a caricarti quello della sua categoria. se manca pure
quello carichi il tuo no.jpg

per testare se il file immagine esiste nella cartella usi la funzione Dir

mydir = CurrentProject.PATH
If Len(Dir(mydir & "\Immagini\" & Me.CodiceProdotto.Value & ".jpg" )) >0
then
	    Me.Immagine10.Picture = mydir & "\Immagini\" &
Me.CodiceProdotto.Value & ".jpg"
     else
     	If Len(Dir(mydir & "\Immagini\" & Me.idcategoria.Value & ".jpg" ))
 >0  then
                 Me.Immagine10.Picture = mydir & "\Immagini\" &
Me.idcategoria.Value & ".jpg"
             else
                 Me.Immagine10.Picture = mydir & "\Immagini\" & "no.jpg"
         endif

end if

se non si capisce l'indentazione vedi qui

https://ibb.co/6Z5WSzY

BFS
ciao


title: Controllo Immagine

text:
>
> BFS
> ciao

Perfetto  funziona benissimo come previsto

Grazie mille Giuseppe


title: problema nell'impostazione di iif

text:
buona sera a tutti

ho questa espressione
che mi da "-1" se la casella clienti della Tabella1 č flaggata e con
categoria = "Alta"

Espr2: IIf((Tabella1.Clienti=-1 And Tabella1.Categoria="Alta");-1;0)

Vorrei modificarla invertendo i valori di iif da ;-1;0) a ;0;-1) , ma con lo
stesso risultato.

Ho fatto in questo modo:

Espr2: IIf((Tabella1.Clienti=0 And Tabella1.Categoria="Alta");0;-1)

ma stranamente non mi da il risultato corretto,
perchč mette -1 anche nelle altre categorie <> da "Alta"

grazie per l'aiuto

Gigi


title: problema nell'impostazione di iif

text:
> Ho fatto in questo modo:
>
> Espr2: IIf((Tabella1.Clienti=0 And Tabella1.Categoria="Alta");0;-1)
>
> ma stranamente non mi da il risultato corretto,
> perchè mette -1 anche nelle altre categorie <> da "Alta"
>
> grazie per l'aiuto
>
> Gigi
funziona in questo modo
Espr2:  IIf(Not((Tabella1.Clienti=-1) And Tabella1.Categoria="Alta");-1;0)

Ma non dovrebbe funzionare anche cosi?
Espr2: IIf((Tabella1.Clienti=0 And Tabella1.Categoria="Alta");0;-1)

grazie per un'eventuale risposta


title: problema nell'impostazione di iif

text:
Il 02/10/2011 21.10, Gigi ha scritto:
> buona sera a tutti
>
> ho questa espressione
> che mi da "-1" se la casella clienti della Tabella1 è flaggata e con
> categoria = "Alta"
>
> Espr2: IIf((Tabella1.Clienti=-1 And Tabella1.Categoria="Alta");-1;0)
>
>
> Vorrei modificarla invertendo i valori di iif da ;-1;0) a ;0;-1) , ma con lo
> stesso risultato.
>
> Ho fatto in questo modo:
>
> Espr2: IIf((Tabella1.Clienti=0 And Tabella1.Categoria="Alta");0;-1)
>
> ma stranamente non mi da il risultato corretto,
> perchè mette -1 anche nelle altre categorie<>  da "Alta"
Quindi ti sta dando il risultato corretto.
Se Client=0 *e* Categoria="Alta" allora metti 0 altrimenti metti -1
i.e.=-1 Per tutti valori diversi da 0 (per Clienti) *o* per tutti i
valori Diversi da "Alta" per categoria
Se vuoi il contrario, come gia' *tu* hai scritto, non e' sufficiente
IIf((Tabella1.Clienti=-1 And Tabella1.Categoria="Alta");0;-1)    ?

>
> grazie per l'aiuto
>
> Gigi
>
>

--

ac (x=y-1)


title: problema nell'impostazione di iif

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:9V2iq.80178$GZ3....@tornado.fastwebnet.it...

Grazie


title: problemi con campi memo in query di query

author: Ing. Fabio Dalla Villa

text:
Ho problemi con i campi memo:
nella tabella1 principale vedo il contenuto corretto;
nella query1, basata sulla tabella1, che richiama il campo memo, vedo il
contenuto corretto;
nella query2, basata sulla query1 (e altre 2 query), vedo solo un
quadratino.
Il codice ascii del quadratino, risulta essere corrispondente al primo
carattere contenuto nel campo memo di origine.
Uso XP e Access2k2.
Qualche idea?
Grazie.
--
Fabio Dalla Villa
Biella


author: Sergio MAZZA

text:
"Ing. Fabio Dalla Villa" <
cor...@tiscali.it
> ha scritto nel messaggio
news:bg7q0g$rmr$1...@usenet.itgate.net...

Trasforma la prima query di selezione in query di creazione tabella e la
seconda query la basi su quest'ultima (la tabella creata)
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bg8002$7gb$1...@canarie.caspur.it...

Grazie. Funziona.
Se posso ancora approfittare...
ho usato il docmd.Openquery per eseguire la query prima di aprire il mio
report.
Come faccio ad evitare le 3 domande che mi pone la query di creazione
tabella, in modo da rispondere "Sì" in automatico?
Grazie.


text:
"Ing. Fabio Dalla Villa" <
cor...@tiscali.it
> ha scritto nel messaggio
news:bg82np$uif$1...@usenet.itgate.net...
> Grazie. Funziona.
> Se posso ancora approfittare...
> ho usato il docmd.Openquery per eseguire la query prima di aprire il mio
> report.
> Come faccio ad evitare le 3 domande che mi pone la query di creazione
> tabella, in modo da rispondere "Sě" in automatico?
> Grazie.
Prima dell'OpenQuery:
DoCmd.SetWarnigs False
'openquery
DoCmd.SetWarnigs True
Fai attenzione che se la routine va in errore e non gestisci questo evento
ti rimane impostato il SetWarnings a False e non ti chiede piů il
salvataggio di qualsiasi modifica.
Quindi:
On Error Goto GestErrore
DoCmd.SetWarnigs False
'openquery
DoCmd.SetWarnigs True
Exit Sub
GestErrore:
    DoCmd.SetWarnigs True
    msgbox err.number & " " & err.description
Ciao.
--
Sergio MAZZA


title: trasferire in excel da access

author: shari

text:
Ciao
so che questo argomento forse è stato affrontato ma io no riesco a
trasferire dati da access in un foglio( lostesso foglio di  file di Excel) e
se faccio con DoCmd. trasferSpreadsheet ...acess mi salva i dati su quelli
precedenti mentre a me intressa  accodare con altri dati in quel foglioExcel
.Cosa devo fare? vi ringrazio
-Shari


title: Controllo activex sparito

author: bio

text:
Ho reinstallato il sistema perchè era diventato troppo instabile.
Ho risistemato tutte le applicazioni Acces.....ma ho trovato una sorpresa.
In una maschera di inserimento date, dove utilizzavo il DateTimePicker non
c'è più il controllo.
Ho controllato che fosse installato il mscomct2.ocx e mi è sembrato tutto a
posto.
Che debbo fa!?
Grazie
Biotto


title: problema: evento su report

text:
Problema: ho necessità di visualizzare il valore di una casella di testo
(che si trova in intestazione report) in anteprima di stampa, tale valore
però non deve essere stampato (serve solamente all'utente per poter
decidere quali pagine stampare).
Soluzione provata: su Pagina ho scritto
del codice che imposti il valore visibile della casella a falso
Il tutto
funziona, (ovvero il valore viene visualizzato in anteprima, ma non compare
nella stampa) ma solo per la prima pagina da stampare, scorrendo le altre
pagine la casella in intestazione non viene più visualizzata.
P.S. ad ogni
pagina corrisponde un record ed uno dei possibili 4 valori della casella
che é in intestazione
Grazie a quanti possono fornire dritte utili per la
risoluzione del problema
--------------------------------
Inviato via
http://usenet.iol.it


title: problema: evento su report

author: massimiliano

text:
>Soluzione provata: su Pagina ho scritto
>del codice che imposti il valore
visibile della casella a falso
>Il tutto
>funziona, (ovvero il valore
viene visualizzato in anteprima, ma non
>compare
>nella stampa) ma solo
per la prima pagina da stampare, scorrendo le altre
>pagine la casella in
intestazione non viene più visualizzata.
>P.S. ad ogni
>pagina
corrisponde un record ed uno dei possibili 4 valori della casella
>che é
in intestazione
scusa ma se ho capito bene questo valore dovrebbe stare
su intestazione pagina non report
altrimenti cmq te lo darà solo la
prima volta
cioa massimiliano



title: problema: evento su report

author: Gigi

text:
Il 29 Apr 2002, 19:00,
massimilia...@kksrl.com
 (massimiliano) ha
scritto:


hai ragione la casella
di testo va in intestazione pagina, ma comunque non funziona ossia la vedo
e non la stampo solo dalla proma pagina, dalle altre non la vedo proprio



title: Replace in una stringa SQL

text:
Un filtro SQL combinato mi esegue una ricerca basandosi su una serie
di caselle.
Nell'esempio sottostante il campo CodiceV si basa su una stringa
inserita nel campo sort3 (appunto l'elenco dei codici articolo)
Case 3
           strSQL = strSQL & " CodiceV like ""*" & sort3 & "*"""
Purtroppo sono stati inseriti degli spazi nel campo CodiceV in alcuni
articoli e io vorrei eliminarli per consentire comunque una ricerca
completa.
Quindi, se l'utente digita 10M M, vorrei venissero trovati anche gli
articoli 10MM.
Ma la funzione replace non viene accettata nella stringa SQL e anche
eseguendo filtri su un campo che utilizza replace in una query creata
a titolo di prova, non mi consente di inserire un filtro.
Quindi credo ci sia proprio un problema personale nell'interpretazione
di "Replace".
VI invio la stringa "errata", sperando che possiate modificarla per
renderla funzionante.
Case 3
           strSQL = strSQL & " Replace(CodiceV) like ""*" & sort3 &
"*"""
Grazie anticipatamente.


title: Replace in una stringa SQL

author: Cinzia

text:
<
ennioma...@puntocart.com
> ha scritto nel messaggio
news:1e4bb6d2-6a36-4778...@b1g2000hsg.googlegroups.com...

Ciao ennioMarzocchi,
la sintassi corretta di Replace è Replace(stringaInCuiCercare,
stringaDaCercare, stringaDaSostituire) quindi   dovrebbe essere
strSQL = strSQL & " (Replace([CodiceV],"" "","""") like  ""*" & sort3
&  "*"")"
a  meno di errori nel bilanciamento delle virgoleete e delle parentesi
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.live.spaces.com
----------------------------------------


title: Replace in una stringa SQL

author: Marco Pizzamiglio

text:
ennioma...@puntocart.com
 ha scritto:



Trovi la risposta sul sito di Karl
www.donkarl.com/it
 non mi ricordo a che
numero, cerca un po' tu.
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Replace in una stringa SQL

text:
On 14 Mag, 10:31,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:
>
enniomarzoc...@puntocart.com
 ha scritto:
>
>
>
>
>
> > Un filtro SQL combinato mi esegue una ricerca basandosi su una serie
> > di caselle.
> > Nell'esempio sottostante il campo CodiceV si basa su una stringa
> > inserita nel campo sort3 (appunto l'elenco dei codici articolo)
> > Case 3
> >            strSQL = strSQL & " CodiceV like ""*" & sort3 & "*"""
> > Purtroppo sono stati inseriti degli spazi nel campo CodiceV in alcuni
> > articoli e io vorrei eliminarli per consentire comunque una ricerca
> > completa.
> > Quindi, se l'utente digita 10M M, vorrei venissero trovati anche gli
> > articoli 10MM.
> > Ma la funzione replace non viene accettata nella stringa SQL e anche
> > eseguendo filtri su un campo che utilizza replace in una query creata
> > a titolo di prova, non mi consente di inserire un filtro.
> > Quindi credo ci sia proprio un problema personale nell'interpretazione
> > di "Replace".
> > VI invio la stringa "errata", sperando che possiate modificarla per
> > renderla funzionante.
> > Case 3
> >            strSQL = strSQL & " Replace(CodiceV) like ""*" & sort3 &
> > "*"""
> > Grazie anticipatamente.
>
> Trovi la risposta sul sito di
Karlwww.donkarl.com/itnon
 mi ricordo a che
> numero, cerca un po' tu.
> Ciao.
> -Marco-
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad ab...@newsland.it- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
quando faccio così mi darei delle martellate in testa.
La sintassi corretta era così come l'hai scritta tu Cinzia, al posto
delle doppie virgolette usavo le singole (e dire che avevo controllato
la mail due volte).
Ma non va.
La stringa SQL si basa su una Query.
Se io creo un campo nella query e scrivo
strCodiceV:Replace([CodiceV];" ";"")
sostituendo alle virgole il punto e virgola tutto è ok, ovvero
visualizzo i CodiciV senza spazi.
Ma se mi azzardo a scrivere nei criteri del campo strCodiceV la
dicitura 10 M , non mi consente di filtrare il dato.
Ecco, credo che il problema risieda nell'impossibilità di effettuare
un filtro in un campo che è basato su "Replace" sia che si tratti di
SQL che di una query salvata.
Sbaglio?


title: Replace in una stringa SQL

author: Roberto da Parma

text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:g0e81q$r1p$1...@news.newsland.it...

Credo che se usi VBA la stringa non č priprio scritta correttamente
Io userei la funzione Trim ...
strSQL = strSQL & " " & Trim(CodiceV) & " like ''*'' " & sort3 & "''*''"
cosě dovrebbe funzionare...
Ma se Trim(CodiceV) deve risultare testo basta che sposti le virgolette...
Ciao
--
Roberto da Parma


title: Replace in una stringa SQL

text:
On 14 Mag, 12:14, "Roberto da Parma" <
arisib...@libero.it
> wrote:
> "Marco Pizzamiglio" <
marco.pizzamig...@gmail.com
> ha scritto nel messaggionews:g0e81q$r1p$1...@news.newsland.it...
>
>
>
>
>
> >
enniomarzoc...@puntocart.com
 ha scritto:
>
> >> Un filtro SQL combinato mi esegue una ricerca basandosi su una serie
> >> di caselle.
> >> Nell'esempio sottostante il campo CodiceV si basa su una stringa
> >> inserita nel campo sort3 (appunto l'elenco dei codici articolo)
>
> >> Case 3
> >>            strSQL = strSQL & " CodiceV like ""*" & sort3 & "*"""
>
> >> Purtroppo sono stati inseriti degli spazi nel campo CodiceV in alcuni
> >> articoli e io vorrei eliminarli per consentire comunque una ricerca
> >> completa.
> >> Quindi, se l'utente digita 10M M, vorrei venissero trovati anche gli
> >> articoli 10MM.
> >> Ma la funzione replace non viene accettata nella stringa SQL e anche
> >> eseguendo filtri su un campo che utilizza replace in una query creata
> >> a titolo di prova, non mi consente di inserire un filtro.
> >> Quindi credo ci sia proprio un problema personale nell'interpretazione
> >> di "Replace".
> >> VI invio la stringa "errata", sperando che possiate modificarla per
> >> renderla funzionante.
> >> Case 3
> >>            strSQL = strSQL & " Replace(CodiceV) like ""*" & sort3 &
> >> "*"""
> >> Grazie anticipatamente.
>
> > Trovi la risposta sul sito di
Karlwww.donkarl.com/itnon
 mi ricordo a che
> > numero, cerca un po' tu.
> > Ciao.
> > -Marco-
>
> > --
>
> > questo articolo e` stato inviato via web dal servizio gratuito
> >
http://www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
>
> Credo che se usi VBA la stringa non è priprio scritta correttamente
> Io userei la funzione Trim ...
>
> strSQL = strSQL & " " & Trim(CodiceV) & " like ''*'' " & sort3 & "''*''"
>
> così dovrebbe funzionare...
>
> Ma se Trim(CodiceV) deve risultare testo basta che sposti le virgolette...
>
> Ciao
>
> --
> Roberto da Parma- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
No, così non va.
Sia perchè trim lavora sugli spazi esterni, mentre il mio problema
sono gli spazi dentro la stringa, sia perchè CodiceV in questo caso
punta alla maschera e non al campo della query.
Ho una proposta:
Create un campo in una query già esistente utilizzando replace e
provate a fare un filtro nel criterio ordinamento di quel campo.
Se riuscite a fare un filtro sul campo mi fate un bel copia incolla
della stringa SQL della query e poi ci penso io ad adattarla...
Ancora grazie!
Per Marco: al momento non ho trovato l'esatta corrispondenza di ciò
che cerco.
Ciao.


title: Replace in una stringa SQL

text:
<
ennioma...@puntocart.com
> ha scritto nel messaggio
news:3e2426a2-564f-4b78...@x35g2000hsb.googlegroups.com...
On 14 Mag, 12:14, "Roberto da Parma" <
arisib...@libero.it
> wrote:
> "Marco Pizzamiglio" <
marco.pizzamig...@gmail.com
> ha scritto nel
> messaggionews:g0e81q$r1p$1...@news.newsland.it...
>Create un campo in una query già esistente utilizzando replace e
>provate a fare un filtro nel criterio ordinamento di quel campo.
>Se riuscite a fare un filtro sul campo mi fate un bel copia incolla
>della stringa SQL della query e poi ci penso io ad adattarla...
 >>>>>>>>>>>>>>>>>>
Ciao Ennio,
questa a me funziona benissimo
SELECT CLIENTI.*, Replace([Societa]," ","") AS Espr1
FROM CLIENTI
WHERE (((Replace([Societa]," ","")) Like "*" & [cosa?] & "*"));



title: Replace in una stringa SQL

text:
Cinzia ha scritto:
> <
ennioma...@puntocart.com
> ha scritto nel messaggio
> news:3e2426a2-564f-4b78...@x35g2000hsb.googlegroups.com...
> On 14 Mag, 12:14, "Roberto da Parma" <
arisib...@libero.it
> wrote:
> > "Marco Pizzamiglio" <
marco.pizzamig...@gmail.com
> ha scritto nel
> > messaggionews:g0e81q$r1p$1...@news.newsland.it...
> >Create un campo in una query già esistente utilizzando replace e
> >provate a fare un filtro nel criterio ordinamento di quel campo.
> >Se riuscite a fare un filtro sul campo mi fate un bel copia incolla
> >della stringa SQL della query e poi ci penso io ad adattarla...
>  >>>>>>>>>>>>>>>>>>
> Ciao Ennio,
> questa a me funziona benissimo
> SELECT CLIENTI.*, Replace([Societa]," ","") AS Espr1
> FROM CLIENTI
> WHERE (((Replace([Societa]," ","")) Like "*" & [cosa?] & "*"));
Che versioni di Access hai? Sul 2000 non va, è il solito problema delle
nuove funzioni introdotte dopo A97 che non si possono usare nelle query,
bisogna richiamarle attraverso Public function appositamente create in un
modulo. Si vede che da una certa versione in poi lo hanno corretto.
Ma questo non c'entra col problema originale dato che lui usa il Replace
in VBA, la stringa SQL viene composta con il valore a cui sono già stati
tolti gli spazi, il problema stava solo nella sintassi.
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito



title: Replace in una stringa SQL

text:
On 14 Mag, 13:41,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:
> Cinzia ha scritto:
>
> > <
enniomarzoc...@puntocart.com
> ha scritto nel messaggio

> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Io vi ringrazio e... non so cosa dirvi.
Nei clienti ho creato questa query
SELECT CLIENTI.*, Replace([DescrizioneCliente]," ","") AS Espr1
FROM CLIENTI
WHERE (((Replace([DescrizioneCliente]," ","")) Like "*" & [cosa?] &
"*"));
così come indicato da Cinzia (e così come è giusto che sia).
Ma se creo questa query:
SELECT VARIANTI.*, Replace([CODICEV]," ","") AS Espr1
FROM VARIANTI
WHERE (((Replace([CODICEV]," ","")) Like "*" & [cosa?] & "*"));
non va più.
CodiceV è uno stramaledettissimo campo testo, così come
DescrizioneCliente.
Ho il dubbio che ci sia qualcosa alla tabella Varianti di "difettoso".
Farò ulteriori prove.
P.S.: Uso Office 2003 e database Access versione 2003.
Grazie per il supporto.
Ciao


title: Replace in una stringa SQL

text:

> > questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnalagli
 abusi ad
ab...@newsland.it
>
> Io vi ringrazio e... non so cosa dirvi.
>
> Nei clienti ho creato questa query
> SELECT CLIENTI.*, Replace([DescrizioneCliente]," ","") AS Espr1
> FROM CLIENTI
> WHERE (((Replace([DescrizioneCliente]," ","")) Like "*" & [cosa?] &
> "*"));
>
> così come indicato da Cinzia (e così come è giusto che sia).
>
> Ma se creo questa query:
>
> SELECT VARIANTI.*, Replace([CODICEV]," ","") AS Espr1
> FROM VARIANTI
> WHERE (((Replace([CODICEV]," ","")) Like "*" & [cosa?] & "*"));
>
> non va più.
> CodiceV è uno stramaledettissimo campo testo, così come
> DescrizioneCliente.
> Ho il dubbio che ci sia qualcosa alla tabella Varianti di "difettoso".
> Farò ulteriori prove.
> P.S.: Uso Office 2003 e database Access versione 2003.
> Grazie per il supporto.
> Ciao- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
AGGIORNAMENTO:
Ho sostituito alla [descrizioneCliente] il nome [indirizzo]
nell'esempio di cui sopra (quello relativo ai clienti) e mi dà errore
(tipi non corrisondenti nell'espressione critierio) e mi inserisce
dopo qualche secondo il contenuto nome? su tutte le celle. Stessa cosa
con Comune, Provincia, etc.
Eppure sono tutti campi testo è sempre un campo testo...
Torno a scrivere [descrizionecliente] e tutto torna a funzionare.
Vi invio la stringa, chissà mai non abbia fatto una baggianata:
SELECT CLIENTI.*, Replace([indirizzo]," ","") AS Espr1
FROM CLIENTI
WHERE (((Replace([indirizzo]," ","")) Like "*" & [cosa?] & "*"));


title: Replace in una stringa SQL

text:
<
ennioma...@puntocart.com
> ha scritto nel messaggio
news:9c483cf4-65a4-41f0...@25g2000hsx.googlegroups.com...


Ciao Ennio,
l'errore è probabilmente dovuto al fatto che il campo Indirizzo non è
sempre pieno, al contrario del campo DescrizioneCliente, per cui
cambierei così la select:
SELECT CLIENTI.*, Replace(nz([indirizzo], "")," ","") AS Espr1
FROM CLIENTI
WHERE (((Replace(nz([indirizzo], "")," ","")) Like "*" & [cosa?] &
"*"));
--



title: Replace in una stringa SQL

text:
On 14 Mag, 18:19, "Cinzia" <
cinziapagani-no-spam_ple...@tiscali.it
>
wrote:
> <
enniomarzoc...@puntocart.com
> ha scritto nel messaggionews:9c483cf4-65a4-41f0...@25g2000hsx.googlegroups.com...

Sì, grazie Cinzia.
Una volta modificata nella query tutto ha cominciato a "girare".
Scrivo la stringa (una parte) relativa all'SQL in VBA perchè ci sono
due particolari da mettere in evidenza:
strSQL = strSQL & " CodiceV like ""*" & sort3 & "*"""
strSQL = strSQL & " or Replace(nz(CodiceV,''),"" "","""") like ""*" &
sort3 & "*"""
La prima riga cerca l'articolo com'è scritto esattamente e la seconda
invece li cerca utilizzando replace (se ometto la prima riga non mi
restituisce tutte le righe che voglio.
Seconda precisazione: Se invece di scrivere nz(CodiceV,'') scrivo
nz(CodiceV,"") non va.
Uso le virgolette ovunque, ma all'interno di NZ devo mettere gli
apici.
Forse ci sono alternative, ma, insomma, se qualcuno si trova nei guai
per questo particolare, fatevi il copia incolla di questa stringa così
siete a posto.
Oppure inseritene una più corretta in sostituzione di questa.
Grazie a tutti per la disponibilità.


title: Replace in una stringa SQL

text:

> Grazie a tutti per la disponibilità.- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
CORREZIONE:
strSQL = strSQL & " Replace(nz(CodiceV,''),"" "","""") like ""*" &
Replace(Nz(sort3, ""), " ", "") & "*"""
Precisazione in merito all'nz: in codiceV gli apici, in sort3 le
virgolette.
(viceversa mi restituisce un errore).
Ciao.


title: Query per aggionrare le tabelle da file esterno [?]

author: Edison

text:
Ciao,
Ho due file access relativi ad uno stesso db, diciamo uno light solo per
l'inserimento dati le cui dimensioni permettono di essere messo su floppy, e
a casa su HD un'altro com molti piů grafici report ecc. di 2Mb
I dati vengono inseriti su quello ligth, ho poi l'esigenza di passare i dati
su quell'altro file. Io lo faccio cosě: cancello le tabelle esistenti e
faccio importa tabella, e tutto va bene, ma avrei bisogno di automatizzare
la funzione perchč il mio cliente non č capace.
Come posso fare?


author: Antonio Biso

text:
Edison <
p...@tin.it
> wrote in message 9ikgif$fi8$1...@usenet.inwind.it...
> Ciao,
> Ho due file access relativi ad uno stesso db, diciamo uno light solo per
> l'inserimento dati le cui dimensioni permettono di essere messo su floppy,
e
> a casa su HD un'altro com molti più grafici report ecc. di 2Mb
> I dati vengono inseriti su quello ligth, ho poi l'esigenza di passare i
dati
> su quell'altro file. Io lo faccio così: cancello le tabelle esistenti e
> faccio importa tabella, e tutto va bene, ma avrei bisogno di automatizzare
> la funzione perchè il mio cliente non è capace.
> Come posso fare?
Ti basta mettere nel db grosso le tabelle come tabelle allegate, puntando ad
un database del tipo di quello light. Poi basta sostituire il database light
del giorno prima con quello del giorno dopo.
Antonio


author: Nicola Feretti

text:
Oppure ancora meglio mettere le sole tabelle con i dati sul dischetto e
lasciare sia al lavoro (o dal cliente) che a casa un database anche più
elaborato con le tabelle collegate. In questo modo trasporti di volta in
volta solo i dati (anche per posta elettronica, visto che i dischetti hanno
vita breve!)
Nick


author: Liones

text:
Edison <
p...@tin.it
> wrote in message 9ikgif$fi8$1...@usenet.inwind.it...
> Ciao,
> Ho due file access relativi ad uno stesso db, diciamo uno light solo per
> l'inserimento dati le cui dimensioni permettono di essere messo su floppy,
e
> a casa su HD un'altro com molti più grafici report ecc. di 2Mb
> I dati vengono inseriti su quello ligth, ho poi l'esigenza di passare i
dati
> su quell'altro file. Io lo faccio così: cancello le tabelle esistenti e
> faccio importa tabella, e tutto va bene, ma avrei bisogno di automatizzare
> la funzione perchè il mio cliente non è capace.
> Come posso fare?
>
puoi fare una query di eliminazione record e una di accodamento e le fai
partire con un pulsante


title: Perche' mancato aggiornamento campi calcolati su subform ?

author: RobertoA

text:
Dispongo della classica form continua per documenti tipo ddt,
preventivi, e simili
Ogni riga vengono visualizzati alcuni dati della testata documento,
numero, data, anagrafica, ecc..

Nella sezione Intestazione Form, c'e' una subform che chiamero'
frmDatiIva e mi mostra tante righe ognuna per un'aliquota iva diversa, e
quindi la riga del 22% la riga del 10% la riga dell'esente art. XYZ, ecc
Per ogni riga c'e' il campo sul db di nome:
Iva_Aliquota		(nome textbox txtAliquotaPerCodIva)
Iva_Imponibile		(nome textbox txtImponibilePerCodIva)
Iva_Imposta		(nome textbox txtImpostaPerCodIva)
Iva_Esente		(nome textbox txtEsentePerCodIva)
...

Dentro la subform DatiIva, nella sezione Pie'DiPagina, ci sono delle
textbox il cui RecordSource e' del tipo
=Somma(Iva_Imponibile)   (nome textbox txtTotaleImponibilePerCodIva)
=Somma(Iva_Imposta)	(nome textbox txtTotaleImpostaPerCodIva)
=Somma(Iva_Esente)	(nome textbox txtTotaleEsentePerCodIva)
...

Poi nella form principale, ci sono delle textbox che hanno come
RecordSource le informazioni prese dalle textbox sopra e quindi
=[frmDatiIva].[Form]![txtTotaleImponibilePerCodIva]
=[frmDatiIva].[Form]![txtTotaleImpostaPerCodIva]
=[frmDatiIva].[Form]![txtTotaleEsentePerCodIva]

Quindi sostanzialmente esistono solo le righe del corpo del documento, e
tutti i dati relativi agli imponibili, iva, esenti, ecc  se li calcola
al volo di volta in volta

Bene, tutto funziona correttamente, fino a due giorni fa
Su una delle postazioni di lavoro, che sembra non aggiornare piu'
automaticamente le textbox dei totali dentro la subform frmDatiIva
Le textbox non si aggiornano piu' e quindi tutto il resto che dipende da
loro non si vede piu', tutto bianco
Stesso identico programma, andato fino a pochi giorni fa, e
correttamente funzionante su altre postazioni, non rinfresca piu' le
textbox totali con   =somma(nome_campo)

Stante il fatto che quando cambio di documento, le righe nella subform
frmDatiIva vengono aggiornate correttamente, da cosa potrebbe dipendere
il mancato rinfresco delle  textbox coi totali?


title: tabelle collegate

author: Kappa

text:
Suggerimento:
č meglio collegare le tabelle con un percorso tipo \\computer\dati\bend.mdb
oppure creare un disco virtuale z:  al percorso \\computer\dati\
e linkare a z:\bend.mdb
c'č qualche miglioramento nelle prestazioni?
grazie


title: tabelle collegate

text:
Kappa wrote:
> Suggerimento:
> è meglio collegare le tabelle con un percorso tipo
> \\computer\dati\bend.mdb oppure creare un disco virtuale z:  al
> percorso \\computer\dati\
> e linkare a z:\bend.mdb
> c'è qualche miglioramento nelle prestazioni?
>
> grazie
Mah!
Forse potrebbe esserci un miglioramento dato dal fatto che avendo mappato prima la risorsa hai già tradotto il percorso di rete? Io
l'ho buttata lì...
Ciao.
--
Sergio MAZZA


title: Negare accesso alle tabelle

author: ST

text:
Vorrei fare in modo che le tabelle del mio BE siano accessibili SOLO dal mio
FE tramite le apposite maschere e impedire che si possano
importare/collegare o anche solo copia/incollare in altro modo.
Ho provato con la sicurezza a livello utente ma non so come farglielo fare.
Qualche idea?
Grazie
Silvio


title: Negare accesso alle tabelle

author: Emyr

text:
On Sat, 19 Jan 2002 12:19:12 GMT, "ST" <
ste...@TOGLIMI.plion.it
>
wrote:

prova password e tabelle criptate
Saluti.
Emanuele.


title: Colore delle maschere

author: gg

text:
Salve a tutti.
Ho un piccolo problema con i colori delle maschere, in pratica io vorrei
fare in modo che tutto il contenuto delle maschere, sia dello stesso colore
indipendentemente dalla combinazione utilizzata da Windows. Mi spiego meglio
in una maschera imposto come sfondo il colore ROSSO, nella stessa maschera
ho delle schede, che non riesco a colorale dello stesso colore, perchè
prendono come sfondo quello della combinazione di windows.
Siccome il db dovrà essere utilizzato in rete, quindi ogniuno teoricamente
può scegliere una combinazione diversa, avrei bisogno  di impostare
all'aperture del db un unico colore per tutto.
Spero di essere stato chiaro.
Grazie gianni


title: Colore delle maschere

text:
"gg" <
provach...@libero.it
> ha scritto nel messaggio
news:ZUf1a.96882$YG2.2...@twister1.libero.it...

La struttura a schede non è facilmente modificabile.
Si può, tramite le API, ma è una cosa un pò inutile e tutt'altro che
sicura.
Se ti interessa cerca sul sito di Lebans
www.lebans.com
c'è proprio quello che cerchi.
@Alex.


title: Colore delle maschere

author: Simone Calligaris

text:
"gg" <
> Salve a tutti.
> Ho un piccolo problema con i colori delle maschere, in pratica io vorrei
> fare in modo che tutto il contenuto delle maschere, sia dello stesso
colore
> indipendentemente dalla combinazione utilizzata da Windows. Mi spiego
meglio
> in una maschera imposto come sfondo il colore ROSSO, nella stessa maschera
> ho delle schede, che non riesco a colorale dello stesso colore, perchè
> prendono come sfondo quello della combinazione di windows.
Setta come trasparente il colore delle schede.
Ciao.


title: Colore delle maschere

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:TQp1a.97568$YG2.2...@twister1.libero.it...
>
> "gg" <
> > Salve a tutti.
> > Ho un piccolo problema con i colori delle maschere, in pratica io vorrei
> > fare in modo che tutto il contenuto delle maschere, sia dello stesso
> colore
> > indipendentemente dalla combinazione utilizzata da Windows. Mi spiego
> meglio
> > in una maschera imposto come sfondo il colore ROSSO, nella stessa
maschera
> > ho delle schede, che non riesco a colorale dello stesso colore, perchč
> > prendono come sfondo quello della combinazione di windows.
>
> Setta come trasparente il colore delle schede.
>
> Ciao.
>
Provato.
Grazie anche cosě puo andare.
grazie ancora
gianni


title: Salvare un report

author: il barbi

text:
E' possibile salvare un report come file di testo? Ho
provato con "Salva con nome" ma mi dice che non rispetto le
regole di denominazione di un oggetto e se le rispetto non
riesco a vedere qual e' il risultato
il barbi


title: Salvare un report

author: Roberto da casa

text:
"il barbi" <
angelo.b...@tin.it
> ha scritto nel messaggio
news:hr6kc.164278$rM4.6...@news4.tin.it...

Prova ad usare il metodo OutputTo (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: formattazione condizionale su A2000

author: Gaetano Di Zanni

text:
Ho scoperto ( e ne sfruisco a piene mani)  la formattazione condizionale,
sfruttando le varie condizioni (max 3) e possibilità (il valore
è..,l'espressione è.., etc) sono riuscito anche a inserire espressioni molto
lunghe e quindi, in un certo senso, a "saltare" il muro delle 3
condizioni...
Vorrei poter condizionare l'aspetto delle caselle di testo semplicemente su
"se comincia con..." Come si fa?
Ho provato in tanti modi ( [nomecampo]= Carattereiniziale* etc etc, senza
successo.
Potete darmi una mano? Forse mi sto perdendo in un bicchier d'acqua...
Grazie!


title: formattazione condizionale su A2000

author: Karl Donaubauer

text:
Gaetano Di Zanni wrote:
> Ho scoperto ( e ne sfruisco a piene mani)  la formattazione
> condizionale, sfruttando le varie condizioni (max 3) e possibilità
> (il valore è..,l'espressione è.., etc) sono riuscito anche a inserire
> espressioni molto lunghe e quindi, in un certo senso, a "saltare" il
> muro delle 3 condizioni...
> Vorrei poter condizionare l'aspetto delle caselle di testo
> semplicemente su "se comincia con..." Come si fa?
> Ho provato in tanti modi ( [nomecampo]= Carattereiniziale* etc etc,
> senza successo.
[nomecampo] Like "Carattereiniziale*"
--
HTH
Karl
*********
Access-FAQ
http://www.donkarl.com/it


title: formattazione condizionale su A2000

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:2r5trmF...@uni-berlin.de...

Ok! non ci avevo pensato!
Grazie Karl !


title: formattazione condizionale su A2000

text:
"Gaetano Di Zanni" <
gaetano...@tiscali.it
> ha scritto nel messaggio
news:cikovl$ta4$1...@lacerta.tiscalinet.it...

Scusa ancora Karl, e se volessi evidenziare i campi che contengono 2 numeri
e una lettera? (per esempio 01A, oppure 16B) come posso fare?
In effetti fin chè si tratta di isolare con l'asterisco, prima o dopo, ho
capito, ma per isolare tutti i campi che hanno due numeri ( da 01 a 20
avanti a una lettera da A a H) ?
Grazie ancora del tuo aiuto e grazie agli ideatori e ai sostenitori di
questo newsgroup: siete tutti preziosissimi!
Un salutone a tutti Voi.


title: formattazione condizionale su A2000

text:
"Gaetano Di Zanni" <
gaetano...@tiscali.it
> ha scritto nel messaggio
news:cikpih$tlf$1...@lacerta.tiscalinet.it...

Chiedo scusa a tutti, mi sono accorto di avere la data sbagliata sul mio PC.
Inoltro di nuovo il presente con la data corretta.


title: per Sib, specificazione di un post precedente

author: nn

text:
 >SELECT [Tab_1].id_1, [Query].sp, [Tab_1].ti, [Tab_1].Cat, [Tab_1].sg
 >FROM Query RIGHT JOIN Tab_1 ON [Query].Cod_ti=[Tab_1].id_1
 >WHERE ([Tab_1].Cat= "A");
al posto del where, che estrae solo in base ad un valore ci devo
mettere piu' valori di un campo di una tabella, come si fa?
n.b. non voglio usare l'operatore AND, ma il Select campo sulla tabella
(mi serve il select perché dalla tabella
i valori del campo li devo estrarre usando l'operatore where)
Scusa sib, il tuo suggerimento è giusto, pero' mi interessava
sostituire la riga del where con un select: cioè devo ripassargli i
valori che ho tutti dentro
a un campo (che quindi dovro' tirar fuori con un slelect).
Mi sono dimenticato di specificare questo, in quanto lo avevo già
scritto
nel post iniziale.
Ipotizzo che forse serve un join o qualcosa di simile;
(Soluzione sib usando il where pero' con l'operatore AND
WHERE [Tab_1.Cat]="A" AND Tab_1.ti="B" AND ecc. ecc.)
di nuovo grazie a tutti


author: Sib

text:
"nn" <
NNNOONNVOGL...@lycos.it
> ha scritto nel messaggio
> >SELECT [Tab_1].id_1, [Query].sp, [Tab_1].ti, [Tab_1].Cat, [Tab_1].sg
>  >FROM Query RIGHT JOIN Tab_1 ON [Query].Cod_ti=[Tab_1].id_1
>  >WHERE ([Tab_1].Cat= "A");
>
>
> al posto del where, che estrae solo in base ad un valore ci devo
> mettere piu' valori di un campo di una tabella, come si fa?
cut
...
WHERE [Tab_1].Cat IN (SELECT Tab2.TuoCampo FROM Tab2)
Sib


title: [info] controllo calendario 10.0

author: pier

text:
ciao a tutti.
scusate ma cercando nei messaggi trovo solo gentili risposte a domande
specifiche. la mia č semplicemente questa: dove posso trovare l'elenco di
proprietą e metodi del controllo calendario? poi da lģ mi muovo per conto
mio, promesso :-)
ciao e grazie
P


title: [info] controllo calendario 10.0

author: Carlo Costarella

text:
"pier" <
p.z...@inwind.questositoglie.it
> ha scritto nel messaggio
news:cL3Ld.6513$QG6.1...@twister2.libero.it...

Cerca in Windows\System32 MSCAL.HLP.
Oppure apri un modulo del db che contiene un riferimento a MSCal.ocx e premi
F2, dalla combo scegli MSCAL e ti appariranno tutte le proprietą e i metodi
del controllo stesso.
Ciao, Carlo


title: [info] controllo calendario 10.0

text:
carlo ha scritto:
> Cerca in Windows\System32 MSCAL.HLP.
a parte che per motivi asburgici i file erano in una sottodirectory di
office, grazie mille :-)
ciao
P


title: Nascondere i contrilli "segnati" da un Tag particolare

author: vuLCan Karayan

text:
Ho trovato la funzione in questo NG ma non la ricordo più....
Vorrei, a seconda del valore di un campo boolean, abilitare o non abilitare
dei campi della maschera.
Ricordo che dovevo impostare un TAG per tutti i controlli che intendevo
"bloccare"/"sbloccare"
ma non ricordo la function...
Chi mi da una mano?


author: Roberto La Forgia

text:
"vuLCan Karayan" <vulcankarayan@[tiscali]PUNTO.it> wrote in message
news:43ea4869$0$28068$
4faf...@reader1.news.tin.it

è forse ... Me.contrillo.enabled = True/False?
:-)
Ciao,
Roberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
>> Chi mi da una mano?
>
>
> è forse ... Me.contrillo.enabled = True/False?
>
> :-)
E dai...
Nascondere "controlli"..
If Me.Flag = False then
   'Imposta a Enabled = False tutti i controlli con Tag = "DaBloccare"
Endif
E' la parte di mezzo che mi manca :)
Ciao


author: Alessandro Baraldi

text:
"vuLCan Karayan" <vulcankarayan@[tiscali]PUNTO.it> wrote in message
news:43ea4869$0$28068$
4faf...@reader1.news.tin.it
> Ho trovato la funzione in questo NG ma non la ricordo più....

Mettila in un Modulo e chiamala così:
Call fControl(Me,"TuaTag",False)
Public Function fControl(frm as Access.Form, sTAG as string, Value as
Boolean)
Dim ctl as Access.Control
For each ctl in frm.Controls
    If ctl.TAG=sTAG Then ctl.Enabled=Value
NExt
End Function
Ciao
@Alex



text:
> Mettila in un Modulo e chiamala così:
>
> Call fControl(Me,"TuaTag",False)
>
> Public Function fControl(frm as Access.Form, sTAG as string, Value as
> Boolean)
> Dim ctl as Access.Control
> For each ctl in frm.Controls
>    If ctl.TAG=sTAG Then ctl.Enabled=Value
> NExt
> End Function
>
> Ciao
> @Alex
Grazie Alex
Ciao


title: Setup Wizard per Warp

author: giuly

text:
Ciao ti ringrazio per la tua risposta... scusa se ti scrivo cosě ma non
sapevo se avresti ancora letto il thread...
la mia situazione č la seguente, ho un mdb contenente tutti i report che
utilizza la mia applicazione(creata in visual basic),le tabelle collegate e
delle query.
dal progetto prima ricollego le tabelle collegate al db contenente i dati e
poi apro il report solo che i miei utenti non č detto che abbiano access...
Io ho fatto il setup con ode 97 saltando i passaggi shortcuts e add registy
keys ma continua a darmi il problema con comcat.dll e poi dice che il setup
non č andato a buon fine
mi puoi aiutare??
grazie 1000 ancora


title: Setup Wizard per Warp

author: Federico Luciani

text:

Scusa se mi intrometto, ma prova a leggere questo articolo:
http://support.microsoft.com/support/kb/articles/Q179/5/67.ASP
forse c'e' la soluzione.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Setup Wizard per Warp

author: warp

text:
Come ti scrive Federico Luciani, se il problema comcat.dll te lo da in fase d'installazione della
tua applicazione Runtime per risolvere devi installare il service pack 2 di ODE '97 (che ti puoi
scaricare dal sito comune).
Probabilmente ho frainteso il tuo problema: mi pareva che tu non riuscissi a portare a termine la
creazione del pacchetto d'installazione sul tuo PC...
Per curiosità, com'è che sul tuo mdb ci sono solo Reports?
Ciao, warp
giuly ha scritto nel messaggio ...
>Ciao ti ringrazio per la tua risposta... scusa se ti scrivo così ma non
>sapevo se avresti ancora letto il thread...
>la mia situazione è la seguente, ho un mdb contenente tutti i report che
>utilizza la mia applicazione(creata in visual basic),le tabelle collegate e
>delle query.
>dal progetto prima ricollego le tabelle collegate al db contenente i dati e
>poi apro il report solo che i miei utenti non è detto che abbiano access...
>Io ho fatto il setup con ode 97 saltando i passaggi shortcuts e add registy
>keys ma continua a darmi il problema con comcat.dll e poi dice che il setup
>non è andato a buon fine



title: Setup Wizard per Warp

text:
Allora la mia applicazione si basa su un db che contiene i dati mentre tutti
i report si trovano su un secondo database che contiene i report, le query e
le tabelle(che sono state collegate).
Il problema era che in fase di installazione sul pc del mio cliente mi dice
impossibile registrare correttamente comcat.dll. L'installazione non è stata
completata correttamente.
Sono andata a vedere l'articolo che mi ha suggerito Federico, ho fatto le
modifiche che diceva la Microsoft ma non funziona ancora.
Non vorrei che il problema fosse che il mio exe si trova di solito in
locale, il db con i dati in rete mentre il db con i report si trova
anch'esso in locale. Forse sbaglio a dare i percorsi per la run-time di
access.
Sai dirmi qualcosa???
Grazie ancora per la tua disponibilità.
Giulia


title: Trova e incolla record

author: michele

text:
In una tabella [archgen] ho dei dati (es. ID-Nome-Indirizzo-Data ecc...)
premetto che gli stessi non dovranno mai essere modificati.
Tramite una maschera [ins] (collegata ad un'altra tabella) utilizzando un
modulo vorrei richiamare tramite il campo ID parte dei dati presenti nella
tabella [archgen] memorizzando nei rispettivi campi Nome-Indirizzo e Data,
per poi continuare l'inserimento di ulteriori campi in modo manuale.
Spero di essere stato chiaro
Ringazio in anticipo
Saluti
Mic
--------------------------------
Inviato via
http://usenet.libero.it


title: Trova e incolla record

author: Antonio Biso

text:
"michele" <
mic...@inwind.it
> ha scritto nel messaggio
news:213Z82Z248Z178Y...@usenet.libero.it...
> In una tabella [archgen] ho dei dati (es. ID-Nome-Indirizzo-Data ecc...)
> premetto che gli stessi non dovranno mai essere modificati.
> Tramite una maschera [ins] (collegata ad un'altra tabella) utilizzando un
> modulo vorrei richiamare tramite il campo ID parte dei dati presenti nella
> tabella [archgen] memorizzando nei rispettivi campi Nome-Indirizzo e Data,
> per poi continuare l'inserimento di ulteriori campi in modo manuale.
Casella combinata associata al campo nome della nuova tabella con 4 colonne,
ID, nome, indirizzo e data numero colonne 4, colonna associata 1, dimensione
colonne 0 cm; 4 cm; 0 cm; 0 cm
Con la combo selezioni una persona.
Su evento dopo aggiornamento della combo farai
controlloIndirizzo = combo.column(2)
controlloData = combo.column(3)
Se vuoi più dati, metti più colonne nella combo e scrivi più codice
Antonio


title: Problemi con percorso back end

author: pippo

text:
Salve ho implementato un database composto da Front end e Back end
ogni tanto mi succede una cosa strana.
Sostanzialmente nel front end esiste una procedura che provvede a riallegare
le tabelle che in alcuni casi casi fallisce.
In particolare visto che il back end viene aggiornato da un'altra persona mi
capita di dover richiamare da un front end che nel frattempo ha subito
modifiche il back end contenente le tabelle che nel frattempo è stato
aggiornato su un altro PC.
E' da premettere che la strutura del back end rimane uguale quello che
cambia sono i dati contenuti nelle tabelle.
Credo che il problema si dovuto al fatto che Access crea una specie di
legame con il file del back end per cui se viene sostuito con un altro di
uguale struttura non è detto che funzioni.
Visto però che il back end ora contine qualcosa come 100 record devo per
foraza di cose costringere Access ad accettare il back end .
Come portrei risolvere


title: Problemi con percorso back end

author: Mario De Ghetto

text:
Forse non ho capito il problema: se la struttura delle tabelle non
cambia e cambia solo il contenuto, perché rialleghi le tabelle? Cambia
spesso anche la posizione del database di back-end?
Mario De Ghetto
www.deghetto.it


title: Problemi con percorso back end

text:
"Mario De Ghetto" <
ml.de...@gmail.com
> ha scritto nel messaggio
news:1124697655.1...@g43g2000cwa.googlegroups.com...

Mario De Ghetto
www.deghetto.it
Si in effetti cambia anche la posizione visto che il database viene
trasferito da un PC all'altro
immagina la seguente situazione:
la persona A lavora allo sviluppo del FE  che si collega al BE
di tanto in tanto la persona A trasferisce il FE ed il BE alla persona B
(che lavora in un'altra sede)
che provvede ad inserire dei dati.
A sua volta la persona B trasferisce di tanto in tanto il BE alla persona A
in questo caso il FE ( che nel frattempo è stato aggionato ) non riesce ad
aprire il BE
pur essendo rimasto invariato nella struttura.


title: Problemi con percorso back end

author: Roberto dalla campagna

text:
"pippo" <
pi...@pippo.it
> ha scritto nel messaggio
news:oweOe.70269$2U1.3...@news3.tin.it...

Fermo restando che l'osservazione di Mario Del Ghetto mi sembra pertinente,
non conoscendo come hai riallegato le tabelle del BE da VBA, prova a
modificare tale procedura; a tale scopo vai sul Sito Comune (link qui
sotto): nella Sezione Tables ci trovi una mezza dozzina di FAQ che trattano
l'argomento: vedi tu quale fa più al caso tuo.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Referenza Outlook Redemption

author: OneEDP

text:
Qualcunon sa dirmi se  Redemtion reperibile da
http://www.dimastr.com/redemption
 è affidabile?
Avete avuto esperienza diretta con questo Object Model di terzi?
Grazie per le vostre opinioni.
Daniele


title: Referenza Outlook Redemption

author: PBsoft

text:
> Qualcunon sa dirmi se  Redemtion reperibile da
>
http://www.dimastr.com/redemption
 è affidabile?
> Avete avuto esperienza diretta con questo Object Model di terzi?
L'ho utilizzato diverso tempo fa in una procedura per un cliente che doveva
inviare delle email con allegati dei PDF.
Tutto gestito da VBA: dalla generazione del PDF all'invio dell'email.
Benché il tutto funzionasse, dopo qualche mese il cliente ha deciso di sviluppare
internamente un componente ad hoc.
===
"Liberalizziamo l'elenco dei CAP"
http://www.petitiononline.com/freecap/petition.html
===
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Referenza Outlook Redemption

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea355573418...@news.tin.it...
>> Qualcunon sa dirmi se  Redemtion reperibile da
>>
http://www.dimastr.com/redemption
 è affidabile?
>> Avete avuto esperienza diretta con questo Object Model di terzi?
>
> L'ho utilizzato diverso tempo fa in una procedura per un cliente che
> doveva inviare delle email con allegati dei PDF.
> Tutto gestito da VBA: dalla generazione del PDF all'invio dell'email.
>
> Benché il tutto funzionasse, dopo qualche mese il cliente ha deciso di
> sviluppare internamente un componente ad hoc.
E questo è stato mortificante, o ci sono ragioni non note neanche a te.
Se dovessi dare dare un voto fino a 10 che opinione avresti?
In pratica dovrei fare una cosa del genere anch'io generato PDF e
formattando un messaggio HTML.
A proposito approfitto (magari è il caso di aprire un altro thread...)...
c'è qualche strumento per comporre un messaggio HTML senza le bizze di
ol2000, ol2002 dato che non conosco il linguaggio html?
Grazie
Daniele



title: Referenza Outlook Redemption

text:
>> Benché il tutto funzionasse, dopo qualche mese il cliente ha deciso
>> di sviluppare internamente un componente ad hoc.
> E questo è stato mortificante, o ci sono ragioni non note neanche a
> te.
No, le ragioni sono note: il mio cliente si è fidato di più di un componente
del quale ha a disposizione i sorgenti e può modificarlo quando e come vuole.
> Se dovessi dare dare un voto fino a 10 che opinione avresti?
7.
> A proposito approfitto (magari è il caso di aprire un altro
> thread...)...
> c'è qualche strumento per comporre un messaggio HTML senza le bizze di
> ol2000, ol2002 dato che non conosco il linguaggio html?
Concordo riguardo all'apertura di un nuovo thread, ma purtroppo non so aiutarti
per quello che chiedi.



title: MI5 Persecution: what people said (3605)

text:
From:
aa1...@zen.sunderland.ac.uk
 (gillian.hardy)
Newsgroups: uk.misc,uk.legal,uk.politics,uk.politics.misc,uk.media
Subject: Re: Read About "MI5 Persecution" on the Web!
Date: Mon May 13 21:27:26 1996
: In article &
lt;Dr5sDI.50...@torfree.net
>,
bu...@torfree.net
 wrote:
: |> This site is now running brilliantly. It will be updated with new
: |> information regarding this case and is well worth including in your
: |> bookmark file.
For my sins I had a look and it's quite good actually.  Nicely set out and
presented.  Didn't read it though, having read the rants a million times
before.  By the way, anyone noticed Chris Tarrant looking at you funny
during Man O Man yet?  Thought not...
Gillian
-------------------------------
From:
fra...@elea.demon.co.uk
 (Francis Devonshire)
Newsgroups: uk.misc,uk.legal,uk.politics,uk.politics.misc,uk.media
Subject: Re: Read About "MI5 Persecution" on the Web!
Reply-To:
fra...@elea.demon.co.uk
Date: Tue May 14 19:17:26 1996
In message <4na2d0$
d...@leofric.coventry.ac.uk
> Stephen Hopkins wrote:
:Yes, I have to be honest: that page is one of the best examples of how to
:present a long document on the Web that I've seen. Hopefully, frames will
:become more and more prevalent and this style of presentation will become
:the norm for long documents such as that.
My html thingy doesnt seem to do frames so all I got was a blank page. Then
again, maybe someone, somewhere doesn't want me to read it.
BTW does 'troll' bring to mind a fishing lure (ie you are American), or an
ogre type thing (ie you are European). I much prefer the image of the latter.
+--------------------------------------------------------------------------+
| Francis Devonshire                 Titchfield, Hampshire, United Kingdom |
+--------------------------------------------------------------------------+
-------------------------------
Newsgroups: uk.misc,uk.legal,uk.politics.misc,soc.culture.british
From:
dun...@yc.estec.esa.nl
 (Duncan Gibson)
Subject: Re: MI5 Persecution: Bugging
Date: Wed Jun 12 06:46:41 1996

Mike Corley &
lt;bu...@torfree.net
> wrote:
> Read about the MI5 Persecution on the Web
Now, whatever you might think about the content, this is a very well
designed and presented web page (if you use Netscape to look at it
anyway - Mosaic couldn't handle it).

This is my article, not my employer's, with my opinions and my disclaimer!
--
Duncan Gibson, ESTEC/YCV, Postbus 299, 2200AG Noordwijk, The Netherlands
Tel:
+31 71 5654013
   Fax:
+31 71 5656142
  Email:
dun...@yc.estec.esa.nl
3605
--
Posted via a free Usenet account from
http://www.teranews.com


title: Progetti Access 2000

author: Fabiana Minardi

text:
Ebbene sì, l'avevo già postato, ma non mi avete risposto e ci riprovo perché
sono bloccata da due settimane, non so che fare!
Ora che ho quasi completato lo sviluppo di un'applicazione fatta con
progetti Access 2000 (.adp) collegati a database SQL 7.0, ho cominciato a
pensare a come sviluppare la sicurezza.
Ho creato un nuovo utente SQL (Logon con SQL autentication) e non gli ho
concesso il ruolo server di sysadmin:
non funziona più nulla! Le tabelle, le viste e le stored procedure
presentano tutte in fondo al nome la scritta (dbo) e sembra che per
richiamarle debba scrivere sempre dbo.nomeoggettosql invece di
nomeoggettosql
Ad esempio, nella maschera che gestisce i Comuni ho scritto, nella proprietà
Origine Record: "Tabella Comuni" che è il nome di una stored procedure che
prende i dati dalla tabella comuni ordinandoli per descrizione.
Quando apro il progetto .adp che contiene questa maschera loggandomi con un
utente che non è sysadmin, e tento di aprire la maschera, ho questo
messaggio di errore: L'origine record "Tabella Comuni" specificata sulla
maschera o sul report non esiste.
Se apro la maschera in struttura e metto come Origine Record: "dbo.Tabella
Comuni" allora la maschera funziona come prima.
Questo significa che devo cambiare tutte le origine dati di maschere,
report, liste a discesa, e tutti i punti del codice in cui apro una tabella,
una vista o una stored procedure aggiungendo dbo. prima di ogni nome?
Non c'è un altro modo per aprire il progetto connettendosi a SQL con un
utente che non abbia il ruolo server di sysadmin, ma che possa vedere gli
oggetti senza dover aggiungere .dbo a tutto?
E' successo anche a voi, oppure siete riusciti a fare utenti senza dargli il
ruolo di sysadmin e non vi è successo nulla di strano?
Grazie per le risposte
Fabiana


title: problemi query ODBC

text:
Ho creto un collegamento ODBC su delle tabelle AS400 tramite Client Acces
4.4
Accedo ai dati tramite Access 2000
Il collegamento riesce, ma non visualizza i dati contenuti nella tabella,
comunque utilizzando una query di selezione senza parametri e su una tabella
sola riesco a vedere i dati. Ho provato ad aggiungere dei parametri alle
query, risposta: ODBC chiamata non riuscita.
Grazie 1000


title: problemi query ODBC

author: Mario

text:
Che OS hai?
Io ho Client Access 4.5 e va tutto ok.
Se hai Win2000 mi sembra che ci vuole per forza la 4.5
"simone71" <
net0...@cr-surfing.net
> ha scritto nel messaggio
news:al21gd$q83$1...@news.flashnet.it...



title: problemi query ODBC

text:
Win2000...
"Mario" <mrosa!!NOSPAM!!@
frtb.it
> ha scritto nel messaggio
news:i6id9.50132$ub2.8...@news1.tin.it...



title: problemi query ODBC

text:
"simone71" <
S.Franc...@trentino.net
> ha scritto nel messaggio
news:al4c3p$bsk$1...@news.flashnet.it...
> Win2000...
E se tra tutte e due cominciaste a scrivere correttamente DOPO il quoting?!?
Antonio


title: Query di aggiornamento-azzeramento

text:
Devo eseguire una serie di controlli di manutenzione su un motore.
Giorno dopo giorno inserisco le ore di moto (tblDiario) e una query mi
avvisa quando le ore di moto hanno raggiunto il limite per cui è
necessaria la manutenzione.
Una volta eseguita fisicamente la manutenzione, vorrei azzerare il
"contatore" di tblDiario e tenere traccia di tale azzeramento.
Come fo?
Me ne vado per un'idea che vorrei vedere confermata o confutata:
costruisco una tabella con i dati dell'operazione di manutenzione
(quando, chi, cosa, come). L'inserimento di questo record fa partire la
query di aggiornamento-azzeramento delle ore di moto.
Grazie in anticipo

--
ciao
Stefano


title: Query di aggiornamento-azzeramento

text:

Campo ORE_FUNZIONAMENTO nella Tabella Apparecchiatura.
Quando devi incrementare il campo esegui una Query Action di UPDATE:
"UPDATE Tab SET ORE_FUNZIONAMENTO=ORE_FUNZIONAMENTO+" &  VariabileORE
& " WHERE idAPP=" & Apparecchio

Quando devi AZZERARE per Manutenzione
"UPDATE Tab SET ORE_FUNZIONAMENTO=0 WHERE idAPP=" & Apparecchio

Personalmente siccome le Manutenzioni sono Molte, io gestisco una
Tabella 1-Molti con le Date di Manutenzione.

@Alex


title: Query di aggiornamento-azzeramento

text:
> Campo ORE_FUNZIONAMENTO nella Tabella Apparecchiatura.
> Quando devi incrementare il campo esegui una Query Action di UPDATE:
> "UPDATE Tab SET ORE_FUNZIONAMENTO=ORE_FUNZIONAMENTO+" &  VariabileORE
> & " WHERE idAPP=" & Apparecchio
questo già lo fo ;-) non esattamente così, però.
Adesso verifico se come come lo fai tu è meglio.

> Quando devi AZZERARE per Manutenzione
> "UPDATE Tab SET ORE_FUNZIONAMENTO=0 WHERE idAPP=" & Apparecchio
chè più o meno quello che avevo pensato. Devo articolare la questione
attraverso maschere e pulsanti per i diversi operatori
>
> Personalmente siccome le Manutenzioni sono Molte, io gestisco una
> Tabella 1-Molti con le Date di Manutenzione.
Abbastanza chiaro. Grazie infinite.

--
ciao
Stefano


title: inserimento dati con lettore codice a barre

author: fabià

text:
Salve a tutti,
ho impostato una maschera con un solo campo numerico  da compilare.
la compilazione deve avvenire tramite lettura di un codice a barre da
parte di un lettore ad emulazione di tastiera.
il mio lettore però non da l'invio dopo aver scritto il numero nella
casella della maschera.
Vorrei che l'invio fosse automatico in modo da non dover usare la
tastiera, tipo: se hai inserito n°X cifre allora salva il record e
passa ad uno nuovo.
si può?
Grazie in anticipo a tutti.
8-)> Fabià


author: gicom

text:
"fabià" <fabi...@SPAMyahoo.com> ha scritto nel messaggio
news:3c5ed8e3...@powernews.inwind.it...

se usi una casella di testo puoi impostare l' azione a campo successivo
dopo la digitazione di un numero di caratteri  arbitrario
finestra proprietà, altro, tabulazione automatica
ciao
franco


author: alepetomane

text:
"fabià" <fabi...@SPAMyahoo.com> ha scritto nel messaggio
news:3c5ed8e3...@powernews.inwind.it...

certo che si, la cosa migliore e' impostare il cr automatico sui settaggi
del lettore barcode.
(se inserisci il campo manualmente lo devi sempre dare tu ma almeno non
incasini il dato)
poi su "dopo aggiornamento" >>> evento salva record.


text:
On Mon, 4 Feb 2002 22:32:59 +0100, "gicom" <
gi...@tiscalinet.it
>
wrote:

ho creato una macro che si attiva dopo l'inserimento, del tipo
emetti suono
vai al record nuovo
mi rimane il problema dell'invio automatico, non riesco a tradurre
quello che mi hai detto( campo successivo dopo digitazione di N cifre)
Aiuto
grazie
8-)> Fabià


author: Emyr

text:
On Tue, 05 Feb 2002 21:29:11 GMT, fabi...@SPAMyahoo.com (fabià)
wrote:

devi inserire nel controllo una maschera di imput del tipo
0000000000000
se usi codici a 13 cifre
ed impostare a si la proprietà tabulazione automatica
naturalmente devi avere un altro controllo (anche vuoto) a cui passare
il focus...
Saluti.
Emanuele.


title: Cercasi collaboratore per computershop

author: CRUG

text:
Buon giorno
Sto cercando un collaboratore per negozio di computer, con mansioni di
assemblatore, tecnico e aiuto negozio,
i requisiti richiesti sono:
- età tra i 19 e 26
- buona conoscenza hardware e software
- patente B
- disponibilita costante almeno 4 ore al giorno dal lunedi al venerdi con
orari tra le 9-13 o tra le 14-19
- milite esente
Il negozio si trova a Milano in zona loreto
Rispondere in e-mail
Francesco R.
frar...@tin.it


title: [SitoComune] Sono in attesa di risposte da parte di xoom

text:
Da un paio di giorni il sito e' down.
ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di risposte.
vi terro' aggiornati.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


text:
Federico Luciani wrote:
> Da un paio di giorni il sito e' down.
> ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di risposte.
>
> vi terro' aggiornati.
al momento i tecnici xoom sono al lavoro per risolvere il problema!!!!!



text:
Federico Luciani wrote:
> Da un paio di giorni il sito e' down.
> ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di risposte.
> vi terro' aggiornati.
> --
> Federico
sembrerebbe che il problema sia stato risolto



text:
Federico Luciani wrote:
> Federico Luciani wrote:
> > Da un paio di giorni il sito e' down.
> > ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di risposte.
> > vi terro' aggiornati.
> > Federico
> sembrerebbe che il problema sia stato risolto
evidentemente non e' vero :-|



author: Riccardo

text:
Federico Luciani <
fluc...@paperino.libero.it
> wrote in message
3A1B934A...@paperino.libero.it...
> Federico Luciani wrote:
> > Federico Luciani wrote:
> > > Da un paio di giorni il sito e' down.
> > > ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di
risposte.
> > > vi terro' aggiornati.
> > > Federico
> > sembrerebbe che il problema sia stato risolto
>
> evidentemente non e' vero :-|
>
> --
...in effetti!
ha funzionato solo per poco..ed alcuni file dal download non si scaricavano,
cosi come anche alcune Faq.
bye
Riccardo


author: Sergio MAZZA

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:3A1B934A...@paperino.libero.it...
> Federico Luciani wrote:
> > Federico Luciani wrote:
> > > Da un paio di giorni il sito e' down.
> > > ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di
risposte.
> > > vi terro' aggiornati.
> > > Federico
> > sembrerebbe che il problema sia stato risolto
>
> evidentemente non e' vero :-|
>
> --
> Federico
>
> --------------------------------------
> Sito Comune di it.comp.appl.access
>
http://members.xoom.it/it_db_access
> mailto:
it_db_...@usa.net
> --------------------------------------
> Tutte le richieste che mi arrivano
> in privato, vengono cestinate.
> --------------------------------------
> Rimuovi paperino. per e-mail
> --------------------------------------
Forse stanno approntando un motore di ricerca (eh!eh!)...
Ciao.


author: Federico Luciani

text:
Sergio MAZZA wrote:
> "Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
> news:3A1B934A...@paperino.libero.it...
> > Federico Luciani wrote:
> > > Federico Luciani wrote:
> > > > Da un paio di giorni il sito e' down.
> > > > ho gia' chiesto spiegazioni al webmaster di xoom e sono in attesa di
> risposte.
> > > > vi terro' aggiornati.
> > > > Federico
> > > sembrerebbe che il problema sia stato risolto
> >
> > evidentemente non e' vero :-|
> > --
> > Federico
> Forse stanno approntando un motore di ricerca (eh!eh!)...
eh! eh! eh! eh!!!



title: Come organizzare DB per prestito libri? (forse tornano)

author: Brunoz

text:
Vorrei realizzare un piccolo DB per tenere sotto controllo il continuo andi
e rivieni dei miei libri e cd.
Ho gia una minuziosa tabella con tutto registrato - IDLib- titolo - autore -
genere - ecc.
Ho redatto una tabella con l'elenco dei "clienti" :)))). - IDAmici - Nome -
Cognome ecc.
Come risultato vorrei avere (finalmete) l'elenco dei soli libri rimasti in
casa, l'elenco dei libri in carico a "Tizio", e se non chiedo troppo la
trafila dei prestiti che ha dovuto affrontare un singolo libro.
Chiedo per gentilezza una traccia generale, infatti non mi č chiaro come
organizzare la tabella che raccoglierą i dati dei singoli "movimenti".
Infinite Grazie.
- Bruno -


author: Antonio Biso

text:
"Brunoz" <
d01850...@tiscali.it
> ha scritto nel messaggio
news:b2u80j$an7$1...@lacerta.tiscalinet.it...
> Vorrei realizzare un piccolo DB per tenere sotto controllo il continuo
andi
> e rivieni dei miei libri e cd.
> Ho gia una minuziosa tabella con tutto registrato - IDLib- titolo -
autore -
> genere - ecc.
> Ho redatto una tabella con l'elenco dei "clienti" :)))). - IDAmici -
Nome -
> Cognome ecc.
> Come risultato vorrei avere (finalmete) l'elenco dei soli libri rimasti in
> casa, l'elenco dei libri in carico a "Tizio", e se non chiedo troppo la
> trafila dei prestiti che ha dovuto affrontare un singolo libro.
> Chiedo per gentilezza una traccia generale, infatti non mi è chiaro come
> organizzare la tabella che raccoglierà i dati dei singoli "movimenti".
Tabella movimenti
ID Movimento RifIdLib RifIdAmici DataDa DataA
poi aggiungi un campo prestato alla tabella dei libri di tipo Sì/No
Prestito:
Con una maschera selezioni un libro e un amico. I libri li selezioni con una
combo o una casella di riepilogo che abbai una query come origine riga che
ti dia solo i libri con prestato a No.
Al clic di un pulsante aggiungi un record alla tabella movimenti con le Id
scelte e la data corrente nella dataDa.
Restituzione:
Da una combo o una casella di riepilogo con query sulla tabella libri in
join con la tabella movimenti dove il campo DataA deve essere nullo,
selezioni il libro da restituire. Mettendoci il join anche con la tabella
amici ti da anche i dati di chi aveva il libro.
Premi il tasto e aggiorni il record selezionato con la data corrente sul
campo DataA
Storico movimenti
Report con query origine record sulla tabella movimenti in join con le altre
due tabelle
Puoi o selezionare tutti i libri e tutti gli amici e poi ti gestisci il caso
che non siano mai stati prestati o mai abbiano fatto un prestito, oppure da
due combo ti selezioni solo gli Id contenuti nella tabella movimenti.
Dopo la selezione apri il report con docmd.openreport e criterioWhere
(ultimo parametro) con l'ID selezionato
Antonio


author: Gio'

text:
Brunoz <
d01850...@tiscali.it
> wrote in message
b2u80j$an7$1...@lacerta.tiscalinet.it...
> Vorrei realizzare un piccolo DB per tenere sotto controllo il continuo
andi
> e rivieni dei miei libri e cd.
> Ho gia una minuziosa tabella con tutto registrato - IDLib- titolo -
autore -
> genere - ecc.
> Ho redatto una tabella con l'elenco dei "clienti" :)))). - IDAmici -
Nome -
> Cognome ecc.
> Come risultato vorrei avere (finalmete) l'elenco dei soli libri rimasti in
> casa, l'elenco dei libri in carico a "Tizio", e se non chiedo troppo la
> trafila dei prestiti che ha dovuto affrontare un singolo libro.
> Chiedo per gentilezza una traccia generale, infatti non mi è chiaro come
> organizzare la tabella che raccoglierà i dati dei singoli "movimenti".
> Infinite Grazie.
> - Bruno -
>
Questo è il "classico" esempio di relazione molti a molti nel senso che un
libro può essere prestato a molti amici (ovviamente non nello stesso tempo)
e un amico può prendere in prestito molti libri (anche nello stesso tempo!).
Non è possibile creare direttamente con access una relazione molti a molti.
Lo si fa indirettamente con una tabella "intermedia" che contiene i singoli
prestiti.
La tabella "Prestiti" deve contenere i seguenti campi:
IDPrestito (contatore o altro a seconda delle esigenze ma comunque campo
chiave)
IDAmico (L'identificatore del "cliente" indicizzato con duplicati possibili)
IDLibro (l'identificatore del libro indicizzato con duplicati possibili)
Questi sono i campi NECESSARI. Dovrai impostare una relazione (che verrà da
sè) uno a molti con le due tabelle che hai creato. A questo punto potrai
inserire per ognuno degli Amici/Clienti quanti prestiti vorrai.
Oltre ai tre campi necessari puoi inserire nella tabella prestiti altri
campi che caratterizzano il prestito come:
DataInizio (la data in cui il prestito è stato fatto)
DataFine (data della fine del prestito)
Condizioni del libro
Urgenza (quanto ha rotto l'amico/cliente perché glielo prestassi?)
ecc
ecc
ecc
(tutto quello che ti viene in mente e che può essere utile annotare)
Con questi dati inseriti puoi poi implementare funzioni che leggendo la data
di sistema avvisano che un libro è in prestito da più di un tot di tempo o
che segnalino che un cliente/amico ha in prestito un numero esagerato di
libri ecc ecc.
Spero che le dritte siano state chiare
A presto... e per favore potresti prestarmi quel libro sulla Rivoluzione
Francese?
Gio'


author: Alberto S.

text:
[cut]
>Tabella movimenti
>ID Movimento RifIdLib RifIdAmici DataDa DataA
>
>poi aggiungi un campo prestato alla tabella dei libri di tipo Sě/No
[cut]
>Antonio
C'č una ragione particolare per cui crei il campo 'prestato' invece di
verificare se č null il campo 'DataA' dell'ultimo record riferito a
quel libro nella tabella movimenti?
Ciao, grazie.
--
   Alberto
No alla guerra


text:
"Alberto S." <
sartori.SPA...@tin.it
> ha scritto nel messaggio
news:mim75vkevhh5fbosp...@4ax.com...
> [cut]
>
> >Tabella movimenti
> >ID Movimento RifIdLib RifIdAmici DataDa DataA
> >
> >poi aggiungi un campo prestato alla tabella dei libri di tipo Sì/No
>
> [cut]
>
> >Antonio
>
> C'è una ragione particolare per cui crei il campo 'prestato' invece di
> verificare se è null il campo 'DataA' dell'ultimo record riferito a
> quel libro nella tabella movimenti?
Oooops... scusami, hai ragione, mi sono dimenticato di quel campo che avevo
introdotto.
Ovviamente nella transazione di prestito andava settato a Sì e nella
restituzione a No
L'utilità può essere che è magari più comodo fare query solo sulla tabella
libri per vedere cosa è stato prestato o meno, però, se poi hai bisogno
anche delle informazioni su chi l'ha preso e quando e quindi devi fare una
query in join con la tabella movimenti, allora in effetti lo fai col null
sul campo DataA
Antonio


text:
"Gio'" <
giova...@libero.it
> ha scritto nel messaggio
news:sCI4a.133971$ZE.38...@twister2.libero.it...

Grazie Antonio e  grazie Gio'.
- Bruno- .


text:
[cut]
>>
>> >Tabella movimenti
>> >ID Movimento RifIdLib RifIdAmici DataDa DataA
>> >
>> >poi aggiungi un campo prestato alla tabella dei libri di tipo Sì/No
>>
>> [cut]
>>
>> >Antonio
>>
>> C'è una ragione particolare per cui crei il campo 'prestato' invece di
>> verificare se è null il campo 'DataA' dell'ultimo record riferito a
>> quel libro nella tabella movimenti?
>
>Oooops... scusami, hai ragione, mi sono dimenticato di quel campo che avevo
>introdotto.
>Ovviamente nella transazione di prestito andava settato a Sì e nella
>restituzione a No
>L'utilità può essere che è magari più comodo fare query solo sulla tabella
>libri per vedere cosa è stato prestato o meno, però, se poi hai bisogno
>anche delle informazioni su chi l'ha preso e quando e quindi devi fare una
>query in join con la tabella movimenti, allora in effetti lo fai col null
>sul campo DataA
>
>Antonio
Grazie Antonio (sto portando avanti una catalogazione di libri e
allora mi interessava sentire punti di vista diversi)
... sto seguendo con grande interesse il tuo 3d su Pasqua ;) ...
Ciao



text:
"Alberto S." <
sartori.SPA...@tin.it
> ha scritto nel messaggio
news:32ga5vc1mc5fg0li5...@4ax.com...
> [cut]
> >>
> >Antonio
>
> Grazie Antonio (sto portando avanti una catalogazione di libri e
> allora mi interessava sentire punti di vista diversi)
> ... sto seguendo con grande interesse il tuo 3d su Pasqua ;) ...
Hehe heeh he eehe eheh ehe ehe ee
Antonio


title: modifiche alla struttura delle tabelle.

text:
Volevo farvi una domanda:
supponiamo di avere un db diviso con le tabelle allegate e
con protezione a livello utente.
supponiamo di dover effettuare una modifica ad una tabella
es. Clienti di un db già consegnato, funzionante e con dati all'interno.
Supponiamo che la tabella Clienti si trovi in un file chiamato archivi.mdb
Ipotizziamo allora che io debba aggiungere un campo in precisione
doppia con 2 decimali.
La procedura + semplice per effettuare queste modifiche, evitando di andare
direttamente dal cliente e  farle a mano, quale è secondo voi?
grazie mille
Riccardo


title: modifiche alla struttura delle tabelle.

author: Silvio Berruti

text:
"Riccardo" <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:9nl2jc$t4o$1...@news.panservice.it...

Vendere al cliente un programma tipo PCAnywhare, spiegando che questo ti
darà la possibilità di offrirgli un servizio migliore e + diretto.
Questi programmi ti danno la possibilità, tramite connessione telefonica o
via internet, di accedere dal tuo PC al PC del cliente come se fossi
fisicamente alla sua scrivania, e hanno prestazioni decenti anche su linea
PSTN.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: modifiche alla struttura delle tabelle.

text:
Silvio Berruti <
sber...@libero.it
> wrote in message
9TFn7.37863$ul3.1...@news.infostrada.it...

_______
ma da codice, o tramite sql, non è possibile fare tutto cio'?
grazie Riccardo