title: Connessione a DB Access

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:4756beb7$0$36445$4faf...@reader5.news.tin.it...
> Salve.
>
> Perché la connessione che segue mi dà questo errore?:
> "Impossibile leggere record. Autorizzazione in lettura non disponibile."
>
> Sub Connessione_ad_Altro_DB_Access()
> '------------- Connessione ad un db access -----------------
> Dim cn As Object
> Set cn = CreateObject("ADODB.Connection")
> cn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=E:\Prova\ProtPG.mdb"
> Dim rst As New ADODB.Recordset
>  rst.Open ("Select * From ProtPG"), cn, adOpenKeyset, adLockOptimistic
> 'L'ERRORE LO DA' QUI...
>    Do
>        MsgBox rst!ProtNum
>        rst.MoveNext
>    Loop Until rst.EOF
>    Set rst = Nothing
>    Set cn = Nothing
> End Sub
>
> Ciao a presto
> Agos
>Mi correggo e tolgo la parte eccedente...


title: Errore di Automazione

author: Giovanni

text:
Salve a tutti,
cercando di connettermi da Access 97 al Win32_NTLogEvent tramite questo
codice
GetObject("winmgmts://localhost").ExecQuery("select * from Win32_NTLogEvent)
mi da quasto errore
"Errore di Automazione".
su 1 pc con W2000 Server Funziona alla perfezione, sull'altro sempre con
W2000 Server mi da l'errore.
Grazie anticipatamente.


title: Errore di Automazione

author: Alessandro Baraldi

text:
"Giovanni" <
artig...@deejaymail.it
> wrote in message
news:OczXe.35619$
nT3....@tornado.fastwebnet.it

Perchè dici che su un'altro PC funziona alla perfezione che non
è possibile....??
Ora forse funziona:
GetObject("winmgmts://localhost").ExecQuery("select * from
Win32_NTLogEvent")
Non hai chiuso le virgolette a fine stringa.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Errore di Automazione

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:d8919dc582d66823ab...@mygate.mailgate.org...

Grazie Alessandro per l'interessamento, però le virgolette mancanti sono
solo un mio errore di scrittura nel riportare il codice, nella form
originale le virgolette di chiusura sono presenti.
ti viene in mente altro????
Grazie ancora.


title: Errore di Automazione

text:
"Giovanni" <
artig...@deejaymail.it
> wrote in message
news:RFAXe.35844$
nT3....@tornado.fastwebnet.it
[CUT]
> ti viene in mente altro????
> Grazie ancora.
Hai provato a non inserire il riferimento al LocalHost
che dovrebbe essere esplicito...?(non dovrebbe cambiare nulla)
Invece di :
("winmgmts://localhost").
questo:
("winmgmts:")
Altra cosa che non capisco visto che l'hai omesso
è se hai dichiarato variabili di tipo Object
per il LateBinding o se hai inserito i riferimenti
a WSH per l'uso di WMI...!
Potevi postare 2 righe di codice in più....



title: Errore di Automazione

text:
[CUT]
Potevi postare 2 righe di codice in più....
Hai perfettamente ragione.
Dim dbas As DAO.Database
Dim RS, rstins As DAO.Recordset
Dim item
Dim Data As String
Dim strdata As String
Dim inizio, fine As Integer
Set dbas = DBEngine.Workspaces(0).Databases(0)
Set RS = dbas.OpenRecordset("VericaFax")
**** For Each item In GetObject("winmgmts://localhost").ExecQuery("select *
from Win32_NTLogEvent where SourceName='Fax Service' And RecordNumber<" &
Me.Min & " and RecordNumber>" & Me.Mag)
Data = item.RecordNumber
    With RS
        .AddNew
        ![Tipo] = item.Type
        ![messaggio] = item.Message
        inizio = InStr(item.Message, "Numero destinatario: ") + 21
        If inizio <> 21 Then
            fine = InStr(inizio, item.Message, ".")
            ![telefono] = Mid(item.Message, inizio, fine - inizio)
        End If
        strdata = Mid(item.timegenerated, 7, 2) & "/" &
Mid(item.timegenerated, 5, 2) & "/" & Mid(item.timegenerated, 1, 4) & " " &
Mid(item.timegenerated, 9, 2) & "." & Mid(item.timegenerated, 11, 2) & "." &
Mid(item.timegenerated, 13, 2)
        ![orario] = CDate(strdata)
        .Update
    End With
Next
**** qui mi da l'errore
Ecco il codice completo.


title: Errore di Automazione

text:
"Giovanni" <
artig...@deejaymail.it
> wrote in message
news:IYAXe.35894$
nT3....@tornado.fastwebnet.it
> [CUT]
Sinceramente non ho trovato errori lampanti, ma ti posto
questo Script che puoi provare per vedere se effettivamente
il SourceName='Fax Service' che passi per filtrare la QRY
č presente ed č corretto:
Dim objWMIService as Object
Dim colLoggedEvents as Object
Dim objEvent as Object
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
    ("Select * from Win32_NTLogEvent " _
        & "Where Logfile = 'System'")
For Each objEvent in colLoggedEvents
    Debug.Print "Category: " & objEvent.Category & VBNewLine _
    & "Computer Name: " & objEvent.ComputerName & VBNewLine _
    & "Event Code: " & objEvent.EventCode & VBNewLine _
    & "Message: " & objEvent.Message & VBNewLine _
    & "Record Number: " & objEvent.RecordNumber & VBNewLine _
    & "Source Name: " & objEvent.SourceName & VBNewLine _
    & "Time Written: " & objEvent.TimeWritten & VBNewLine _
    & "Event Type: " & objEvent.Type & VBNewLine _
    & "User: " & objEvent.User
Next
Se questo funziona ed il tuo no usa questo e modifica quě la
query sostituendo alla condizione WHERE il LogFile con il
SourceName come da te richiesto.
Speriamo bene.....
Ciao



title: Errore di Automazione

text:
"Alessandro Baraldi" <
ik2...@libero.it
> wrote in message
news:f2edd2955d0d5af70d...@mygate.mailgate.org
> "Giovanni" <
artig...@deejaymail.it
> wrote in message
> news:IYAXe.35894$
nT3....@tornado.fastwebnet.it
>
> [CUT]
Ho letto anche quanto dice MSDN e mi viene il dubbio che
nella macchina che non và tu non sia Amministratore
o che tu possa non avere i privilegi....!!!!!
Possibile...?
Se fosse così devi perforza andare tramite Impersonate
passando i dati di un Admin, e ti sarà più semplice
adattare lo script che ti ho passato....!



title: Problema: maschera che non 'aggancia' l'origine dati

author: Panathos

text:
Buongiorno a tutti,
spero che qualcuno possa suggerirmi un workaround per risolvere questo
grosso problema: ho una maschera alquanto fitta di controlli e vari
codici che improvvisamente sembra non riuscire più a "agganciare" la
sua origine dati.
Sto usando Access 97 e non sto trovando informazioni su questo
problema... qualcuno per caso sa come risolvere la situazione?
Cerco di essere dettagliato: la maschera è associata ad una semplice
select su una tabella, e viene aperta da docmd che gli passa "[id]=" &
numero come filtro.
Ho controllato e ricontrollato tutto, anche col supporto di un collega
ma non sembrano esserci errori da correggere... e fino a ieri l'altro
funzionava perfettamente (e da due giorni non la modificavo).
Inoltre provando a creare una maschera "di prova", aprendola con gli
stessi criteri dallo stesso bottone si apre correttamente, quindi
l'origine dati di per sè è a posto.
Che posso fare, oltre a suicid.... rifare tutta la maschera,
controlli, codice da zero???
grazie,
Panathos


author: Simone Calligaris

text:
"Panathos"
spero che qualcuno possa suggerirmi un workaround per risolvere questo
grosso problema: ho una maschera alquanto fitta di controlli e vari
codici che improvvisamente sembra non riuscire più a "agganciare" la
sua origine dati.
(cut)
Che posso fare, oltre a suicid.... rifare tutta la maschera,
controlli, codice da zero???
A parte che dovresti avere delle copie di backup giornaliere del tuo lavoro
... le hai?
Comunque, hai provato a reimportare tutto in un nuovo .mdb?
Oppure creare una Form vuota, e incollare da quella "ballerina", prima tutti
i controlli, poi il codice VB?
Saluti.


text:
On 9 Feb, 14:42, "Simone Calligaris" <
simoc...@libero.it
> wrote:
> A parte che dovresti avere delle copie di backup giornaliere del tuo lavoro
> ... le hai?
Eccome, 6 copie giornaliere per 5 differenti "set" settimanali,
tramite batch fatto da me medesimo... cmq volevo capire come fosse
possibile una cosa del genere, aldilà del sospetto bug. Ed infatti non
mi stavo accorgendo io di quale fosse il problema.
> Comunque, hai provato a reimportare tutto in un nuovo .mdb?
> Oppure creare una Form vuota, e incollare da quella "ballerina", prima tutti
> i controlli, poi il codice VB?
Ti ringrazio, ma alla fine il problema era a dire poco idiota: la
maschera aveva l'impostazione "modalità immissione: si", e pertanto
ogni volta si apriva su un nuovo record... qua ci vogliono un po' di
ferie, altroché... grazie cmq.
ciao,
Panathos


title: routine ciclica

author: Lo

text:
Scusate di nuovo la mia ignoranza in access.
Sto utilizzando questa routine me non fa esattamente quello che
chiedo.
La routine è questa:
Private Sub AggiornaFascia_Click()
Me.Refresh
Dim rstClone
Dim i
Set rstClone = Me.RecordsetClone
For i = 1 To rstClone.RecordCount
rstClone.Edit
       Select Case i
                  Case 1 To 30
                  rstClone.Fields("FasciaAss") = 1
                  rstClone.Fields("PrezzoRiservato") = Me.Prezzo -
(Me.Prezzo * 90 / 100)
                  Case 31 To 110
                  rstClone.Fields("FasciaAss") = 2
                  rstClone.Fields("PrezzoRiservato") = Me.Prezzo -
(Me.Prezzo * 40 / 100)
                  Case 111 To 150
                  rstClone.Fields("FasciaAss") = 3
                  rstClone.Fields("PrezzoRiservato") = Me.Prezzo -
(Me.Prezzo * 20 / 100)
                  Case 112 To 1000
                  rstClone.Fields("FasciaAss") = 4
                  rstClone.Fields("PrezzoRiservato") = Me.Prezzo
                  Case Else
                  Exit For
       End Select
rstClone.Update
rstClone.MoveNext
Next i
End Sub
La routine dovrebbe compilare il campo FasciaAss e funziona, poi
dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
prezzo riservato. L'errore è che non mi prende il prezzo per ogni
record che va ad aggiornare ma fa la percentuale sempre sul primo
record.
Avete qualche suggerimento da darmi?
Grazie


title: routine ciclica

author: Karl Donaubauer

text:
Lo wrote:
> ...

> ...
> La routine dovrebbe compilare il campo FasciaAss e funziona, poi
> dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
> prezzo riservato. L'errore è che non mi prende il prezzo per ogni
> record che va ad aggiornare ma fa la percentuale sempre sul primo
> record.
> ...
"Me.Prezzo" sempre prende il valore dal record attuale nella maschera.
Se vuoi prendere il valore dal record attuale nel rsClone devi sostituire
tutti "Me.Prezzo" nel ciclo con: rstClone.Fields("Prezzo")
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: routine ciclica

author: Carlo Costarella

text:
"Lo" <
loza...@libero.it
> ha scritto nel messaggio
news:4f02549e-8390-4536...@f30g2000yqa.googlegroups.com...
Scusate di nuovo la mia ignoranza in access.
Sto utilizzando questa routine me non fa esattamente quello che
chiedo.
cut
La routine dovrebbe compilare il campo FasciaAss e funziona, poi
dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
prezzo riservato. L'errore č che non mi prende il prezzo per ogni
record che va ad aggiornare ma fa la percentuale sempre sul primo
record.
Avete qualche suggerimento da darmi?
Grazie
Prova cosě:
Private Sub AggiornaFascia_Click()
Me.Refresh
Dim rstClone
Dim i
Set rstClone = Me.RecordsetClone
rstClone.movelast
rstClone.moveFirst
For i = 1 To rstClone.RecordCount
 With rstClone
 Select Case i
 Case 1 To 30
 .Edit
              .Fields("FasciaAss") = 1
              .Fields("PrezzoRiservato") = Me.Prezzo - (Me.Prezzo * 90 /
100)
 .Update
              Case 31 To 110
              .Fields("FasciaAss") = 2
              .Fields("PrezzoRiservato") = Me.Prezzo - (Me.Prezzo * 40 /
100)
              .Update
 Case 111 To 150
              .Fields("FasciaAss") = 3
              .Fields("PrezzoRiservato") = Me.Prezzo - (Me.Prezzo * 20 /
100)
              .Update
 Case 112 To 1000
              .Fields("FasciaAss") = 4
              .Fields("PrezzoRiservato") = Me.Prezzo
              .Update
 Case Else
              Exit For
        End Select
 end with
rstClone.MoveNext
Next i
End Sub
Questo va bene se Me.Prezzo č sempre il valore che devi usare, dunque quello
che vedi a video.
Se il Prezzo deve essere quello del record editato allora ti basta togliere
il Me e lasciare .Prezzo
Ciao, Carlo


title: routine ciclica

text:

> > prezzo riservato. L'errore che non mi prende il prezzo per ogni
> > record che va ad aggiornare ma fa la percentuale sempre sul primo
> > record.
> > ...
>
> "Me.Prezzo" sempre prende il valore dal record attuale nella maschera.
> Se vuoi prendere il valore dal record attuale nel rsClone devi sostituire
> tutti "Me.Prezzo" nel ciclo con: rstClone.Fields("Prezzo")
>
> --
> Ciao
> Karl
> *********
> Access FAQ:
http://www.donkarl.com/it-
 Nascondi testo citato
>
> - Mostra testo citato -
Grazie mille Karl.
Ho provato così:    rstClone.Fields("PrezzoRiservato") =
rstClone.Fields("Prezzo") - (rstClone.Fields("Prezzo") * 90 / 100)
ma non funziona, esce un messaggio che mi dice Elemento non trovato in
questo insieme.
Ho sbagliato qualcosa nella sintassi?
Grazie per la pazienza...


title: routine ciclica

text:
On 29 Mar, 15:47, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Lo" <
lozan...@libero.it
> ha scritto nel messaggionews:4f02549e-8390-4536...@f30g2000yqa.googlegroups.com...
> Scusate di nuovo la mia ignoranza in access.
> Sto utilizzando questa routine me non fa esattamente quello che
> chiedo.
> cut
> La routine dovrebbe compilare il campo FasciaAss e funziona, poi
> dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
> prezzo riservato. L'errore è che non mi prende il prezzo per ogni
> record che va ad aggiornare ma fa la percentuale sempre sul primo
> record.
> Avete qualche suggerimento da darmi?
>
> Grazie
>
> Prova così:

> Questo va bene se Me.Prezzo è sempre il valore che devi usare, dunque quello
> che vedi a video.
> Se il Prezzo deve essere quello del record editato allora ti basta togliere
> il Me e lasciare .Prezzo
>
> Ciao, Carlo
Ciao Carlo grazie mille
ho provato ma mi esce una finestra con errore sia che scrivo .update
sia che scrivo me.update.
Hai qualche suggerimento?
grazie mille ancora ciaol


title: routine ciclica

text:
Lo wrote:
>  Karl Donaubauer wrote:
>>> ...
>>> Dim rstClone
>>> Dim i
>>> Set rstClone = Me.RecordsetClone
>>
>>> For i = 1 To rstClone.RecordCount
>>> rstClone.Edit
>>
>>> Select Case i
>>> Case 1 To 30
>>> rstClone.Fields("FasciaAss") = 1
>>> rstClone.Fields("PrezzoRiservato") = Me.Prezzo -
>>> (Me.Prezzo * 90 / 100)
>>> ...
>>> End Select
>>> rstClone.Update
>>> rstClone.MoveNext
>>> Next i
>>> ...
>>> La routine dovrebbe compilare il campo FasciaAss e funziona, poi
>>> dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
>>> prezzo riservato. L'errore che non mi prende il prezzo per ogni
>>> record che va ad aggiornare ma fa la percentuale sempre sul primo
>>> record.
>>> ...
>> "Me.Prezzo" sempre prende il valore dal record attuale nella
>> maschera. Se vuoi prendere il valore dal record attuale nel rsClone
>> devi sostituire tutti "Me.Prezzo" nel ciclo con:
>> rstClone.Fields("Prezzo")
>
> Ho provato così:    rstClone.Fields("PrezzoRiservato") =
> rstClone.Fields("Prezzo") - (rstClone.Fields("Prezzo") * 90 / 100)
> ma non funziona, esce un messaggio che mi dice Elemento non
> trovato in questo insieme.
> ...
Sembra che nel rstClone non si trova un campo "Prezzo". ;-)
Purtroppo puoi solo sapere tu dove si trova e come si chiama.
Cos'è "Me.Prezzo"?
Se si tratta di un controllo nella maschera cosa si trova nella sua
proprietà "Origine controllo"?



title: routine ciclica

text:

> Access FAQ:
http://www.donkarl.com/it-
 Nascondi testo citato
>
> - Mostra testo citato -
Prezzo è semplicemente un campo  di una tabella dove è indicato il
prezzo, la cosa strana è che se scrivo me.Prezzo funziona e lo vede,
peccato che prende sempre il valore del primo record ...
quindi il campo dovrebbe essere giusto. Inoltre la cosa strana è che
funziona rstClone.Fields("PrezzoRiservato") quindi non capisco dove
stia l'errore...


title: routine ciclica

text:
"Lo" <
loza...@libero.it
> ha scritto nel messaggio
news:8eaff69e-3aa9-4005...@l11g2000yqb.googlegroups.com...


Leggendo l'altro post suppongo che Prezzo non sia un campo del recordset. Se
è un campo calcolato devi scomporlo. Non ti rimane che andare in struttura
della maschera cliccare sul controllo Prezzo, tasto dx, proprietà e leggere
cosa c'è scritto in "Origine controllo".
Ciao, Carlo


title: routine ciclica

text:
On 29 Mar, 21:13, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Lo" <
lozan...@libero.it
> ha scritto nel messaggionews:8eaff69e-3aa9-4005...@l11g2000yqb.googlegroups.com...
> On 29 Mar, 15:47, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
>
>
>
>
>
> > "Lo" <
lozan...@libero.it
> ha scritto nel
> > messaggionews:4f02549e-8390-4536...@f30g2000yqa.googlegroups.com...
> > Scusate di nuovo la mia ignoranza in access.
> > Sto utilizzando questa routine me non fa esattamente quello che
> > chiedo.
> > cut
> > La routine dovrebbe compilare il campo FasciaAss e funziona, poi
> > dovrebbe prendere il prezzo, fare la percentuale e scrivermelo nel
> > prezzo riservato. L'errore che non mi prende il prezzo per ogni
> > record che va ad aggiornare ma fa la percentuale sempre sul primo
> > record.
> > Avete qualche suggerimento da darmi?
>
> > Grazie
>
> > Prova cos :

> > Questo va bene se Me.Prezzo sempre il valore che devi usare, dunque
> > quello
> > che vedi a video.
> > Se il Prezzo deve essere quello del record editato allora ti basta
> > togliere
> > il Me e lasciare .Prezzo
>
> > Ciao, Carlo
>
> Ciao Carlo grazie mille
> ho provato ma mi esce una finestra con errore sia che scrivo .update
> sia che scrivo me.update.
> Hai qualche suggerimento?
> grazie mille ancora ciaol
>
> Leggendo l'altro post suppongo che Prezzo non sia un campo del recordset. Se
> un campo calcolato devi scomporlo. Non ti rimane che andare in struttura
> della maschera cliccare sul controllo Prezzo, tasto dx, propriet e leggere
> cosa c' scritto in "Origine controllo".
> Ciao, Carlo- Nascondi testo citato
>
> - Mostra testo citato -
Grazie mille per i preziosi aiuti... ho trovato l'errore. Da vb mi
prendeva me.Prezzo ma in realtà dovevo scrivere Iscrizione.Prezzo, è
stata una mia svista.
Adesso funziona.Grazie mille di cuore per i vostri post!
Buona serata


title: routine ciclica

author: Geppo

text:

non hai risposto alla domanda di Karl?
Qual'è l'origine controllo di Me.prezzo?
E' "prezzo" il nome del campo che si trova nella tabella che vai a ciclare?
Il fatto che ti dia errore è la prova lampante che "prezzo" non esiste nel
recordset della maschera.
--
Ciao
Geppo


title: stack

author: Giordano

text:
com'è possibile che uno stesso db, usato su un pentiumII 300 64MB RAM Win98
funzioni ed invece usato su un Pentium II 350 32 MB RAM WIn95 mi da "Errore
di run-time '28' Spazio dello stack esaurito" all'apertura di una maschera?
Dipende dal fatto che tutte le maschere hanno il codice in option explicit?
O forse meglio, come gestire lo stack?
Evitate la solita risposta: non parlate di cose che non conoscete!!! IO LO
DEVO FAR FUNZIONARE! La maggior parte delle volte una risposta abbozzata
mette sulla giusta strada!
--
Giordolo sul web!!
http://www.Geocities.com/Giordolo
ICQ 45999881
Sono ottimista. Il bicchiere lo vedo mezzo pieno
.....di merda.
I quattro continenti sono questi tre: l'Asia e l'Africa


title: stack

author: Alessandro Nazzani

text:
Solo un paio di suggerimenti...
L'errore viene generato solo per questo db? e solo per una specifica
form? Possibili tentativi:
1) cancellare la form ed importarla da un db funzionante
2) decompilare il db
3) creare un nuovo db ed importare tutti gli oggetti
Scusa se parlo di cose che non conosco (non bene comunque ;-) ma, come
dici tu, a volte un'idea tira l'altra...
Ciao.
Alessandro
In article <85dqco$2pm$
1...@pegasus.tiscalinet.it
>,
  "Giordano" <
