text:
Ciao,
> No, devi avere presente il numero in ogni record.
> Creati una casella di testo (puoi impostare Visibile a No)
> nella sezione detaglio della sottomaschera. Chiama la
> casella "txtNr" e imposta l'Origine controllo a:
>
> =GetRecNum(Forms!arc_frm!arc_sub_frm.Form)
>
> Poi cambia la riga di codice con Add a:
>
>  FormatConditions.Add acExpression, , "txtNr Mod 2 <> 0"
Ottimo, ha funzionato alla grande, sei stato utilissimo.
Mi rimane una cosa ora... combinare le due formatcondition, così non
funziona:
Dim ctl As Access.Control
For Each ctl In Forms!arc_frm!arc_sub_frm.Controls
    Select Case ctl.ControlType
        Case acTextBox, acComboBox, acListBox
            With ctl
                .FormatConditions.Delete
                .FormatConditions.Add acExpression, , "zeb Mod 2 <> 0"
                .FormatConditions(0).BackColor = getobj("descrizione",
"impostazione", "obj", "colorzebrafrm", "16777215")
                .FormatConditions.Add acFieldHasFocus
                .FormatConditions(1).BackColor = getobj("descrizione",
"impostazione", "obj", "actbckcolor", "16777215")
            End With
    End Select
Next ctl
Cosa sbaglio?
Grazie.
Ganimede Dignan.


title: A2K: formattazione condizionale da Codice

author: Karl Donaubauer

text:
Ganimede wrote:
> ...
> Mi rimane una cosa ora... combinare le due formatcondition, cos� non
> funziona:
>
> Dim ctl As Access.Control
> For Each ctl In Forms!arc_frm!arc_sub_frm.Controls
>     Select Case ctl.ControlType
>         Case acTextBox, acComboBox, acListBox
>             With ctl
>                 .FormatConditions.Delete
>                 .FormatConditions.Add acExpression, , "zeb Mod 2 <> 0"
>                 .FormatConditions(0).BackColor = getobj("descrizione",
> "impostazione", "obj", "colorzebrafrm", "16777215")
>                 .FormatConditions.Add acFieldHasFocus
>                 .FormatConditions(1).BackColor = getobj("descrizione",
> "impostazione", "obj", "actbckcolor", "16777215")
>             End With
>     End Select
> Next ctl
>
> Cosa sbaglio?
Soprattutto che con "non funzione" dai la descrizione pi� popolare,
esatta e espressiva.
In caso che riceveresti l'errore 7968 per un tipo invalido della FC
(o simile in italiano), prova di cambiare l'ordine delle condizioni:
Prima (0) quella con acFieldHasFocus, dopo (1) quella con acExpression.



author: Ganimede

text:
> In caso che riceveresti l'errore 7968 per un tipo invalido della FC
> (o simile in italiano), prova di cambiare l'ordine delle condizioni:
> Prima (0) quella con acFieldHasFocus, dopo (1) quella con acExpression.
Funziona!!! Grazie 1000.
Un'ultima cosa... vorrei evitare di scrivere lo stesso codice per 20
form... per creare una function riutilizzabile dovrei passargli il
valore di form!sub_form, come posso fare ?
Grazie.
Dim ctl As Access.Control
For Each ctl In Forms!arc_frm!arc_sub_frm.Controls
    Select Case ctl.ControlType
        Case acTextBox, acComboBox, acListBox
            With ctl
                .FormatConditions.Delete
                .FormatConditions.Add acFieldHasFocus
                .FormatConditions(0).BackColor = getobj("descrizione",
"impostazione", "obj", "actbckcolor", "16777215")
                .FormatConditions.Add acExpression, , "zeb Mod 2 <> 0"
                .FormatConditions(1).BackColor = getobj("descrizione",
"impostazione", "obj", "colorzebrafrm", "16777215")



text:
Ganimede wrote:
> ...
> Un'ultima cosa... vorrei evitare di scrivere lo stesso codice per 20
> form... per creare una function riutilizzabile dovrei passargli il
> valore di form!sub_form, come posso fare ?
>
> Dim ctl As Access.Control
> For Each ctl In Forms!arc_frm!arc_sub_frm.Controls
>    Select Case ctl.ControlType
>        Case acTextBox, acComboBox, acListBox
>            With ctl
>                .FormatConditions.Delete
>                .FormatConditions.Add acFieldHasFocus
>                .FormatConditions(0).BackColor = getobj("descrizione",
> "impostazione", "obj", "actbckcolor", "16777215")
>                .FormatConditions.Add acExpression, , "zeb Mod 2 <> 0"
>                .FormatConditions(1).BackColor = getobj("descrizione",
> "impostazione", "obj", "colorzebrafrm", "16777215")
>            End With
>    End Select
> Next ctl
Se p.e. crei una procedura in un modulo standard:
Public Sub procFC (frm As Form)
Dim ctl As Access.Control
For Each ctl In frm.Controls
...
Che puoi chiamare con
procFC Forms!arc_frm!arc_sub_frm.Form



text:
Ciao
> Che puoi chiamare con
>
> procFC Forms!arc_frm!arc_sub_frm.Form
Grazie.


title: autorizzazioni_ A97

author: Riccardo

text:
Ho tolto tutti i permessi al Gruppo Utenti.
Poi ho dato i permessi all'utente Pippo ad effettuare
Lettura, aggiornamento e inserimetno dati.
Ora ho la necessità di permettere a questo utente anche
l'eliminazione dei dati.
Allora ho aggiunto su tutte le tabelle anche le eliminazione dati.
Compatto il db. Creo l'mde. Provo ad eliminare un dato, ma
mi compare un messaggio che non si dispone delle necessarie
autorizzazioni ad usare l'oggetto "Soci"
Come faccio a dare le autorizzazioni giuste?
grazie Riccardo


title: stringa routine evento

author: Roberto

