mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: "collegare" due caselle..

Salve
ho creato una tabella "pippo" con 2 campi A e B
ho una maschera con diversi campi che va a scrivere i dati in una tabella,
il primo e' una casella combinata che da cui e' possibile scegliere una voce
del campo A di "pippo" la seconda automaticamente dovrebbe inserire il
corrispondente valore del campo B di "pippo".
Come posso fare??
Grazie.
Ciao!
Marco.
--------------------------------
Inviato via 
http://usenet.libero.it

 corrispondente valore del campo B di "pippo".
Usa la funzione DLookUp a fronte dell'evento "Su modifica" della prima casella combinata.
Per esempio:
Private Sub PrimaCasellaCombinata_Change()
    SecondaCasellaCombinata = DLookup("B", "pippo", "A=" & PrimaCasellaCombinata)
End Sub
se A è un campo Numerico, oppure
Private Sub PrimaCasellaCombinata_Change()
    SecondaCasellaCombinata = DLookup("B", "pippo", "A='" & PrimaCasellaCombinata & "'")
End Sub
se A è un campo Testo.
Ciao. Claudio.

"Claudio" <cld@NOSPAM&COsupereva.it> ha scritto nel messaggio
news:8Tzt9.29884$TD1.1...@news2.tin.it...

E' meglio però utilizzare la proprietà column della combo mettendo come
origine riga una query con entrambi i campi.
La dlookup comunque è un'ulteriore interrogazione al sistema er quindi meno
performante!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: Problema ricerca dati in tabella

Da una tabella devo estrarre vari campi relativi ad un record scelto
dall'utente (immissione del numero ordine), e su questi eseguire varie
funzioni per estrarre vari risultati. Le funzioni sono abbastanza
complesse, quindi non posso usare semplicemente delle query: il tutto
lo faccio fare ad una funzione VBA.
All'inizio il parametro era uno solo, quindi me la cavavo con un
semplice DLookup:
Vendita = DLookup("[Vendita]", "DatiOrdine", "[NrOrdine] = " &
NrOrdine)
Per estrarre piu' parametri, relativi allo *stesso* record ora ho
aggiunto altre righe come sopra (meglio, ho aggiunto un ciclo ed
estraggo in un array) e tutto funziona, ma il codice mi sembra
"sporco" (e penso che sia anche rallentato...).
Qualcuno ha un consiglio?
Pensavo di utilizzare DAO e mi sembrava una scemata (scorro i record
della tabella fino a trovare quello che mi interessa, poi ne estraggo
direttamente i dati) ma non ce ne sono saltato fuori, forse perche'
sono anche abbastanza stanco a dire il vero... :-)
Ciao e grazie
Doc Hollywood

 ha scritto nel messaggio
news:adda0833.03110...@posting.google.com...

Non serve scorrere nulla nel Recordset, ti basta Filtrarlo:
Dim rs as DAO.Recordset
Dim strSql as string
strSQL="SELECT * FROM TuaTabella WHERE [NrOrdine] = " & NrOrdine
set rs=currentdb.openrecordset(strSQL, dbopentable)
'A questo punto hai un Recordset MonoRecord poichè NumeroOrdine sarà
UNIVOCO.
'quindi disponi di tutti i campi(Fields) relativi ai quali puoi accedere
così:
Me.TuaTextBox1=rs!NomeCampo1 'oppure rs.Fields(Nomecampo1)
Me.TuaTextBox2=rs!NomeCampo2
Ricordati al termine dell'utilizzo del Recordset di chiuderlo e azzerarlo:
rs.Close
Set rs=Nothing
Ciao
@Alex.

 ha scritto nel messaggio
news:adda0833.03110...@posting.google.com...

Con DAO apri un recordset di tipo Dynaset, con il metodo FindFirst
posizionati sul record cercato, quindi preleva tutti i dati che ti servono.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

> Non serve scorrere nulla nel Recordset, ti basta Filtrarlo:
[CUT]
Grazie!
Doc Hollywood

 set rs=currentdb.openrecordset(strSQL, dbopentable)
Ho provato, ma a questo punto mi da' un errore:
Con:
strSql = "SELECT * FROM DatiOrdine WHERE [NrOrdine] = " & NrOrdine
Arriva al "Set rs" e dice:
"Il modulo di gestione del database Microsoft Jet non e' riuscito a
trovare l'oggetto 'SELECT * FROM DatiOrdine WHERE [NrOrdine] = 2383'
Assicurarsi che l'oggetto esista e che il nome e il percorso siano
digitati correttamente."
Ho visto che togliendo il type (OpenTable) funziona, quindi non penso
di avere problemi. Ma perche' fara' cosi' il bastardo?
Ciao e grazie ancora.
Doc Hollywood

 ha scritto nel messaggio
news:adda0833.0311...@posting.google.com...

Forse hai già la tabella aperta avendo una Form ad essa associata..???
Prova con dbOpenDynaset......!!!
@Alex.
Newsgroup: it.comp.appl.access
Titolo: Annullare la chiusura del programma

Salve a tutti.
All'uscita del mio programam vorrei visualizzare un messaggio che
mi ricordi di effettuare il backup.
Ho risolto il problema seguendo il consiglio di Roberto, ossia caricare
all'apertura del
programma un form invisibile e sul suo evento chiusura far apparire il
message box.
Al posto di un MsgBox informativo, vorrei inserire un Msgbox con le opzioni
Si/No.
Se scelgo No chiude il programma se scelgo Si annulla la chiusura.
E' possibile annullare la chiusura del programma in questo modo?
Grazie.


Dim IntNuovo As Integer, strTitolo As String
Dim IntFinestraMsg As Integer, strMsg As String
strTitolo = "Backup"
strMsg = "Vuoi effettuare il backup"
IntFinestraMsg = vbYesNo + vbQuestion
IntNuovo = MsgBox(strMsg, IntFinestraMsg, strTitolo)
If IntNuovo = vbYes Then
'inserisci quello che vuoi
    Response = acDataErrAdded
 
 
Else
    strTitolo = "Buona notte"
    strMsg = "comunque secondo me era meglio, anche perchè al giorno d'oggi una
copia in più è sempre meglio, cmq..."
    IntFinestraMsg = vbOKOnly + vbExclamation
    IntNuovo = MsgBox(strMsg, IntFinestraMsg, strTitolo)
    Response = acDataErrContinue
 
End If
 
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: errore 3044