gior...@geocities.com
> wrote:
> com'č possibile che uno stesso db, usato su un pentiumII 300 64MB RAM

Sent via Deja.com
http://www.deja.com/
Before you buy.


title: Reinstallazione di Office 97 prof

text:
Su un vecchio pc con os Win ME avevo installato MS Office 97 Prof.
Ho installato e poi disinstallato MS Office 2000 Prof. Ho reinstallato
Office 97 Prof, funzionano tutte le applicazioni tranne Access. Mi appare
la scritta "Impossibile avviare Microsoft Access. Non è stata concessa
la licenza d'uso su questo computer.". Come faccio ad avviare access?
possiedo entrambe le versioni su CD originale..


title: Reinstallazione di Office 97 prof

author: MA

text:

Guarda
www.donkarl.com/it
 7.3
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Reinstallazione di Office 97 prof

text: grazie mille. Problema risolto


title: Come fare: If casellacombo è vuota then Msgbox "Inserisci valore" else continua

author: Samantha Cicch

text:
Ciao,
ho una form popup. Due caselle combo. Voglio che venga scelta la data
dalla prima cbodata, e un cliente dalla seconda cbocliente.
Per verificare che cbodata sia valorizzato, nella 2° cbocliente
Private Sub cboCliente_click()
On Error GoTo Err_cboCliente_Click
 If Me!cbodata Is Null Then
        MsgBox "Inserire una data per il listino costi materie prime"
  End If
Ma non funziona.
Ho provato anche a mettere
If Me!cbodata = 0 Then
Suggerimenti?
Grazie in anticipo
Samantha


text:

Hai provato con If IsEmpty(Me!cbodata) ?


text:
On 15 Feb, 17:58, "Samantha Cicch" <
samantha.ci...@gmail.com
> wrote:

If IsNull(Me!cboData) then....
@Alex


author: Antonio Biso

text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1171558738.0...@q2g2000cwa.googlegroups.com...
Ciao,
 If Me!cbodata Is Null Then
sigh...
ma che è, na query?!?!
isnull(X)
Antonio


text:
On 15 Feb, 17:58, "Samantha Cicch" <
samantha.ci...@gmail.com
> wrote:

Io ho risolto così; vedi se può andare.
Private Sub cbocliente_GotFocus()
If IsNull(Me.cbodata) Then
MsgBox "Inserire una data per il listino costi materie prime"
End If
Me.cbodata.SetFocus
End Sub


text:
On 15 Feb, 17:58, "Samantha Cicch" <
samantha.ci...@gmail.com
> wrote:

Private Sub cboCliente_BeforeUpdate(Cancel As Integer)
 If IsNull(Me!cbodata) Then
        MsgBox "Inserire una data per il listino costi materie prime"
        Resume Exit_cboCliente_BeforeUpdate
  End If
Exit_cboCliente_BeforeUpdate:
    Exit Sub
Err_cboCliente_BeforeUpdate:
    MsgBox Err.Description
    Resume Exit_cboCliente_BeforeUpdate
End Sub
*************
Nell'IF dovrebbe  se cbodata è vuoto dovrebbe
1)  msgbox "scegli la data da cbodata"
2) uscire  senza selezionare alcun valore da cbocliente
Così mi da  RESUME SENZA ERROR
Private Sub cboCliente_AfterUpdate()
On Error GoTo Err_cboCliente_AfterUpdate
  If IsNull(Me!cbodata) Then
        MsgBox "Inserire una data per il listino costi materie prime"
        Resume Exit_cboCliente_AfterUpdate
  Else
        Dim stDocName As String
        Dim stLinkCriteria As String
        stDocName = "sm_generalistinovendita"
        DoCmd.OpenForm stDocName, , , stLinkCriteria
        DoCmd.Close acForm, "pop1generalistinovendita"
  End If
Exit_cboCliente_AfterUpdate:
    Exit Sub
Err_cboCliente_AfterUpdate:
    MsgBox Err.Description
    Resume Exit_cboCliente_AfterUpdate
End Sub
-------------------------------------------------------------------
Ma così invece va che è una meraviglia
Private Sub cboCliente_AfterUpdate()
On Error GoTo Err_cboCliente_AfterUpdate
  If IsNull(Me!cbodata) Then
        MsgBox "Inserire una data per il listino costi materie prime"
        Me!cboCliente = False
  Else
        Dim stDocName As String
        Dim stLinkCriteria As String
        stDocName = "sm_generalistinovendita"
        DoCmd.OpenForm stDocName, , , stLinkCriteria
        DoCmd.Close acForm, "pop1generalistinovendita"
  End If