text:
Perchè in A2000 non accetta questo comando???
Dim CodSbloc As String
    Dim Dbs As Database    <------( errore di compilazione: tipo definito
dall'utente non definito)
    ...
    Dim Rst As Recordset
    On Error Resume Next
    Set Dbs = CurrentDb
c'è qualcosa di sbagliato?
Grazie
Roberto


title: stringa routine evento

author: Carlo Costarella

text:
"Roberto" <
aris...@libero.it
> ha scritto nel messaggio
news:8ULC8.36971$US3.8...@twister1.libero.it...
> Perchč in A2000 non accetta questo comando???
> Dim CodSbloc As String
>     Dim Dbs As Database    <------( errore di compilazione: tipo definito
> dall'utente non definito)
>     ...
>     Dim Rst As Recordset
>     On Error Resume Next
>     Set Dbs = CurrentDb
>
> c'č qualcosa di sbagliato?
>
> Grazie
> Roberto
>
>
Il problema va ricercato nei riferimenti.
Se intendi lavorare con DAO apri un modulo qualsiasi e dal menů Strumenti
scgeli "Riferimenti". Aggiugi un riferimento a Microsoft DAO 3.6 Object
Library... e togli il riferimento a Microsoft ActiveX Data Object...
Se vuoi lavorare con ADO fai il contrario ma in questo caso la variabile di
tipo Database diventa:  Dim dbs As ADODB.
Leggi la guida su questi argomenti perchč č indispensabile se usi la prima
volta il motore ADO.
Ciao, Carlo


title: report

text:
In un report devo, a codice, eseguire un salto a pagina nuova "forzato"
quando raggiungo un certo numero di righe. Come faccio a determinare il
numero di righe stampate e da stampare e come esegui il salto pagina.
Grazie, ciao.
Sent via Deja.com
http://www.deja.com/
Before you buy.


title: report

author: sandro

text:
Salve NG.
Non sono un programmatore, ma per diletto da un po' di tempo ho inizato ha
creare un piccolo DB. per la gestione delle ore e commesse che, attualmente
utilizzo in ufficio ma che sarei felice di migliorare.
Ho una casella combinata che mi elenca l'insieme delle commesse create per
cliente. La casella serve per la stampa di un report: "Commesse per
Cliente".
L'origine del report è una query dal nome omonimo.
Vorrei fare questo:
Utilizzare una casella di riepilogo a selezione multipla per poter
selezionare più commesse e quindi stampare più di 1 report per volta.
Togliere la query e scrivere direttamente un SQL, all'interno del report o
dove...
Sto leggendo qualche libro ma non riesco nell'impresa.
gradirei qualsiasi forma di aiuto (non mi umiliate Vi prego...)
Alessandro.


title: report

author: Sandro

text:
san...@tlibero.it
 (sandro) ha scritto il lun 07 ago 2000 09:18:47p
>Salve NG.
>Non sono un programmatore, ma per diletto da un po' di tempo ho inizato
>ha creare un piccolo DB. per la gestione delle ore e commesse che,
>attualmente utilizzo in ufficio ma che sarei felice di migliorare.
>Ho una casella combinata che mi elenca l'insieme delle commesse create
>per cliente. La casella serve per la stampa di un report: "Commesse per
>Cliente".
>L'origine del report č una query dal nome omonimo.
>
>Vorrei fare questo:
>Utilizzare una casella di riepilogo a selezione multipla per poter
>selezionare piů commesse e quindi stampare piů di 1 report per volta.
>Togliere la query e scrivere direttamente un SQL, all'interno del report
>o dove...
>
>Sto leggendo qualche libro ma non riesco nell'impresa.
>
>gradirei qualsiasi forma di aiuto (non mi umiliate Vi prego...)
>
>Alessandro.
>
>
>
>
oops un ononimo.
Di soluzioni ce ne sono molte
come base per tutte ti do questa funzione che vuole come parametro una
casella combinata e ti restituisce i valori selezionati, in forma di
stringa adatta per essere utilizzata con la clausola IN
Function crealista(myct As Control) As String
    Dim mystr As String, myvar As Variant
    mystr = "("
    For Each myvar In myct.ItemsSelected
        mystr = mystr & "'" & myct.ItemData(myvar) & "' ,"
    Next myvar
    crealista = Left(mystr, Len(mystr) - 2) & ")"
End Function
Tale funzione va messa in un modulo generale.
Va chiamata quindi col nome della tua casella combinata, se per esempio la
chiami dalla maschera stessa che contiene la casella combinata:
dim lista as string
lista=crealista(me!nomeCasellaCombinata)
Ora il metodo piu' elegante e' di costruirsi l'espressione sql al volo
e assegnare tale espressione nell'origine record del report,
la piu' semplice consiste nel filtrare il report.
Per filtrare il report non mettere nessun criterio nel campo commessa
e per aprirlo usa:
DoCmd.OpenReport "TUOREPORT", , , "[COMMESSA] IN " & lista
Naturalmente devi predisporre il report di modo che ad ogni commessa inizi
da una nuova pagina, in pratica devi predisorre dei raggruppamenti sul
campo commessa.
Per crearti l'istruzione sql al volo idem:
strsql="SELECT..... WHERE COMMESSA IN  " & lista
e assegnare tale espressione all'origine record del report.
L'espressione sql te la puoi creare al volo nella maschera che apre il
report, in questo caso la variabile strsql deve essere public a livello di
modulo di classe della maschera, e sull'evento apertura del report
inserici la funzione:
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = Forms!tuaMashera.strsql
End Sub
(a dire il vero invece di usare variabili public sarebbe meglio creare una
proprieta nella maschera)
Altrimenti tutto puo' essere effettuato al livello di report, cioč
sull'evento apertura del report:
Private Sub Report_Open(Cancel As Integer)
    	dim strsql as string
    	dim lista as string
    	lista=crealista(forms!tuaform!tuacasellaCombinata)
    	strsql="SELECT..... WHERE COMMESSA IN  " & lista
    	Me.RecordSource = strsql
End Sub
Puoi aggiungere il codice  che controlla che la maschera che apre il report
sia aperta etc.
Sandro


title: report

text:
To Sandro da Alessandro:
Ti ringrazio vivamente per l'aiuto prestatomi che, per un neofita quale
sono, è stato veramenteprezioso.
Ciò che mi hai indicato mi è sostanzialmente "chiaro" ed è quanto cercavo.
Purtroppo x me non riesco ancora fare funzionare le cose:
Nella maschera che ospita la casella di Riepilogo (non è combinata) ho
scritto quanto suggerito:
DoCmd.OpenReport "Commesse per cliente", , , "[IDCOMMESSA]IN" & lista
Nel report:
Dim strSQL As String
Dim lista As String
lista = crealista(Forms!StampaCommesse!Combinata05)
strSQL = "SELECT..... WHERE..... And IDCOMMESSA IN" & lista
Me.RecordSource = strSQL
Risultato: errore run-time sull'apertura report n.3141, l'istruzione select
include una parola riservata o un argomento scritto in modo errato...
il Debug riguarda l'azione open report...
Penso però che anche il richiamo della Function non vada (?)
Chiedo venia per il linguaggio poco ortodosso e Ringrazio anticipatamente.
Sandro <
api...@worldonline.it
> wrote in message 8F8A566...@127.0.0.1...
>
san...@tlibero.it
 (sandro) ha scritto il lun 07 ago 2000 09:18:47p
>
> >Salve NG.
> >Non sono un programmatore, ma per diletto da un po' di tempo ho inizato
> >ha creare un piccolo DB. per la gestione delle ore e commesse che,
> >attualmente utilizzo in ufficio ma che sarei felice di migliorare.
> >Ho una casella combinata che mi elenca l'insieme delle commesse create
> >per cliente. La casella serve per la stampa di un report: "Commesse per
> >Cliente".
> >L'origine del report è una query dal nome omonimo.
> >
> >Vorrei fare questo:
> >Utilizzare una casella di riepilogo a selezione multipla per poter
> >selezionare più commesse e quindi stampare più di 1 report per volta.

> Altrimenti tutto puo' essere effettuato al livello di report, cioè



title: report

text:
san...@tlibero.it
 (sandro) ha scritto il mer 09 ago 2000 02:59:55a
>To Sandro da Alessandro:
>Ti ringrazio vivamente per l'aiuto prestatomi che, per un neofita quale
>sono, è stato veramenteprezioso.
>Ciò che mi hai indicato mi è sostanzialmente "chiaro" ed è quanto
>cercavo. Purtroppo x me non riesco ancora fare funzionare le cose:
>
>Nella maschera che ospita la casella di Riepilogo (non è combinata) ho
>scritto quanto suggerito:
>DoCmd.OpenReport "Commesse per cliente", , , "[IDCOMMESSA]IN" & lista
>
>Nel report:
>Dim strSQL As String
>Dim lista As String
>lista = crealista(Forms!StampaCommesse!Combinata05)
>strSQL = "SELECT..... WHERE..... And IDCOMMESSA IN" & lista
>Me.RecordSource = strSQL
>
>Risultato: errore run-time sull'apertura report n.3141, l'istruzione
>select include una parola riservata o un argomento scritto in modo
>errato... il Debug riguarda l'azione open report...
>Penso però che anche il richiamo della Function non vada (?)
>Chiedo venia per il linguaggio poco ortodosso e Ringrazio
>anticipatamente.
>
>
Ciao,
Hai fatto un po' di confusione, se usi il filtro (primo metodo),
sull'evento apertura report non devi metterci niente.
nel docmd mancano inoltre due spazi, dopo [IDCOMMESSA] e dopo IN
riepilogando:
metodo del filtro:
modulo della maschera:
Private Sub ComandoTuo_Click()
 dim lista as string
 If me!Combinata05.ItemsSelected.Count >= 1 Then
  lista = crealista(me!Combinata05)
  DoCmd.OpenReport "Commesse per cliente", , , "[IDCOMMESSA] IN " & lista
 else
  MSGBOX "SELEZIONARE ALMENO UNA VOCE"
 END IF
end sub
nel modulo del report non deve esserci niente, ed il report deve essere
legato alla query dove nel campo idcommessa non deve esserci alcun
criterio.
metodo dell'istruzione sql:
modulo della maschera:
Private Sub ComandoTuo_Click()
 If me!Combinata05.ItemsSelected.Count >= 1 Then
  DoCmd.OpenReport "Commesse per cliente"
 else
  MSGBOX "SELEZIONARE ALMENO UNA VOCE"
 END IF
end sub
modulo del report:
Private Sub Report_Open(Cancel As Integer)
 Dim strSQL As String
 Dim lista As String
 lista = crealista(Forms!StampaCommesse!Combinata05)
 strSQL = "SELECT..... WHERE..... And IDCOMMESSA IN " & lista
 Me.RecordSource = strSQL
end sub
In entrambi i metodi la funzione crealista la puoi mettere in un modulo
generale.
Attenzione se il campo idcommessa deve essere quello della colonna legata
dell'elenco, inoltre se questo e' numerico la funzione che ti ho dato non
va bene, puoi usare questa invece:
Function crealista(myct As Control) As String
    Dim mystr As String, myvar As Variant
    mystr = "("
    For Each myvar In myct.ItemsSelected
        mystr = mystr & myct.ItemData(myvar) & " ,"
    Next myvar
    crealista = Left(mystr, Len(mystr) - 2) & ")"
End Function
nel caso in cui idcommessa e' numerico ma si trova nella colonna
nrcolonna (le colonne partono da zero) usa questa, mettendo al posto di
nrcolonna il numero di colonna in cui si trova idcommessa:
Function crealista(myct As Control) As String
    Dim mystr As String, myvar As Variant
    mystr = "("
    For Each myvar In myct.ItemsSelected
        mystr = mystr & myct.Column(nrcolonna, myvar) & ", "
    Next myvar
    crealista2 = Left(mystr, Len(mystr) - 2) & ")"
End Function
Attenzione agli spazi.
Ciao e fammi sapere
Sandro


title: report

text:
Per Sando,
Non ci posso credere funziona!
Forse non sarà una cosa eccezionale ma per me lo è.
Le spiegazioni che mi hai dato sono esemplari e non so come ringraziarti per
la tua disponibilità e chiarezza.
Ho usato la seconda Function con la colonna associata, ed inoltre nel modulo
del report, oltre ad aver tolto la routine filtro Docmd.OpenReport....., ho
dovuto correggere listruzione SQL che , presentava erroi di sintassi
(parentesi di troppo,virgole e spazi non corretti), nonchè il riferimento
all'origine dell'IDCOMMESSA ovvero COMMESSE.IDCOMMESSA IN " & lista...
Adesso sistemo il report dimodochè ogni commessa inizi da una pagina nuova.
Spero che se avrò bisogno portai rispondermi ancora "se non scasso
troppo..."
Penso seriamente di approfondire lo studio di Access, anche se la vedo dura.
Spero in futuro di contribuire anch'io al NG x il momento mi devo
accontentare di consultarlo.
Garzie ancora:
Alessandro.


title: Errore di run-time '2427'

author: Gianluca

text:
Aprendo l'anteprima di un report da maschera, del codice dice al report:
mentre formatti, verifica se il campo si/no e se è -1 allora fai così,
altrimenti fai cosà.
Perchè aprendo l'anteprima del report mi dà l'errore di cui in oggetto,
evidenziando la riga con scritto
Select case blnCampoSiNo
???
Segue Case -1 e Case 0 e End Select, come vedete a seguire:
Select Case Me!D1DG
    Case -1
        Me!D1 = DLookup("[CognomeContatto]", "tblClienti", "[IDCliente]=" &
Me!IDCliente)
        Me!D1 = Me!D1.OldValue & " " & DLookup("[NomeContatto]",
"tblClienti", "[IDCliente]=" & Me!IDCliente)
    Case 0
        Me!D1.TextAlign = 3
        Me!D1.FontItalic = -1
        Me!D1DGEtichetta.ForeColor = 12632256
        Me!D1.ForeColor = 12632256
        Me!D1 = "< no >"
End Select
Fatemi sape!
--
'--------------------------------------------------------
'Saludos
'--------------------------------------------------------


title: Ancora strutture a schede

author: Martino

text:
Buona giornata a tutti.
In una struttura a scheda nella prima pagina ho una casella X, nella seconda
pagina ho messo una casella di testo che prende i dati da X, quindi origine
controllo = prima pagina  X.
Io vorrei che i dati di X della prima pagina vengano copiati nella seconda
pagina contestualmente all'immissione e non dopo l'aggiornamento.
Ho provato a inserire: DoCmd.RunCommand acCmdSaveRecord e refresh sia su
corrente, su prima di inserire, in attesa , prima di aggiornare e dopo
aggiornamento, ma inutilmente i dati di X vengono caricati nella seconda
pagina solo dopo ho cominciato a inserire altri dati.
Come si deve agire?
Grazie


title: Ancora strutture a schede

author: 'Roccia' Max

text:
On 27 Mar, 14:16, "Martino" <
mar...@aruba.it
> wrote:
> corrente, su prima di inserire, in attesa , prima di aggiornare e dopo
> aggiornamento, ma inutilmente i dati di X vengono caricati nella seconda
> pagina solo dopo ho cominciato a inserire altri dati.
> Come si deve agire?
Provato a inserire nella casella di testo nella pagina 2 un
riferimento alla casella di testo della pagina 1 anziche' al campo del
recordset?
Cosi' pero' ti diventa di sola lettura.
In alternativa, gestisci la faccenda con un po' di codice negli eventi
current e afterupdate.
cia'
Max


title: Rettangolo in report

author: Luigi

text:
Buon Giorno
Access 97
vorrei visualizzare un rettangolo se il controllo in Report Convenzione
[Partita_Iva]= -1
Else
non visulizzarlo se [Partita_Iva]=0
che codice devo scrivere in formattazione...
Grazie


title: Rettangolo in report

author: Fabrizio Quercia

text:
"Luigi" <
luigic...@hotmail.com
> ha scritto nel messaggio
news:CHoC9.36350$Yw.17...@news2.tin.it...

If (Partiva_Iva.Value=1) Then
    nomeoggettorettangolo.Visible = True
Else
    nomeoggettorettangolo.Visible = False
End If
Ciao :)


title: Rettangolo in report

author: Roberto da casa

text:
"Luigi" <
luigic...@hotmail.com
> ha scritto nel messaggio
news:CHoC9.36350$Yw.17...@news2.tin.it...
>

Vai sul Sito Comune (link qui sotto) e nella Sezione Reports leggiti la FAQ
di Sib intitolata "Inserire linee e rettangoli in un report". Penso faccia
al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: gestire un db con 4 sedi distaccate

author: Nicolas

text:
dovrei gestire un db con 4 sedi distaccate non è una lan ma una wan e i dati
devono essere in ogni momento sincronizzati
esiste una possibilità accettabile con access, oppure và optato per
realizzare tutto online con sql server o mysql?
grazie.


title: gestire un db con 4 sedi distaccate

author: E. Meregalli

text:
.. cerca in rete "access terminal services" ed anche "Xp unlimited" ...
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:4880787c$0$1076$4faf...@reader2.news.tin.it...



title: gestire un db con 4 sedi distaccate

text:
E. Meregalli ha scritto:

Se nn è complesso puoi anche fare il db in remoto e poi amministri in asp......se no Terminal services e desktop remoto....è semplicissimo....nn devi configurare nulla tranne le porte del router...
>
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: gestire un db con 4 sedi distaccate

text:
> .. cerca in rete "access terminal services" ed anche "Xp unlimited" ...
>
che voi sappiate le prestazioni con questi 2 prodotti come sono?
sono gratuiti a pagamento?


title: gestire un db con 4 sedi distaccate

text:
> .. cerca in rete "access terminal services" ed anche "Xp unlimited" ...
>
> "Nicolas" <
nico...@email.it
> ha scritto nel messaggio
ma il server deve avere ip statico? in caso affermativo amachi pu� andare
bene?
grazie.


title: gestire un db con 4 sedi distaccate

author: MA

text:
Nicolas wrote:
>> .. cerca in rete "access terminal services" ed anche "Xp unlimited"
>> ...
>>
>> "Nicolas" <
nico...@email.it
> ha scritto nel messaggio
>
>
> ma il server deve avere ip statico? in caso affermativo amachi può
> andare bene?
>
> grazie.
sì; sì
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: gestire un db con 4 sedi distaccate

text:
Xp unlimited costa circa 500 ? per un numero di client illimitato:ma ci sono
versioni attorno alla met� per,mi sembra 10 utenti.
Le licenze terminal services di Microsoft, costano di pi�...
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:4880a8be$1$41664$4faf...@reader4.news.tin.it...



title: Confrontare due campi in due tabelle diverse, come?

author: guido

text:
Mi spiego meglio: ho una tabella ordini e una prodotti, quando nella prima
tabella viene inserita la quantità vorrei controllare che ci siano
sufficienti scorte in magazzino (dato presente sulla seconda tabella). Come
posso fare?
grazie
Guido


author: Sib dal portatile

text:
"guido" <
ze...@freemail.it
> ha scritto nel messaggio
news:SQkx7.5682$pm2.1...@news2.tin.it...

Se hai memorizzato le quantita' in un campo della tabella prodotti:
DLookUp ("CampoQuantità","TabProdotti","CodiceProdotto='" & CodProd &"'")
Se il codice e' in formato numerico invece che in dormato testo devi
togliere gli apostrofi.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


text:
Sib dal portatile <
sibN...@iol.it
> wrote in message
d0lx7.16315$g42.2...@news.infostrada.it...
> Se hai memorizzato le quantita' in un campo della tabella prodotti:
> DLookUp ("CampoQuantità","TabProdotti","CodiceProdotto='" & CodProd &"'")
>
> Se il codice e' in formato numerico invece che in dormato testo devi
> togliere gli apostrofi.
Ho provato ad adattare l'espressione al mio uso ma non sono riuscito a farla
funzionare (uso Access da molto poco). Ho provato a guardare nella guida per
provare a riscrivere/modificare l'espressione ma niente, l'unica cosa ch
forse ho capito è che forse non è proprio adatta a quello x cui ne ho
bisogno. Provo a rispiegarvi il problema: ho le solite due tabelle
ORDINI                PRODOTTI
ID-Ordine              ID-Prodotto
ID-Prodotto           Scorta
Quantità
Vorrei fare in modo che appena inserita la quantità nel campo venga
verificato se in magazzino ci sono scorte sufficienti per evadere l'ordine.
Se non sbaglio l'espressione che mi ha fornito Sib andrebbe inserita nel
campo "Valido se" delle proprietà di Quantità, è giusto almeno questo?
Grazie ancora


text:
"guido" <
ze...@freemail.it
> ha scritto nel messaggio
> Sib dal portatile <
sibN...@iol.it
> wrote in message
> > Se hai memorizzato le quantita' in un campo della tabella prodotti:
> > DLookUp ("CampoQuantità","TabProdotti","CodiceProdotto='" & CodProd
&"'")
> >
> > Se il codice e' in formato numerico invece che in dormato testo devi
> > togliere gli apostrofi.
> Ho provato ad adattare l'espressione al mio uso ma non sono riuscito a
farla
> funzionare (uso Access da molto poco). Ho provato a guardare nella guida
per
> provare a riscrivere/modificare l'espressione ma niente, l'unica cosa ch
> forse ho capito è che forse non è proprio adatta a quello x cui ne ho
> bisogno. Provo a rispiegarvi il problema: ho le solite due tabelle
>
> ORDINI                PRODOTTI
> ID-Ordine              ID-Prodotto
> ID-Prodotto           Scorta
> Quantità
>
> Vorrei fare in modo che appena inserita la quantità nel campo venga
> verificato se in magazzino ci sono scorte sufficienti per evadere
l'ordine.
Fin qui tutto giusto, e' esattamente quella la funzione che devi usare.
> Se non sbaglio l'espressione che mi ha fornito Sib andrebbe inserita nel
> campo "Valido se" delle proprietà di Quantità, è giusto almeno questo?
Qui, mi dispiace dirlo, hai toppato alla grande (ma non preoccuparti, in
senso lato ;-)
non c'entra la proprieta' valido se, devi fare un controllo del valore da
codice sfruttando l'evento before update (prima di aggiornare) scrivendo:
if dlookup("Scorta","Prodotti","ID-Prodotto='" & me!ID-Prodotto & "'") <
Me!Quantità then
    Cancel=true
end if



title: Cambiare sfondo a label selezionata

author: Luke

text:
Ciao a tutti!
In una maschera, vorrei evidenziare la label attualmente attiva
cambiandone il colore di sfondo. Non ci sono problemi se per ogni
label creo due SUB relative agli eventi in attesa e su uscita, vorrei
però creare un'unica funzione...
Ho preparato come esempio una cosa del tipo:
Sub SettaColore(sender As Label)
  sender.BackColor = 12184061
End Sub
Sub ResettaColore(sender As Label)
  sender.BackColor = 16777215
End Sub
quindi dovrei associare la SettaColore(...) e la ResettaColore(...) ai
due eventi, come faccio però a passare l'oggetto che invoca la
funzione? Ho provato con qualcosa tipo
SettaColore(this)
o
SettaColore(self)
ma non funziona...
Ci sono altri modi invece per fare quello che chiedo?
Grazie!


title: Cambiare sfondo a label selezionata

text:

         Ciao
dove li avrai presi this e self in VBA poi...
screen.activecontrol.backcolor
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Cambiare sfondo a label selezionata

text:
"Luke" <
luk...@gawab.com
> ha scritto nel messaggio
news:kbo3e1h8j3d7838r9...@4ax.com...

Fammi capire, le label o etichette non hanno eventi almeno non ne hanno
quella associate ai controlli.
Hanno invece eventi le etichette non associate ai controlli.
Comunque presupponendo che tu ti riferisca alle etichette legate ai
controlli userai gli eventi del controllo associato però ricorda di
impostare lo "Stile Sfondo" della label a Normale altrimenti non potrai
colorare lo sfondo. Lo stesso vale per etichette non associate.
Ciao, Carlo


title: Problema con checkbox in query parametrizzata

author: Fabio

text:
Innanzitutto buonasera a tutti voi! Il problema che mi assilla è il
seguente.
Devo preconfezionare x un utente una query parametrica la quale derivi i
valori dei suoi parametri da una maschera.
L'utente inserirà dei valori nella maschera  dopodiche cliccherà il magico
bottoncino e otterra' i risultati della query. ....e fin qui niente di
strano. Il mio problema è che non sò come gestire due checkbox!!!! Come
posso gestire i parametri con le checkbox ? Mi spiego............io voglio
ottenere non solo quei campi della query in corrispondenza dei quali le
checkbox della maschera hanno i valori o true o false ma voglio anche
lasciare all'utente la possibilità di filtrare i dati non considerando se le
checkbox siano true o false ma azionando la query secondo altri parametri.
Ho provato in vari modi ma nulla. Premetto che ci sono anche altri parametri
definiti in txtBox nella maschera!
Spero di essermi spiegato......grazie a tutti e ciao!!!!


text:
"Fabio" <
fole...@libero.it
> ha scritto nel messaggio
news:VgYY8.47481$7N3.1...@twister2.libero.it...
[CUT]
>
> Spero di essermi spiegato
Mica tanto! :-)
> ......grazie a tutti e ciao!!!!
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Mettiamola cosi: esempio............io ho una query che deriva i valori da
una maschera ed inseribili dall'utente.........tra i vari criteri devo
valorizzare due check box..........ma  non voglio fargli assumere solo i
valori true o false ma anche non prenderli in considerazione quando l'utente
non vuole considerarli come filtro.
Stavolta credo di essere stato chiaro ......almeno spero........ciao ciao