Ciao
come posso disabilitare il messaggio d'errore 3044
Mi spiego:
Se apro una maschera e i dati relativi appoggiano su una tabella 
allegata che per X motivi non è accessibile mi segnala ad esempio
che il file .... non è accessibile (errore 3044).
Con la proprietà su errore posso intercettare l'errore e apportare i 
correttivi, ma alla fine di appare il messaggio d'errore che vorrei 
disabilitare.
Idee, io non ne ho
Grazie
Fabio

 ha scritto nel messaggio 
news:46162e2f$0$3822$5402...@news.sunrise.ch...
Ciao
come posso disabilitare il messaggio d'errore 3044
Mi spiego:
Se apro una maschera e i dati relativi appoggiano su una tabella
allegata che per X motivi non č accessibile mi segnala ad esempio
che il file .... non č accessibile (errore 3044).
Con la proprietą su errore posso intercettare l'errore e apportare i
correttivi, ma alla fine di appare il messaggio d'errore che vorrei
disabilitare.
Idee, io non ne ho
Grazie
Fabio
-----------------
Gestisci l'errore "su errore" della maschera.
On error goto errore
'tuo codice
Errore:
If err.number = 3044 then
'tuo codice
end if
Ciao, Carlo 

 ha scritto nel messaggio 
news:46162e2f$0$3822$5402...@news.sunrise.ch...
Ciao
come posso disabilitare il messaggio d'errore 3044
Mi spiego:
Se apro una maschera e i dati relativi appoggiano su una tabella
allegata che per X motivi non č accessibile mi segnala ad esempio
che il file .... non č accessibile (errore 3044).
Con la proprietą su errore posso intercettare l'errore e apportare i
correttivi, ma alla fine di appare il messaggio d'errore che vorrei
disabilitare.
Idee, io non ne ho
Grazie
Fabio
[risposta]
Non associare la maschera.
Gestisci l'evento "su apertura" controllando la presenza della tabella; se 
c'č l'associ (proprietą RecordSource) altrimenti la chiudi (Cancel = True) o 
quello che devi fare...
Ciao.
-- 
Sergio MAZZA 

 Ciao.

Newsgroup: it.comp.appl.access
Titolo: Query con due parametri di ricerca

Sarei grato a chi mi puň risolvere questo quesito:
Ho una tabella con i seguenti campi:
ARTICOLO, NUM.SERIALE(dell'articolo),QUANTITA',NUM.D.D.T.,DATA(del D.D.T.)
Devo impostare una query che,in base a due parametri ARTICOLO e NUM.SERIALE
mi restituisca il NUM.D.D.T.
Per lo stesso ARTICOLO i NUM.SERIALE possono essere molti per cui si
potrebbero impostare due campi NUM_SERIALE_INIZIO e NUM_SERIALE_FINE
Ho creato una query contenente la funzione Iif...then...else ma non
funziona.
Piů esattamente cosě:
SELECT IIf(([ARTICOLI]=[ART]) And ([SERIAL] Between ([S_N_INIZIO]) And
([S_N_FINE])),[DDT],"") AS DDT_sped,...
Grazie anticipatamente
--
barb...@libero.it

Bar ha scritto nel messaggio ...

Naaaa...
SELECT TABELLA.* FROM TABELLA WHERE ARTICOLO = [ART] AND (SERIAL BETWEEN
[S_N_INIZIO] AND [S_N_FINE]);
Antonio

 wrote in message
8ca0ub$g5e$1...@lacerta.tiscalinet.it...

In effetti... era banale.
        Grazie mille
Newsgroup: it.comp.appl.access
Titolo: [Help] Ordinamento nei report

Buongiorno a tutto il NG e buone feste!
Vengo al problema:
ho creato un report con origine dati su una query
la query a sua volta è il join di due tabelle in relazione uno-a-molti.
Ho la necessità di mantenere ordinati i record nell'ordine di inserimento
sulle tabelle (che non è l'ordine per esmpio di una chiave primaria),
requisito che la query soddisfa.
Perchè invece il report mi ordina i record in modo... "disordinato".
Mi date una mano a risolvere il problema (se è possibile)? Grazie 1000.

 wrote in message
news:a0hid4$8jo$1...@pegasus.tiscalinet.it...

Non capisco il problema...!
Se dal pannellino controllo del Report Clikki su Origine Dati (Dove hai la Qry)
ti abilita l'editor di Qry, ti osizioni sul campo della QRY che ti interessa
ordinare e selezioni Crescente o Decrescente, ovviamente devi rimuovere
i criteri di ordinamento che non servono...!
@Alex 
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:a0hid4$8jo$1...@pegasus.tiscalinet.it...

Se vuoi imporre criteri d'ordinamento "sicuri" per i Reports devi ricorrere
allo strumento Ordinamento/raggruppamento.
Ciao, Stefano
Newsgroup: it.comp.appl.access
Titolo: Stampare report N volte

Buon giorno, vorrei stampare n volete un report per esempio 2. come posso 
fare ad assegnare il numero di copie alla finestra di dialogo della 
stampante? ho provato in quasta maniera ma non funziona?
DoCmd.SelectObject acReport, NomeReport, True
Printer.Copies = 2
DoCmd.RunCommand acCmdPrint
Mi sapresta dare una mano?
Grazie anticipatamente

 ha scritto nel messaggio 
news:2VFEg.91$%37....@nntpserver.swip.net...

Ciao Alberto
se inserisci du volte il nome del report, dovrebbe funzionare..
.....
    Dim stDocName As String
    stDocName = "NomeReport"
    DoCmd.OpenReport stDocName, acNormal
     stDocName = "NomeReport"
    DoCmd.OpenReport stDocName, acNormal
.....
Prova!
-- 
--------------------------------------
      Cataldo Formaro
-------------------------------------- 

Alberto ha scritto:

Vedi la funzione PrintOut con i parametri vari....!!
@Alex

 ha scritto nel messaggio 
news:1155738733.3...@m73g2000cwd.googlegroups.com...

Alex mi sa che mi sono inteso male io ho bisogno anche di cambiare a mio 
piacimento la stampante su cui indirizzare la stampa, con la finestra di 
dialogo della stampante funziona benissimo solo che non riesco a capire come 
fare a dagli il numero di copie via codice.

 fare a dagli il numero di copie via codice.
Ti sei spiegato bene...
Docmd.OpenReport "NomeReport",acViewPreview,,acHidden
with Reports!("nomerep").printer
    .TopMargin = 1440
    .BottomMargin = 1440
    .LeftMargin = 1440
    .RightMargin = 1440
    .ColumnSpacing = 360
    .RowSpacing = 360
    .ColorMode = acPRCMColor
    .DataOnly = False
    .DefaultSize = False
    .ItemSizeHeight = 2880
    .ItemSizeWidth = 2880
    .ItemLayout = acPRVerticalColumnLayout
    .ItemsAcross = 6
    .Copies = 1
    .Orientation = acPRORLandscape
    .Duplex = acPRDPVertical
    .PaperBin = acPRBNAuto
    .PaperSize = acPRPSLetter
    .PrintQuality = acPRPQMedium
End With
DoCmd.PrintOut acPrintAll
quindi chiudi.....!
@Alex
Newsgroup: it.comp.appl.access
Titolo: Problema di Aggiornamento

Ho realizzato un controllo di navigazione creando una Form indipendente da
inserire come Sub-Form in qualsiasi maschera.
E' costituita da 4 pulsanti e 2 TextBox:
Pulsanti
Puls1----->=Nevigazione(1) ***************"PrimoRecord"
Puls2----->=Navigazione(2) ***************"Precedente"
Puls3----->=Navigazione(3) ***************"Successivo"
Puls4----->=Navigazione(4) ***************"UltimoRecord"
TextBox
Attuale.Value = posizione attuale
RecCount.Value = n° totale record
Il codice richiamato dall'Evento Click dei Pulsanti è il seguente:
'pulsanti di navigazione Primo-Precedente-Successivo-Ultimo
'la maschera deve essere inserita come sottomaschera della Form
'in cui gestire al navigazione
Public Function Navigazione(Navi As Byte)
Dim rst As Recordset
With Me.Parent.Form
   Set rst = .RecordsetClone
   If Not (rst.BOF And rst.EOF) Then
      Select Case Navi
         Case 1 'primo record
            rst.MoveFirst
            .Form.Bookmark = rst.Bookmark
         Case 2 'record precedente
            If rst.AbsolutePosition > 0 Then
                  rst.MovePrevious
                  .Bookmark = rst.Bookmark
            End If
         Case 3 'record successivo
            If ((rst.AbsolutePosition) + 1) < rst.RecordCount Then
               rst.MoveNext
               .Bookmark = rst.Bookmark
            End If
         Case 4 'ultimo record
            rst.MoveLast
            .Bookmark = rst.Bookmark
         Case 5
            rst.Bookmark = .Bookmark
      End Select
      Me![Primo].SetFocus
      If ((rst.AbsolutePosition) + 1) < rst.RecordCount Then
         Me![Successivo].Enabled = True
      Else
         Me![Successivo].Enabled = False
      End If
      If rst.AbsolutePosition > 0 Then
         Me![Precedente].Enabled = True
      Else
         Me![Precedente].Enabled = False
      End If
   End If
   Me![RecCount].Value = Val(rst.RecordCount)
   Me![Attuale].Value = Val(rst.AbsolutePosition) + 1
   rst.Close
   Set rst = Nothing
End With
End Function
'
'
La maschera funziona regolarmente, o quasi, infatti inserendola come
sottomaschera in un Form si ha in ordine
1 Caricamento - Apertura della SubForm_Navigazione
2 Caricamento - Apertura della Form "Parent"
tutto questo con il conseguente mancato aggiornamento all'apertura della
Form Principale del N° record totale e della posizione Attuale.
Premendo un Pulsante di navigazione ho poi il regolare aggiornamento e
funzionamento.
Come posso risolvere?????
Grazie Alex
-- 
Posted from 
smtp3.libero.it
 [193.70.192.53] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000201c0c9c6$30064a00$53091897@ik2zok...

Scusa la domanda , ma perche' non usare quella standard di access ???
Ciao
--
(^o^))~    Lorenzo   (^o^))~
"Preimaginare e' lo imaginare le cose che saranno..."
"Postimaginare e' imaginare le cose passate ..."
(Leonardo Da Vinci)
Newsgroup: it.comp.appl.access
Titolo: Comando DateSerial