Exit_cboCliente_AfterUpdate:
    Exit Sub
Err_cboCliente_AfterUpdate:
    MsgBox Err.Description
    Resume Exit_cboCliente_AfterUpdate
End Sub
Ciao e grazie
Samantha


title: aiuto x maschera e report

author: borti

text:
ciao a tutti
i miei problemi sono questi:
1)Ho creato una maschera assocciata ad una query con tre campi
(ragione,via,citta) con la funzione Me su dopo aggiornamento riesco ad
ottenere in automatico il valore dell campo via inserendo la ragione sociale
nella casella combinata, ma non riesco fara altrettanto con con il campo
citta
2) vorrei che i campi che immetto nella maschera  venissero visualizzati nei
campi che ho messo nel report
3) vorrei che ne l momento vado a stampare il report venisse stampato sol il
report che visualizzato nello schermo
lo so che molto probabilmente sono dei problemi stupidi ma da inesperto non
riesco dargli una soluzione
quindi chiedi il vostro aiuto.
ringrazio fin da adesso  tutti quelli che mi aiuteranno
marco


title: aiuto x maschera e report

author: Roberto - Syd

text:
"borti" <
m_bor...@tiscali.it
> ha scritto nel messaggio
news:ati22a$37e$1...@lacerta.tiscalinet.it...
> ciao a tutti
>
> i miei problemi sono questi:
> 1)Ho creato una maschera assocciata ad una query con tre campi
> (ragione,via,citta) con la funzione Me su dopo aggiornamento riesco ad
> ottenere in automatico il valore dell campo via inserendo la ragione
sociale
> nella casella combinata, ma non riesco fara altrettanto con con il campo
> citta
Cos'è la funzione Me e che cosa fa?
> 2) vorrei che i campi che immetto nella maschera  venissero visualizzati
nei
> campi che ho messo nel report
Fai il report utilizzando come origine dati la query che usi per la
maschera.
> 3) vorrei che ne l momento vado a stampare il report venisse stampato sol
il
> report che visualizzato nello schermo
>
> lo so che molto probabilmente sono dei problemi stupidi ma da inesperto
non
> riesco dargli una soluzione
> quindi chiedi il vostro aiuto.
Guarda lo Help in linea del comando OpenReport e precisamente il Parametro
where.
Es.: DoCmd.OpenReport "NomeReport",,,"[Ragione] = " & Me.txtRagione (dove
txtRagione è il nome del campo della maschera da dove aprirai il report e
Ragione è il nome del campo del report)
Ciao Roberto - Syd



title: Impostare lo stati attivo su di un controllo

author: Luca Carlon

text:
Salve, so che la domanda è ovvia, però ci ho impiegato molte ore senza
successo. Purtroppo conoscere un poco di Visual Basic in questo caso non mi
ha aiutato. Stavo cercando di scrivere in un controllo textbox ed Access mi
dice che prima bisogna dare lo stato attivo al controllo. Allora nella guida
sono riuscito a trovare due sistemi, o Docmd.gotocontrol o
controllo.setfocus. Il secondo mi ha risolto il problema, però mi sono
accorto che si può utilizzare solo nelle maschere. Ora cercavo di scrivere
in una textbox in un report, ma mi dice che il metodo non è consentito nella
visualizzazione corrente. Allora ho pensato di usare il gotocontrol:
docmd.gotocontrol textboxname
però access mi rileva un errore dicendo "tipo di dati errato per
l'espressione errato per uno degli argomenti.
Cosa sbaglio?
Grazie e scusate il disturbo.
Luca Carlon


author: Roberto da casa

text:
"Luca Carlon" <carlo...@NOSPAMemail.it> ha scritto nel messaggio
news:2b7G9.42949$2B1.1...@twister2.libero.it...

Non ha senso cercare di spostare il fuoco su un controllo di un report: in
un report non si può scrivere.
Scusa ma che significato ha digitare un dato in un report?
> Grazie e scusate il disturbo.
>
> Luca Carlon
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:gr7G9.41087$3l.11...@twister1.libero.it...
> Non ha senso cercare di spostare il fuoco su un controllo di un report: in
> un report non si può scrivere.
> Scusa ma che significato ha digitare un dato in un report?
No, aspetta, forse mi sono spiegato male. Io non voglio che l'utente possa
scriverci dentro. A me interessa che io ci possa scrivere. Tanto per dirti,
io ho su di un controllo la durata del documento che sto stampando (ossia il
report) e cercavo di scrivere un altro controllo che riportasse la data di
scadenza. Quindi aggiungo la durata alla data attuale. Per fare questo devo
scrivere su di una textbox o una etichetta. Però se io scrivo come avrei
fatto in Visual Basic:
me.nomecontrollo.text = "Testo"
access mi dice che non posso farlo finchè non avrò impostato lo stato attivo
su quel controllo. Quindi prima devo impostare lo stato attivo e poi ci
potrò scrivere giusto? Oppure sto sbagliando io?
Grazie comunque per la risposta.
Luca Carlon


text:
"Luca Carlon" <carlo...@NOSPAMemail.it> ha scritto nel messaggio
news:AkcG9.42136$3l.11...@twister1.libero.it...

A fronte dell'evento "Su formattazione" della sezione del report che
contiene il controllo scrivi:
me.nomecontrollo = "Testo"
senza indicare la proprietà .txt .



title: Visualizzare etichetta in base a condizioni

author: Roberto

text:
Salve atutti, volevo sapere se vi è mai capitata una cosa del genere:
Ho una checkbox con relativa etichetta su di un report e fino qui tutto ok,
però questa etichetta con relativa check, dovrebbe apparire solo se la check
ha un valore di SI ovvero è spuntata, altrimenti la vorrei invisibile.
Si puo fare?
Grazie a tutti.


author: Emyr

text:


su evento suformattazione del report metti
me.nomecheckbox.visible=me.checkbox=true
Saluti.
Emanuele.


title: Inibizione casella combinata

text:
Salve, alcuni giorni fa avevo chiesto il vostro aiuto su questo
problema, ma forse il fatto di essermi intromesso in altra discussione
che a me sembrava simile a fatto ì che forse il mio post non fosse
notato e quindi lo ripropongo...dunque ho questo problema:
Vorrei che se la casella di controllo è sul NO mi fosse inibito la
scelta di qualsiasi cosa nella casella combinata MODELLI.
Seguendo il post a cui facevo riferimento prima ho usato il seguente
codice:
Private Sub Form_Current()
Me.Modelli.Enabled = Me.MiaCasellaControllo
End Sub
Ma mi da questo errore..
"ERRORE DI COMPILAZIONE: IMPOSSIBILE TROVARE IL METODO O IL MEMBRO
DEI
DATI."
Come risolvere? Grazie fin da subito per l'eventuale aiuto.


title: Inibizione casella combinata

text:
uom...@hotmail.it
 wrote:
> ...
> Vorrei che se la casella di controllo � sul NO mi fosse inibito la
> scelta di qualsiasi cosa nella casella combinata MODELLI.
> Seguendo il post a cui facevo riferimento prima ho usato il seguente
> codice:
>
> Private Sub Form_Current()
> Me.Modelli.Enabled = Me.MiaCasellaControllo
> End Sub
> Ma mi da questo errore..
> "ERRORE DI COMPILAZIONE: IMPOSSIBILE TROVARE IL
> METODO O IL MEMBRO DEI DATI."
>
� il tuo vero codice che usi? Cio� hai un controllo che si
chiama "MiaCasellaControllo"? Se no, posta il tuo codice
con usare copia/incolla.
� anche da consigliare di usare il punto esclamativo per
riferirsi ad oggetti:
Me!Modelli.Enabled = Me!MiaCasellaControllo
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Inibizione casella combinata

text:
On 2 Ott, 15:11, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
>
uomo...@hotmail.it
 wrote:
> > ...
> > Vorrei che se la casella di controllo è sul NO mi fosse inibito la
> > scelta di qualsiasi cosa nella casella combinata MODELLI.
> > Seguendo il post a cui facevo riferimento prima ho usato il seguente
> > codice:
>
> > Private Sub Form_Current()
> > Me.Modelli.Enabled = Me.MiaCasellaControllo
> > End Sub
> > Ma mi da questo errore..
> > "ERRORE DI COMPILAZIONE: IMPOSSIBILE TROVARE IL
> > METODO O IL MEMBRO DEI DATI."
>
> È il tuo vero codice che usi? Cioè hai un controllo che si
> chiama "MiaCasellaControllo"? Se no, posta il tuo codice
> con usare copia/incolla.
>
> È anche da consigliare di usare il punto esclamativo per
> riferirsi ad oggetti:
>
> Me!Modelli.Enabled = Me!MiaCasellaControllo
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Il controllo si chiama abiti ed è un campo si/no ovviamente......
quel codice che ho scritto l'ho copiato da un post precedente come ti
avevo detto ed adattato credevo andasse bene invece mi da l'errore
sopra riportato


title: Inibizione casella combinata

text:
On 2 Ott, 15:11, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
>
uomo...@hotmail.it
 wrote:
> > ...
> > Vorrei che se la casella di controllo è sul NO mi fosse inibito la
> > scelta di qualsiasi cosa nella casella combinata MODELLI.
> > Seguendo il post a cui facevo riferimento prima ho usato il seguente
> > codice:
>
> > Private Sub Form_Current()
> > Me.Modelli.Enabled = Me.MiaCasellaControllo
> > End Sub
> > Ma mi da questo errore..
> > "ERRORE DI COMPILAZIONE: IMPOSSIBILE TROVARE IL
> > METODO O IL MEMBRO DEI DATI."
>
> È il tuo vero codice che usi? Cioè hai un controllo che si
> chiama "MiaCasellaControllo"? Se no, posta il tuo codice
> con usare copia/incolla.
>
> È anche da consigliare di usare il punto esclamativo per
> riferirsi ad oggetti:
>
> Me!Modelli.Enabled = Me!MiaCasellaControllo
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Eppoi un altra cosa...se oltre a quel controllo ne ho un altro.....con
casella di controllo taglia e casella combinata misure...
posso anche in questo fare la stessa cosa? cioè è possibile averne +
di 1 da gestire inibendole se non servono?


title: Inibizione casella combinata

text:
On 2 Ott, 17:22,
uomo...@hotmail.it
 wrote:
> On 2 Ott, 15:11, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
>
>
>
>
>
> >
uomo...@hotmail.it
 wrote:
> > > ...
> > > Vorrei che se la casella di controllo è sul NO mi fosse inibito la
> > > scelta di qualsiasi cosa nella casella combinata MODELLI.
> > > Seguendo il post a cui facevo riferimento prima ho usato il seguente
> > > codice:
>
> > > Private Sub Form_Current()
> > > Me.Modelli.Enabled= Me.MiaCasellaControllo
> > > End Sub
> > > Ma mi da questo errore..
> > > "ERRORE DI COMPILAZIONE: IMPOSSIBILE TROVARE IL
> > > METODO O IL MEMBRO DEI DATI."
>
> > È il tuo vero codice che usi? Cioè hai un controllo che si
> > chiama "MiaCasellaControllo"? Se no, posta il tuo codice
> > con usare copia/incolla.
>
> > È anche da consigliare di usare il punto esclamativo per
> > riferirsi ad oggetti:
>
> > Me!Modelli.Enabled= Me!MiaCasellaControllo
>
> > --
> > HTH
> > Karl
> > *********
> > Access FAQ:
www.donkarl.com/it
>
> Eppoi un altra cosa...se oltre a quel controllo ne ho un altro.....con
> casella di controllo taglia e casella combinata misure...
> posso anche in questo fare la stessa cosa? cioè è possibile averne +
> di 1 da gestire inibendole se non servono?- Nascondi testo citato
>
> - Mostra testo citato -
Bhe vedo che questa volta al momento nessuno mi sa aiutare....Ho
provato da solo mettendo il seguente codice:
Private Sub Abiti_AfterUpdate()
If Me![Abiti] = True Then
   Me![Misure] = True
Else
   Me![Misure] = False
End If
End Sub
Private Sub Form_Current()
If Me![Abiti] = True Then
   Me![Misure] = True
Else
   Me![Misure] = False
End If
End Sub
Ma non funziona...in tabella nel campo misure mi rende il valore 0 se
abiti non è selezionato oppure -1 se lo è.....nella maschera non
succede niente infatti sia che abiti sia selezionato sia che non lo
sia mi permette di scegliere quello che volgio...ma ripeto non lo
riporta in tabella cmq...dove è l'errore?


title: stampa fatture da data a data su più pagine

author: La Pescheria Ancona

text:
Salute a tutti ho un report che mi stampa fatture da una maschera "fatture".
Capita spesso che queste vadano su più pagine; se ne stampo una alla volta
non ho problemi perchè ho inserito un codice nella proprietà su stampa del
piè di pagina report così che il totale di ogni singola fattura compaia solo
sull'ultima pagina.
Siccome con una scadenza periodica devo stampare 70/100 fatture volevo
inserire nella query di origione del report un "between and" nella data
fattura in modo da stamparle tutte assieme.
Come posso fare per suddividere ogni fattura (nel report)? Nelle prove fatte
finora il totale mi finisce in fondo a tutto il report inoltre in una
etichetta ho inserito il "numero di pagine di totale pagine" e compare tutto
il numero di pagine es. 200 anziche il numero reale di ogni fattura....
Grazie Luca.