author: Antonio Biso

text:
"Fabio" <
fole...@libero.it
> ha scritto nel messaggio
news:axkZ8.59325$7N3.1...@twister2.libero.it...

Usa un gruppo di opzioni con tre opzioni, associate ai valori 1 2 e 3.
Sì, no e non ti caco
Poi il campo che risente del valore inserito sarà un intero e non un Sì/No
Antonio


text:
"Fabio" <
fole...@libero.it
> ha scritto nel messaggio
news:axkZ8.59325$7N3.1...@twister2.libero.it...

Se la maschera in cui imposti i parametri per la query si chiaama Maschera1.
Per selezionare i valori della check box inserisci in Maschera1 una casella
combinata non associata e chiamala MiaCombo.
MiaCombo deve avere una sola colonna e deve avere la proprietà Tipo origine
riga impostata a Elenco valori; nell'origine riga della combo scrivi:
"Si";"No";"Tutti"
Nei criteri della query relativi al campo di tipo Si/No scrivi
Like
IIf([Forms]![Maschera1]![MiaCombo]="Si";Vero;IIf([Forms]![Maschera1]![MiaCom
bo]="No";Falso;"*"))
Per visualizzare i record che nella check box hanno il valore True seleziona
nella casella combinata Si; per visualizzare i record che nella check box
hanno il valore False seleziona nella casella combinata No; per non
selezionare in base ai valori della check box non selezionare alcunché nella
casella combinata oppure seleziona Tutti.
Spero che sia quello che ti serve.



title: sottomaschera per elenco record maschera

author: iociprovo

text:
Buongiorno,
mi sto avventurando nel fantastico mondo di access (2003):
ho creato la mia tabella(campo nome, campo dati1,campo dati2...), la sua
maschera (che mi visualizza un record alla volta). non so se ha influenza
ma il campo nome sulla maschera � in realt� una casella di riepilogo di
una tabellina con tutti i nomi.
ora vorrei creare una sottomaschera (piazzata nella maschera ovviamente)
che mi elenchi (es come un grigliato excel) tutti i record che hanno il
valore del campo nome uguale a quello che sto visualizzando con la
maschera principale...
Ho creato una query che sembra funzionare (se provo ad inserire dei
criteri... mi restituisce quello che mi aspetto)
ho creato una maschera che mi visualizza i dati della query...
ho trascinato la (sotto)maschera nella mia maschera... ma mi visualizza
solo 1 riga alla volta... dove sto sbagliando?
ho provato anche a giocherellare con campo master e campo secondario ma
non sono riuscito ad ottenere nulla...
esempio:
tabella generale
GIUSEPPE; BIANCO; NERO;
MARIO; ROSSO; BIANCO
GIUSEPPE; BLU; GIALLO
quando sono sul record 1 o 3
la sotto maschera dovrebbe farmi vedere:
GIUSEPPE; BIANCO; NERO;
GIUSEPPE; BLU; GIALLO
sono sicuro che � demenziale... per� non ci riesco...
ho provato anche con l'autocomposizione della sottomaschera ma purtroppo
mi dice che non � installata quell'autocomposizione (e ovviamente non si
trova pi� il cd)
grazie
ciao
E se volessi utilizzare un'immagine (ripetuta) come sfondo della maschera
(principale)?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: IOCIPROVO

text:
iociprovo ha scritto:
> esempio:
> tabella generale
> GIUSEPPE; BIANCO; NERO;
> MARIO; ROSSO; BIANCO
> GIUSEPPE; BLU; GIALLO
> quando sono sul record 1 o 3
> la sotto maschera dovrebbe farmi vedere:
> GIUSEPPE; BIANCO; NERO;
> GIUSEPPE; BLU; GIALLO
RETTIFICO PARZIALMENTE:
se un campo diverso dal campo nome � utilizzato come campo master e
secondario e nei record � presente pi� volte un determinato valore (in
quel campo) la sottomascherafunziona correttamente. vuol dire che non gli
piace che sia una casella di riepilogo a darli il "la"?



title: ricevuta fiscale con Report di access

author: gino galdi

text:
Devo stampare un report di access su un foglio personalizzato di 150X200 mm
sono riuscito a stampare in fondo alla pagina (sempre nella stessa
posizione) l'importo totale della ricevuta fiscale.
Poichč il foglio su cui viene stampato la ricevuta ha delle voci che io devo
andare a riempire con la stampa ho un problema con il margine inferiore del
foglio in quanto non riesco ad impostarlo, e quindi l'importo in euro che
deve essere stampato sotto l'importo totale in lire non viene
come posso fare per risolvere il problema
grazie


title: compleanni

text:
Avrei bisogno di creare una maschera nella quale vengano visualizzati solo
le persone di cui č il compleanno in data odierna.
(es: Luigi nato il 14/03/1982, quando apro la maschera e la data č 14/03 di
qualsiasi anno mi da il nome Luigi)
spero di essere stato chiaro
La mia idea era di creare una query e mettere qualcosa che facesse ciň nei
criteri, ma il problema č questo: cosa mettere nei criteri nel caso l'idea
fosse buona??
Ciao a tutti e grazie,
Luigi


title: compleanni

author: angelo azzurro

text:
"Luigi" <
luigia...@tiscali.it
> ha scritto nel messaggio
news:Fe5k8.16915$1S3.4...@twister1.libero.it...
> Avrei bisogno di creare una maschera nella quale vengano visualizzati solo
> le persone di cui è il compleanno in data odierna.
>
> (es: Luigi nato il 14/03/1982, quando apro la maschera e la data è 14/03
di
> qualsiasi anno mi da il nome Luigi)
>
> spero di essere stato chiaro
>
> La mia idea era di creare una query e mettere qualcosa che facesse ciò nei
> criteri, ma il problema è questo: cosa mettere nei criteri nel caso l'idea
> fosse buona??
>
> Ciao a tutti e grazie,
> Luigi
>
>
DataCompleanno = Date()
ciao


title: compleanni

text:
"angelo azzurro" <
roby...@tiscalinet.it
> ha scritto nel messaggio
news:TG6k8.17514$1S3.5...@twister1.libero.it...

ho già provato a fare quello che mi hai detto il problema è che il confronto
lo faccio con la data di nascita quindi scrivendo quell'espressione mi
darebbe solo una persona che è nata nella data odierna e nell'anno corrente
mentre non mi darebbe nessuna persona nata nello stesso giorno e mese ma di
anni precedenti, mi servirebbe qualcosa che facesse il confronto solo su
giorno e mese!
ciao,
Luigi


title: compleanni

text:
"Luigi" <
luigia...@tiscali.it
> ha scritto nel messaggio
news:US6k8.17763$%g7.4...@twister2.libero.it...

Vero! sembrava troppo semplice!
comunque
Format ([DataCompleanno];"gg-mm") = Format (Date();"gg-mm")
Dovrebbe essere giusta la sintassi, comunque il concetto è queelo
esatrpolare il valore gg e mm dalle due date e metterle a confronto


title: compleanni

text:
"angelo azzurro" <
roby...@tiscalinet.it
> ha scritto nel messaggio
news:eCfk8.19475$1S3.5...@twister1.libero.it...

chiaramente il primo format s lo metti come alias nella qry e il criterio
sotto! :)


title: compleanni

text:
"angelo azzurro" <
roby...@tiscalinet.it
> ha scritto nel messaggio
news:MKfk8.20438$%g7.5...@twister2.libero.it...

Grazie mille funziona alla perfezione!
CIao,
Luigi


title: compleanni

author: Roccia