Salve a tutti, in una query parametrica e in una a campi incrociati uso il
comando:
Data:
DateSerial(Val(Left([UltimaData];4));Val(Mid([UltimaData];5;2));Val(Right([U
ltimaData];2)))
il problema e che se la data non c'è mi viene visualizzata una data
es.31/12/1899 o qualcosa di simile, come posso avere il campo vuoto o con un
solo 0.Uso A.2.0
Grazie Axel

 Grazie Axel
Dovrebbe funzionare:
iif(isnull([UltimaData);"";DateSerial(Val(Left([UltimaData];4));Val(Mid([UltimaD
ata];5;2));Val(Right([UltimaData];2))))
Prova e fammi sapere.
Ciao!
Esteban
Hosted by 
www.seber.it

 wrote in message
%fNQ6.5969$HK.4...@news.infostrada.it...

Non va, mi dice "nr di argomenti della funzione non valido" io parto da:
Data:
DateSerial(Val(Left([UltimaData];4));Val(Mid([UltimaData];5;2));Val(Right([U
ltimaData];2)))
Ciao Axel

 Ciao Axel
Certo, scusa: nel codice che ti ho scritto ho dimenticato di chiudere una
parentesi quadra:
iif(isnull([UltimaData)...
devi scrivere:
iif(isnull([UltimaData])...


Newsgroup: it.comp.appl.access
Titolo: Access 2000 e Rubrica Outlook2000

Vorrei utilizzare la rubrica/contatti di outlook 2000 come database contatti
per un programma di contabilità costruito in access2000. Qualcuno potrebbe
indicarmi il modo più semplice per raggiungere tale obiettivo?
Grazie.
Vito

 wrote in message
news:42a015bf$0$15908$
5fc...@news.tiscali.it

Usare l'automazione di Outlook ed accedere alla Rubrica.
Sub ListOutlookContacts()
On Error Resume Next
    Dim StrContacts As String
 
    Dim Ol_App As New Outlook.Application
    Dim Ol_Mapi As Outlook.NameSpace
    Dim Ol_Folder As Outlook.MAPIFolder
    Dim Ol_Items As Outlook.Items
    Dim Ol_Contact As Outlook.ContactItem
 
    Set Ol_Mapi = Ol_App.GetNamespace("MAPI")
    Set Ol_Folder = Ol_Mapi.GetDefaultFolder(olFolderContacts)
    Set Ol_Items = Ol_Folder.Items
 
    For Each Ol_Contact In Ol_Items
            StrContacts = StrContacts & vbCrLf & _
            Ol_Contact.FullName & " - " & Ol_Contact.Email1Address
    Next Ol_Contact
 
    MsgBox StrContacts
 
    Set Ol_Contact = Nothing
    Set Ol_Items = Nothing
    Set Ol_Folder = Nothing
    Set Ol_Mapi = Nothing
    Set Ol_App = Nothing
 
End Sub
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: [?] Lanciare un programma ed attendere il suo termine

Scusate ma ero convinto che sul sito comune ci fosse un esempio sul come
lanciare un programma ed attendere la sua terminazione, però non riesco a
trovarlo.
Chi può darmi una mano
Grazie
-------------------------------------
Lunga vita e Prosperità

 trovarlo.
Prova a inserire:
DoEvents
Dopo l'istruzione che lancia il programma.
Oppure, se usi AppActivate usa l'opzione wait:
AppActivate "Microsoft Word", True
                                                 ^^^^
Ciao, Sib


Guarda qui:
http://members.xoom.it/_XOOM/it_db_access/tips03.htm
Silvio
Newsgroup: it.comp.appl.access
Titolo: collegamento particolare tra campi sottomaschera

il mio problema è il seguente:
ho una maschera con 2 casellecombinate e una sottomaschera collegata
con le due casellecombinate...
il filtro funziona, ma vorrei avere anche la possibilità di vedere
tutti i record della sottomaschera... come posso fare? 
grazie mille.

grazie mille.
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 mi spiego meglio....
 io vorrei che venissero visualizzati tutti i record bypassando il
filtro...

 filtro...
Se il filtraggio lo hai ottenuto impostando adeguatamente la proprietà
Filter, per ignorare il filtro imposta a False la proprietà FilterOn (vedi
help).


in realtà non utilizzo nessun filtro...
il filtro lo realizzano le casellecombinate collegate tra le 2
maschere...
help me!

 ha scritto nel messaggio
news:1123142248....@g44g2000cwa.googlegroups.com...

Bhe, per dire la verità le caselle non filtrano alcunché, ma sicuramente
esiste del codice VBA che agisce sulle proprieta Filter e FilterOn della
sottomaschera oppure tutto e regolato automaticamente dalle proprietà
Collega campi secondari e Collega campi master del contollo sottomaschera
della maschera principale,
Che cosa c'è scritto in tali due proprietà?


Ti confermo che nel codice VBA legato alla sottomaschera non c'è
nulla... quindi presumo si tratti di regolazioni automatiche dalle
propriettà collega campi secondari e collega campi master delle 2
maschere...
nelle proprietà vi sono le seguenti info:
origine: "nome della tabella"
collega campi secondari: "campo1;campo2"
collega campi master: "campo1master;campo2master"
abilitato:si
bloccato: no
NOTA: le info nei campi collega campi sec e master le ho dovute
inserire a mano... se tento di aprire il wizard "..." mi dice
"impossibile creare un collegamento tra maschere non associate"
può essere questo il problema?
grazie!

grazie!
Prego.


provo e ti faccio sapere!
grazie della disponibilità!

sei stato forte.
grazie mille.
funziona.
Newsgroup: it.comp.appl.access
Titolo: URGENTE .. per i + esperti..

Ciao,
ho un prob.  urgentissimo
Allora :
Questa e' la tabella :
Nome    Anno  Tipo  Numero
Cla     1979  A     100
Dan     1979  A     12
Fra     1980  B     45
Gio     1979  B     64
Ora :
Voglio visualizzare tutti i tipi dell'anno 1979 , raggruppando il nome e
sommando i "numero"  e mi viene il risultato :
Anno  Tipo  Numero
1979  A     112
1979  B     64
Poi :
Rifaccio la solita cosa per anno 1980 :
Anno  Tipo  Numero
1980  B     45
Se volessi paragonare i due risultati con una maschera mi verrebbe :
        1979-1980
  A     112 - 45
  B     64
invece vorrei che venisse fuori
        1979-1980
  A     112 - 0
  B     64  - 45
Perche' nel primo caso il tipo "a" nel 1980 e' zero e non 45.
ti ringrazio
claudio
-- 
Posted from 
IDENT:ro...@icaro.zia.ms.it
 [195.103.158.41] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000501c09fee$c9507520$4ec4fea9@claudio1...

Quello che ti serve lo ottieni basando sulla tua tabella una query a campi
incrociati usando Tipo come intestazione di riga, Anno come intestazione di
colonna e richiedendo la somma di Numero.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: formattazione testo in report

Salve a tutti,
vorrei formattare il campo in un report per quanto riguarda la
spaziatura dei caratteri (espansa o ridotta), così come si fa con word
per tenere le lettere più attaccate fra loro..
è possibile?
il problema è che ho poco spazio, vorrei fare in modo che se qualcuno
inserisce un campo oltre i 26 caratteri, lui mi riduce la spaziatura
nel report.. circa così:
If Len(Via.Value) > 26 Then
Testo3.?????? = 1
End If
grazie


Rispondo senza averlo provato.
Potresti cambiare la proprietà fontsize
if len(via.value) > 26 then
    via.fontsize = 6
endif
Ciao,
Max

il fontsize funziona, ma riduce solo le dimensioni di carattere.. non
mi permette di diminuire la spaziature fra le lettere.. ho provato a
guardare tutte le proprietà possibili, non mi sembra che sia
possibile..
grazie lo stesso

 grazie lo stesso
di nulla,
ciao,
Max
Newsgroup: it.comp.appl.access
Titolo: Report e IIF

Ho un problema con un report in una casella inserita nel report vorrei che
comparisse il SI o il NO in base ad una casella di controllo inserita in
una maschera come origine della casella inserita nel report ho messo : 
IIf[Forms]![aschera]![Casellacontrollo]=0;"SI";"NO")
Ringrazio da subito chi mi può dare qualche indicazione
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ringrazio da subito chi mi può dare qualche indicazione
Ti manca la parentesi di apertura.
Sib

 Sib
Ti ringrazio per la solerte risposta ma in realtà l'avevo dimenticata
nella domanda; ho controllato e mi dà lo stesso un errore


 IIf[Forms]![aschera]![Casellacontrollo]=0;"SI";"NO")
Immagino sia maschera.
Si chiama cosě?
E' aperta al momento dell'apertura del report?
Casellacontrollo si chiama cosě?
Che errore da?
Antonio

 Antonio
Naturalmente avevi ragione l'errore stava nel fatto che la maschera non
era aperta.
Si puň risolvere senza necessariamente aprire la maschera ad esempio
facendo riferimento alla tabella? Grazie


 facendo riferimento alla tabella? Grazie
Dipende dalla tua situazione, che non hai spiegato.
Con la maschera tu controlli un record solo, quello corrente, per la tabella
devi stabilire in qualche modo quale record controllare...
Altrimenti nell'origine record del report ti crei un campo calcolato che
vale per tutti i record
=iif(campotest=0;"Sě";"No")
e questo campo lo associ ad un controllo...
Antonio

Newsgroup: it.comp.appl.access
Titolo: Xp Home e diritto accesso file in rete..

Salve,
un saluto a tutti,
avrei un problemino:
in una semplice rete, senza dominio,
ci sono:
1 win2ksrv che funziona solo da file server
3 xp prof Sp2
1 xp home
Sul "server" ci sono dei database access,
(i "client" hanno tutti lo stesso office 2003 sp2)
i 3 xp prof riescono ad aprirlo perfettamente
l'xp home, li apre solo e solamente per primo,
mi spiego meglio:
 se l'xp home apre un determinato file per primo
e poi gli altri pc accedono allo stesso file,tutto ok,
si riesce a lavorare, aggiornare i record etc,
se invece l'xp home trova il file in uso gia da un altro pc in rete,
si rifiuta di aprirlo.
Office è uguale nei diversi pc, quindi, ritenevo che la differenza possa
essere sulla gestione delle condivisioni di rete in xp home.
Consigli? opinioni? esperienze? e sopratutto SOLUZIONI?
Grazie dell'attenzione.
-- 
 


upgrada il pc a xp professional
Newsgroup: it.comp.appl.access
Titolo: Strano. OpenReport su Corpo_Format

 
          Ciao.
Nell'evento Corpo_Format di un report ho la DoCmd.OpenForm di un altro
report.
La stranezza sta nel fatto che se il primo report è aperto in preview tutto
funge come mi aspetto, e l'altro report viene aperto.
Se, invece, il primo report è fatto su stampante, invece, la OpenReport
nella Corpo_Format non parte affatto.
Spero di aver esposto in modo minimamente chiaro il problema.
Spero anche che questo mal di testa feroce non mi stia facendo prendere
lucciole per lanterne.
;-)
TIA
Ciao, Sandro.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Inviato via 
http://arianna.libero.it/usenet/
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it

 Prova a cambiare evento e metterlo su print
Fatto. Stesso effetto.
In particolare, se nell'handler di format o print ci metto un po di
istruzioni, queste mi vengono eseguite fino alla OpenReport. Dopo dic tutte
le istruzioni che seguono non mi vengono eseguite.
Neanche se ci metto qualche breakpoint.
Dimenticavo. Access 2003.
Grazie per l'interessamento.
Ciao, Sandro.


Newsgroup: it.comp.appl.access
Titolo: Linguaggi per implementare gestionale

Vorrei realizzare un gestionale che ovviamente usa un database; architettura
a 3 livelli.
Se uso 
asp.net
 ho dei vantaggi, però con linguaggi di programmazione come
visual basic .net ne ho altri.
Cosa mi consigliate?

 Cosa mi consigliate?
Ti consiglio viavamente di capire bene cosa sia la tecnologia .NET
prima di fare affermazioni di questo tipo!!!
Allora, ti spiego: 
ASP.NET
 è l'evoluzione di ASP (Active Server Page)
e l'innovazione + grande è che gestisce blocchi script lato client
(runat="Server") e oggetti lato client (ASP:TextBox, ASP:Label, ecc.
ecc.).
Questo fatto da la possibilità a NOI programmatori di sviluppare il
Code-Behind (cioè, x esempio, il file: WebForm1.aspx.vb) usando uno
dei linguaggi compilabili da .NET, come Visual Basic .NET o C# o C++
.NET !!!
Quindi, ti renderai conto che dire che 
ASP.NET
 ha i suoi vantaggi ma
Visual Basic .NET ne ha altri è una mega STR*****, xchè 
ASP.NET
 sarà
scritto (all'interno) in 
VB.NET
 o C# o C++ .NET ecc. ecc.
Recepito?!? 
Ciao a tutti!
     * * * Crash Override * * *
mess with the best, die like the rest
Newsgroup: it.comp.appl.access
Titolo: Calcolare differenza con una query

Ciao,
Ho una query basata su altre due query da cui prelevo 4 campi dalla prima e
4 dalla seconda.
esempio:
Dalla query 1 
campo A1
Campo A2
Campo A3
Campo A4
Dalla query 2
campo B1
Campo B2
Campo B3
Campo B4
nella mia query oltre ad avere questi campi ne devo avere altri 4 che
dovrebbero essere cosě:
Campo Q = Differenza tra campo A1 e B1
Campo W = Differenza tra campo A2 e B2
Campo S = Differenza tra campo A3 e B3
Campo T = Differenza tra campo A4 e B4
La differenza potrebbe essere sia positiva che negativa oltre ad essere in
pareggio.
Grazie per l'aiuto
Sthepan

 ha scritto nel messaggio 
news:1x933d78k3ga8$.q11s6bmqe4l7$.dlg@40tude.net...

Dovresti crearti un campo calcolato per ognuno dei 4 campi delle differenze:
Ad esempio per calcolare la prima differenza scrivi
Diff_Q: ([campoA1] - [campoB1])
nel nome campo della query.
Ciao
Davide

Newsgroup: it.comp.appl.access
Titolo: Massimizzare una form

Non mi ricordo come posso massimizzare una form in apertura
Ciao

 Ciao
maximize
Antonio

Sulla Form Evento Corrente fai una Macro con un
EseguiComando
IngrandisciDocumento
Penso che cosě possa andare



Docmd.Maximize
e, alla chiusura della stessa maschera: Docmd.Restore
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: creazione file mde

Sto realizzando un db, inizialmente con A97, adesso in A00.
Provando a registrarlo in formato .mde, Access si blocca e mi compare a
video l'enigmatico messaggio "Access was unable to create MDE file".
Access 97, perň, prima di questa informazione poco 'significativa', mi
diceva anche in quale form o report stava l'errore che avevo commess.
Access 2000, invece, non ritiene opportuno di mettermi al corrente di ciň..
morale mi sto sciroppando un mucchio di form da questa mattina senza capire
dove stanno gli errori (che ipotizzo piů d'uno...ahimč..)
Qualcuno sa darmi qualche 'dritta' per eseguire un debugging + rapido??
Ringrazio anticipatamente per la collaborazione
Goose


scusate era argomento già fritto e rifritto...
ho trovato le necessarie informazioni nei  post passati...
giuro di essere più attento la prossima volta.
Un saluto a tutto il NG
Goose

 wrote in message
qcl_5.2357$H_4....@twister1.tin.it...

Ce ne fosse di postatori come te!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: evento close di una maschera

Ciao a tutto il NG,
come posso uscire da un evento generato dal pulsante di chiusura di una
maschera facendo in modo di ... non chiudere la maschera? Ho inutilmente
provato con docmd.cancelevent.
Ringrazio chiunque mi possa dare una dritta per la risoluzione del caso.
 
Saluti
Fabrizio
 
 
 
----------------------------------------------------------
Inviato da: 212.216.132.104, via 
http://usenet.iol.it
 

 ha scritto nel messaggio
news:212Z216Z132Z104...@usenet.iol.it...

Praticamente non vuoi chiudere la maschera ma spostare il 'fuoco' su
un'altra maschera o controllo?
Se č cosě chiami il metodo 'setfocus' (vedi help) per il controllo scelto.
es.
'----------------
forms("nomeMaschera").setfocus
'----------------
Ciao.

 Ringrazio chiunque mi possa dare una dritta per la risoluzione del caso.
L'evento Close non si puņ fermare ma puoi usare l'evento Unload con un
Cancel = True
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco): 
http://www.donkarl.com

Newsgroup: it.comp.appl.access
Titolo: vendo 3 libri di informatica

vendo i seguenti libri di informatica:
Walther, Levine: Commercio elettronico con ASP (Apogeo): 27 euro (prezzo di
copertina 40 euro)
Riordan: Progettare database relazionali (Mondadori): 20 euro (prezzo di
copertina 31 euro)
Maslakowski: MySQL Guida completa (Apogeo): 23 euro (prezzo di copertina 35
euro)
i libri sono come nuovi, niente sottolineature, spiegazzature, ecc.
tutti e tre sono corredati con il proprio CD.
le spese di spedizione sono a mio carico.
scrivetemi al seguente indirizzo:
krono...@hotmail.com
Mario

 ha scritto nel messaggio
news:b8rt6n$cail9$1...@ID-171156.news.dfncis.de...

sono interessato ma dovresti abbassare un po' il prezzo, facciamo 60 euro
tutti e 3?
Newsgroup: it.comp.appl.access
Titolo: Problema con query di selezione

Salve a tutti.
Vi espongo il mio problema. Sono in una query di selezione dove, collegato via odbc alla tabella commesse clienti, seleziono tutte le righe relative alla commessa che mi interessa.
Quindi se nella commessa esiste il codice xxxxxx con quantità 3 la query mi mostra naturalmente 1 riga composta da codice articolo-commessa-unita misura-quantità-etc,etc.
Ora io dovrei costruire un report con un codice a barre dell'articolo per poter stamparlo su etichette adesive e attaccarlo a inizio catena montaggio su dei mobili per finalmente eliminare un pò di carta.
Il problema è che non posso avere un'etichetta con quantita 3 ma dovrei avere delle etichette con quantità unitaria, ovvero 3 etichette da mettere su tre mobili.
Il campo unità di misura è quantità non mi serve sulla stampa, e un eventuale controllo se deve venir fatto sul campo unità di misura non deve modificarm gli articoli a metro lineare (i piani che vanno sopra i mobili).
Secondo me la soluzione dovrebbe essere del tipo: se il campo unità di misura è = NR e la quantità > 1 creà righe = a quantità nella query di selezione.
Ecco, tradurre il ciò in un'istruzione per access mi farebbe molto piacere. :)
Grazie in anticipo.
-- 
Fabio76 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-862584.html
Inviato via 
http://www.itsistemi.net

 Fabio76
Già visto nel Sito Comune?
www.sitocomune.com
 - Sezione Reports
4.15 Stampare N volte la stessa etichetta, lasciando vuote in testa un certo numero di etichette.
4.1 Stampare N volte la stessa etichetta.
Ciao.
-- 
Sergio MAZZA 

Ho trovato quel sito.
Grazie cmq.
Il problema lo avevo aggirato con una queri di aggiornamento.......

Newsgroup: it.comp.appl.access
Titolo: Stampa unione

Ciao a tutti
Ho un problema che non riesco proprio a risolvere da solo.
Da un DB Access 97 devo aprire un documento Word 2003 di stampa unione. Ho 
creato il documento, ho creato il collegamento tra il file DOCe l'MDB e 
tutto (da Word) funziona correttamente (da notare che al stampa unione la 
faccio su una tabella, nemmeno su una query tantomeno con parametri).
Quando però apro il documento dal codice che segue, succede che non viene 
riconosciuto il fatto che si tratti di un documento di stampa unione, per 
cui me lo apre ma visualizza SEMPRE un record che "probabilmente" è l'ultimo 
caricato quando ho aperto il doc da Word.
-----------------------------------------------------------------------
Set oApp = New Word.Application
oApp.Documents.Add "C:\testD.doc"
Set MyMerge = oApp.ActiveDocument.MailMerge
--> If MyMerge.State = wdMainAndDataSource Then
With MyMerge
    .DataSource.FirstRecord = 1
    .DataSource.LastRecord = 2
    .Destination = wdSendToPrinter
    .Execute
End With
End If
...
-------------------------------------------------------------------------
Il test segnato con --> fallisce, e quindi non fa il merge di niente! 
PERCHE' ???
Può c'entrare il fatto che aprendo il file Word venga richiesta conferma 
dell'apertura della stampa unione?
Abbiate pietà di me, datemi una mano.
Grazie
Daniele


E' probabile; prova a scegliere DDE come collegamento alla base dati...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Come leggere un campo da un'altra maschera ?

Ho due tabelle e due maschere:
tblCliente e tblContatto in relazione 1 a Molti fra loro
frmCliente e frmContatto
Vorrei fare in modo che quando premo il pulsante "Nuovo Contatto" sulla
frmCliente, si aprisse la frmContatto impostando il campo IdCliente al
valore attuale della frmCliente.
E' piu' di un ora che ci penso e ancora non ci sono arrivato ... grazie!
Fabio

 wrote in message
news:pe0y6.120243$lj4.3...@news6.giganews.com...

Quando chiami la seconda maschera, utilizzi la solita sintassi
forms![numemascherachiamata]![nomecontrollo] e poni il controllo = a
me.controlloconID della maschera chiamante

 me.controlloconID della maschera chiamante
Grazie per la risposta ! Ho quasi capito... attualmente ho questo codice
abbinato al pulsante:
Private Sub cmdNuovo_Click()
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "frmNuovoContattosuFornitore"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub
come dovrei variarla ?
Grazie

 End Sub
Prooovalo!

Perfetto grazie !!
Nel frattempo avevo risolto con:
    DoCmd.OpenForm "frmNuovoContattosuFornitore", , , stLinkCriteria
    Forms![frmNuovoContattosuFornitore].[IdCliente] =
Forms![frmSchedaCliente].[IdCliente]
Newsgroup: it.comp.appl.access
Titolo: Problema caricamento dati esterni

Ringrazio massimiliano ed alex per avermi indirizzata sul modo di
automatizzare il caricamento dati e spero mi potete aiutare a capire
l'errore nella mia procedura.
Il file da importare è un file testo campi delimitati da ";" con
l'operazione importa file  per importarlo mi basta solo dire che è
delimitato, confermare il default ed indicare il nome della tabella in cui
importarlo il tutto senza errore mentre  quando questa procedura voglio
automatizzarla sia con il comando DoCmd TransferText che con la macro
trasferisci testo non riesco ad importare i dati perchè mi compare
'errore  - campo "F1" inesistente nella tabella "miatabella".
Grazie


Hai letto cio' che ti ho scritto nel post precedente ?
Prova a vedere se ti č utile.
Ciao.
Marco

Newsgroup: it.comp.appl.access
Titolo: Etichetta query

In che modo si può modificare l'etichetta (la scritta sulla barra blu per
intenderci) di una query di selezione.
Grazie a tutti

 Grazie a tutti
X le etichette fa sempre riferimento alla voce CAPTION dell'help
-- 
Pablitomf
Chi la dura la vince ;-)
Voglia di lavorar Saltame addosso, lavora babbo mio che io non posso.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:c7atg4$1hu$1...@news.newsland.it...