author: Paolo opg

text:
"La Pescheria Ancona" <
lapesche...@libero.it
> wrote in
news:oBueb.2424$
Sf.7...@twister1.libero.it
:

potresti aprire da codice un recordset con tutti i numeri di fattura che
devi stampare (o cmq con il campo che usi per identificare le singole
fatture).
con questo recordset, apri poi il report una volta per ogni singola
fattura mandandolo poi in stampa.
in questo modo, devi aprire il report 100 volte, ma sei sicuro che ogni
fattura viene stampata indipendentemente dalle altre e nel modo corretto.
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------


text:
"La Pescheria Ancona" <
lapesche...@libero.it
> ha scritto nel messaggio
news:oBueb.2424$Sf.7...@twister1.libero.it...

Immagino che il tuo report sia raggruppato per numero fattura, quindi invece
di stampare il totale nel piè di pagina report stampalo nel piè di pagina di
gruppo che nel tuo caso è il numero fattura.
Quanto al numero di pagine, reimpostalo a 1 per ogni intestazione fattura.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Applicare filtro in sottomaschera annidata in altra sottomaschera

author: alessandro daniel

text:
Buongiorno a tutti,
devo fare questo: sull'evento apertura di una maschera (Maschera1) devo applicare un filtro su una sottomaschera annidata in una sottomaschera di Maschera1.
Ho provato con questo codice:

Me!SFrmBdgIntCostiTot!SFrmBdgIntCostiDett.Form.Filter = "(((QryBdgIntCostiUnione.DocTp)='BF') AND ((QryBdgIntCostiUnione.DocReg)='55'))"
Me!SFrmBdgIntCostiTot!SFrmBdgIntCostiDett.Form.FilterOn = True

ma mi dà subito errore nella prima riga "Errore di runtime 2455:Riferimento non valido alla proprietà Form/Report nell'espressione"

Avevo copiato il codice da un post che ho trovato qui, ma era applicato ad una sottomaschera di "primo livello".

Potete aiutarmi? (sempre che si possa fare)
Alternativamente proverei a inserire tutto l'sql necessario nella proprietà controlsource della sottomaschera di secondo livello, ma penso avrei lo stesso problema che ho con il filtro, perchè sono convinto di sbagliare la sintassi per riferirmi alla sottomaschera... ma non so come si scrive correttamente!

Grazie

Alessandro


title: Query su date consecutive

author: Old-Jack

text:
Salve a tutti,
ho una tabella con i campi ID, cognome, nome, dal, al
il campo Id è un cotatore con chiave primaria;
i campi Cognome e Nome sono dei testo e i campi Dal e Al sono delle date.
Questa tabella è stata riempita circa 4000 record, tra record ora
posso avere id naturalmente diversi, cognome e nome uguali, Dal e Al diversi
ora i devo tirar fuori con una query, tutti quei record che hanno id
diverso, ma nome e cognome uguale con il secondo Dal non compreso tra
l'intervallo di tempo del primo Dal - Al.
Esempio:
   1     Pippo     Pluto       01/02/02     20/02/02
   2     Minni     Topolino  03/02/02     03/03/02
   3     pippo     Pluto       18/02/02     26/02/02
   4     pippo     pluto        27/02/02     03/03/02
La query dovrebbe tirami fuori i record 1 e 3....
Spero di essere stato chiaro
Ciao
  Old-Jack.


title: Query su date consecutive

text:
"Old-Jack" <
spi...@libero.it
> ha scritto nel messaggio
news:Sz1L8.925$K4.1...@twister2.libero.it...