text:
Il Thu, 14 Mar 2002 11:28:38 +0100, Luigi oso' dichiarare:
> Avrei bisogno di creare una maschera nella quale vengano visualizzati solo
> le persone di cui è il compleanno in data odierna.
>
> (es: Luigi nato il 14/03/1982, quando apro la maschera e la data è 14/03 di
> qualsiasi anno mi da il nome Luigi)
>
> spero di essere stato chiaro
>
> La mia idea era di creare una query e mettere qualcosa che facesse ciò nei
> criteri, ma il problema è questo: cosa mettere nei criteri nel caso l'idea
> fosse buona??
Te lo scrivo in SQL, che secondo me e' piu' comodo:
WHERE Month([DatNasc])=Month(Now()) AND Day([DatNasc]=)=Day(Now())
Oppure
WHERE FORMAT([DatNasc],"dd/mm")=FORMAT(now(),"dd/mm")
O anche:
WHERE Datediff("d",Dateserial(Year(now()),Month(DatNasc),Day
(DatNasc),now())<5
(questa comincia a avvertiri 5 giorni prima...)
--
Cia'
"Roccia" Max De Poli <
rocc...@katamail.com
>


title: compleanni

text:
"Roccia Max De Poli" <
rocc...@katamail.com
> ha scritto nel messaggio
news:MPG.16fb1fc9...@news.tiscalinet.it...

Scusa se ne approfitto ma come posso fare, sulla falsa riga di quanto mi hai
postato, per far scegliere alla query solo i record che contengono un
determinato anno di nascita che io inserisco in una maschera chiamata anno??
la mia idea era di fare qualcosa del tipo
WHERE Year([DataNasc])=Year(Form[Anno][Anno])
dove il secondo "Anno" è la casella di testo nella quale inserisco l'anno
che mi interessa visualizzare!
Spero di essere stato abbastanza chiaro
Ciao e grazie anche per il codice per i compleanni!
Luigi


title: help x Roberto -Syd su casella combinata

author: Francesco

text:
Scusami, la tua risposta sulla casella combinata è un pò troppo tecnica per
me, puoi rispondermi con un esempio o puoi dirmi se c'è un modo alternativo
all'inserimento del codice?
Grazie


title: Imposta pagina (tutte le volte da capo)

author: Paolo La Malfa

text:
Salve a tutti
probabilmente se ne è gia parlato
ho un report in access 2000 impostato in orizzontale con margini da 10 mm
tutte le volte che chiudo il DB l'impostazione ritorna quella originale in
verticale con dei margini assurdi da 24 mm, le ho provate tutte  anche con
l'impostazione della stampante specifica ma non da risultati
Grazie a tutti
Paolo La Malfa
lama...@axia.it


title: Imposta pagina (tutte le volte da capo)

author: Ponciarello

text:
Anch'io ho questo problema!
Molti report hanno diverse impostazioni sia per i margini che per la
stampante specifica...
C'è una soluzione?
Grazie


title: Between e totali

text:
Ho (ancora) bisognodi un aiutino
Ho una query con campi: [data], [importo spesa], [negozio].
Vorrei fare il seguente: renderla parametrica per data (inserire due data,
dal... al) e avere i totali in tale intervallo di tempo,
(esempio se non mi fossi espresso troppo bene: se io ho comprato dal negozio
"PincoPallo" a gen., feb. marzo... vorrei che la query mi facesse vedere
solo il totale dell'importo, e non la lista delle date come mi succede
adesso).
Grazie in anticipo per l'aiuto.
Ciao
Beppe


title: Between e totali

text:
"beppe005" <
beppe005...@virgilio.it
> ha
scritto nel messaggio
news:eXfGc.416684$hc5.18...@news3.tin.it...

Crea una query raggruppata e tratta la data come
testo
MAssimiliano


title: Between e totali

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:t3gGc.12651$%l2....@news.edisontel.com...

Grazie!
Beppe


title: Dichiarazione variabili

author: Alberto Luzi

text:
Salve!
Se ho p.e.
If ....then
Dim a string
....
else
dim i as integer
....
end if

oppure....
Dim a string
dim i as integer
If ....then
....
else
....
end if

Grazie


title: Dichiarazione variabili

text:
Ma ti pare normale scrivere una roba simile...? Hai riletto quello che hai scritto...???

La domanda quale sarebbe....?????????

@Alex


title: Dichiarazione variabili

author: BFS

text:

anche senza la domanda ti dico meglio la seconda
BFS


title: Dichiarazione variabili

text:

ok grazie


title: Dichiarazione variabili

text:

le variabili è meglio dichiararle in alto?
o è indifferente?


title: Dichiarazione variabili

text:

E' assolutamente indifferente a livello tecnico, ma la questione è più che altro funzionale dal punto di vista della scrittura/lettura del codice.
Di solito chi sviluppa e scrive codice con un po di struttura si da un metodo, e si preferisce fare le dichiarazioni in Testa, se le spalmi e le routine sono lunghe... è disperivo in fase di debug.

Ognuno poi affina i propri metodi.

@Alex


title: Dichiarazione variabili

text:

grazie


title: Controlli sui campi

author: Alessandro

text:
Ho bisogno di un controllo che non permetta di lasciare il campo x vuoto se
il campo y presente un certo valore.
In altre parole se un prodotto risulta venduto, non può essere lasciato in
bianco il campo "data di vendita".
Come posso fare?
Alessandro


title: Controlli sui campi

author: Mad® Milox

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:nBZH6.9479$_r2.1...@news2.tin.it...

nella routine "dopo aggiornamento" del campo che indica il venduto metti
me.campodatavenduto=date    'ossia la data attuale
;)
se vuoi un controllo maggiore con immissione manuale della data venduto
metti un messaggio
msgbox "Riempite la data!"
me.campodatavenduto.setfocus
e sul campo "campodatavenduto" in uscita  metti
if me.campodatavenduto="" or isnull(campodatavenduto) then
me.campodatavenduto.setfocus          'cosi' non escono finche non lo hanno
riempito
endif
Ciao ;)
--
(^o^))~    Lorenzo   (^o^))~
"Preimaginare e' lo imaginare le cose che saranno..."
"Postimaginare e' imaginare le cose passate ..."
(Leonardo Da Vinci)


title: Controlli sui campi

author: Roberto da casa

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:nBZH6.9479$_r2.1...@news2.tin.it...

Effettua tale verifica nell'evento "Prima di aggiornare" della tua maschera
e se la verifica è negativa annulla l'evento di registrazione del record
(Cancel = True), dai un messaggio di avvertimento all'operatore con una
MsgBox  e sposta il fuoco sul controllo "data di vendita".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Controlli sui campi

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:k01I6.1427$eJ6.2...@news.infostrada.it...
>
> "Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
> news:nBZH6.9479$_r2.1...@news2.tin.it...
> > Ho bisogno di un controllo che non permetta di lasciare il campo x vuoto
> se
> > il campo y presente un certo valore.
> > In altre parole se un prodotto risulta venduto, non puň essere lasciato
in
> > bianco il campo "data di vendita".
> > Come posso fare?
> > Alessandro
> >
>
> Effettua tale verifica nell'evento "Prima di aggiornare" della tua
maschera
> e se la verifica č negativa annulla l'evento di registrazione del record
> (Cancel = True), dai un messaggio di avvertimento all'operatore con una
> MsgBox  e sposta il fuoco sul controllo "data di vendita".
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
>
>
Grazie Roberto, ma non mi č chiaro...
... se hai voglia puoi essere piů chiaro?
Grazie mille
Alessandro


title: Controlli sui campi

author: Roberto dal portatile

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:BuhI6.11718$_r2.2...@news2.tin.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:k01I6.1427$eJ6.2...@news.infostrada.it...
> >
> > "Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
> > news:nBZH6.9479$_r2.1...@news2.tin.it...
> > > Ho bisogno di un controllo che non permetta di lasciare il campo x
vuoto
> > se
> > > il campo y presente un certo valore.
> > > In altre parole se un prodotto risulta venduto, non può essere
lasciato
> in
> > > bianco il campo "data di vendita".
> > > Come posso fare?
> > > Alessandro
> > >
> >
> > Effettua tale verifica nell'evento "Prima di aggiornare" della tua
> maschera
> > e se la verifica è negativa annulla l'evento di registrazione del record
> > (Cancel = True), dai un messaggio di avvertimento all'operatore con una
> > MsgBox  e sposta il fuoco sul controllo "data di vendita".
> >
> > --
> > Roberto
> >
> > ---------------------------------------------
> > il Sito Comune di it.comp.appl.access:
> >
http://www.sitocomune.com
> > ---------------------------------------------
> >
> >
>
> Grazie Roberto, ma non mi è chiaro...
> ... se hai voglia puoi essere più chiaro?
> Grazie mille
> Alessandro
>
>
Se nella tua maschera hai due controlli: uno chiamato ImportoVendita
associato ad un campo di tipo numerico e l'altro chiamato DataVendita
associato ad un campo di tipo Data/ora, a fronte dell'evento "Prima di
aggiornare" della tua maschera genera il seguente codice VBA:
If Me!ImportoVendita <> 0 Then
    If IsNull(Me!DataVendita) Then
        MsgBox "Digita la data di Vendita"
        Cancel = True
        Me!DataVendita.SetFocus
    End If
Else
    If Not IsNull(Me!DataVendita) Then
        MsgBox "Digita l'importo di Vendita"
        Cancel = True
        Me!ImportoVendita.SetFocus
    End If
End If
Così facendo tutto andrà OK solo se i controlli saranno o ambedue
significativi o se saranno ambedue senza valore; in caso contrario otterrai
un messaggio che segnala il tipo di errore, il record non verrà registrato
ed il mouse si sposterà sul controllo che non è stato digitato.



title: Controlli sui campi

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:miiI6.3090$UW4.1...@news.infostrada.it...

Scusa l'ignoranza, ma ho nominato i campi della tabella con nomi del tipo
Data uscita (inserendo quindi uno spazio) quindi quando tento di inserirli
nel codice vba mi da errore.
Il nome del campo deve essere composo da una sola parola?
Grazie ancora.
Alessandro


title: Controlli sui campi

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:AWkI6.13476$_r2.2...@news2.tin.it...
>
[CUT]
> Scusa l'ignoranza, ma ho nominato i campi della tabella con nomi del tipo
> Data uscita (inserendo quindi uno spazio) quindi quando tento di inserirli
> nel codice vba mi da errore.
> Il nome del campo deve essere composo da una sola parola?
> Grazie ancora.
> Alessandro
>
Non necessariamente: nel tuo caso chiudi i nomi dei controlli tra parentesi
quadre. Per non avere questa seccatura o li fai di una sola parola o leghi
le due parole con un underscore ( _ ).



title: Controlli sui campi

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:wklI6.4837$UW4.6...@news.infostrada.it...

Non ho parole troppo gentile!!!
Approfitto e faccio altre due domande:
1) Quando mi compare il MsgBox che mi dice di inserire la data, clicco su OK
e mi dice: "L'azione DoMenuItem è stata annullata". Posso evitare che appaia
questo messaggio?
2)Se i campi da controllare "non vuoti" sono due o più come devo modificare
il codice?
Grazie e grazie ancora!
Alessandro


title: Controlli sui campi

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:qSlI6.13548$_r2.2...@news2.tin.it...
>
[CUT]
> >
> >
> Non ho parole troppo gentile!!!
> Approfitto e faccio altre due domande:
> 1) Quando mi compare il MsgBox che mi dice di inserire la data, clicco su
OK
> e mi dice: "L'azione DoMenuItem è stata annullata". Posso evitare che
appaia
> questo messaggio?
Prova a modificare il codice VBA come segue e vedi se il problema scompare:
If Me!ImportoVendita <> 0 Then
    If IsNull(Me!DataVendita) Then
        MsgBox "Digita la data di Vendita"
        DoCmd.SetWarnings False
        Cancel = True
        DoCmd.SetWarnings True
        Me!DataVendita.SetFocus
    End If
Else
    If Not IsNull(Me!DataVendita) Then
        MsgBox "Digita l'importo di Vendita"
        DoCmd.SetWarnings False
        Cancel = True
        DoCmd.SetWarnings True
        Me!ImportoVendita.SetFocus
    End If
End If
>
> 2)Se i campi da controllare "non vuoti" sono due o più come devo
modificare
> il codice?
Sei in una maschera, quindi non campi (che si trovano nelle tabelle e nelle
query) ma controlli.
Dipende da quanti sono i controlli e come vanno controllati fra di loro. In
effetti alle righe di codice già scritte ne dovrai aggiungere altre per
controllare gli altri controlli, scopiazzando il mio esempio.
> Grazie e grazie ancora!
> Alessandro
--



title: Controlli sui campi

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:q6zI6.10543$UW4.7...@news.infostrada.it...

Purtroppo anche con il nuovo codice che mi hai fornito  il problema della
visualizzazione del messaggio "L'azione DoMenuItem è stata annullata"
permane!
Non sono prorpio riuscito a risolvere...
Alessandro


title: Controlli sui campi

author: Federico Luciani

text:
Alessandro wrote:
> "Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
> > "Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio

> Purtroppo anche con il nuovo codice che mi hai fornito  il problema della
> visualizzazione del messaggio "L'azione DoMenuItem è stata annullata"
> permane!
> Non sono prorpio riuscito a risolvere...
> Alessandro
scusate se mi intrometto, ma imho da qualche parte stai eseguendo
un'azione del tipo:
   docmd.DoMenuItem ...
ed e questo che genera l'errore, non il codice che ti ha fornito
Roberto.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: Controlli sui campi

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:CeGI6.2434$024....@news2.tin.it...
> "Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:q6zI6.10543$UW4.7...@news.infostrada.it...
> >
[CUT]
>
> Purtroppo anche con il nuovo codice che mi hai fornito  il problema della
> visualizzazione del messaggio "L'azione DoMenuItem è stata annullata"
> permane!
> Non sono prorpio riuscito a risolvere...
> Alessandro
>
A questo punto non ho la più pallida idea del motivo per cui ti compare
questo messaggio.
Mi dispiace.



title: In merito alla visualizzazione maschere ..

author: Kinirepap

text:
Salve, un paio di giorni fa ho postato per un problema apparentemente
strano. Le maschere opportuamente dimensionate compresi i componenti in
esse non avevano lo stesso aspetto con Win200Pro e WinXP.
Dopo vari tentativi mi sono reso conto che il problema risiede nello STILE
di visualizzazione di XP.
Infatti impostando lo stile classico tutto torna a posto.
Adesso il problema è ....
Esiste un modo di impostare lo stile delle form dentro access senza
costringere l'utente a cambiare quello di tutto Windows? Possibilmente
impostazione da fare in automatico via VB.
Grazie.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Alessandro Baraldi