Non mi sei stato molto di aiuto.
Infatti la proprietà caption non si applica ad una query.

Newsgroup: it.comp.appl.access
Titolo: info

Ciao a tutti!
    sono nuovo di questo newsgroup.
    La mia domanda č questa:
    Sono alle prime armi nell'utilizzo di MS access 2002
    vorrei sapere dove posso trovare informazioni esaurienti sul Web.
    infine:
    Come posso ricercare dati su piů colonne usando solo una maschera input?
grazie a tutti

 grazie a tutti
Comunque con una ricerca nelle risorse indicate trovi la risposta...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: connessione unità

come posso connettere un'unità di rete con il vba?
grazie a tutti

 come posso connettere un'unità di rete con il vba?
devi usare il comando     Shell()
che esegue un comando come se venisse eseguito dal prompt.
Shell serve perchè per collegare un'unità devi usare il comando    net
per collegare un disco devi usare:
net  use  K:  \\bigserver\database
questo ti collega sulla lettera K: il percorso \\bigserver\database
se vuoi puoi usare il comando      net HELP          che ti da tutti i
parametri,
od anche         net help use        che ti da l'help specifico del comando
"use"
ciao, max


Apri una sessiome MsDos dal tuo sistema Windows
digita ed esegui:  Net use /?
e guarda cosa dice
il tutto lo puoi eseguire da codice Vba utilizzando il comando "Shell".
Di piu' Ninzo'
bye :o)
Newsgroup: it.comp.appl.access
Titolo: pausa di un secondo in una routine .....

 
Buongiorno a tutti.
In una routine ho creato un codice che mi crea un codice cliente nel 
seguente formato:
yyyymmddHHmmss
Purtroppo per� non mi permette di creare codici diversi.
Vorrei che mi creasse un codice almeno ogni secondo.
Come posso inserire nella routine una pausa di un secondo tra una creazione 
e la successiva.
Grazie
Saluti
Lucky 
 
 

 creazione e la successiva.
 