Se la tabella si chiama Tabella1 ed ha una struttura simile a questa:
ID                    Contatore e chiave primaria
Cognome          Testo
Nome               Testo
Dal                   Data/ora
Al                    Data/ora
Prova con una query che ha il seguente codice SQL:
SELECT Tabella1.ID, Tabella1.Cognome, Tabella1.Nome, Tabella1.Dal,
Tabella1.Al
FROM Tabella1
WHERE (((Tabella1.Cognome)=DLookUp("Cognome","Tabella1","ID=" &
Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") & "#")))) AND
((Tabella1.Nome)=DLookUp("Nome","Tabella1","ID=" &
Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") & "#")))) AND
((IIf([ID]=Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") & "#")),1,0))=1)
AND (Not (DLookUp("ID","Tabella1","ID>" & [ID] & " And Cognome=" & Chr$(34)
& [Cognome] & Chr$(34) & " And Nome=" & Chr$(34) & [Nome] & Chr$(34))) Is
Null)) OR (((Tabella1.Cognome)=DLookUp("Cognome","Tabella1","ID=" &
Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") & "#")))) AND
((Tabella1.Nome)=DLookUp("Nome","Tabella1","ID=" &
Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") & "#")))) AND
((IIf([Dal]>=Format(CDate(DLookUp("Dal","Tabella1","ID=" &
Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") &
"#")))),"mm/dd/yyyy"),IIf([Dal]<=Format(CDate(DLookUp("Al","Tabella1","ID="
& Val(DLookUp("ID","Tabella1","Dal=#" &
Format(DMin("Dal","Tabella1","Cognome=" & Chr$(34) & [Cognome] & Chr$(34) &
" And Nome=" & Chr$(34) & [Nome] & Chr$(34)),"mm/dd/yyyy") &
"#")))),"mm/dd/yyyy"),1,0),0))=1));
Io ho provato ed a me funziona.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Query su date consecutive

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message
news:pZlL8.5671$K4.1...@twister2.libero.it...

Grazie Roberto...
gentile come sempre.....


title: Programma da interfacciare a Sqlserver

author: Fabrizio

text:
Salve Ragazzi,
spero che abbiate  passato un felice natale, a tal proposito auguri. :D
Passiamo al dunque:
ho un database cosi impostato un BE installato  su un un computer che
fa da server e 5 il FE su 5 macchine che fungono da client su cui
lavoriamo.
Tutto funziona a meraviglia tranne il fatto che , dopo 2 anni di
utilizzo, è diventato troppo lento, pesante, e sopratutto siccome siamo
in + 3 persone che lavoriamo contemporeaneamente per esempio sulla la
maschera di immissione dati ordini mi crea qualche problema con
l'aggiornamento dei dati etc.etc.
Ora ho letto che è possibile interfacciare  il mio database ad Sql
server, questo mi da la possibiltità di una maggiore ciapienza di dati
e maggiore snellezza e sopattutto di poter lavorare contemporeaneamente
con i miei colleghi.
E vero?
siccome non ho mai fatto una cosa del genre , potreste indicarmi una
guida o qualcosa dove spiega il tutto, cioè come metter il database in
condivisione con SQL SERVER.
Grazie :-Z
--
fabrizio
Mai due cose in uno


title: Programma da interfacciare a Sqlserver

author: ciroteo ®

text:
"Fabrizio" <
f_j...@virgilio.it
> ha scritto nel messaggio
news:mn.d9777d6cc...@virgilio.it...

Cio che tu dici è assolutamente vero. Access supporta un sacco di motori di
database tramite driver specifici o odbc. Sql server è il naturale fratello
maggiore di Jet e troverai un sacco di post a riguardo. Tra l'altro l'ultima
versione di sql sever 2005, la express è addiritttura gratuita e supporta db
fino a 4 giga.
La cosa che però mi perplime del tuo post è che 4 postazioni sono una
bazzeccola anche per il nostro Access. E quindi mi sembra più economico
verificare le ragioni della lentezza prima di pensare ad un porting su sql.
Se poi hai voglia di studiarci dietro è assolutamente un giochino molto
interessante ... quindi le mie parole non hanno più ragion d'essere.
Altrimenti fai queste verifiche:
Hai correttamente diviso front end e back end? Quanto è grande il back end?
Fai compattazioni periodiche del database? Sicuro di non aver problemi di
rete?
ecc...


title: Programma da interfacciare a Sqlserver

author: Alessandro Baraldi

text:
Fabrizio ha scritto:

> fabrizio
Per fare l'upsize a SQL_Server c'è il Wizzard se non erro già da
XP.... quindi non sarebbe un grosso problema.
Come ti ha fatto notare Matteo però io farei qualche verifica prima di
fare la migrazione, che, come sempre non sarà indolore.
Il fatto che sia lento(da capire se sono lente le Form ad aprirsi o
l'elaborazione) può avere origini varie, ne suggerisco alcune, magari
superflue o banali:
1)Compatti regolarmente il BE...?
2)Hai ottimizzato le query con una buona Indicizzazione dei campi...?
3)Hai ottimizzato il piano di esecuzione delle Query
questi primi 3 riguardano l'ottimizzazione di JET
1)Assegni il RecordSource delle Form/SubForm ed il RowSource delle
ListBox/Combo solo su Load...?
Solitamente 5 postazioni non sono troppe per Jet, ma è pur vero che
aumentando la dimensione nonostante l'indicizzazione serva tantissimo
per ridurre traffico di dati in rete, i dati vengono elaborati lato
Client quindi il problema esiste.
SQL_Server ti consente l'elaborazione ServerSide, quindi di certo
avresti un miglioramento delle prestazioni, ma non ti aspettare
miracoli se esegui il Porting del DB(non ottimizzato) su un DB(Server)
....!
Di 3D in merito ne sono stati aperti moltissimi, quindi ti suggerisco
di fare una ricerca in questo ng o in m.p.i.o.a., e vedrai che troverai
molte nozioni sia su come affrontare il porting che a cosa fare
attenzione.....!
Come è ovvio dovrai prima studiare a tavolino la cosa, per non andare
a casaccio, quindi leggi tutto con attenzione....(almeno questo è il
mio modo di fare..)
@Alex


title: Programma da interfacciare a Sqlserver

text:
Alessandro Baraldi ha scritto:

Intanto vi ringrazio per la Risposta .......
allora :
E' vero che raramente effettuo ic compattamento del BE
e pur vero le le uniche lacune in cui pecca il database su cui lavoro
è l'apertura delle mascherè e che se siamo in 2 sulla stessa maschera
di inserimento ordini mi dà errore quando cerco di aggiornare i dati ,
a parte questo funzione alla grande .....
dal 2 punto in poi della lista di Alex non sò prorpio di cosa
parli......
mah  non si finisce mai di imparare.....
il BE è di 7,65 mb ed il FE di 11.516 mb
mi date cortesmente qualche link su qualche 3d che ha affrontato questo
problema......
poi volevo chiedere ad alex cortesemente cosa significhi "m.p.i.o.a"
Grazie


title: Programma da interfacciare a Sqlserver

text:
Fabrizio_LOL ha scritto:
[CUT]
> Intanto vi ringrazio per la Risposta .......
>
> allora :
>
> E' vero che raramente effettuo ic compattamento del BE
[Risposta]
Vedi tu.... io per avere le idee chiare inizierei sempre dalle cose
banali ..... prima
di dire che la macchina che stai guidando non funziona(magari hai le
gomme sgonfie)...!
> e pur vero le le uniche lacune in cui pecca il database su cui lavoro
> è l'apertura delle mascherè e che se siamo in 2 sulla stessa maschera
> di inserimento ordini mi dà errore quando cerco di aggiornare i dati ,
> a parte questo funzione alla grande .....
[Risposta]
Se l'apertura è lenta può essere un difetto causato da una tua
mancanza in fase di
programmazione, come appunto l'assegnazione tardiva dell'origine delle
Form e di tutti
gli oggetti come Combo e ListBox...!
Per il discorso della multiutenza è tutt'altro argomento, non oggetto
del 3D...!
> dal 2 punto in poi della lista di Alex non sò prorpio di cosa
> parli......
>
> mah  non si finisce mai di imparare.....
> il BE è di 7,65 mb ed il FE di 11.516 mb
>
> mi date cortesmente qualche link su qualche 3d che ha affrontato questo
> problema......
Vedi questi:
http://support.microsoft.com/?kbid=889588
http://support.microsoft.com/?kbid=210408
http://support.microsoft.com/?kbid=240434
http://support.microsoft.com/?kbid=209126
Le query sono tanto più veloci quanto più usi in modo mirato gli
Indici e quanto più ottimizzi i piani di esecuzione(vedi ShowPlan) un
pò come un QueryOptimizer ....!
www.sitocomune.com
FAQ: 6.158 Cosa è lo SHOWPLAN di Access
Non sottovalutare che ti serve una migliore conoscenza del Mezzo(JET)
altrimenti gli errori che fai con questo li rifaresti con
SQL_Server....!
> poi volevo chiedere ad alex cortesemente cosa significhi "m.p.i.o.a"
Il NG di Access di casa Microsoft....
> Grazie
@Alex


title: Programma da interfacciare a Sqlserver

author: Simone Calligaris

text:
"Alessandro Baraldi"
[Risposta]
Se l'apertura è lenta può essere un difetto causato da una tua
mancanza in fase di
programmazione, come appunto l'assegnazione tardiva dell'origine delle
Form e di tutti
gli oggetti come Combo e ListBox...!
Anche se va detto che, in generale, non è d'obbligo impostare a Runtime le
origini dati di quegli oggetti per ottenere ottime prestazioni.
Anzi, ci sarebbe molto da discutere sull'utilità effettiva.
Di solito i problemi di performances con gli .mdb sono legati a ragioni
banali che però molti non conoscono.
Questo link (che ho postato 1000 volte) risolve nella maggior parte dei
casi:
http://www.granite.ab.ca/access/performancefaq.htm
Saluti natalizi   ;-)


title: Programma da interfacciare a Sqlserver

text:
Simone Calligaris ha scritto:

Ciao Simone.
Si il link è abbondantemente conosciuto, almeno da me...!
Io non uso il Runtime e di fatto ho effettuato dei test, simili a
quelli proposti da Tony ed ho ottenuto risultati, non così ecclatanti,
ma paragonabili...!(mi riferisco alla riassegnazione On_The_Fly
dell'origine).
Per tutto il resto hai fatto bene a ricordare il Link in quanto
effettivamente a molti possono sfuggire cose che si danno per scontato.
@Alex


title: Programma da interfacciare a Sqlserver

text:
Dopo dura riflessione, Alessandro Baraldi ha scritto :

Grazie Mille
mi metto subito a studiarmi tutto ....ho tanta volgia di imparare
questo fantastico e affascinante mondo .....
vi faccio sapere



title: Accesso remoto

author: All Eyez On me

text:
Come si fa a creare una nuova connessione di accesso remoto da codice ed
avviarla?
Grazie, AEOM


title: Accesso remoto

author: Ringhitt

text:
"All Eyez On me" <
bf-si...@libero.it
> ha scritto nel messaggio
news:a13ogk$lpn$1...@pegasus.tiscalinet.it...
> Come si fa a creare una nuova connessione di accesso remoto da codice ed
> avviarla?
>
> Grazie, AEOM
>
Se si dispone di Windows 2000 e forse Nt l'istruzione è la seguente:
    Dim lngRet As Long
lngRet = Shell("Rasphone -d """ & Me![cmbConnections] & """", 1)
Se si dispone di Window 95/98  il codice dovrebbe essere il seguente.
    Dim lngRet As Long
lngRet = Shell("rundll32.exe rnaui.dll,RnaDial " & Me![cmbConnections], 1)
Dove [cmbConnections] è il nome della connessione di accesso remoto.
Saluti - Ringhitt


title: Accesso remoto

text:
"Ringhitt" <
dfl.a...@tiscalinet.it
> ha scritto nel messaggio
news:a14a0c$2ie$1...@pegasus.tiscalinet.it...

Si ma io devo prima crearla via codice la connessione!!
AEOM


title: Accesso remoto

text:
"All Eyez On me" <
bf-si...@libero.it
> ha scritto nel messaggio
news:a14d4q$57p$1...@pegasus.tiscalinet.it...

Per questa cosa non posso esserti di aiuto
Ciao


title: [OT] Perché Microsoft apre i formati di Office?

author: Gaspare


title: Valore nullo in campo data

author: Ronny

text:
Ciao a tutti,
vorrei rendere nullo (per una serie di controlli con IsNull) un campo DATA
di una tabella, con la seguente istruzione mi da una segnalazione di errore
conv. tra tipi (che però se gli dico di continuare l'aggiornamento viene
fatto)
DoCmd.RunSQL ("UPDATE sch_detta SET sch_detta.dt_fine_lavoro = " & Chr$(34)
& nullo & Chr$(34) _
& " WHERE id = " & identifi)
La variabile nullo contiene il valore Null ed è dichiarata come Variant.
Non si può valorizzare un campo data con un valore nullo ?
Grazie mille a tutti.
Ronny
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Valore nullo in campo data

author: namor

text:
Ronny ha scritto:
> Ciao a tutti,
> vorrei rendere nullo (per una serie di controlli con IsNull) un campo DATA
> di una tabella, con la seguente istruzione mi da una segnalazione di errore
> conv. tra tipi (che però se gli dico di continuare l'aggiornamento viene
> fatto)
> DoCmd.RunSQL ("UPDATE sch_detta SET sch_detta.dt_fine_lavoro = " & Chr$(34)
> & nullo & Chr$(34) _
> & " WHERE id = " & identifi)
> La variabile nullo contiene il valore Null ed è dichiarata come Variant.
> Non si può valorizzare un campo data con un valore nullo ?
> Grazie mille a tutti.
> Ronny
Tu cerchi di assegnare al campo dt_fine_lavoro il valore "nullo".
Non puoi assegnare ad un campo di tipo Data/ora una stringa a meno che non
rappresenti una data, nel qual caso viene fatta una conversione automatica.
La sintassi corretta è
  SET dt_fine_lavoro = Null
senza doppi apici, perchè Null è una costante predefinita, non va inserito
come stringa.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Formato ora corretto

author: BC

text:
In una form ho una txtbox  non associata (txtora, Formato: Ora breve 24h,
maschera di input :99\.00;0;*) dove inserisco l'ora ed un pulsante di
comando normalmente non funzionante ma visibile, che dà seguito ad una
procedura (non descrivo il resto per amore di brevità..)
vorrei realizzare quanto segue:
se l'ora immessa è valida (cioè non sono le  25:57) allora
    rendi funsionante il pulsante
fine se
(qualcuno potrà inorridire di fronte al VB italiano...)
grazie dell'aiuto
BC


title: Formato ora corretto

author: Marco Pizzamiglio

text:
BC ha scritto:
> In una form ho una txtbox  non associata (txtora, Formato: Ora breve 24h,
> maschera di input :99.00;0;*) dove inserisco l'ora ed un pulsante di
> comando normalmente non funzionante ma visibile, che dà seguito ad una
> procedura (non descrivo il resto per amore di brevità..)
> vorrei realizzare quanto segue:
> se l'ora immessa è valida (cioè non sono le  25:57) allora
>     rendi funsionante il pulsante
> fine se
> (qualcuno potrà inorridire di fronte al VB italiano...)
> grazie dell'aiuto
> BC
Dim OK As Boolean
    OK = False
    If IsDate(Me.criterio) Then
      If CDate(Me.criterio) < 1 Then
        OK = True
      End If
    End If
    Me.pulsante.Enabled = OK
    If Not OK Then MsgBox "Hai inserito un'ora non valida"
La maschera di input e il formato ora li puoi anche togliere se ti
disturbano, tanto fai già i controlli qua.
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: Come creare qry che prenda solo gli N migliori clienti?

author: Il Druido

text:
Ciao a tutti.
Ho una tabella con sostanzialmente tre informazioni: nome
venditore, cliente e totale ordini.
Vorrei avere in una query solo, ad
esempio, i 20 migliori clienti per ogni venditore, con il relativo totale
ordini per ognuno di essi.
Esiste un modo semplice senza VBA in Access?
Grazie
--------------------------------
Inviato via
http://usenet.iol.it


author: OndaMax

text:
Il 28 Gen 2002, 17:35,
ildr...@freemail.it
 (Il Druido) ha scritto:
>
>Vorrei avere in una query solo, ad
>esempio, i 20 migliori clienti per
ogni venditore, con il relativo totale
>ordini per ognuno di essi.
>Esiste un modo semplice senza VBA in Access?
Sulle proprietą di query
... Numero Max records.
OndaMax



author: ramblers

text:
"Il Druido" <
ildr...@freemail.it
> ha scritto nel messaggio
news:155Z140Z123Z250...@usenet.iol.it...

Con il predicato TOP dell''istruzione SELECT puoi estrarre un certo numero
di record ( i primi x)
vedi se fa al caso tuo.
ciao.


title: Compattare access97...

author: Marduk

text:
Se si usa l'istruzione dbengine.compactdatabase devo specificare 2 percorsi
differenti.
E' possibile farlo con lo stesso db, oppure devo cancellare il vecchio e
rinominare il nuovo?
Grazie


title: Compattare access97...

author: Silvio Berruti

text:
"Marduk" <
luca.tr...@tiscali.it
> ha scritto nel messaggio
news:afhb0t$gb8$1...@lacerta.tiscalinet.it...

Vedere soluzioni proposte nel Sito Comune.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Casella composta e inserimento dei valori nelle colonne in 2campi diversi nella stessa maschera

text:
Salve  prima di tutto mi scuso per aver postato un messaggio uguale
nel NG 'database' non ero al corrente dell'esistenza di questo NG -)
uso access veramente saltuariamente  mi sono messo a creare  un
piccolo db  con ACCES  che  tramite l'utilizzo di una casella composta
mi preleva dei dati da una tabella a 2 colonne e dovrebbe immettere i
2 valori selezioanti  in 2 campi separati allora la prima colonna
usando l'autocomposizione  viene effettivamente passata all'altra
tabella mentre la seconda colonnanon riesco a inserirla nel campo del
secondo database.
esiste un metodo veloce  e senza ricorrere al vba  vba ?
allora il db e cosi strutturati

Maschera di  con  la casella composta che preleva i dati dal dalla
tabella A e ha tutte le caselle di testo che puntano al db B
tabella A
commessa ,  reparto  (il valore commessa vien correttamente
memorizzato nel campo
tabella b
vari campi +  commessa  + reparto
allora commessa funziona  e vengono passati i dati
mentre nel campo reparto non viene inserito nulla
ho provato con
defaultvalue=[a]![commessa]![column](2) senza nessun risultato mentre
se lo applico ad un repor generato dalla stessa maschera sembra
funzionare inserendo al suddetta relazione in un field.
... qualcuno puo darmi aiutare ?
Hoa ttualmente ovviato al problema creando 2 caselle composte in cui
una  mi punta il primo campo della tabelle e  trasferisce i dati
e la seconda trasferisce i darti dels econdo campo ma sinceramente non
e' un meotdo molto elegante.
Saluti Roberto


author: MA

text:
Il 19 Feb 2003, 01:22,
noS...@sorry.com
 (Bob0) ha scritto:
> Salve prima di tutto mi scuso per aver postato un messaggio uguale
> nel NG 'database'
Questo assolutamente non č un problema
>non ero al corrente dell'esistenza di questo NG -)
questo č gravissimo... cmq
>
> uso access veramente saltuariamente mi sono messo a creare un
> piccolo db con ACCES che tramite l'utilizzo di una casella composta
> mi preleva dei dati da una tabella a 2 colonne e dovrebbe immettere i
> 2 valori selezioanti in 2 campi separati allora la prima colonna
> usando l'autocomposizione viene effettivamente passata all'altra
> tabella mentre la seconda colonnanon riesco a inserirla nel campo del
> secondo database.
>
> esiste un metodo veloce e senza ricorrere al vba vba ?
Una 'ndecchia di vba serve purtroppo.
Allora te ne vai nel codice e sull'evento
tuacasellacombianata_afterupdate
me.tuosecondocampo = me.tuacasellacombinata.column(1)
end sub
La "punteggiatura" č importante rispetta questa, l'indice nelle parentesi
della column conta le colonne della casella combinata (a proposito si chiama
cosě non composta) partendo da 0.
In fin dei conti eri molto piů vicino di quanto tu stesso pensassi.
FAcci sapere se hai problemi
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


author: Antonio Biso

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:151Z26Z60Z185Y1...@usenet.libero.it...
> In fin dei conti eri molto più vicino di quanto tu stesso pensassi.
> FAcci sapere se hai problemi
A gente che scrive questi subject tanto di cappello!!!!
Antonio


title: stampa report

author: Massimo

text:
Volevo chiedere se è possibile fare questo:
ho una tabella con  record ed diversi campi,
campo A
campo B
campo C
ecc
ecc
volevo far si che in maschera quando il campo A è vuoto ( Null ) prenda come
dato ad es. il campo B ( o il campo C , a mia impostazione e scelta )
Si Può ?
Per farla breve ho dei clienti, vorrei che prendesse l'indirizzo della
destinazione della merce, quando e differente dalla sede di essi.
Penso di essere stato chiaro.
Saluti a tutti, chi mi aiuta e no - - Max


title: stampa report

author: Basjlico

text:


Crei tre controlli sul form associati ai dati A B e C. Li nascondi
Poi crei una etichetta e sull'evento formattazione scrivi una cosa del
genere.
If isnull(me.A) then
 if isnull (me.B) then
  if isnull(me.C) then
   me.etichetta.caption = "Niente"
  end if
 else
  me.etichetta.caption = me.B
 end if
else
me.etichetta.caption = me.A
end if


title: report con campi affiancari e non incolonnati

author: luigionofrio

text:
ho una tabella anagrafe e una dati
nella tabella anagrafe ho tra gli altri "cognome" e CF
nella tabella dati ho un campo "Lettera" (max 4 valori -a,b,c,d,- )
facendo un report raggruppato per anagrafe.CF mi da ad ogni nome la
lettera incolonnata,
tipo:
pinco pallino
a
b
c
caio
a
b
c
d
sempronio
a
c
io vorrei un report con la lettera affiancata e non incolonnata
tipo:
pinco pallino    a  b  c
caio             a  b  c  d
sempronio        a  c
come posso fare?
grazie
luigi
io vorrei una lista con
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Sergio MAZZA

text:
"luigionofrio" <
onofrio...@tin.it
> ha scritto nel messaggio
news:fdb3kq$f04$1...@news.newsland.it...

Forse una query pivot?
Ciao.
--
Sergio MAZZA


text:
Sergio MAZZA ha scritto:

> Forse una query pivot?
> Ciao.
e come la faccio? io ho trovato query di accodamento di eliminazione di
accodamento , tabelle pivot, ma come query pivot nella mia ignoranza non
ci arrivo!|
l.



author: sv

text:
luigionofrio ha scritto:
> Sergio MAZZA ha scritto:

> > Forse una query pivot?
> > Ciao.

Ciao Luigi
Che vuoi.. è in romanesco..
"Query a campi incrociati"...
--
sv



text:
sv ha scritto:
> luigionofrio ha scritto:
> > Sergio MAZZA ha scritto:

> > > Forse una query pivot?
> > > Ciao.

> Ciao Luigi

> --
> sv
:-)))
si l'ho capito interrogando google!
grazie
l.



text:
sv wrote:
> Ciao Luigi
>
> Che vuoi.. è in romanesco..
Tu si che mi capisci...
> "Query a campi incrociati"...
>
> --
> sv
>
> --
Ciao.
--
Sergio MAZZA


title: R: assocciare una query ad un controllo

author: TORE MOLISSO

text:
Fabio Sangiorgio <
fabio.sa...@capfvg.it
> wrote in message
98qb8u$k1f$1...@half.spin.it...
>
> "TORE MOLISSO" <
fmo...@tin.it
> ha scritto nel messaggio
> news:un1s6.42731$yl2.1...@news1.tin.it...
> > io ho una maschera associata ad una tabella adesso voglio assocciare uno
> > dei controlli della maschera ad un campo calcolato di una query come
> faccio?
> >
> > Associa la form alla query (che deve essere basata sulla tabella...) e
non
> alla tabella; poi nella propr. Controlsource del controllo associ il campo
> calcolato che hai nella query.
> >
> >
>
scusa non ho capito che vuol dire assoccia la form alla query,
 la form e basata  sulla  tabella?
>


title: R: assocciare una query ad un controllo

text:
TORE MOLISSO <
fmo...@tin.it
> wrote in message ...

>  la form è basata  sulla  tabella  e come deve scrivere nella propieta
origine di controllo
> >
>
>


title: [?]casellacombinata

author: LTomasi

text:
ciao...
(access 2000 e SO win2000)
ho una casellacombinata che e' costruita su 3 colonne ,visualizza la
prima(breve descrizione),
la seconda e' associata ad un campo di una tabella1 , la terza e' una
descrizione .
carico i dati con una "select campo1,campo2,campo3 from tabella2".
il problema e' che quando seleziono righe che hanno lo stesso lo stesso
valore nella colonna2
mi visualizza sempre la descrizione breve del primo record che trova nella
casellacombinata.
es.
aa         0         valore1
bb        32        valore2
cc         0         valore3
se clicco la mia scelta su "cc       0       valore3"
mi visualizza sempre la descrizione breve   "aa"
come risolverla???
bye by luigi


title: [?]casellacombinata

author: Alessandro Romeo

text:
"LTomasi" <
lto...@tiscalinet.it
> ha scritto nel messaggio
news:QwQa8.70395$3J1.2...@news2.tin.it...

Che codice hai dietro la casella combinata?
Se fai sapere magari si trova l'errore.
Ciao Alessandro


title: [?]casellacombinata

text:
"Alessandro Romeo"  ha scritto nel messaggio
> Che codice hai dietro la casella combinata?
> Se fai sapere magari si trova l'errore.
scusa l'ignoranza ma essendo un povero programmatore VB6 e connessi :-)))
che non ha molta esperienza su MS access
penso che per codice tu  intenda quello dell'editor di vba
allora ti posso dire che non ho codice su questa casella combinata
ho fatto tutto impostando le proprieta della casellacombinata
che ti elenco x non fare errori(quelle salienti :))   )
origine controllo   = campoAssociato               (il nome del campo al
quale sono associato nella tabella1)
tipo origine riga    =Tabella/query
origine riga           =select campo1,,........ from tabella2
larghezza colonne =2 cm;2 cm;4 cm
numero colonne   =3
colonna associata =2
mi funge tutto in automatico
bye by luigi


title: [?]casellacombinata

text:
"LTomasi" <
lto...@tiscalinet.it
> ha scritto nel messaggio
news:FWQa8.70509$3J1.2...@news2.tin.it...

Dovresti provare a cambiare il valore della colonna associata che e' quello
che da la valorizzazione del campo.Se metti 1 dovresti aver risolto il
problema.
Ciao, fammi sapere
Alessandro


title: [?]casellacombinata

text:
"Alessandro Romeo"  ha scritto nel messaggio
> Dovresti provare a cambiare il valore della colonna associata che e'
quello
> che da la valorizzazione del campo.Se metti 1 dovresti aver risolto il
> problema.
si in questo modo mi visualizza la descrzione breve giusta!
 pero' a me interessa associare la colonna 2 in quanto ha un valore numerico
significativo (e' la % iva ) che poi utilizzo x calcolarmi il valore da
mettere in un'altra casella di testo di sola visualizzazione.
 bye by luigi


title: [?]casellacombinata

text:
Il 14 Feb 2002, 17:27, "LTomasi" ha scritto:
>si in questo modo mi
visualizza la descrzione breve giusta!
> pero' a me interessa associare la
colonna 2 in quanto ha un valore
>numerico
>significativo (e' la % iva )
che poi utilizzo x calcolarmi il valore da
>mettere in un'altra casella di
testo di sola visualizzazione.
.
Con il permesso di A.R. ...
Potresti
sempre fare riferimento all'iva utilizzando il Column;
NomeCombo.Column(1)
ti consente di fare riferimento alla colonna specifica della tua combo
anche se non è associata a valore.
Ciao
OndaMax
--------------------------------
Inviato via
http://usenet.iol.it


title: [?]casellacombinata

text:
"OndaMax" <
ond...@libero.it
> ha scritto nel messaggio
news:195Z120Z177Z2Y1...@usenet.iol.it...
> Il 14 Feb 2002, 17:27, "LTomasi" ha scritto:
>
> >si in questo modo mi
> visualizza la descrzione breve giusta!
> > pero' a me interessa associare la
> colonna 2 in quanto ha un valore
> >numerico
> >significativo (e' la % iva )
> che poi utilizzo x calcolarmi il valore da
> >mettere in un'altra casella di
> testo di sola visualizzazione.
>
> .
> Con il permesso di A.R. ...
Ci ma ncherebbe altro lascio spazio al sapere di tutti senza infuriarmi
> Potresti
> sempre fare riferimento all'iva utilizzando il Column;
> NomeCombo.Column(1)
> ti consente di fare riferimento alla colonna specifica della tua combo
> anche se non è associata a valore.
Era il rpossimo suggerimento se qs. non andava bene
>
> Ciao
Ciao
> OndaMax
Alessandro



title: [?]casellacombinata

text:
"OndaMax"  ha scritto nel messaggio
> Il 14 Feb 2002, 17:27, "LTomasi" ha scritto:
> Con il permesso di A.R. ...
> Potresti
> sempre fare riferimento all'iva utilizzando il Column;
> NomeCombo.Column(1)
> ti consente di fare riferimento alla colonna specifica della tua combo
> anche se non è associata a valore.
sicuramente sara' questa la soluzione che adottero' (tanks)
pero' quando mi riferivo all'oggetto che andava solo in visualizzazione
era il campo calcolato sottindendo che il campo associato nella
 casellacombinata comunque mi deve
rimanere significativo nella tabella  in quanto viene riutilizzato
sicuramente
(non conosco bene l'applicativo) in un'altra maschera.
grazie cmq x il vostro prezioso aiuto
bye by luigi


title: Aiuto, "Nessun valore specificato per alcuni parametri necessari"

author: Wrugaian

text:
Dim strSQL As String
Dim conteggio As Integer
Dim objRS As ADODB.Recordset
Set objRS = New ADODB.Recordset
strSQL = "SELECT COUNT(idInserimento) AS Conteggio FROM QryConteggio"
objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
conteggio = objRS("Conteggio")
objRS.Close
Set objRS = Nothing
Mi restituisce l'errore di cui all'oggetto.
Idee? L'help su questo errore mi rimane bianco!
Grazie


text:
Ho dimenticato di riferire che il debug segna come riga che genera l'errore
quella dell'apertura:
objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
"Wrugaian" <wrugai...@NOSPAMemail.it> ha scritto nel messaggio
news:XZCPf.24590$A83.6...@twister1.libero.it...



author: Alessandro Cara

text:
Wrugaian wrote:
> Ho dimenticato di riferire che il debug segna come riga che genera l'errore
> quella dell'apertura:
> objRS.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
1) Hai  sbagliato un nome di campo (forse in qryconteggio)
2) Tutti hanno bisogno di "aiuto" quindi e' superfluo nel soggetto
3) Per favore scrivi in coda al messaggio cui rispondi
--
ac


text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:49DPf.21888$
ou2....@tornado.fastwebnet.it
.
..
> 1) Hai  sbagliato un nome di campo (forse in qryconteggio)
Il nome di campo è corretto. La stringa SQL come struttura di nuova query
funziona bene. Se cerco di accedere alla nuova query così generata da VBA,
medesimo errore.
> 2) Tutti hanno bisogno di "aiuto" quindi e' superfluo nel soggetto
Io di solito chiedo consigli su cose che so fare e che potrei fare meglio..
in questo caso era una richiesta di aiuto perchè mi sembra che sia tutto in
ordine, non riesco a procedere, quindi ho ritenuto opportuno specificarlo.
> 3) Per favore scrivi in coda al messaggio cui rispondi
Ho risposto a me stesso.. era un'aggiunta per una cosa che avevo dimenticato
di scrivere; mi sembrava più intelligente lasciarla in testa al messaggio.


text:
Wrugaian wrote:
> "Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
> news:49DPf.21888$
ou2....@tornado.fastwebnet.it
.
> ..
>
>>1) Hai  sbagliato un nome di campo (forse in qryconteggio)
>
>
> Il nome di campo è corretto. La stringa SQL come struttura di nuova query
> funziona bene. Se cerco di accedere alla nuova query così generata da VBA,
> medesimo errore.
Non mi riferivo a "Conteggio" citavo qryconteggio. Quel messaggio e' un
classico. Eseguendo qryconteggio da sola funziona?
2-3) Per me puoi fare quello che vuoi. Ho scritto solo due "suggerimenti".
--
ac


text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:xNEPf.22129$ou2....@tornado.fastwebnet.it...
> Non mi riferivo a "Conteggio" citavo qryconteggio. Quel messaggio e' un
> classico. Eseguendo qryconteggio da sola funziona?
Ed è questo che mi fa impazzire.. da sola funziona.. è quando la richiamo da
VBA che non funziona +..


text:

mi fai la cortesia. Copi e incolli l'sql di qryconteggio.
--
ac


text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:T1GPf.22282$ou2...@tornado.fastwebnet.it...
> mi fai la cortesia. Copi e incolli l'sql di qryconteggio.
SELECT * FROM tblConsuntivo
WHERE (((tblConsuntivo.Data)<=[Forms]![mscInserimento]![DataFine] And
(tblConsuntivo.Data)>=[Forms]![mscInserimento]![DataInizio]));
che con Form aperta funziona regolarmente.. a form chiusa mi chiede il
valore delle 2 variabili data.. e funziona regolarmente.
Anche queryprova:
SELECT COUNT(idInserimento) AS Conteggio
FROM QryConteggio;
funziona regolarmente in access..
Ma se cerco di accedere a questa o a all'altra, o anche direttamente a
tblConsuntivo ho errore.
Io credo sia il WHERE sulla data.. ma pensavo che accedendo a una query già
fatta VBA non mi facesse problemi.


text:
Forse ho risolto..
Ho tolto il riferimento alle date nella query e apro la query così:
strSQL = "SELECT COUNT(idInserimento) AS Conteggio FROM QryConteggio WHERE
Data>=#" & Format(Forms("mscInserimento").Controls("DataInizio"),
"dd-mmm-yyyy") & "# AND Data<=#" &
Format(Forms("mscInserimento").Controls("DataFine"), "dd-mmm-yyyy") & "#"
Dove con [Forms]![mscInserimento] ecc.. mi dava errore e senza la
formattazione della data mi prendeva l'8 marzo come il 3 agosto.
Che fatica...


text:

non i sembra che tu possa eseguire una sql che richiama una  query con
parametri variabili (i.e. DataFine e Datainizio) devi impostarli tu come
"parameters". C'e' piu' di un post sull'argomento. Mi sembra ci sia
qualcosa al riguardo anche nel sito di Karl.
In questi casi personalmete uso un metodo molto spartano.
Metto dei parametri di sostituzione facilmente riconoscibili, mi faccio
dare l'sql via querydef e sostituisco con replace i parametri variabili
con i valori effettivi.
Questa soluzione prevede che si usi DAO.
Questo e' un esempio:
Set qdef = CurrentDb.QueryDefs("AX_PreparaFatturabile")
sSQL = Replace(qdef.SQL, "%1%", cbxVal)
DoCmd.RunSQL sSQL
Ovviamente l'altra soluzione e' costruire dinamicamente l'sql.
--
ac


text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:usJPf.22726$ou2....@tornado.fastwebnet.it...
> non i sembra che tu possa eseguire una sql che richiama una  query con
> parametri variabili (i.e. DataFine e Datainizio) devi impostarli tu come
> "parameters". C'e' piu' di un post sull'argomento. Mi sembra ci sia
> qualcosa al riguardo anche nel sito di Karl.
Non mi ero reso conto che fosse collegato al mio problema.. Uso una qry con
parametri variabili simile a questa come origine record di un report,
pensavo di poterci lavorare anche con VBA.
> In questi casi personalmete uso un metodo molto spartano.
> Metto dei parametri di sostituzione facilmente riconoscibili, mi faccio
> dare l'sql via querydef e sostituisco con replace i parametri variabili
> con i valori effettivi.
> Questa soluzione prevede che si usi DAO.
> Questo e' un esempio:
[cut]
Interessante possibilitŕ a cui non avevo pensato. Grazie..
Io ho risolto costruendo la SQL come postato poco fa.
Il fatto č che io avevo cominciato proprio in quel modo, ma passando il
parametro con [Forms]![NomeForm]![ecc...] e NON funzionava.
Ho ripreso quella SQL passando il parametro con
Forms("NomeForm").Controls("NomeControllo") e ha funzionato..
Evidentemente c'era un errore che non vedevo prima e poi mi sono imbarcato
nella costruzione di una query andando incontro al problema che mi hai detto
tu.
Ciao


title: Annullare un evento tramite codice.....

author: Gianni B

text:
Avendo questo  evento aplicato ad un pulsante di comando che mi copia un
record da una tabella in un altra avrei il bisogno di poter annulare questa
operazione da codice tramite un messagio di avviso...
cioü vorrei far apparire una Msgbox in cui posso cliccare su ok ,per copiare
o su no per annullare.......è possibbile?
Private Sub Comando133_Click()
On Error GoTo Err_Comando133_Click
    Dim stDocName As String
     Dim stLinkCriteria As String
    stDocName = "Copia"
     stLinkCriteria = "[Wagon_N°]=" & "'" & Me![Wagon_N°] & "'"
   DoCmd.OpenQuery stDocName, acNormal, acEdit
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
   Form_Wagon_Bestand.Artikel1.Requery
Exit_Comando133_Click:
    Exit Sub
Err_Comando133_Click:
    MsgBox Err.Description
    Resume Exit_Comando133_Click
Grazie 1000
--
Gianni B.


title: Annullare un evento tramite codice.....

text:
"Gianni B" <
gian...@bluewin.ch
> ha scritto nel messaggio
news:3ea95b20$1...@news.bluewin.ch...
> Avendo questo  evento aplicato ad un pulsante di comando che mi copia un
> record da una tabella in un altra avrei il bisogno di poter annulare
questa
> operazione da codice tramite un messagio di avviso...
> cioü vorrei far apparire una Msgbox in cui posso cliccare su ok ,per
copiare
> o su no per annullare.......è possibbile?
> Private Sub Comando133_Click()
> On Error GoTo Err_Comando133_Click
If Msgbox("Vuoi proseguire?",vbYesNo) = vbYes Then
>
>     Dim stDocName As String
>      Dim stLinkCriteria As String
>
>     stDocName = "Copia"
>      stLinkCriteria = "[Wagon_N°]=" & "'" & Me![Wagon_N°] & "'"
>    DoCmd.OpenQuery stDocName, acNormal, acEdit
>     DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
>     DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
>    Form_Wagon_Bestand.Artikel1.Requery
End if
>
> Exit_Comando133_Click:
>     Exit Sub
>
> Err_Comando133_Click:
>     MsgBox Err.Description
>     Resume Exit_Comando133_Click
> Grazie 1000
> --
> Gianni B.
>
Ciao.
--
Sergio MAZZA


title: Annullare un evento tramite codice.....

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:b8bvd9$i6i$1...@canarie.caspur.it...

Grazie Sergio sei un drago.
--
Gianni B.


title: Percentuale in query a campi incrociati

author: Simon

text:
salve a tutti! Il mio problema è questo: come si fa a far uscire da una
query a campi incrociati una percentuale invece che un valore?. Nella riga
"Formula" trovo Conteggio, Somma, Max, Min, Media, ecc. ma niente che abbia
a che vedere con le percentuali!. Devo modificare il codice SQL? Devo fare
una funzione? Aiuto!
Grazie,
Simona


title: Percentuale in query a campi incrociati

text:
Sulle righe della query a campi incrociati ho il tipo di impiego (es:
Impiegato, artigiano, Libero professionista, apprendista, ecc). Sulle
colonne ho l'età (es: 20, 21, 22,.......ecc). Nell'intersezione fra riga e
colonna non voglio vedere il numero assoluto di quanti 20-enni fanno gli
apprendisti (in questo caso userei "Conteggio"dalla riga della Formula) ma
la percentuale rispetto al totale degli apprendisti.
Simona
"Simon" <
ins...@virgilio.it
> ha scritto nel messaggio
news:446642e1$0$14778$4faf...@reader4.news.tin.it...



title: Percentuale in query a campi incrociati

author: PBsoft

text:
Al posto del valore che ti viene visualizzato, puoi utilizzare un valore
calcolato.
Posta il codice SQL della query a campi incrociati.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: valore generale da richiamare nei criteri delle query

author: Dragons

text:
Gentilissimi,
sono a 0 per il codice, quidni scusate la mia ignoranza...
ho bisogno di impostare in un modulo un numero es "2008" (la cosa
migliore da una imputbox.. imposterei il valore - ad ogni accesso
varia l'anno considerato, inoltre può esserci la possibilità di
cambiare mentre operiamo  sul database) e così da richiamarlo nei
criteri delle query, per filtrare automaticamente tutti i dati (che
corrisponderanno all'anno 2008 in questo caso).
gentilmente qualcuno potrebbe farmi un piccolo esempio,
infinite grazie


author: Pablitomf

text:
"Dragons" <
d...@timely.it
> ha scritto nel messaggio
news:146627c0-d57c-4844...@c19g2000prf.googlegroups.com...



infinite grazie
-----------------------
Risposta :
Select * from Tua_Rabella where Like Anno=[Digita anno :]
in questo caso l'esecuzione dell'sql ti richiede da una inputbox la
digitazione dell'anno...
puoi sostituire il [Digita anno:] con il percorso ad esempio di una casella
di testo di una Form... e quindi poter cambiare anno ogni qualvolta ti va
per visualizzare i dati che ti servono


text:
Ti ringrazio, è una buona soluzione,
comunque rilevo la (mia) necessità di non avere una form attiva
(soluzione ripeto non male)
ma è possibile far memorizzare solo nel codice il valore es:  2008
anche solo per il temporaneo uso del database, (avevo pensato ad una
inputbox ma sono un po scarso in materia..)
se poi posso in qualche modo modificarlo ... altrimenti riavvio il
database
Ti ringrazio nuovamente,
inoltre i miei complimenti ho letto molti tuoi post
Saluti
Dragons


text:
"Dragons" <
d...@timely.it
> ha scritto nel messaggio
news:405f240f-1196-454a...@q27g2000prf.googlegroups.com...
Ti ringrazio, è una buona soluzione,
comunque rilevo la (mia) necessità di non avere una form attiva
(soluzione ripeto non male)
ma è possibile far memorizzare solo nel codice il valore es:  2008
anche solo per il temporaneo uso del database, (avevo pensato ad una
inputbox ma sono un po scarso in materia..)
se poi posso in qualche modo modificarlo ... altrimenti riavvio il
database
----------------------------------
Risposta :
A quanto pare allora non mi hai capito...
Select * from Tua_Rabella where Like Anno=[Digita anno :]
è già quel che cerchi...
hai detto :
"la cosa migliore da una imputbox.. imposterei il valore - ad ogni accesso
varia l'anno considerato, inoltre può esserci la possibilità di cambiare
mentre operiamo  sul database"
Bhè quell'SQL ti da proprio quello che hai chiesto sopra (anche se
l'itagliano lascia un pò a desiderare :D )... una inputBox in cui ti viene
chiesto ad ogni accesso alla query "Digita anno:"... dopo averlo digitato,
la query stessa ti restituisce i record filtrati solo di quell'anno...
Quindi 2 sono le cose... ho hai pasticciato con la spiegazione, o non hai
provato la mia soluzione, o resterebbe l'ipotesi NON HO CAPITO, ma visto
quanto hai scritto mi sembra improbabile...
che poi "ho bisogno di impostare in un modulo un numero " significa nulla...
--
---
Ciao
Pablitomf


text:
Hai proprio ragione, non ho capito la spiegazione (scusa la mia
ignoranza)
in effetti funziona. Ho pasticciato la prova ...
Ti ringrazio nuovamente
Saluti


title: Ottimizzazione db

text:
buongiorno a tutti,
vorrei sottoporVi un mio dubbio, per avre idee più chiare, riflettere e soprattutto per non fare c...e senza una cognizione di quel che faccio.
Allora il mio db è costituito da 6 postazioni client e una server.
Sul server ho una quindicina di tabelle con una dimensione del file di circa 20MB.
Per fare un pò di pulizia ho agito sulla tabella principale, contenente circa 11.000 record, eliminando alcuni campi mai utilizzati.
Questo mi ha portato a ottenere una tabella contenente circa 70 campi con un file di 15MB complessivi.
La prima domanda: Posso sapere le dimensioni delle singole tabelle per capire dove è più opportuno agire? Mi sembra di ricordare di averlo già visto ma non vorrei, complice l'età avanzata sbagliare.
Seconda domanda (per me più difficile)
Su molti degli 11.000 record una parte di campi non vengono alimentati, cioè mi spiego meglio, non sempre la tabella viene riempita e il campo rimane vuoto.
Posso per questi campi cancellare i record e metterli in una tabella collegata tramite query?
In parole povere prenderei questi campi li elimino dalla tabella principale e li metto in una nuova tabella, collegata alla stessa tramite un campo univoco.
Non so se il gioco vale la candela, ma se conto dieci campi (x 11000) scarsamente alimentati o vuoti penso che il risparmio di spazio sia notevole...
Gradirei vostre autorevoli impressioni, grazie infinite a tutti.


title: Ottimizzazione db

author: Karl Donaubauer

text:
Ciao Ignazio,

ignazio.pilone wrote:
> ...
> Allora il mio db è costituito da 6 postazioni client e una server.
> Sul server ho una quindicina di tabelle con una dimensione del file
> di circa 20MB.

Un backend di 20 MB non è grande e non dovrebbe dare problemi
a causa della dimensione.
Ti puoi preoccupare se la dimensione gresce in modo esponenziale
ogni giorno o quando sei arrivato a ca. 1,5 GB.

> Per fare un pò di pulizia ho agito sulla tabella principale,
> contenente circa 11.000 record, eliminando alcuni campi mai
> utilizzati.
> Questo mi ha portato a ottenere una tabella contenente circa 70 campi
> con un file di 15MB complessivi.
> La prima domanda: Posso sapere le dimensioni delle singole tabelle
> per capire dove è più opportuno agire? Mi sembra di ricordare di
> averlo già visto ma non vorrei, complice l'età avanzata sbagliare.

Manca la tua versione di Access. Forse puoi usare questo tool:
http://www.atroplan.com/AccMemReporter.htm

> Su molti degli 11.000 record una parte di campi non vengono
> alimentati, cioè mi spiego meglio, non sempre la tabella viene
> riempita e il campo rimane vuoto.
> Posso per questi campi cancellare i record e metterli in una tabella
> collegata tramite query?
> In parole povere prenderei questi campi li elimino dalla tabella
> principale e li metto in una nuova tabella, collegata alla stessa
> tramite un campo univoco.
> Non so se il gioco vale la candela, ma se conto dieci campi (x 11000)
> scarsamente alimentati o vuoti penso che il risparmio di spazio sia
> notevole...

L'aspetto se un campo è spesso vuoto o no non decide sulla
struttura delle tabelle. Decidono le regole di normalizzazione e
in casi eccezionali considerazioni di prestazione.

Se i 70 campi sono necessari per rappresentare la faccenda
e la struttura e normalizzata come mai pensi a suddividere la tabella?

Se i molti campi causano problemi di prestazione nel frontend
devi controllare se le tabelle hanno indici giusti che sono anche
usati bene nel frontend e se le query e tutte le stringhe SQL lavorono
con i campi necessari, non sempre con tutti (SELECT *) .

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


title: Ottimizzazione db

text:
ciao Karl, grazie per l'aiuto.

purtroppo non posso installare l'utilità che mi consigli, perchè non ho privilegi da amministratore sulla mia macchina. La mia versione di access comunque è la 2003 con SP2.

Per quanto attiene il db, confesso che si è implememtato man mano in base alle esigenze del momento e diversi campi della struttura, magari utili due anni fa, non risultano più necessari.
Quindi, spostare questi dati in una tabella aggiunta e collegata, mi consentirebbe, oltre a non perdere dati storici, di economizzare sull'"impegno" dello spazio e dei campi della tabella principale.

In ultimo devo confessare che la riduzione da 20 a 15 MB ha comportato una sensibile riduzione dei tempi di apertura delle maschere.

ringrazio infinitamente.


title: Ottimizzazione db

text:
quello che non mi è chiaro....
Provo a spiegarmi meglio. Dalla mia tabella principale scorporo quella parte di tabella che contiene dati poco alimentati.
Avrò quindi la tabella NUMERAZIONI con 11.000 record alimentati su 40 campi e una tabella INTEGRAZIONI con i restanti 30 campi alimentati solo per 1000 record.
Collego le due tabelle tramite una relazione con un codice univoco presente in entrambe le tabelle.
Ora nelle maschere che prima leggevano i campi da NUMERAZIONI basta che cambio l'origine dei dati (in INTEGRAZIONI) per averne la corretta visualizzazione. E' corretto ?
Allo stesso modo se nella maschera di inserimento dati arrivo alle cella, ora collegate alla tabella INTEGRAZIONI, posso inserire senza problemi i dati ?

In parole povere basta un collegamento nelle relazioni per garantire un input/output dei dati dalla maschera ?

grazie infinite a chi potrà/vorrà aiutarmi.


title: Da access97 a ...

author: Axel

text:
Salve a tutti, credo che la mia sia una domanda "fritta e rifritta".
Ho creato con access 97 un db rubrica, 1 tabella, tre queri e tre maschere.
poso in qualche modo farla vedere a dei pc in rete? naturalmente non
voglio/posso installare access97, vorrei qualcosa tipo vba o che cosa?
Ciao e grazie
Axel


title: Da access97 a ...

author: Potone

text:
"Axel" <
a...@a.it
> ha scritto nel messaggio news:b20hdo$jgo$1...@lacerta.tiscalinet.it...

Hai ragione, la domanda è comune (la prossima volta cerca meglio, la risposta è sicuramente già stata data in altre occasioni).
Se non vuoi installare Access su ogni macchina ti serve il runtime che fa parte del pacchetto "for developers".
Devi valutare tu se ti convenga, in questo caso non credo.
Mat.


title: Da access97 a ...

author: Roberto da casa

text:
"Axel" <
a...@a.it
> ha scritto nel messaggio
news:b20hdo$jgo$1...@lacerta.tiscalinet.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ di
Lbo intitolata "Esiste il compilatore per Access (questo è il faqqone)?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Da access97 a ...

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
UWQ0a.92315$YG2.2...@twister1.libero.it...
>
> "Axel" <
a...@a.it
> ha scritto nel messaggio
> news:b20hdo$jgo$1...@lacerta.tiscalinet.it...
> > Salve a tutti, credo che la mia sia una domanda "fritta e rifritta".
> > Ho creato con access 97 un db rubrica, 1 tabella, tre queri e tre
> maschere.
> > poso in qualche modo farla vedere a dei pc in rete? naturalmente non
> > voglio/posso installare access97, vorrei qualcosa tipo vba o che cosa?
> > Ciao e grazie
> > Axel
>
> Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ
di
> Lbo intitolata "Esiste il compilatore per Access (questo è il faqqone)?".
Compilatore per access, quindi mi rimandate ad access 2000? giusto
Perdonate la domanda, però tentar non nuoce!
Grazie
Axel


title: Da access97 a ...

text:
"Axel" <
abm...@tiscali.it
> ha scritto nel messaggio
news:b20tkb$sap$1...@lacerta.tiscalinet.it...

Scusami Axel, ma ci sei andato a leggere quella FAQ?
Mi sembrerebbe di no!
Quello che leggerai vale per tutte le versioni di Access.



title: simulare matrici di controllo di vb

author: nn

text:
se si deve fare una griglia con 100 rettangoli, in vb mi sembra si puo'
usare una matrice di controlli in modo che al suo evento click
posso assegnare una proprietà all'iesimo rettangolo.
quindi invece di 100 righe di codice, una sola della matrice
come si simula in access cio'?
n.b ho visto che si puo' creare un elenco di controlli
tramite il codice
for x= 1 to 100
me.controls("Rettangolo" & i) = array (i)
next i
pero' così posso si ciclare gli oggetti pero' non ho ancora
un unico oggetto con il suo evento click che agisce
sull'iesimo oggetto che in quel momento si sta cliccando
grazie


title: simulare matrici di controllo di vb

text:
"nn" <
NOTNOTSPAM...@lycos.it
> ha scritto nel messaggio
news:3EA95674...@lycos.it...

Credo sia proprio così...., nel senso che non mi pare ci siano soluzioni...!
Con questo non significa che con un pò di inventiva non si possa fare
qualcosa.
Se ad esempio inserisci in ogni controllo su Evento Click questo:
Es. su Controllo1
=Premuto(1)
Es. su controllo 2
=Premuto(2)
Generi una Funzione
Public Function Premuto(index as Long)
    Select Case Index
        Case 1
        Case 2
        Case 3
        ........................
    End select
End Function
Era solo un esempio...., ma ce ne saranno altri migliori....!
@Alex.


title: simulare matrici di controllo di vb

text:
> Credo sia proprio cosě...., nel senso che non mi pare ci siano soluzioni...!
mi chiedo perchč vb ha le matrici controlli e access che ha il vba no.
> a.
> Se ad esempio inserisci in ogni controllo su Evento Click questo:
il problema č proprio quello di scrivere ad ogni click lo stesso codice
(devo solo cambiare colore)
>
>
> Es. su Controllo1
> =Premuto(1)
>
> Es. su controllo 2
> =Premuto(2)
>
> Generi una Funzione
>
> Public Function Premuto(index as Long)
>     Select Case Index
>         Case 1
>
>         Case 2
>
>         Case 3
>         ........................
>     End select
> End Function
>
> Era solo un esempio...., ma ce ne saranno altri migliori....!
esempio interessante;
consente un controllo di 100 eventi tutti dentro ad un'unica sub
rimane sempre il problema di dover scrivere i 100 eventi click
 nel mio caso ad ogni click su ogni rettangolo succede la stessa cosa
cioč cambia il suo colore


title: simulare matrici di controllo di vb

text:
"nn" <
NOTNOTSPAM...@lycos.it
> ha scritto nel messaggio
news:3EA97DC3...@lycos.it...

Puoi fare una Routinetta che li scrive...!
For x=1 to 100
    Me.Controls(NomeCorntrollo & cstr(x)).OnClick="=Premuto(" & x & ")"
Next
Ciao.
@Alex.


title: simulare matrici di controllo di vb

text:
> > esempio interessante;
> > consente un controllo di 100 eventi tutti dentro ad un'unica sub
> > rimane sempre il problema di dover scrivere i 100 eventi click
> >
> >
> >  nel mio caso ad ogni click su ogni rettangolo succede la stessa cosa
> > cioè cambia il suo colore
> >
>
> Puoi fare una Routinetta che li scrive...!
> For x=1 to 100
>     Me.Controls(NomeCorntrollo & cstr(x)).OnClick="=Premuto(" & x & ")"
> Next
mi sembra una soluzione di alta scuola.
problema:
ci sono 100 click e ad ogni click deve essere lo stesso click ad accorgersi
che è stato lui ad essere
quello cliccato;
soluzione microsoft: non posso auto accorgermi di essere stato cliccato
arriva superalex e:
bestia (riferito al controllo che riceve il click), perchè non ti autoosservi
ogni tanto
soluzione di superalex:
visto che non ti autoosservi, allora ti faccio fare un giro per tutti i
controlli finchè non trovi quello cliccato, che guarda caso
sei proprio tu.


title: simulare matrici di controllo di vb

text:
"nn" <
NOTNOTSPAM...@lycos.it
> ha scritto nel messaggio
news:3EAAA423...@lycos.it...
> > > esempio interessante;
> > > consente un controllo di 100 eventi tutti dentro ad un'unica sub
> > > rimane sempre il problema di dover scrivere i 100 eventi click
> > >
> > >
> > >  nel mio caso ad ogni click su ogni rettangolo succede la stessa cosa
> > > cioč cambia il suo colore
> > >
> >
> > Puoi fare una Routinetta che li scrive...!
> > For x=1 to 100
> >     Me.Controls(NomeCorntrollo & cstr(x)).OnClick="=Premuto(" & x & ")"
> > Next
>
> mi sembra una soluzione di alta scuola.
>
> problema:
> ci sono 100 click e ad ogni click deve essere lo stesso click ad
accorgersi
> che č stato lui ad essere
> quello cliccato;
> soluzione microsoft: non posso auto accorgermi di essere stato cliccato
>
> arriva superalex e:
> bestia (riferito al controllo che riceve il click), perchč non ti
autoosservi
> ogni tanto
>
> soluzione di superalex:
> visto che non ti autoosservi, allora ti faccio fare un giro per tutti i
> controlli finchč non trovi quello cliccato, che guarda caso
> sei proprio tu.
>
Mi pare che tu capisca poco di programmazione, ops ti o sopravalutato ma non
importa
fortunatamente non mi riguarda......!
@Alex.


title: simulare matrici di controllo di vb

text:
> > > Puoi fare una Routinetta che li scrive...!
> > > For x=1 to 100
> > >     Me.Controls(NomeCorntrollo & cstr(x)).OnClick="=Premuto(" & x & ")"
> > > Next
ok funziona ho solo aggiunto " " al nome controllo
For x=1 to 100
       Me.Controls("Casella" & CStr(x)).OnClick = "=Premuto(" & x & ")"
Next x
solo una curiosità al primo click non funziona ma inizia a funzionare dai click
successivi
perche'?
grazie di nuovo


title: Icona di programma........

author: Gianni

text:
    La mia non è una domanda ma una curiosità...
 ho creato(Finalmente) il mio Db come volevo che fosse, ma non
sodisfatto,volevo abbellirlo di + ,quindi la mia curiosità è questa: volevo
cambiare l'icona di programma,cioè quando si crea un db automaticamente
prende l'icona di Access con il relativo nome del Db sotto, io volevo
personalizzarlo nel senso di sostituire l'icona di Access Standard con una
mia personalzzata, ma non ci sono riuscito, ho notato anche che se creo un
collegamento sul desktop posso cambiare l'icona del collegamento ,ma l'icona
del programma creato in precedenza non la posso modificare, c'è qualche
altra strada?!?
Non è che sia molto importante ma credo che tutti prima o poi battono la
testa su questa curiosità .
Ciao a tutti.
Gianni.


title: Icona di programma........

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d247...@news.bluewin.ch...

Con A97 basta inserire il path completo dell'icona in
Strumenti->Avvio...->Icona applicazione: .
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Icona di programma........

author: Liones

text:
> cambiare l'icona di programma,cioč quando si crea un db automaticamente
strumenti > avvio > icona applicazione
ciao


title: Icona di programma........

text:
> Con A97 basta inserire il path completo dell'icona in
> Strumenti->Avvio...->Icona applicazione: .
anche con xp
ma metti l'icona e sfaci qualche altra cosa
ciao


title: Icona di programma........

text:
"Liones" <
lio...@tiscalinet.it
> ha scritto nel messaggio
news:ag24m2$brg$1...@lacerta.tiscalinet.it...
>
> > cambiare l'icona di programma,cioč quando si crea un db automaticamente
> strumenti > avvio > icona applicazione
> ciao
>
>
beh ho fatto quella operazione ma mi cambia l'icona quando si apre il db io
voglio personalizzare , se posso l'icona che si crea per aprire il db, a
proposito uso office 2000
grazie Gianni


title: Icona di programma........

author: Massimiliano Amendola  kksrl

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d247...@news.bluewin.ch...

scusa, ma leggendo le altre rispote, credo di aver capito male: tu intendi
l'icona di un file Access, quella generale che presumibilmente hai sul
desktop?
non credo si possa fare o meglio si può cambiare ma con un'altra che
caratterizzerà tutti i file Access. Non credo si possa personalizzare un
solo file. L'unica è quella di cambiarne il collegamento
ciao MAssimiliano


title: applicare uno sfondo allo sfondo di access

text:
avete presente quando viene aperto access con la finestra di database
nascosta e che quindi vengono visualizzate solo i menů e le barre degli
strumenti in alto e il resto č di sfondo grigio sotto? vi chiedo se li sotto
č possibile impostare uno sfondo diverso, magari con un immagine o altro?
grazie a tutti.


author: Alessandro

text:
"Tosto73" <
tos...@libero.it
> wrote in message
news:IkOk8.27920$1S3.8...@twister1.libero.it...
> avete presente quando viene aperto access con la finestra di database
> nascosta e che quindi vengono visualizzate solo i menù e le barre degli
> strumenti in alto e il resto è di sfondo grigio sotto? vi chiedo se li sotto
> è possibile impostare uno sfondo diverso, magari con un immagine o altro?
> grazie a tutti.
Solo con un pò di fantasia.....!(Ma è scomoda, io ti illustro...)
Realizzi una Form senza bordi Massimizzata con lo sfondo la tua
IMMAGINE.
Poi hai 2 alternative:
1) Tutte le altre form devono essere POPUP
2) Realizzare la routine che mantiene la Form(Sfondo) sempre in 2°
piano.
   Per questa 2° non ricordo dove l'ho già vista.....!!!
Ciao.
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: elenco delle autorizzazioni per ogni utente.

author: Riccardo M.

text:
Alcuni giorni fa' avevo postato una richiesta:
"C'è la possibilità di stampare tutti gli utenti e le autorizzazioni per i
singoli oggetti per ogni utente?"
____________________
oggi finalmente (ma solo in parte) ci sono riuscito. L'unico problema è che
per ogni
tipo di combinazione di autorizzazione (cambia anche in funzione
dell'oggetto),
mi vengono restituiti dei numeri...ad esempio per le tabelle i permessi "52"
vuol dire che
l'utente per quell'oggetto è autorizzato solo a :
Lettura Struttura
Lettura Dati
Inserimento Dati
potrei risalire al significato di ogni numero che mi viene restituito
(facendo però notevoli controlli
manuali e varie prove).
C'è da qualche parte un elenco con la codifica di questi numeri?
grazie mille
Riccardo


text:
naturalmente a chi servisse il codice ....basta chiederlo.
bye