text:
Kinirepap ha scritto:
> Salve, un paio di giorni fa ho postato per un problema apparentemente
> strano. Le maschere opportuamente dimensionate compresi i componenti in
> esse non avevano lo stesso aspetto con Win200Pro e WinXP.
> Dopo vari tentativi mi sono reso conto che il problema risiede nello STILE
> di visualizzazione di XP.
> Infatti impostando lo stile classico tutto torna a posto.
> Adesso il problema è ....
> Esiste un modo di impostare lo stile delle form dentro access senza
> costringere l'utente a cambiare quello di tutto Windows? Possibilmente
> impostazione da fare in automatico via VB.
> Grazie.
I matematici direbbero C.V.D. (come volevasi dimostrare).... ;-)
Si può fare ... e ti ho già suggerito nel 3D precedente come, ma devi
appoggiarti alle API per
determinare :
Risoluzione Video
Dimensioni MDI_CHILD(Access) o Child_Area
Dimensioni Form Relative alla MDI
Ricalcolare le nuove dimensioni
Ridimensionare le Form
Premesso che non ho capito quale sia la dimensione che vuoi assegnare,
visto che il metodo da te usato era empirico per approssimazione, se mi
spieghi l'effetto che vuoi ottenere è possibile che abbia una routine
già fatta da passarti...!
Le form devono occupare tutta la superficie della MDI_Child(lo sfondo
Grigione di Access)..?
Può esserti utile leggere questo tutorial per capire quello di cui
stò parlando:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=232
Saluti
@Alex


author: PBsoft

text:
> Si può fare ... e ti ho già suggerito nel 3D precedente come, ma devi
> appoggiarti alle API per
> determinare :
> Risoluzione Video
> Dimensioni MDI_CHILD(Access) o Child_Area
> Dimensioni Form Relative alla MDI
> Ricalcolare le nuove dimensioni
> Ridimensionare le Form
No Alex. Kinirepap vuole sapere se è possibile impostare l'aspetto grafico
delle form di Access secondo lo "stile classico" di Windows, indipendentemente
dallo "stile" che Windows XP ha impostato dentro "Proprietà Schermo -> Aspetto".
Il tuo suggerimento gli serve se vuole giocare con le dimensioni delle form.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:
> Esiste un modo di impostare lo stile delle form dentro access senza
> costringere l'utente a cambiare quello di tutto Windows? Possibilmente
> impostazione da fare in automatico via VB.
Credo proprio di no, ma forse qualche API-cultore potrebbe smentirmi.
Tuttavia, anche se venissi smentito, credo che la gestione tramite API di
una simile richiesta sia decisamente difficile e, quindi, poco proponibile.



text:
PBsoft ha scritto:

Quello che chiede è fuori da qualsiasi logica, non è accettabile che
un'applicazione vada a modificare impostazioni di sistema, chi sviluppa
in quest'ottica andrebbe PUNITO...!
Ricodiamoci che spesso sviluppiamo applicazioni che funzionano in
MultiTanking, ed avere questi pensieri è Demoniaco....!
Quanto gli ho suggerito non serve per giocare con le dimensioni, ma è
l'unico modo professionale per impostarle....(sempre che serva farlo)
è un concetto un pò diverso...! ;-)
Ciao
@Alex


text:
> Quello che chiede č fuori da qualsiasi logica, non č accettabile che
> un'applicazione vada a modificare impostazioni di sistema, chi
> sviluppa in quest'ottica andrebbe PUNITO...!
AHAHAHAHAHAH!!!!
ROTFL!!!!
> Ricodiamoci che spesso sviluppiamo applicazioni che funzionano in
> MultiTanking, ed avere questi pensieri č Demoniaco....!
ROTFL again!!!!
> Quanto gli ho suggerito non serve per giocare con le dimensioni, ma č
> l'unico modo professionale per impostarle....(sempre che serva farlo)
> č un concetto un pň diverso...! ;-)
Dai, non fare cosě. Mica volevo dire che il tuo suggerimento č un giochino!!!
Che carattere!!! ;-)



text:
PBsoft ha scritto:
[CUT]
> Dai, non fare così. Mica volevo dire che il tuo suggerimento è un giochino!!!
>
> Che carattere!!! ;-)
Lo hai fatto apposta per vedere come reagivo.... confessa...!!!
;-)
> --
> PBsoft di Gabriele Bertolucci
>
www.pbsoft.it
> skype:pbsoftsolution
@Alex


text:
Alessandro Baraldi ha scritto:
> PBsoft ha scritto:
> > > Si può fare ... e ti ho già suggerito nel 3D precedente come, ma devi
> > > appoggiarti alle API per
> > > determinare :
> > > Risoluzione Video
> > > Dimensioni MDI_CHILD(Access) o Child_Area
> > > Dimensioni Form Relative alla MDI
> > > Ricalcolare le nuove dimensioni
> > > Ridimensionare le Form
L'ho fatto quello che mi hai detto tu e proprio grazie a questo che ho
capito che il problema non dipende da "risoluzioni" di sorta.
>> No Alex. Kinirepap vuole sapere se è possibile impostare l'aspetto >>grafico
>> delle form di Access secondo lo "stile classico" di Windows,
>>indipendentemente
>> dallo "stile" che Windows XP ha impostato dentro "Proprietà Schermo ->
>>Aspetto".
Appunto.
> > --
> > PBsoft di Gabriele Bertolucci
> >
www.pbsoft.it
> > skype:pbsoftsolution
> Quello che chiede è fuori da qualsiasi logica, non è accettabile che
> un'applicazione vada a modificare impostazioni di sistema, chi sviluppa
> in quest'ottica andrebbe PUNITO...!
> Ricodiamoci che spesso sviluppiamo applicazioni che funzionano in
> MultiTanking, ed avere questi pensieri è Demoniaco....!
Do per scontato che ti stia divertendo a scherzare dicendo queste cose
perchè conosco i suggerimenti sempre puntuali e precisi che dai di solito
(compresi quelli dello scorso 3D) ed anche perchè io ho scritto :
"Esiste un modo di impostare lo stile delle form DENTRO ACCESS SENZA
costringere l'utente a CAMBIARE quello di TUTTO Windows?"
A questa domanda bastava rispondere SI, NO oppure in un guizzo di modestia
NON SO.
PBSoft comunque ha centrato il problema. I parametri che dici tu, me li
sono  fatti restituire tramite chiamate delle funzioni che tu mi hai
suggerito e sono tutti perfettamente identici. Quindi vorrei sapere (lo
scrivo diveramente) :
Se esiste un metodo per selezionare per le form di access uno stile di
visualizzazione come si fa per le finestre di Windows.
Grazie ancora a tutti.



text:
Kinirepap ha scritto:
 [CUT]
> Do per scontato che ti stia divertendo a scherzare dicendo queste cose
> perchè conosco i suggerimenti sempre puntuali e precisi che dai di solito
> (compresi quelli dello scorso 3D) ed anche perchè io ho scritto :
Maybe....
> "Esiste un modo di impostare lo stile delle form DENTRO ACCESS SENZA
> costringere l'utente a CAMBIARE quello di TUTTO Windows?"
>
> A questa domanda bastava rispondere SI, NO oppure in un guizzo di modestia
> NON SO.
> PBSoft comunque ha centrato il problema. I parametri che dici tu, me li
> sono  fatti restituire tramite chiamate delle funzioni che tu mi hai
> suggerito e sono tutti perfettamente identici. Quindi vorrei sapere (lo
> scrivo diveramente) :
> Se esiste un metodo per selezionare per le form di access uno stile di
> visualizzazione come si fa per le finestre di Windows.
> Grazie ancora a tutti.
Ti premetto che la domanda di per se è fuori luogo..., io potrei fare
il guizzo di modestia, ma non in questo caso...!
Conoscendo il S.O. e come la piattaforma Win opera sulle interfaccie
non avresti fatto la domanda..., motivo per cui ti ho ribadito l'unico
modo per fare quanto hai chiesto senza darti del coglione...!
Saluti
@Alex


text:
Alessandro Baraldi ha scritto:
> Ti premetto che la domanda di per se č fuori luogo..., io potrei fare
> il guizzo di modestia, ma non in questo caso...!
> Conoscendo il S.O. e come la piattaforma Win opera sulle interfaccie
> non avresti fatto la domanda..., motivo per cui ti ho ribadito l'unico
> modo per fare quanto hai chiesto senza darti del coglione...!
> Saluti
> @Alex
Ed io ti ho rispiegato il mio problema perchč immaginavo fossi
sufficientemente intelligente da non pensare che tutti possano sapere
tutto quello che sai tu e soprattutto da arrivare a concepire che se
qualcuno non sa una cosa non sia necessariamente un coglione.
Evidentemente mi sbagliavo. Hai perso una buona occasione per non fare la
figura del "coglione". Peccato.
Complimenti per la presunzione e soprattutto per l'educazione. Tu si che
sai a cosa serve un NG.
In merito chiedo scusa a tutti quanti siano stati costretti a leggere
queste cose inutili.
Saluti.



text:
Kinirepap ha scritto:
> Alessandro Baraldi ha scritto:
>
>
> > Ti premetto che la domanda di per se è fuori luogo..., io potrei fare
> > il guizzo di modestia, ma non in questo caso...!
> > Conoscendo il S.O. e come la piattaforma Win opera sulle interfaccie
> > non avresti fatto la domanda..., motivo per cui ti ho ribadito l'unico
> > modo per fare quanto hai chiesto senza darti del coglione...!
>
> > Saluti
>
> > @Alex
>
> Ed io ti ho rispiegato il mio problema perchè immaginavo fossi
> sufficientemente intelligente da non pensare che tutti possano sapere
> tutto quello che sai tu e soprattutto da arrivare a concepire che se
> qualcuno non sa una cosa non sia necessariamente un coglione.
> Evidentemente mi sbagliavo. Hai perso una buona occasione per non fare la
> figura del "coglione". Peccato.
Fai attenzione perchè io sono stato chiaro.... ti ho dato tutti i
riferimenti "SENZA, e ribadisco SENZA darti del coglione" leggi bene
quello che ho detto e non fraintendere..., non mi
sarei mai permesso di farlo, quindi visto che l'italiano non è
Optional come le dichiarazioni
delle variabili cerca di non capire quello che vuoi ma quello che ho
detto.
Non ho peccato di presunzione, ma non hai nemmeno colto il mio
suggerimento tacciandomi di immodestia..??
Dai .... a militare dicevano "passi lunghi e ben distesi...!"
> Complimenti per la presunzione e soprattutto per l'educazione. Tu si che
> sai a cosa serve un NG.
> In merito chiedo scusa a tutti quanti siano stati costretti a leggere
> queste cose inutili.
>
> Saluti.
Non fare il calimero, sono finite le feste...!
@Alex


text:
Alessandro Baraldi ha scritto:
> Kinirepap ha scritto:
> > Alessandro Baraldi ha scritto:
> >
> >
> > > Ti premetto che la domanda di per se č fuori luogo..., io potrei fare
> > > il guizzo di modestia, ma non in questo caso...!
> > > Conoscendo il S.O. e come la piattaforma Win opera sulle interfaccie
> > > non avresti fatto la domanda..., motivo per cui ti ho ribadito l'unico
> > > modo per fare quanto hai chiesto senza darti del coglione...!
> >
> > > Saluti
> >
> > > @Alex
> >
> > Ed io ti ho rispiegato il mio problema perchč immaginavo fossi
> > sufficientemente intelligente da non pensare che tutti possano sapere
> > tutto quello che sai tu e soprattutto da arrivare a concepire che se
> > qualcuno non sa una cosa non sia necessariamente un coglione.
> > Evidentemente mi sbagliavo. Hai perso una buona occasione per non fare la
> > figura del "coglione". Peccato.
> Fai attenzione perchč io sono stato chiaro.... ti ho dato tutti i
> riferimenti "SENZA, e ribadisco SENZA darti del coglione" leggi bene
> quello che ho detto e non fraintendere..., non mi
> sarei mai permesso di farlo, quindi visto che l'italiano non č
> Optional come le dichiarazioni
> delle variabili cerca di non capire quello che vuoi ma quello che ho
> detto.
> Non ho peccato di presunzione, ma non hai nemmeno colto il mio
> suggerimento tacciandomi di immodestia..??
> Dai .... a militare dicevano "passi lunghi e ben distesi...!"
> > Complimenti per la presunzione e soprattutto per l'educazione. Tu si che
> > sai a cosa serve un NG.
> > In merito chiedo scusa a tutti quanti siano stati costretti a leggere
> > queste cose inutili.
> >
> > Saluti.
> Non fare il calimero, sono finite le feste...!
> @Alex
si ok, hai ragione.



title: Ultimi 5 ordini per articolo

author: MarcoMac

text:
Buonasera al newsgroup.

Tabella Ordini
Tabella Articoli

è possibile una query che mi ritorni gli ultimi 5 ordini per ogni
singolo articolo?

Grazie


title: Ultimi 5 ordini per articolo

text:

select top 5 numOrdine from ...... where ....

ciao


title: Ultimi 5 ordini per articolo

text:

Veramente così ottengo gli ultimi cinque ordini di TUTTI gli articoli.