Non � chiaro dove e come lo usi, am perch� non addizioni 1 secondo
con DateAdd in ogni turno del ciclo - se si tratta di un ciclo...?
 
Per la pausa vedi: 
http://access.mvps.org/access/api/api0021.htm
 
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 


Ciao Karl,
(ovviamente mi sono letto tutta la letteratura che mi hai consigliato) ....
avrei risolto il problema in questo modo:
___________________________________________
Private Sub Comando2112_Click()
On Error GoTo Err_Comando2112_Click
 
step0:
Dim TempoIniziale As Long
    TempoIniziale = Timer
    While Timer < (TempoIniziale + Val(1))
        DoEvents
    Wend
 
If IsNull(Me![NOMINATIVO].Value) Then
GoTo Exit_Comando2112_Click:
Else
GoTo step1:
End If
 
step1:
Me![Codice cliente].Value = " "
Me![Codice cliente].Value = Format(Now(), "yyyymmddHHmmss")
DoCmd.GoToRecord , , acNext
 
GoTo step0:
 
Exit_Comando2112_Click:
    Exit Sub
 
Err_Comando2112_Click:
    MsgBox Err.Description
    Resume Exit_Comando2112_Click
 
End Sub
_______________________________________________
 
Domanda: potrei fare meglio e diversamente ?
Utilizzare DateAdd nella routine sopra ? Come ?
Grazie Karl
Saluti
Lucky
Newsgroup: it.comp.appl.access
Titolo: Comparazione fra due valori null

Ciao a tutti, volevo sapere se vi è mai capitato di fare il confronto fra
due variabili che contengono il valore Null
Es.
   If MyRec![PwID] = Me.PwID.Value Then
    If ID = -1 Then
     stDocName = "ZPC"
    Else
     stDocName = "GestAnag"
    End If
    stLinkCriteria = ""
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.Close acForm, "LoginA"
   Else
    MsgBox ("Password Errata")
   End If
In questo caso nel confronto della riga n° 1 se ho due valori null salta lo
stesso alla riga 11 (else) senza rispettare la condizione.
Quale soluzione posso adottare?
Ciao e grazie.
** Articolo inviato tramite i servizi gratuiti di 
www.x-privat.org
 **


If Nz(MyRec![PwID],0) = Nz(Me.PwID.Value,0) Then
Ciao
-- 
Leandro


If Nz(MyRec![PwID],0) = Nz(Me.PwID.Value,0) Then
Ciao
-- 
Leandro

 ha scritto nel messaggio
news:3f16...@x-privat.org...

Ciao Carmelo
Puoi utilizzare la Funzione Nz() (vedi help)
Per campi numerici
---------
If Nz(MyRec![PwID],0) = Nz(Me.PwID,0) Then
Per campi stringa
---------
If Nz(MyRec![PwID],"") = Nz(Me.PwID,"") Then
Ciao Giorgio

 ha scritto nel messaggio