A me servivano gli ultimi 5 di ogni articolo. Per cui se ci sono 3
articoli  - diciamo Mele, Pere, Arance - e se, logicamente esiste un
numero di ordini sufficiente mi deve ritornare 5 righe per le Mele, 5
per le Pere, 5 per le Arance.


title: Ultimi 5 ordini per articolo

text:
Il 06/03/2012 15:31, MarcoMac ha scritto:
> On 6 Mar, 14:53, BFS<B...@BFSBFS.it>  wrote:
>> Il 06/03/2012 14:44, MarcoMac ha scritto:
>>
>>> Buonasera al newsgroup.
>>
>>> Tabella Ordini
>>> Tabella Articoli
>>
>>> č possibile una query che mi ritorni gli ultimi 5 ordini per ogni
>>> singolo articolo?
>>
>>> Grazie
>>
>> select top 5 numOrdine from ...... where ....
>>
>> ciao
>
> Veramente cosě ottengo gli ultimi cinque ordini di TUTTI gli articoli.
>
> A me servivano gli ultimi 5 di ogni articolo. Per cui se ci sono 3
> articoli  - diciamo Mele, Pere, Arance - e se, logicamente esiste un
> numero di ordini sufficiente mi deve ritornare 5 righe per le Mele, 5
> per le Pere, 5 per le Arance.
>
>

allora ti servono le subquery

http://allenbrowne.com/subquery-01.html

il paragrafo "TOP n records per group" fa al caso tuo

buona lettura
ciao
BFS


title: Ultimi 5 ordini per articolo

text:
On 6 Mar, 15:59, BFS <B...@BFSBFS.it> wrote:
> Il 06/03/2012 15:31, MarcoMac ha scritto:
>
>
>
>
>
>
>
>
>
> > On 6 Mar, 14:53, BFS<B...@BFSBFS.it>  wrote:
> >> Il 06/03/2012 14:44, MarcoMac ha scritto:
>
> >>> Buonasera al newsgroup.
>
> >>> Tabella Ordini
> >>> Tabella Articoli
>
> >>> è possibile una query che mi ritorni gli ultimi 5 ordini per ogni
> >>> singolo articolo?
>
> >>> Grazie
>
> >> select top 5 numOrdine from ...... where ....
>
> >> ciao
>
> > Veramente così ottengo gli ultimi cinque ordini di TUTTI gli articoli.
>
> > A me servivano gli ultimi 5 di ogni articolo. Per cui se ci sono 3
> > articoli  - diciamo Mele, Pere, Arance - e se, logicamente esiste un
> > numero di ordini sufficiente mi deve ritornare 5 righe per le Mele, 5
> > per le Pere, 5 per le Arance.
>
> allora ti servono le subquery
>
>
http://allenbrowne.com/subquery-01.html

>
> il paragrafo "TOP n records per group" fa al caso tuo
>
> buona lettura
> ciao
> BFS

Perfetto, grazie mille


title: proprietà filter

author: il mago galbusera

text:
ciao..
devo riuscire a riordinare un set di record  di una form via codice
dall'interno di una sottomaschera
avevo pensato di fare:
Parent.OrderBy = "campo"
if not Parent.FilterOn then Parent.Filter = "" ' serve a non applicare un
filtro precedentemente impostato ma non attivo
RunCommand accmdApplyFilterSort
perchè non funziona?
è come se Parent.Filter= "" fosse trasparente!!!!!
inoltre il solo modificare questa proprieta lancia tutti gli eventi
ApplyFilter della maschera principale e della sottomaschera!
perchè?
PS il risultato è che applico due volte il filtro definito nella property
Filter anche se io gli ho solo chiesto di cancellare i rimasugli di un
filtro precedente...
Help please!
Ciao ciao


title: proprietà filter

author: Paolo Holzl

text:
>Parent.OrderBy = "campo"
>if not Parent.FilterOn then Parent.Filter = "" ' serve a non applicare un
>filtro precedentemente impostato ma non attivo
>RunCommand accmdApplyFilterSort
>
>perchè non funziona?
>è come se Parent.Filter= "" fosse trasparente!!!!!
>inoltre il solo modificare questa proprieta lancia tutti gli eventi
>ApplyFilter della maschera principale e della sottomaschera!
>perchè?
>
>PS il risultato è che applico due volte il filtro definito nella property
>Filter anche se io gli ho solo chiesto di cancellare i rimasugli di un
>filtro precedente...
Non entro nel merito del tuo problema ma ti sconsiglio vivamente di
usare i filtri che risultano estremamente poco performanti.
Ti consiglio invece di appoggiare il tuo form o report su una query
che filtra con parametri like ecc operando poi dei requery.
----------------------------------------------------------
Paolo Hölzl
Gruppo Tekup Software developer (Bologna)
----------------------------------------------------------
ATTENTION!, antispam
For reply, substitute xxx with gruppotekup


title: Parere sui progetti dati ADP

author: Mario

text:
Salve a tutti,
sto cercando di trovare una soluzione che mi faccia risparmiare
tempi di sviluppo e buone prestazioni in ambito LAN per quanto riguarda
un database.
Le scelte sono da fare tra .NET+SQL Server JSP+Oracle
Io ho pensato che vista l'attività che svolge (magazzino e negozio di
abbigliamento) e il volume che ha di progettare un database SQL Server
con un front end sui progetti Access XP o 2003.
Che ne pensate? Visto che ho il tempo breve come vincolo di
progettazione.
Qualcuno ha provato a usare i progetti ADP connessi a SQL-Server oppure
a MSDE2000?
Che prestazioni hanno in termini di affidabilità e tempi di risposta?
Penso che il sistema sarà utilizzato da una decina di utenti.
Ancora sono in fase di raccolta dei requisiti.
In Access ho qualcosa che realizzai due anni fa, penso che con un upsize
guidato e conversioni di query a mano non dovrei avere problemi.
A qualcuno è capitato convertire db Access in ADP e ha avuto non pochi
problemi?
Non penso che il cliente sceglierà Oracle(da una parte è anche giusto
poichè non deve fare cose grandi)
Grazie del parere
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Parere sui progetti dati ADP

author: ALESSANDRO Baraldi

text:
"Mario" <
qpj...@tin.it
> ha scritto nel messaggio
news:f94000b4aab607ba288...@mygate.mailgate.org...

Non sono espertissimo, ma quì troverai sicuramente consigli autorevoli..!
Per quanto ne sò in base ad un piccolo progetto con MSDE-ADP(XP)
ti posso dire che la conversione da Access ad ADP è tutt'altro che
un giochetto.
Fosse da Access(BE) a SQL_SERVER come hai detto con gli UPSIZING
guidati +/- si risolve in poco, ma saresti legato a JET, e non avresti
creato
un ADP, ma un MDB che via ODBC prenderebbe dati da SQL_SERVER.
ADP usa OLEDB, pertanto ADO e devi dimenticarti DAO(non completamente
ma quasi).
Senza considerare che le Query o le procedure gestite alla maniera di Access
non hanno senso di essere usate in ADP, ma la progettazione di un progetto
ADP
per essere ottimizzato nei tempi di esecuzione e per sfruttare la potenza di
SQL_SERVER
necessita di usare con sapienza StoredProcedure e View....!!
Insomma per stringere:
Un progetto nato come Mdb deve essere quasi interamene riprogettato per
conformarsi
alle ottimizzazioni di ADP.
Ciao-
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Query tabella orario lavorativo

author: checco

text:
          Ciao a tutti ho una tabella degli orari lavorativi dei dipendenti cosě
strutturata:
DATA NOME ORA VERSO
01/02/05 rossi 8.00 ENTRATA
01/02/05 rossi 13.00 USCITA
01/02/05 rossi 15.00 ENTRATA
01/02/05 rossi 17.00 USCITA
01/02/05 verdi 22.00 ENTRATA
02/02/05 verdi 6.00 USCITA
Adesso mi serve fare delle query strutturata in quest'altro modo:
DATA NOME ENTRATA USCITA
01/02/05 rossi 8.00 14.00
01/02/05 rossi 15.00 17.00
01/02/05 verdi 22.00
02/02/05 verdi 6.00
Secondo voi si puň fare?
A me in sostanza serve sapere a seconda di alcune fasce orarie che richiedo
io se un dipendente era o meno presente. Del tipo il data 01/02/05 dalle
08.00 alle 15.00 chi era presente?
Grazie mille!
Francesco
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Query tabella orario lavorativo

author: Alex NSB

text:
> Ciao a tutti ho una tabella degli orari lavorativi dei
> dipendenti cosě strutturata:
<snip>
> Adesso mi serve fare delle query strutturata in quest'altro modo:
Forse questo fa al caso tuo:
http://groups.google.com/groups?th=30bc69fefe4cd651
HTH.
Alessandro


title: Query tabella orario lavorativo

text:

Mi dice "NOT FOUND"!
Checco



title: Query tabella orario lavorativo

text:
checco wrote:
>                     Il 24 Feb 2005, 16:19, "Alex NSB"
> <
ale...@tin.it
> ha scritto:
>>> Ciao a tutti ho una tabella degli orari lavorativi dei
>>> dipendenti così strutturata:
>>
>> <snip>
>>
>>> Adesso mi serve fare delle query strutturata in quest'altro modo:
>>
>> Forse questo fa al caso tuo:
>>
>>
http://groups.google.com/groups?th=30bc69fefe4cd651
>>
>> HTH.
>>
>> Alessandro
>
>
> Mi dice "NOT FOUND"!
Strano, a me funziona.
Prova questo (occhio al wrap):
http://groups.google.com/groups?hl=it&lr=&c2coff=1&threadm=ZloLd.8490%24lB4.244889%40twister1.libero.it&rnum=1&prev=/&frame=on
Alessandro


title: Query tabella orario lavorativo

text:
"Alex NSB" <
ale...@tin.it
> ha scritto nel messaggio
news:cvkttp$e6e$1...@newsread.albacom.net...

Guarda anche questo:
http://groups.google.it/groups?hl=it&lr=&c2coff=1&threadm=421af43c%240%246297%245fc30a8%40news.tiscali.it&rnum=1&prev=/groups%3Fhl%3Dit%26lr%3D%26c2coff%3D1%26q%3Dquery%2Braggruppamento%2Borari%2B2%26btnG%3DCerca%26meta%3Dgroup%253Dit.comp.appl.access
Se no lo visualizzi cerca su google "Query di raggruppamento Orari2", del
21.
Ciao
MarcoMac


title: personalizzazione icone toolbars

author: MoneyPenny

text:
Vorrei inserire da codice delle icone personalizzate sui bottoni di una
toolbar da me creata sempre da codice: è possibile farlo solo con il metodo
"copia ed incolla" o esiste un metodo più elegante che non sono riuscito ad
individuare? avrei pensato ad assegnare degli id personalizzati alle
immagini di mio interesse per poi richiamarl con la proprietà faceid ma non
ho idea di come fare.
Qualcuno può darmi una dritta?
Ringrazio anticipatamente chiunque voglia dedicarmi un po' del suo tempo
Auguroni di buone feste a tutti
     Antonio


title: personalizzazione icone toolbars

author: Alessandro Cara

text:

a suo tempo ho usato una cosa del genere:
Private Sub Comando3_Click()
    Do While bBuffer(0) = 0
        Call GetIcons(Me.Testo0, True, bBuffer())
        Me.Testo0 = Me.Testo0 + 1
   Loop
   Me.Bt1.PictureData = bBuffer()
   Me.Img1.PictureData = bBuffer()
    bBuffer(0) = 0
End Sub
bBuffer e' un array (in questo caso) di 488 elementi. Nel mio caso
andavo a reperire le icone "nascoste" di access (partono da un entry #60
in msaccess.exe)
Ovviamente se hai una qualsiasi struttura di tipo .ico basta caricarla
nel bBuffer e riutilizzare la stessa istruzione. Volendo, poiche'
picturedata e' un array puoi anche modificare direttamente i valori.
--
Alessandro Cara
P.S. fino al 3 Gen sono irrangiungibile


title: personalizzazione icone toolbars

text:
Alessandro Cara <
al...@blunet.it
> wrote in message
3A43AB69...@blunet.it...

sentitamente grazie
Antonio


title: stampa unione

text:
ho un db costituito da una tabella cliente e una tabella collegata con degli
ordini, con una query di creazione tabella vorrei popolare un documento word
tuttavia nel documento riesco a visualizzare solo il primo record, gli altri
soltanto cliccando sui pulasanti di spostamento. Come faccio a far comparire
tutti i record a mo' di tabella?


title: stampa unione

text:

Hai provato a creare sul db un Report? Se non riesci manualmente, c'è
anche l'autocomposizione.
Saluti
M7a1x


title: Lista CAP/Provincia

author: Marco F

text:
Buongiorno a tutti,
avrei un problema di reperimento dati.
Ho bisogno di costruire un check di integrita' dell'anagrafica clienti tra
CAP e Provincia, ma non riesco assolutamente a trovare una tabella con i
dati in questione in formato importabile.
Qualcuno riesce a indirizzarmi verso qualche sito?
--
Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Lista CAP/Provincia

author: Carlo Costarella