news:bf8ahj$7fo$1...@lacerta.tiscalinet.it...

Accidenti !!
Il server delle news 
tiscali.it
 deve essere imballato perchè non mi fa
vedere le risposte date da Leonardo addirittura in data di ieri, risposte
che vedo nel server edisontel. (non lo uso perché non posso rispondere).
Scusate
Ciao Giorgio

 ha scritto nel messaggio
news:bf8ar2$7kh$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.appl.access
Titolo: rinominare file jpg da codice

In una tabella ho archiviato i nomi dei file di fotografie che sono in una
certa directory:
se cambio il nome ad una foto nella tabella, è possibile da codice
rinominare correttamente il file jpg?
Grazie
g


Credo che possa essere una cosa del genere
Ti salvi in una variabile il nome del file prima di averlo cambiato e
poi usi il ren.
Testata (non nel senso di "capocciata", ma di "sottoposta a test")
Private Sub pippo_AfterUpdate()
Dim vecchio
vecchio = Me.pippo.OldValue
Name vecchio As pippo
End Sub
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.appl.access
Titolo: cercare corrispondenza valore

Salve.
Un piccolissimo problemino.
In una maschera di inserimento fatture ho un casella di testo
IdAzienda.
Su evento afterupdate ho messo il seguente codice
If IDAzienda > DMax("[IDAzienda]", "[tblAziende]") Then
MsgBox "Ditta non esistente"
End If
Se però nella tabella Aziende ho due azienda di cui una con
l'IdAzienda 1 e l'altra con IdAzienda 4, il codice su non mi segnala
che il valore 2 o 3 non esiste.
Come faccio a farmi dire dal codice che il valore digitato non è
presente nella tabella Aziende?
Grazie anticipate.
Giuseppe.


Immagino qualcosa del tipo:
if Dcount("[IDAzienda]", "[tblAziende]", "[IDAzienda]= " &
me.IDAzienda)=0 Then
dovrebbe fare al caso tuo
se invece di zero dovesse restitutire null, ma non credo
if isnull(Dcount("[IDAzienda]", "[tblAziende]", "[IDAzienda]= " &
me.IDAzienda)) Then
Tieni conto che:
1) sono scarsino
2) la ho scritta al volo
F.
Newsgroup: it.comp.appl.access
Titolo: Aggiornamento MDE

A tutti coloro che vorranno gentilmente fornire un mano a questo newbie del
news.
Vorrei sapere se esiste un modo dopo avere compilato un mdb in mde di
aggiornare il file mde magari importando nuove tabelle, codice vba ecc.?
Grazie a tutti coloro che si faranno carico di rispondere al problema.

 wrote in message
news:9lLD8.52324$
5k4.1...@twister2.libero.it

no perchè il file mde contiene una sorta di eseguibile del programma di
access per cui non è possibile modificare qualcosa inerente alla
struttura delle maschere, report, moduli
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 struttura delle maschere, report, moduli
Piů precisamente, Access quando crea il file MDE elimina tutta la parte di
codice che permette la modifica della struttura del database (tabelle,
query, report, maschere etc.)


 query, report, maschere etc.)
Ancora piů precisamente: rimuove la rappresentazioni ASCII del codice,
lasciando la versione P-Code  ;-)
Ciao.

 Ciao.

 Per cui, in linea teorica si potrebbe decompilare?
Ci vuoi provare? ;-)
In linea teorica può essere fattibile, anche se non credo sia mai stato
fatto (funzionante).
Ne trovi invece con facilità per VFPro, Java, VB3-4 (compilato in P-Code a
quell'epoca), Clipper.

Newsgroup: it.comp.appl.access
Titolo: funzione IIF

Da buon provetto, mi rimetto alla magnanimità della comunità per 
chiedere un consiglio. Sto creando un db per l'azienda in cui lavoro e 
mi trovo nella necessità di usare la funzione "iif" che nella maschera 
mi funge benissimo, che è:
=IIf([id_Provvedimento]=1;[Beneficio]*4+30;IIf([id_Provvedimento]=2;[Beneficio]+30;" 
"))
ma ho la necessità di usarla anche in una query in cui mi dice che il 
valore è troppo complesso, come posso aggirare il problema??
ringraziando
-- 
       maurizio56
browser: FireFox 2.0
mailreader: ThunderBird 1.5.08

 ringraziando
query dove? qbe o sql. Se e' sql sostituire i ";" con ","
-- 
ac
y-1=x

 ha scritto nel messaggio news:45f85d64$0$17949$4faf...@reader1.news.tin.it...

Oltre a soddisfare la naturale curiosità di Alessandro, poi crearti una funzione (in un modulo) dove gli passi i parametri e ti fai 
restituire il valore nel campo calcolato.
Es.
[nomeCampo]: nomeFunzione([id_provvedimento];[beneficio])
Ciao.
-- 
Sergio MAZZA 

Sergio MAZZA ha detto: in data 15/03/2007 8.50:

Chiedo scusa, rispondo ad Alessandro:
i parametri sono passati nelle griglia di creazione della qry con:
Da_Pagare:IIf([id_Provvedimento]=1;[Beneficio]*4+30;IIf([id_Provvedimento]=2;[Beneficio]+30;""))
a Sergio:
scusa l'ignoranza e l'incompetenza, ma posso creare un modulo che 
contenga il mio codice e passarlo alla griglia??, oppure, sto dicendo 
una scemata, nei criteri posso anche spezzare il mio codice?


 mailreader: ThunderBird 1.5.08
Ciao.
-- 
Sergio MAZZA 

Sergio MAZZA ha detto: in data 16/03/2007 8.19:

lo avevo detto che sono ........
grazie
-- 
       maurizio56
browser: FireFox 2.0.0.2
mailreader: ThunderBird 1.5.0.10