text:
"Marco F" <
l...@lalalala.la
> ha scritto nel messaggio
news:ej9ik6$rme$1...@news.newsland.it...
> Buongiorno a tutti,
> avrei un problema di reperimento dati.
> Ho bisogno di costruire un check di integrita' dell'anagrafica clienti tra
> CAP e Provincia, ma non riesco assolutamente a trovare una tabella con i
> dati in questione in formato importabile.
> Qualcuno riesce a indirizzarmi verso qualche sito?
> --
> Marco
>
> --
Cerca in questo NG che se ne è parlato più volte, specie riguardo ai nuovi
cap delle poste italiane.
Ciao, Carlo


title: Lista CAP/Provincia

text:
Carlo Costarella ha scritto:
> Cerca in questo NG che se ne č parlato piů volte, specie riguardo ai nuovi
> cap delle poste italiane.
ho cercato, ma i rimandi ad una qualche lista sono affidati a link che non
esistono piu'.
Ho letto della mossa delle poste, del CDROM, etc, ma siti, anche non
aggiornatissimi, devo ancora trovarne.
Tu ne sai qualcosa?
Grazie.



title: Lista CAP/Provincia

text:
"Marco F" <
l...@lalalala.la
> ha scritto nel messaggio
news:ej9tc9$d2n$1...@news.newsland.it...
> Carlo Costarella ha scritto:
>
>> Cerca in questo NG che se ne č parlato piů volte, specie riguardo ai
>> nuovi
>> cap delle poste italiane.
>
> ho cercato, ma i rimandi ad una qualche lista sono affidati a link che non
> esistono piu'.
> Ho letto della mossa delle poste, del CDROM, etc, ma siti, anche non
> aggiornatissimi, devo ancora trovarne.
> Tu ne sai qualcosa?
> Grazie.
> --
> Marco
>
Leggiti i post: [very important]....
e [Petizione]...
Se ancora non ci riesci scrivimi in privato che ti mando un mdb con i cap
aggiornati.
Pappa pronta? No grazie preferisco provarci da solo...
Ciao, Carlo


title: Lista CAP/Provincia

text:
> Buongiorno a tutti,
> avrei un problema di reperimento dati.
> Ho bisogno di costruire un check di integrita' dell'anagrafica clienti
> tra
> CAP e Provincia, ma non riesco assolutamente a trovare una tabella con
> i dati in questione in formato importabile.
> Qualcuno riesce a indirizzarmi verso qualche sito?
===
"Liberalizziamo l'elenco dei CAP"
http://www.petitiononline.com/freecap/petition.html
===
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Utilizzo di winiinet.dll per trasferimenti ftp

author: VT @ home

text:
Ho scaricato dal sito di Dev Ashish il file contenente l'aggiunta e
l'esempio per effettuare download/upload via ftp.
Poichè, come Dev Ashish medesimo precisa, in Access 2000 non è possibile
referenziare l'aggiunta (il file mda), ho importato *tutto* il codice
presente nel mda in un mio mdb (util.mdb) che contiene tutto il codice
di utilizzo generico e che uso come "libreria".
Ho quindi generato il corrispondente util.mde, quindi ho tentato di
usare, in un mdb che referenzia util.mde, le routine per effettuare il
download/upload .
Mi sono fermato subito perchè il codice non viene compilato.
La routine per l'upload che ho mutuato da quella di esempio di Dev
Ashish è la seguente:
Sub FTPUpload(pNomeFile As String)
On Error GoTo ErrHandler
Dim objFTP As FTP
Const conTARGET = "
ftp.tiscali.it
"
Set objFTP = New FTP
   With objFTP
     .FtpURL = conTARGET
     .SourceFile = vbNullString
     .DestinationFile = "/SML/" & pNomeFile
     .AutoCreateRemoteDir = True
     If Not .IsConnected Then .DialDefaultNumber
     .ConnectToFTPHost "nomeutente", "password"
     .UploadFileToFTPServer
   End With
ExitHere:
   On Error Resume Next
   Set objFTP = Nothing
   Call SysCmd(acSysCmdRemoveMeter)
   Exit Sub
ErrHandler:
   MsgBox Err.Number & vbCrLf & Err.Description, vbCritical + vbOKOnly,
Err.Source
   Resume ExitHere
End Sub
Il compilatore si arresta all'istruzione
Set objFTP = New FTP
con il messaggio
"Utilizzo non valido della parola chiave New"
Suppongo che sia una mia piccionata ma, tuba tuba, non sono riuscito a
venirne fuori.
Grazie
--
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
risorse Access:
http://www.accessgroup.it
---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com
---------------------------------------------


title: Report Con colori diversi in base a raggruppamento

author: Dario

text:
Salve a tutti,
vi spiego il mio problema.
Dovrei realizzare un report, basato su una query.
La query viene fatta su di una tabella contenente vari prodotti con la
descrizione:
i prodotti possono essere fiori, piante e sementi. e a fianco ci sarà la
descrizione del prodotto.
Ora, per poter leggere meglio in report, dovrei inserire una linea di
contorno che cambi colore sulla base del prodotto: rosa per i fiori, verde
per le piante e blu per le sementi.
Il report finale avrà linee di colori diversi a seconda che nella riga ci ci
sia un fiore,una pianta o un seme.
Ringrazio tutti coloro che mi possono dare una dritta.
Se non sono stato sufficientemente chiaro, ditemelo e proverò a spiegare
meglio il mio problema.
Saluti
Dario


author: CIDI

text:
"Dario" <
dari...@libero.it
> ha scritto nel messaggio
news:skk7i.24079$%k.10...@twister2.libero.it...

Ciao Dario
struttura report - menù Formato - formattazione condizionale.
Daniele


text:

Su evento Formattazione della Sezione Raggruppata inserisci del
codice...
Select Case Me!TipoProdotto
        Case "Fiori"
               Me!NomeRettangolo.BorderColor=vbRed
        Case "Pianta"
               Me!NomeRettangolo.BorderColor=vbBlue
        Case "Seme"
               Me!NomeRettangolo.BorderColor=vbYellow
End Select
Ciao
@Alex


text:
"Dario" <
dari...@libero.it
> ha scritto nel messaggio
news:skk7i.24079$%k.10...@twister2.libero.it...

Grazie 1000 a entrambi
Dario


title: Posizione di un oggetto ...... 2 tentativo

author: Maurino

text:
Come faccio a sapere se un oggetto/controllo si trova su una pagina di una
struttura a schede ?
Grazie a chi volesse aiutarmi.
    Maurino


author: Antonio Biso

text:
Maurino <
proge...@tin.it
> wrote in message
yBw08.10715$sW5.4...@news2.tin.it...

Evidentemente la domanda è mal posta se nessuno ti risponde.
Prova a spiegare meglio cosa vuoi fare
Antonio


author: Maurizio Facciuti

text:
Cosa devi fare? Non ho capito
Maurino <
proge...@tin.it
> wrote in message
yBw08.10715$sW5.4...@news2.tin.it...



author: Emyr

text:
On Mon, 14 Jan 2002 08:25:02 GMT, "Maurino" <
proge...@tin.it
>
wrote:

cosa intendi per struttura a schede?
vedi insieme control
Saluti.
Emanuele.


author: MegaMax

text:
"Maurino" <
proge...@tin.it
> ha scritto nel messaggio
news:yBw08.10715$sW5.4...@news2.tin.it...
> Come faccio a sapere se un oggetto/controllo si trova su una pagina di una
> struttura a schede ?
Supponi che il controllo si chiama "A" e la scheda si chiama "Pippo"
ci sono 2 strade:
1) debug.Print    me.Pippo.Controls.Item("A").name
se funziona il controllo A è nella scheda PIPPO, se A non è nella scheda
PIPPO viene generato un errore.
Quindi devi gestire gli errori, ed in base al fatto che un errore venga o
meno generato capisci se il controllo è sulla scheda in questione oppure no.
2) debug.print
me.A.Parent.name
questo stampa il nome della "cosa" che contiene A, se è è nella scheda PIPPO
allora il codice ti ritornerà PIPPO; se invece A è nella maschera "Form1"
allora ritornerà "Form1" e così via...
ciao, Max


title: MI5 Persecution: Usual targets of such abuse 10/10/96 (5028)

text:
Subject: Re: MI5 says "Kill Yourself"
Newsgroups: uk.misc,uk.legal,uk.politics.misc,uk.media
References: <
zlsiida.42...@fs1.mcc.ac.uk
> <53eeev$
c...@axalotl.demon.co.uk
> <5$
Organization: Toronto Free-Net
Distribution:

ia...@hotch.demon.co.uk
 (Iain L M Hotchkies) wrote:
>Indeed. If you've ever had a 'conversation' with someone suffering
>from florid schizophrenia, you'll know how difficult it can be to
>'argue' with them.

I don't have florid symptoms. But I'm in a difficult situation, because those
people who don't know, aren't going to believe, and those who do, they just go
along with the crowd. It's never a good idea to go against the grain, and the
grain here is defined by interests in the establishment and the media. Even
people who could say out loud what was happening won't, because then there's a
risk that they'll be seen as traitors and ostracised.

Usually this type of 'hidden abuse' is racial and targetted at a racial
minority within a country. You keep the minorities out of the good jobs, but
you don't admit discrimination exists. It happens everywhere, not just in
Britain. The persecution that is going on now is in reality a refined form of
racism. Instead of "nigger" it's "nutter", and abusing the mentally ill is
still socially acceptable today. In 50 years it might not be, but today there
isn't any social or legal sanction against it.

So really they've refined racial harassment down to a minority of one. The
words may be different, but the methods are the same.
5028
--
Posted via NewsDemon.com - Premium Uncensored Newsgroup Service
      ------->>>>>>
http://www.NewsDemon.com
<<<<<<------
Unlimited Access, Anonymous Accounts, Uncensored Broadband Access


title: DLL per trasformare il RUNTIME in italiano...

author: ringo

text:
Salve a tutti,
avevo letto della possibilità di trasformare
il runtime da inglese all'italiano sostituendo
delle DLL.
Qualcuno si ricorda quali sono le DLL?
grazie
ringo


author: Roberto B.

text:
Il giorno Wed, 25 Sep 2002 15:39:08 +0200, lo Straniero scrisse...
distrattosi appena un attimo dagli studi x MCSE:

[copio e incollo da un post precedente]
Vai dentro alla cartella 1033 del runtime e sostituisci le dll
seguenti
che le trovi dentro alla cartella 1040 di access 2000:
mso9intl.dll
grintl32.dll
msain900.dll
daa9int.dll
-----------------------------------------------------
Roberto Bergonzini -MO-
rberg...@tiscalinet.it
Microsoft Certified System Engineer
Microsoft Certified Professional Specialist Internet
-----------------------------------------------------


title: Tabelle DRG (per sanitari)

author: angelsoft

text:
Qualcuno sa dove reperire le tabelle dei DRG Classificazione ICD IX CM 14
(ovviamente in formato xls o mdb)
Si dice che si trovino nel sito del ministero della sanità ma io non ho
trovato niente.
Grazie Angelo


title: Tabelle DRG (per sanitari)

text:
"angelsoft" <
angelso...@libero.it
> ha scritto nel messaggio
news:dotuh.8116$qN4.1...@twister1.libero.it...

Quelli attuali li puoi trovare qui:
http://www.ministerosalute.it/programmazione/sdo/sezApprofondimenti.jsp?id=13&label=cod
Ciao, Carlo


title: Runtime A97 e Desktop

author: Adriana

text:
Ciao a tutti.
Cercasi (disperatamente proprio no; comunque quasi) qualcuno che ha
utilizzato ODE tools runtime per Access 97 che possa aiutarmi in questo
piccolo problema.
Ho creato con ODE 97 la versione runtime di MIODB.MDB.
L'ho installato dal cliente e funziona tutto bene.
Vorrei però che in fase di setup venga creato automaticamente sul desktop il
link al MIODB.MDB appena installato. Infatti come noto il setup crea solo i
collegamenti in Start>Programmi.
Come posso fare a creare in fase di installazione la mia icona del MIODB.MDB
sul desktop?
Credo che basti inserire durante il Setup Wizard di ODE il percorso del file
che si vuole far eseguire. Ma come si fa a creare un file che in automatico
crea un link (un file .lnk) sul desktop?
Spero di essere stata chiara.
In pratica vorrei che il cliente non debba andare su Start, Programmi, MioDb
ma che abbia sul desktop l'icona per eseguire MioDb senza troppi giri.
Grazie elevato alla quarta.


title: Runtime A97 e Desktop

author: Riccardo Caputi

text:
La soluzione la trovi nella library MSDN
http://support.microsoft.com/support/kb/articles/Q244/8/68.ASP
l'esempio riportato č per MOD2000 ma credo vada bene anche per ODE97.
Riccardo


title: Runtime A97 e Desktop

text:
"Riccardo Caputi" <
ric...@libero.it
> ha scritto nel messaggio
news:nZG68.4698$5M4.1...@twister2.libero.it...

((Grazie)^16esima)^24esima
Vedrň di studiarmi la soluzione che mi hai gentilmente suggerito. E se mi
autorizzi, potrň chiederti anche successive informazioni?
p.s. vedo che anche tu la notte fai le ore piccole ...


title: Funzioni di aggregazione

author: Pierpa

text:
Salve a tutto il NG.
Ho una tabella di TblLogistica (IDCntr, IDMovimento, DataMovimento...), che
mi serve da congiunzione tra la TblCntr (IDCntr...) e la TblMovimenti
(IDMovimento...). Non riesco a capire come utilizzare le funzioni di
aggregazione (DMax, DLast, DLookup) in una query che dovrebbe semplicemente
trovarmi l'ultimo movimento (cioč l'IDMovimento con la DataMovimento + alta)
per IDCntr. Se non sono stato chiaro di seguito vi faccio un esempio:
TblLogistica
IDCntr IDMovimento DataMovimento
1 1 03/07/02
1 2 04/07/02
2 1 04/07/02
2 3 05/07/02
QryLogistica
IDCntr IDMovimento DataMovimento
1 2 04/07/02
2 3 05/07/02
Grazie per l'aiuto
Pierpa
--------------------------------
Inviato via
http://usenet.libero.it


title: Funzioni di aggregazione

author: Il Gatto

text:
Pierpa ha scritto:
> Salve a tutto il NG.
>
> Ho una tabella di TblLogistica (IDCntr, IDMovimento, DataMovimento...), che
> mi serve da congiunzione tra la TblCntr (IDCntr...) e la TblMovimenti
> (IDMovimento...). Non riesco a capire come utilizzare le funzioni di
> aggregazione (DMax, DLast, DLookup) in una query che dovrebbe semplicemente
> trovarmi l'ultimo movimento (cioč l'IDMovimento con la DataMovimento + alta)
> per IDCntr. Se non sono stato chiaro di seguito vi faccio un esempio:
>
devi usare una query con qualcosa tipo
SELECT TOP 1 IDCntr FROM TblLogistica ORDER BY DataMovimento DESC
che ti da esattamente l'ultimo movimento (se ce ne sono), perchč DMax
lavora su una sola colonna, non puň darti i valori delle altre colonne
in corrispondenza del massimo di una.
--
       ^    ^
oOo (Il Gatto) oOo


title: lotto

author: giorgio

text:
necessito di qualcosa che mi consenta di avere il numero di volte in cui un
ambo che forma un terno si ripete


title: lotto

author: Ammammata

text:
"giorgio" <
oig...@aliceposta.it
> wrote in
news:469e6846$0$37198$
4faf...@reader3.news.tin.it
:
> necessito di qualcosa che mi consenta di avere il numero di volte in
> cui un ambo che forma un terno si ripete
>
>
>
prova qui: alt.pl.regionalne.wroclaw.ogloszenia
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\


title: lotto

author: Bruno Campanini

text:
"giorgio" <
oig...@aliceposta.it
> wrote in message
news:469e6846$0$37198$4faf...@reader3.news.tin.it...
> necessito di qualcosa che mi consenta di avere il numero di volte in cui
> un ambo che forma un terno si ripete
Sarebbe a dire?
Bruno


title: Distinzione caratteri

author: Lucio

text:
Salve a tutto il Ng
ho creato un maschera di accesso che da codice ho impostato con user e
password;
il problema sorge quando piuttosto che in minuscolo il login si effettua in
maiuscolo, a questo punto le limitazioni di accesso in base al log non vanno
e tutti gli utenti possono accedere a tutto.
La mia domanda č:
come posso far distinguere le maiuscole dalle minuscole nella mia procedura
"if" e far sě che in caso di log con le maiuscole mi dia errore come
password o login errato?
Grazie a tutti.
Lucio


title: Distinzione caratteri

text:
> come posso far distinguere le maiuscole dalle minuscole nella mia
procedura
> "if" e far sě che in caso di log con le maiuscole mi dia errore come
> password o login errato?
cnverti tutto in maiuscolo (od in minuscolo)
if Ucase(LogigInserito)= Ucase(LoginDaControllare) then .....
max


title: Fine pagina del report.Proprietà?

text:
Quale è la proprietà che mi permette di capire  se un'intestazione di un
report è alla fine della pagina in modo tale che in tal caso la faccio
andare nella nuova pagina. (non è interruzione di pagina chiaramente quello
che cerco).
Grazie


title: Stampa report da maschera filtrata

author: Fabrizio

text:
Ho creato una funzione di ricerca che in base alle selezioni mi apre una
maschera filtrata.
Ora vorrei stampare un report che contenga i record filtrati.
Ringrazio quanti mi volessero rispondere


title: Stampa report da maschera filtrata

author: Roberto dal portatile

text:
"Fabrizio" <
far...@tiscalinet.it
> ha scritto nel messaggio
news:9uq16t$45e$1...@pegasus.tiscalinet.it...

Se la maschera l'hai filtrata tramite le sue proprietą Filter e FilterOn, a
fronte dell'evento "Su clic" di un pulsante di comando prova a generare il
seguente codice VBA:
Dim strReport As String
Dim strCriteri As String
strReport = "NomeReport"
strCriteri = Me.Filter
DoCmd.OpenReport strReport, , , strCriteri
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: interruzione elaborazione

author: Sandrobi

text:
Ciao raga!
c'è un metodo ordinare con un tasto di  interrompere l'elaborazione eseguita
da una routine? Mi spiego con un esempio: sto leggendo le righe da un file
sequanziale, ogni riga viene elaborata per essere trasferita su una tabella;
se vedo che l'operazione è troppo lunga e voglio abbandonarla per ripeterla
in un secondo momento, come fa la mia routine a sentire un tasto o un click
per dirgli di fermarsi e chiudere la routine?
Ho provato con Autokeys ma aspetta sempre che la routine sia completata.
Bye.


title: interruzione elaborazione

author: Roberto - Syd

text:

Definisci una variabile in Dichiarazioni del form di tipo boolean es.:
Dim booStop as Boolean
prima di entrare nel ciclo che legge il file e scrive in tabella gli assegni
il valore false es.:
booStop = False
do while not eof(#NumFile) and booStop = False
    leggi file
    scrivi in tabella
    DoEvents (questo è indispensabile per poter eseguire altri eventi per
esmpio il click di un pulsante avvenuto durante il ciclo)
Loop
Poi sul click del pulsante che deve interrompere l'operazione scrivi:
booStop = True
Ciao Roberto - Syd


title: funzione che non funziona AIUTATEMIIIIII   !!!!

text:
Salve a tutti vi prego di aiutarmi a far luce su un problema che mi sta
tormentando, allora in un db che sto realizzando ho pensato di nn
avvalermi del contatore di access ma di crearne uno incrementale e
all'evento before update della form clienti scrivo queste linee di
codice:
  If Me.txtIdCliente = 0 Then
    Dim db As Database
    Dim rst As Recordset
    Dim Qry1 As String
    Set db = CurrentDb
    Qry1 = "SELECT 1+Max(TblClienti.IdCliente) AS newid FROM
TblClienti"
    DBEngine.BeginTrans
    Set rst = db.OpenRecordset(Qry1, dbOpenDynaset)
    Me.txtIdCliente = rst!newid
    rst.Close
    DBEngine.CommitTrans
     End If
E devo dire che mi funziona bene, il problema sorge adesso quando
decido che, dal momento che  devo usare lo stesso metodo per tutte o
per la maggior parte delle maschere  di farne una funzione ,
 e scrivo questo codice:
Public Function Progressivo(NumPrec As Integer, NomTab As String)
  If Progressivo = 0 Then
     Dim db As Database
     Dim rst As Recordset
    Dim Qry1 As String
    Set db = CurrentDb
    Qry1 = "SELECT 1+Max(NPrec)AS newid FROM NomTab"
    DBEngine.BeginTrans
    Set rst = db.OpenRecordset(Qry1, dbOpenDynaset)
    Progressivo = rst!newid
    rst.Close
   DBEngine.CommitTrans
 End Function
La provo e ...mannaggia non funziona dove sbaglio?? La logica smi
impone di pensare che i parametri da passare sono il nome del campo che
sara' sempre un Id di tipo numerico (NumPrec) e
Il nome della Tabella(NomTab) che ho dichiarato come stringa, intanto
quando la provo nella finestra immediata mi si genera un errore che
dice "manca oggetto", dove sbagli?? Aiutatemi vi prego
Cordialmente
Diego


text:
<
diegoci...@hotmail.com
> wrote in message
news:1133132202.9...@g14g2000cwa.googlegroups.com...
> Salve a tutti vi prego di aiutarmi a far luce su un problema che mi sta
> tormentando, allora in un db che sto realizzando ho pensato di nn
> avvalermi del contatore di access ma di crearne uno incrementale e
> all'evento before update della form clienti scrivo queste linee di
> codice:
>
>  If Me.txtIdCliente = 0 Then
>    Dim db As Database
>    Dim rst As Recordset
>    Dim Qry1 As String
>    Set db = CurrentDb
>    Qry1 = "SELECT 1+Max(TblClienti.IdCliente) AS newid FROM
> TblClienti"
>
>    DBEngine.BeginTrans
>    Set rst = db.OpenRecordset(Qry1, dbOpenDynaset)
>
>    Me.txtIdCliente = rst!newid
>    rst.Close
>    DBEngine.CommitTrans
>     End If
Non mi sembra serva a niente una transazione
(DBEngine.BeginTrans / CommitTrans) in un processo di inserimento
dati, al completamento del primo inserimento.
Però questo non è il problema.
Il fatto è che una funzione non è in grado di
compiere "azioni" ma solo di restituire un valore.
La Sub che hai fatto, messa in un modulo diventa
disponibile a tutto il progetto.
Se devi adattarla di volta in volta a Form diverse
prevedi parametri come TableName (che qui è tblClienti)
e TableID (che qui è IdCliente).
Poi quando dovrai attivarla per la Form Fornitori
porrai in BeforeUpdate di quella scheda
NomeSub "TblFornitori", "IdFornitore".
Se non ti è chiaro qualcosa, ribatti un colpo.
Ciao
Bruno


author: Potone

text:
<
diegoci...@hotmail.com
> ha scritto nel messaggio
news:1133132202.9...@g14g2000cwa.googlegroups.com...
[cut]
> Public Function Progressivo(NumPrec As Integer, NomTab As String)
>
>  If Progressivo = 0 Then
>
>     Dim db As Database
>     Dim rst As Recordset
>    Dim Qry1 As String
>    Set db = CurrentDb
>    Qry1 = "SELECT 1+Max(NPrec)AS newid FROM NomTab"
gli argomenti NumPrec e NomTab non sono "visibili" all'interno dell'sql,
prova con
Qry1 = "SELECT 1+Max(" & NPrec & ")AS newid FROM " & NomTab
>
>    DBEngine.BeginTrans
>    Set rst = db.OpenRecordset(Qry1, dbOpenDynaset)
>
>    Progressivo = rst!newid
>    rst.Close
>   DBEngine.CommitTrans
>
> End Function
>
> La provo e ...mannaggia non funziona dove sbaglio?? La logica smi
> impone di pensare che i parametri da passare sono il nome del campo che
> sara' sempre un Id di tipo numerico (NumPrec) e
> Il nome della Tabella(NomTab) che ho dichiarato come stringa, intanto
> quando la provo nella finestra immediata mi si genera un errore che
> dice "manca oggetto", dove sbagli?? Aiutatemi vi prego
>
> Cordialmente
> Diego
>
ciao,
Mat.


title: Impegno banda passante sulla rete.

author: RL

text:
Ho creato un applicativo diviso tra un BE ( DB access con 37 tabelle) e 6 FE
che vi accedono su rete tcp/IP a 100MB/s.
Ogni FE ha le 37 tabelle allegate e fino a che si lavora in locale è tutto
OK.
Il problema sussiste quando si lavora in rete; avviene un rallentamento
veramente pesante, troppo pesante.
La mia domanda è questa:
Se tolgo le tabelle allegate ed utilizzo unicamente accessi alle tabelle via
ADODB, di quanto potrà migliorare la situazione?
Quali altre strategie utilizzare per impegnare meno le risorse di rete?
(Escludendo l'utilizzo di un server di un server di Database)
Grazie


title: Impegno banda passante sulla rete.

author: Sib dall'ufficio

text:
"RL" <
l...@ttty.it
> ha scritto nel messaggio
> Ho creato un applicativo diviso tra un BE ( DB access con 37 tabelle) e 6
FE
> che vi accedono su rete tcp/IP a 100MB/s.
>
> Ogni FE ha le 37 tabelle allegate e fino a che si lavora in locale è tutto
> OK.
>
> Il problema sussiste quando si lavora in rete; avviene un rallentamento
> veramente pesante, troppo pesante.
>
> La mia domanda è questa:
>
> Se tolgo le tabelle allegate ed utilizzo unicamente accessi alle tabelle
via
> ADODB, di quanto potrà migliorare la situazione?
Non saprei, io non lo uso e c'e' sia chi ne parla bene sia chi ne parla
male.
> Quali altre strategie utilizzare per impegnare meno le risorse di rete?
Trattandosi di un sostanziale file sharing senza particolari compiti da
parte del server, forse potrebbe esserti utile un hd scsi su un server con
un processore e una ram discreti (non serve che siano eccezionali).
Poi, che server usate?
Che io sappia capita che con Win server (NT o 2000) ci siano dei
rallentamenti forse provocati da scorretta configurazione, ad es, Win2000
server andrebbe configurato per dare precedenza ai servizi di rete e altre
cosette. Non cosi' semplice dopotutto.
Sib


title: Impegno banda passante sulla rete.

text:
"Sib dall'ufficio" <cerrise...@SPAMtiscalinet.it> ha scritto nel
messaggio news:9ocrgb$nd6$1...@serv1.iunet.it...

Si tratta di un win NT Server, CPU PIII 800, 256 MB Ram, di fatto ti devo
dire che anche altri servizi di rete a volte "scantonano un pochetto."
ma come sai non è così semplice mettere le mani su un server "nel posto
giusto."
Grazie SIB