mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: VBA: trovare i primi 6 in un recordset...

Salve a tutti,
qualcuno mi puo' dare un suggerimento per fare la seguente cosa:
Ho un recordset con due colonne:
AGENTE e PUNTI
Io dovrei assegnare ai primi 6 agenti un ulteriore
punteggio 10 punti al primo, 6 al secondo, 4 al terzo,
3 al quarto, 2 al quinto e 1 al sesto.
grazie
ciao ciao
sdamy

 wrote in message
ad289e$pe8$1...@lacerta.tiscalinet.it...

______________
forse puoi crearti una Select della tabella, ordinandola in modo decrescente
sul campo punti, e poi ti prendi i primi sei ed aggiungi quei valori.
Ho creato una tabella Agenti ed in una maschera ho inserito il seguente
codice.
Spero faccia al caso tuo.
Private Sub Comando0_Click()
Dim strSQL As String
Dim rst As Recordset
Dim i As Integer
strSQL = "SELECT agenti.agenti, agenti.punti " _
        & "FROM agenti ORDER BY agenti.punti DESC"
Set rst = CurrentDb.OpenRecordset(strSQL)
For i = 1 To 6
    Select Case i
        Case 1
            rst.Edit
            rst!punti = rst!punti + 10
            rst.Update
            rst.MoveNext
        Case 2
            rst.Edit
            rst!punti = rst!punti + 6
            rst.Update
            rst.MoveNext
        Case 3
            rst.Edit
            rst!punti = rst!punti + 4
            rst.Update
            rst.MoveNext
        Case 4
            rst.Edit
            rst!punti = rst!punti + 3
            rst.Update
            rst.MoveNext
        Case 5
            rst.Edit
            rst!punti = rst!punti + 2
            rst.Update
            rst.MoveNext
        Case 6
            rst.Edit
            rst!punti = rst!punti + 1
            rst.Update
            rst.MoveNext
    End Select
Next i
    rst.Close
End Sub
ciao Riccardo

 ha scritto nel messaggio
news:ad2bg1$h28$1...@localhost.localdomain...

bravo!
stò facendo come hai suggerito te!
grazie
ciao icao
sdamy


__________
ho aggiunto un paio di riche, in modo tale che se ci sono dei punteggi
uguali, vengono
conteggiati in modo unico (es: 15, 14,14,13,12,12,12,11,10 - sono sempre i
primi 6)
Dim strSQL As String
Dim rst As Recordset
Dim i As Integer
Dim intCtl As Integer
strSQL = "SELECT agenti.agenti, agenti.punti " _
        & "FROM agenti ORDER BY agenti.punti DESC"
Set rst = CurrentDb.OpenRecordset(strSQL)
For i = 1 To 6
    intCtl = rst!punti

    If intCtl = rst!punti Then i = i - 1
Next i
    rst.Close
ciao Riccardo
Newsgroup: it.comp.appl.access
Titolo: dubbio n.1

Dal record corrente debbo aggiungre (con un pulsante) un nuovo record
"riportandomi"  alcuni (ma non  tutti )  dei dati presenti in alcuni dei
campi .
Come faccio?
Stefano

 ha scritto nel messaggio
news:RYRB8.22057$US3.5...@twister1.libero.it...

Nell'evento On_Click del pulsante apri il file e aggiungi un nuovo record
passandogli i valori che vuoi tu.
saluti
GB

passandogli i valori che vuoi tu.
questa non l'ho capita
ciao a tutti
MAssimiliano
--------------------------------
Inviato via 
http://usenet.iol.it
 

 ha scritto nel messaggio
news:81Z73Z224Z132Y1...@usenet.iol.it...

Private Sub PulAggiungiRecord_OnClick()
    Dim MioDatabase As Database, MioSet As Recordset
 'Definisco il database
    Set MioDatabase = CurrentDb
 'apro il file
    Set MioSet = MioDatabase.OpenRecordset("Tabella", DB_OPEN_DYNASET)
 'Entra in modo nuovo record
    MioSet.AddNew
    MioSet!PrimoCampo = Me!PrimoCampo (Ovviamente è uno dei campi della
maschera)
    MioSet!SecondoCampo = 2 (quì il valore lo stabilisci tu)
    MioSet.Update
    MioSet.Close
set MioDatabase = Nothing
' se vuoi che la maschera si posizioni su l'ultimo record
me.refresh
End Sub
Così ti è chiaro?
saluti
GB

 ha scritto nel messaggio
news:RYRB8.22057$US3.5...@twister1.libero.it...
Subject poco significativo n. 1
Antonio

 ha scritto nel messaggio
news:abaeob$283$1...@fe1.cs.interbusiness.it...


 C'č un sistema per ripristanere la numerazione del primo record = 1
E che te ne importa? I campi utilizzati da Access come contatori servono,
tra l'altro, x rendere sicuramente univoco il record, non certo x contare i
record: se questa fosse una tua esigenza, vai a vedere sul Sito Comune un
po' di spiegazioni sull'uso dei contatori e su come creare un controllo con
valori progressivi.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 Stefano
Con una compattazione dell'mdb dati puoi in parte risolvere il problema,
oppure ti crei una tabella temporanea copiando solo le definizioni e ti
importi i record che ti interessano, poi cancelli la tabella originale e
rinomini la temporanea.
Ma, se fossi in te non mi preoccuperei per il valore dell'id contatore,
questo è utilizzato solo per avere con certezza un indice univoco, il suo
valore è irrilevante.
Una sola considerazione, io uso su tabelle l'Id contatore solo se non ne
posso fare a meno e mai con tabelle il cui valore dell'indice è legato in
relazione con altre.
Pensa al caso di una tabella Anagrafica con il codice determinato dall'id
Contatore, qualunque altra tabella che richieda di avere il campo
idAnagrafica avrebbe dentro il valore dell'id contatore dell'Anagrafica.
se per un qualsiasi motivo devi ripristinare la tabella anagrafica e se non
poni attenzione al recupero dell'id contatore impostato, corri il rischio di
ritrovarti con i valori dell'id cambiati con conseguente perdita dei
riferimenti con le altre tabelle.
saluti
GB


wrote:

forse è più corretto usare defaultvalue
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: ActiveX Calendar in Inglese, e in italiano?

Scusate la mia ignoranza...
come faccio ad avere il calendario sempre in lingua italiana?
In ufficio mi va in inglese, a casa va in italiano...
In ufficio Windows 2000 con Office2003, a casa esattamente il contrario.
Grazie

 MAssimiliano
MAssimiliano, a casa ho WinXP con Office2000 e in ufficio ho Win2000 e
Office2003.
Non sono riuscito a capire comunque il nesso.... Hai comunque delle
soluzioni?
Ringrazio te e tutti.
Ciao

 ha
scritto nel messaggio
news:cht0j1$j97$1...@lacerta.tiscalinet.it...

Xp è 2002, 2003 è l'ultimissima versone.
Ovvio che Win 2003 non esiste
Questo per farti chiarire bene.
MAssimiliano

 ha scritto nel messaggio
news:mAb1d.17029$B06....@news.edisontel.com...

Grazie MAssimiliano!
scusami ancora però, c'è un modo per ottenere un calendario sempre in
italiano?
Grazie
Ciao

Newsgroup: it.comp.appl.access
Titolo: IMMAGINE COLLEGATA

Sto cercando di collegare un'archivio di foto ad un database esistente
tramite un collegamento dinamico al campo immagine traminte un routine
evento del tipo:
Private Sub Immagine_click()
On Error GoTo Err_Immagine_Click
Me.Immagine.Picture = Me.imm
Exit_Immagine_Click:
    Exit Sub
Err_Immagine_Click:
    MsgBox Err.Description
    Resume Exit_Immagine_Click
Con questo metodo sono costretto a cliccare sul controllo "imagine"per
ottenere l'aggiornamento del campo e quindi la visualizzazione della
foto. Io invece vorrei che l'immagine si aggiornasse automaticamente
con la visualizzazione del record ed addirittura se fosse possibile
creare un report contenente tutte le immagini dell'archivio.
ringrazio chiunque mi riesca a dare una mano 
Principiante

 ha scritto nel messaggio
news:6pht60ht4q6r3ad62...@4ax.com...

Eseguilo su EVENTO CORRENTE di Maschera.
Se fossi in te però inserirei il controllo di File Esistente....
che puoi fare usando la funzione DIR(....).
In particolare però non tutti i formati immagini saranno supportati.
Ciao.
@Alex.



@Alex ti ringrazio per l'aiuto, sono riuscito a fare quello che mi
proponevo
Saluti

Newsgroup: it.comp.appl.access
Titolo: Maschera che non si apre più

Ho creato una maschera da una query con diversi campi calcolati.
Dopo aver creato una etichetta con una DLookUp (evidentemente
sbagliata) non sono più riuscito ad aprire la maschera nè in
visualizzazione struttura nè in visualizzazione dati.
Ho provato ad importare la stessa maschera su un altro db, ma mi dà un
errore (errore di apertura maschera).
Come faccio ad entrare in struttura maschera?
..... su quella maschera ci avevo lavorato 2 giorni!!!  sigh sigh
Grazie in anticipo.

Grazie in anticipo.
Per aprire la maschera non lo so ma per recuperare il codice fai così: apri una maschera che vuoi, vai nel codice, menu Visualizza, Gestione progetti e da li entri nel codice della form che vuoi. Copialo da qualche parte (notepad va benissimo). Cancella tutto e prova ad aprire la form. Se il problema era nel codice si apre, altrimenti non lo so......
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it
Newsgroup: it.comp.appl.access
Titolo: MDE e conversione

Ho un DB di access 7.0 (acquistato) e protetto come MDE. Ho necessittà di
eseguirlo su una macchina dove è installato Access 2000 e dove, per
questioni di licenze, non posso installare la versione7.0. Qualcona sa dirmi
se posso riportare il file da MDE a MDB o convertrlo per access 2000?
Grazie Enrico

 ha scritto nel messaggio
news:8vuna3$ho7$1...@lacerta.tiscalinet.it...

Non puoi, ma sicuramente avrai conservato il .mdb e quello lo puoi
convertire in A2000 x riconsegnarlo come .mde al cliente.
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 ha scritto nel messaggio
news:X8NU5.6316$CH3.2...@news.infostrada.it...


 Grazie enrico
Ti prego innanzi tutto di rispondere dopo i messaggi precedenti.
Ti rimangono allora 2 possibilità:
- richiami chi ha fatto il programma e gli chiedi di convertirlo in A2000
(eventualmente se, pagando, ti può lasciare anche il nuovo MDB oltre al
nuovo MDE)
- rifai, o ti fai rifare, il programma con A2000
Ciao


Newsgroup: it.comp.appl.access
Titolo: sapere se un filtro restituisce zero record

come posso valutare e quindi fare qualcosa in vba se e soltanto se il filtro 
applicato alla maschera non restituisce record
 
grazie. 
 


Ciao,
potresti ad esempio, in apertura maschera inserire:
If Me.Recordset.RecordCount < 1 Then
DoCmd.Close
MsgBox ("Nessun dato per questa ricerca!"), vbInformation
End If
 
Ciao Vladimiro

"Vladimiro Leone"  ha scritto nel messaggio 
news:91bf34e3-2db0-4756...@h1g2000vbx.googlegroups.com...

ci provo grazie
 
 
una domanda, che programma usate per i newsgroup che vi mette il segno 
maggiori in automatico alle risposte io uso windows live mail e devo 
metterlo manualmente, grazie
 
 

 wrote:

Prima o dopo l'applicazione vuoi saperlo...?
 
@Alex

 "Vladimiro Leone"  ha scritto nel messaggionews:91bf34e3-2db0-4756...@h1g2000vbx.googlegroups.com...

Io uso Google gruppi.
Questo è il link:
https://groups.google.com/group/it.comp.appl.access/topics?hl=it&gvc=2
 
Ciao Vladimiro

@Alex
 
Dopo
 

 
funziona grazie mille.

Newsgroup: it.comp.appl.access
Titolo: aggiornamneto di una query

Buona giornata,
vorri aggiornare il contenuto di una listbox inserendo un parametro in una
textbox.
Ad oggi io utilizzo una combo per inserire il parametro (con il metodo
afterupdate), perň vorrei che alla pressione di ogni lettera il query si
aggiornasse. Pensavo che l'evento  OnChange mi potesse aiutare ma non č
cosě.
Riepilogando: vorrei che la query in una listbox si aggiornasse mntre
inserico lettera per lettera il parametro in una text box
Spero di essere stato chiaro, grazie a tutti


L'evento da usare è 'change' della casella di testo: a fronte dell'evento
eseguirai una requery della casella di riepilogo.
Ovviamente nella query che è origine controllo della casella di riepilogo il
riferimento alla casella di testo sarà del tipo
    Like [Forms]![frmCercareUnLibro]![txtCerca].[Text] & "*"
Ciao
--
Alberto
Newsgroup: it.comp.appl.access
Titolo: Access e il colore del testo

Ho la necessità di creare dei report per la mia azienda che ha un logo ed un
carattere particolare (Engraves Old BT),
ma soprattutto un colore del carattere che è un po' più scuro del rosso
scuro ma non proprio marrone...
il problema è che mentre Word mi permette di selezionare altri colori
tramite Pantone, Access ed Excel ne hanno poco più di venti e tant'è...
chi sa aiutarmi a risolvere il problema e stampare con la tonalità che
desidero??
premetto che so che potrei cambiare casella x casella il colore tramite le
proprietà, ma io vorrei che il nuovo colore si disponesse tra quelli in uso
continuo nella piccola tabellina colore.
Grazie a tutti e buon lavoro!!

 ha scritto nel messaggio
news:ia3U7.19019$o9.6...@news1.tin.it...

Puoi crearti il colore che vuoi con Definisci colori personalizzati >>,
quindi memorizzalo nella tavolozza dei colori con Aggiungi ai colori
personalizzati.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 proprietą,
potresti anche selezionare tutte le caselle e cambiare il colore a uttte
contemporaneamente usando le proprietą, io faccio sempre cosģ
ciao, max

Newsgroup: it.comp.appl.access
Titolo: Errore: tipo non corrispondente

Salve!
non mi spiego perchè ogni tanto ho l'errore tipo non corrispondente.
 
su click di un pulsante ho:
    Dim Arg As Variant
 
    'strFrm = 
Screen.ActiveForm.Name
 
    Arg = Me.Name & "|" & Nz(Me!txtLink_IdCliente, -1) & "|" & Nz(Me!txtLink_IdFornitore, -1)
    DoCmd.OpenForm "M_aggiungi", , , , , , Arg
 
**************************
su apertura di M_Aggiungi ho:
    Dim IdC As Long, IdF As Long
 
    If Me.OpenArgs > "" Then
      IdC = Split(Me.OpenArgs, "|")(1)
      IdF = Split(Me.OpenArgs, "|")(2)
    End If
 
    If IdC > -1 And IdF > -1 Then
      Me!CboCliente = IdC
      CboCli
      Me!CboFornitore = IdF
      CboFo
    Else
      Exit Sub
    End If
 
La maschera mi si apre ugualmente, ma senza dati.
grazie

Devi imparare a fare DEBUG... altrimenti è complicato.
Metti jn debug.print e stampa in Finestra immediata i valori utili a capire, così quando i pianta ci guardi e capisci.
 
@Alex


ok
grazie


ciao Alex
se  qui ho la possibilità di anche ="" : "|" & Nz(Me!txtLink_IdFornitore, -1) oltre a null, 
consigli di fare cosi'? 
IIf(IsNull( Me!txtLink_IdFornitore) Or Me!txtLink_IdFornitore="", -1, Me!txtLink_IdFornitore)
oppure ????

 oppure ????
 
Puoi tradurre in italiano....?
Non si capisce nulla.
 
@Alwx


ho notato che se il valore di  Me!txtLink_IdFornitore è uguale a ""
Nz non mi restituisce -1

 Nz non mi restituisce -1
 
Ovvio nz discrimina NULL non NULLSTRING
Quindi devi scrivere una cosa che restituisca -1sia con Null che NullString.
Iif(Len(tuocontenuto + '')=0;-1;tuocontenuto)
 
Saluti
@Alex


grazie
Newsgroup: it.comp.appl.access
Titolo: Errore Il databese è aperto da un altro utente

Un mio cliente ha chiuso un applicativo da me creato A2000  durante la
compattazione ha tolto il supporto su cui risiede (compatflash) adesso non
si apre più
E possibile riaprirlo o perlomeno recuperare i dati in qualche modo ?
 Grazie Stefano

 wrote in message
news:2OvV9.36190$
0v.11...@news1.tin.it

Già...., è stato chiuso in modo errato.
Cerca nella stessa dir dell'applicativo ed elimina il file
Applicativo.ldb
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


pultroppo non c'e nessun file ldb il fatto è che lui ha fisicamente tolto la
compatflash su cui risiedeva il programma mentre il programa si stava
compattando.
stefano

Newsgroup: it.comp.appl.access
Titolo: Automatizzare l'inserimento di grafici in Access

Salve a tutti,
scusate la domanda 'di basso livello'... devo riempire 100 form di
Access ciascuno con 150 grafici e/o figure. I 100 form sono tutti
identici, e a ciascun bound data frame corrisponde sempre lo stesso
nome di file (l'unica cosa che cambia e' che i files di un diverso form
si trovano in un diverso folder).
Al momento l'unico sistema che conosco e' di destro-cliccare su ogni
bound data frame del form e inserire i files uno per uno.. ma mi sembra
impossibile che non ci sia un sistema piu' 'smart'.
Ho letto decine e decine di messaggi su questo ed altri newsgroups, ho
perquisito il sito MSN, ho rivoltato l'help come un calzino, ma a parte
il generico suggerimento di usare il visual basic non ho trovato ne'
esempi da modificare, ne' dettagli utili..
Qualcuno mi puo' aiutare?
Milioni di grazie a tutti
Alessandro

 ha scritto nel messaggio 
news:1118676194.5...@g49g2000cwa.googlegroups.com...

Non so cosa sia un: "...bound data frame..." ma l'unico sito che non hai 
visitato è il sito comune (
www.sitocomune.com
)...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: somme incrementate.... si dirà così?

Salve
Ho il seguente problema: in un report di nominativi (ordinati per mese)con
relativi importi vorrei che mi sommasse progressivamente l' importo del mese
precedente.Provo di spiegare
                Nome   Importo    Tot progr.
Gennaio    Pinco        10            10
                Pallino        20           20
Febbraio  Pinco          10            20
                Pallino        10            30
Marzo      Pinco         20            40
                Pallino        10            40
Eccetera fino a dicembre
Qualcuno sa che espressione usare nella casella "Tot progr."?
Il report è raggruppato per mese


Direttamente con un report non te lo so dire (conosco quasi per niente i
report); perň se ti č utile puoi farlo con una query che poi puoi adoperare
come come origine record di un report.
Ipotizzando che i dati siano contenuti in una tabella chiamata Tabella1, che
a sua volta contiene un campo Nome (di tipo Testo), un campo DataMov (di
tipo Data/ora) e un campo Importo (di tipo Numerico), il codice SQL della
query č:
SELECT Format([DataMov],"mmmm") AS Mese, Tabella1.Nome,
Sum(Tabella1.Importo) AS SommaDiImporto, DSum("[Importo]","Tabella1","Nome="
& Chr$(34) & [Nome] & Chr$(34) & " AND Month([DataMov]) <= " & [Mese1]) AS
TotProgr, First(Month([DataMov])) AS Mese1
FROM Tabella1
GROUP BY Format([DataMov],"mmmm"), Tabella1.Nome
ORDER BY First(Month([DataMov])), First(Tabella1.Nome);
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Modificare valori di più record con filto maschera

Ho una maschera non associata contenente una casella di riepilogo, che 
evidenzia diversi campi di più record (selezione multipla: avanzata).
Sulla base dell'esempio "filtroreport" del sitocomune riesco, con un 
evento clic di un tasto, a riportare in una casella di testo i record 
selezionati e/o ad aprire una maschera in modalità maschere continue che 
filtra i record interessati.
Ora devo assegnare un valore "testo" in un campo di questi record (presi 
direttamente dalla tabella); come fare?
ciao
Peppe

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


Grazie per il suggerimento Nel frattempo ho risolto in altro modo; ho 
simulato
la casella di riepilogo con una maschera in modalità maschere continue, 
sfruttando
lo stratagemma della formattazione condizionale del "forecolor" per 
evidenziare
i singoli record selezionati.
ciao
Peppe
Newsgroup: it.comp.appl.access
Titolo: E' possibile far *lampeggiare* un combobox ? :D

... Mi sa che chiedo troppo.
Ma il caffe', giuro su Dio, non glielo voglio far fare.

 Ma il caffe', giuro su Dio, non glielo voglio far fare.
sull'evento on timer della tua maschera metti
If Me.tuacombo.BackColor = 16777215 Then
     Me.tuacombo.BackColor = 0
     Else
     Me.tuacombo.BackColor = 16777215
End If
come timer interval metti 100 o un valore a piacere
ciao
BFS


ovviamente sull'evento "su attivato" della compo...rimetti a zero il 
timer della maschera altrimenti non riesci a selezionare la voce della 
combo.
BFS

 come timer interval metti 100 o un valore a piacere
Eh, col timer ero capace pure io ... :D
Ma me succhia un sacco de cpu.


hai un 386?
sul mio pc il processo msaccess.exe con la combo che blinka non si 
schioda dallo 0% di utilizzo cpu
ciao
BFS

 hai un 386?
Hai ragione, va benissimo.
Grazie !
Newsgroup: it.comp.appl.access
Titolo: Modifica percorso per query di creazione/accodamento.

W07 Enterprise
Office 2013
 
Buongiorno a tutti,
 
nel tempo ho alimentato un DB Access con collegamenti a numerose tabelle e con diverse Query (più di 40) di creazione/accodamento. Il FE è sempre stato sul mio desktop e le varie tabelle, BE si trovavano su di un percorso di rete.
Ora ho la necessità di spostare tale archivio su di un'altro percorso per poterlo condividere con altri utenti.
Ho risolto il problema delle tabelle collegate, utilizzando la funzione nativa di Access "Gestione Tabelle Collegate" mentre non ho una soluzione rapida per modificare i percorsi con cui le varie query ricreano/aggiornano i dati.
Cortesemente potreste darmi una indicazione su come operare una sostituzione massiva, passando in rassegna tutte le query, in modo da sostituire quella parte di percorso che si rende necessario variare?
Esempio da "O:\Vecchio percorso\" a "P:\Nuovo percorso\"?
 
Grazie.
Stefano

 Esempio da "O:\Vecchio percorso\" a "P:\Nuovo percorso\"?
 
Prima fai una copia di sicurezza del db. ;-)
 
Poi copia una funzione come questa in un modulo standard:
 
Function fctReplaceStringInQuery(strSearch As String, strNew As String)
 
   Dim db As DAO.Database
   Dim qdf As DAO.QueryDef
 
   Set db = CurrentDb
 
   For Each qdf In db.QueryDefs
 
     If InStr(qdf.SQL, strSearch) > 1 Then
         Debug.Print qdf.Name
         qdf.SQL = Replace(qdf.SQL, strSearch, strNew)
     End If
 
   Next qdf
 
End Function
 
Premi Ctrl + G per aprire la finestra immediata e lì chiami la funzione 
così:
 
?fctReplaceStringInQuery("O:\Vecchio percorso\","P:\Nuovo percorso\")
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
Access Lobby: 
http://www.AccessDevelopers.org
 


Thank you Karl; everything went fine!


Ed è possibile anche, per lo stesso motivo, senza utilizzare "Gestione Tabelle Collegate", ciclare i nomi delle tabelle (siano esse collegate ad un BE, oppure di tipo *.txt o, infine, *.xls o tutte queste situazioni assieme) e modificare i relativi percorsi?
Grazie.

 Ed è possibile anche, per lo stesso motivo, senza utilizzare "Gestione Tabelle Collegate", ciclare i nomi delle tabelle (siano esse collegate ad un BE, oppure di tipo *.txt o, infine, *.xls o tutte queste situazioni assieme) e modificare i relativi percorsi?
 
http://www.donkarl.com/it?FAQ3.1
 

Newsgroup: it.comp.appl.access
Titolo: Ottenere lo script sql di una tabella  o più

E' possibile tramite ado ?
...

 ...
Parli di Access...?
Se si ----> No
Se no ----> Generalmente SI
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


Azzo ma neanche nella vers. 2000 :| mi sembra una grossa limitazione ....
Sto tentando di riazzerare una tabella da codice (ado) e mi trovo mille muri 
sono in alto mare qualche consiglio ?

 ha scritto nel messaggio
news:JeKRd.564794$b5.25...@news3.tin.it...

Non mi dire che quanto hai chiesto era per azzerare un Counter....?
Svuotala e compatta
Docmd.RunSQL"DELETE * FROM NomeTabella", quindi vai sul sito di Karl
per vedere come si Compatta un DB accedendo al menů nativo ed usando
la voce di Compattazione.


 di codice)
Non capisco bene come stai operando.
Anche se usi C++ devi pur utilizzare o DAO o ADO.
In entrambi i casi puoi cancellare il contenuto della Tabella
passando la stringa al Metodo Execute dell'Oggetto istanziato.
Per compattare invece ADO non espone la possibilità di Compattare
ma DAO si tramite il Metodo CompactDatabase che trovi nell'Help di DAO.
Per poterlo eseguire devi chiudere tutti i Recordset e/o le connessioni
alle tabelle.


 ...
C'è un mio esempio sul 
www.sitocomune.com
 sez. tables che ti dà l'SQL di
una tabella, ma non è completo, ha parecchie limitazioni. Non esporta
tutti i tipi di campi e non esporta gli indici.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 l'oggetto Connection.


 ergo come potrei fare ?
Che Interfaccia usi...??
Non c'č problema quanto ti ho indicato č sostituibile con:
OggettoDatabase.Execute "DELETE....."
Ti basta accedere a DAO, se usi DAO oppure ADO usando
l'oggetto Connection.
Ciao


 -- 



A ecco mi mancava dao .... ora faccio delle ricerche...

Newsgroup: it.comp.appl.access
Titolo: Menu e corpo

Sto usando una form con menu stile pagina web, ossia con menu orizzontale, 
stile yahoo.tabs.
E' possibile riempire il resto del corpo della pagina senza usare delle 
sttomaschere?
Ossia, se schiaccio inserimento mi devono comparire i campi relativi, se 
schiaccio visulaizza mi
deve comparie un'altra maschera am semre all'interno del corpo della 
maschera principale
Ho provato a creare i controls con il method create.control ma mi dice che 
posso crearli
solo in design view 

 
-- 
ac
y-1=x

oh grazie usero' le schede
Newsgroup: it.comp.appl.access
Titolo: [OT]Presentazione e consigli

Ciao mi chiamo Davide, è la prima volto che posto qui e volevo chiedervi
alcuni consigli.
Posseggo il pc da quasi un anno e dopo aver preso confidenza e perso
tempo con caz...varie vorrei imparare ad usare Access e il Visual Basic
, premetto che sono a completo digiuno di entrambi tranne forse per
Access, in quanto, 6 mesi fa ho frequentato un corso molto base sulla
suite office, dove mi hanno dato solo una spruzzatina sull'access.
Quindi dovendo partire da zero volevo sapere quali testi ( in italiano)
potreste consigliarmi.
Poi mi sembra di capire che per imparare bene Access bisogna saper il
linguaggio Visual basic e volevo sapere se mi conviene iniziare lo
studio di entrambi contemporaneamente o partire prima con Access e poi
con Visual Basic.
Che differenza c'è poi Tra le varie versioni di visual studio?
Essendo arrivato alla 6 devo iniziare da li, dato che immagino sia
l'evoluzione dei precedenti, o il 5 e il 4 sono cose diverse?
Ho letto il sito comune sia di Access che Visual Basic e inserito tra i
preferiti i vari siti che consigliate per poterli poi integrare con i
testi.
Tra i vari post letti ho notato che solo MS Access
2000 - Guida all'Uso" - Microsoft Press - Mondadori, Autore: John
L.Viescas, è il testo che piu consigliate, e volevo sapere se come punto
di partenza va bene o se comunque si rivolge a chi sa gia qualcosa.
Ringrazio tutti coloro che mi risponderanno sperando che non mi
dicano....ritorna alle tue caz...
Ciao
Davide

 Davide
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

Ti ringrazio di tutto specie per la differenza che c'è tra VBA e VB di
cui non sapevo per niente che ci fosse questa distinzione.
Grazie mille
Ciao


Ciao scusami ma ho dimenticato di chiederti una cosa, avrò sempre
bisogno di Visual Studio anche per VBA o si puo usare qualche
applicazione che gia risiede in Access o Office.
Ciao



Basta Access o qualsiasi altro programma della suite Office.

Newsgroup: it.comp.appl.access
Titolo: Sottrazione di date

Ciao a tutti, sto monitorando le attività di alcuni operatori, per avere 
il tempo impiegato per ogni attività eseguo la differenza fra la 
data-ora inizio attività, e data-ora fine attività. La cosa la gestisco 
anche in relazione alle pause, straordinari, e festività, ma non mi 
piace che negli archivi la differenza si trova come "25/03/2007 
01:25:30" all'atto pratico non mi cambia nulla ma se l'operazione inizia 
al finire del giorno 24 e finisce al 25 il risultato è sempre 
"25/03/2007 01:25:30". Come posso fare per avere il campo con solamente 
il tempo. Altro piccolo problema; se devo fare un monitoraggio su più 
giorni (Es. 4), la somma delle ore operatore supera le 24 e di 
conseguenza il campo data formattato come ora estesa mi da la differenza 
tra il totale delle ore - 24 = 8, esiste un modo rapido per avere un 
monte ore evitando la scomposizione dei giorni per h - m - s e poi 
trasformare il risultato in un complessivo h (32h 00m 00s).
Grazie a tutti.

 ha scritto nel messaggio 
news:gqd0hq$vb5$1...@aioe.org...

ci sono numerosi metodi...hai guardato la guida?
argomento già trattato in precedenza...guarda i post vecchi...
controlla le funzioni datediff, dateserial
per avere il campo in formato tempo (hh.mm.ss) 
....guarda...formatdatetime(espressione,vbShortTime)
ciao
-- 
Roberto da Parma 

Roberto da Parma ha scritto:

Grazie, formatdatetime(espressione,vbShortTime) è quello che mi serviva, 
quello che cerco è un pò diverso da quello che che ho trovato fino ad 
ora. Mi sa che devo partire anche da convertire il tutto in centesimi 
visto che lavoro su dei cicli.
Ciao e grazie ancora.
Newsgroup: it.comp.appl.access
Titolo: Stampare Tree View

Ciao a tutti,
ho googleato un pochino, ma sembra molto difficile fare quanto richiesto 
nell'oggetto.
Qualcuno ci ha provato/riuscito?
Qualche idea/soluzione alternativa?
Grazie mille.
Ciao,
Massimo 


Ciao, tornato dalle ferie???
Di primo acchitto io creerei una tabella temporanea e la riempirei
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 Di primo acchitto io creerei una tabella temporanea e la riempirei
E questo gią lo faccio per preparare la tree-view, il problema č che ha una 
grafica abbastanza evoluta.
E non mi andava molto di ri-fare un report ad hoc, praticamente uguale.
Al momento esporto i dati in excel, tuttavia stanno nascendo problemi con 
utenti che poi modificano il file di excel per sistemarlo e si dimenticano 
di modificare il database.
Sto valutando anche xml trasfomato con xslt, perņ ... necessita poi di 
pasasre dal browser/metterne uno interno...
Ciao,
Massimo

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

 Prego
Grazie ancora.
Ciao,
Massimo
Newsgroup: it.comp.appl.access
Titolo: funzioni con piu valori

E' possibile creare delle funzioni che restituiscano più di un valore ?
es. funzioneprova(str1 as string, str2 as string, int3 as integer, int4 as
integer) deve restituirmi
    result1 = str1 & str2
    result2 = int3 / int4 ...
E' solo un esempio.
Oppure devo creare un tipo personalizzato, un valore di quel tipo.
es: Type miotype
                res1 as string
                res2 as integer
    end type
funzioneprova(str1 as string, str2 as string, int3 as integer, int4 as
integer)  as miotype
Grazie in anticipo a voi prodi accessisti.
Bolo

 wrote in message
9i4qll$khf$1...@fe1.cs.interbusiness.it...

Beh, io lo affronterei nella seguente maniera. Se il tipo che definisci
(miotype) è un nuovo tipo di dato che ricorre spesso nel programma (vedi ad
esempio i numeri complessi, formati da una coppia di numeri reali) allora
definisco una type pubblica e creo la funzione come hai detto tu. Se invece
si tratta di un caso spodarico, ridefinisco la funzione come segue:
sub funzioneprova(str1 as string, str2 as string, int3 as integer, int4 as
integer, Byref res1 As String, Byref res2 as Integer)
cioè diventa una sub con altri due argomenti passati per referenza da poter
utilizzare all'uscita dalla routine (meno elegante e meno leggibile).
Comunque tutto questo IMHO.
HTH
LaLo

 ha scritto nel messaggio
news:9i4qll$khf$1...@fe1.cs.interbusiness.it...

Appoggia i vari risultati calcolati nella funzione in variabili globali.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio news:9i4qll$khf$1...@fe1.cs.interbusiness.it...

Ovviamente sia la soluzione di LaLo che di Roberto
sono corrette ma io ti consiglierei di abbituarti a usare
la prima (LaLo) per 3 motivi:
- se ti dovesse capitare di programmare a basso livello
con la RAM contata, questo sistema in alcuni casi
può permetterti di gestirla meglio, quindi di usarne meno,
quindi di risparmiare sul costo del prodotto finale
- in fase di revisione del codice ti permette di non
diventare pazzo per controllare dove hanno influenza
le variabili globali (sopratutto se ti 6 dimenticato di commentare:))
-riutilizzo del codice: io ho studiato informatica
15 anni fa ma già allora insegnavano a creare
'oggetti autosufficienti'. Se scrivi la funzione con il
passaggio dei parametri ti basta un 'copia e incolla'
per portarla  in un altro programma; se invece usi
variabili globali ti devi ricordare anche di loro.
Naturalmente queste sono osservazioni a carattere generale
poi io sono il primo 'a far pastrocci'  :))
--
Leo_duca

Thans everybody!

Newsgroup: it.comp.appl.access
Titolo: file csv


e qual'è la differenza?
perchè il csv non è un formato testo?
Saluti.
Emanuele.

 ha scritto nel messaggio
news:6j7vbvkm0jn30q1q8...@4ax.com...



si ma molto Comma Separated "Vague" ;<)
--
a.cara 
Togli qualcosa dall'email


è impaginato in maniera particolare, 
fattene mandare uno corretto e controllalo
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Collegare tabelle in Outlook

E' possibile?
Se si, come faccio? E' possibile far interagire le tabelle con il calendario
di Outlook?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Si è possibilissimo, puoi collegare le tabelle. File carica dati
esterni e selezioni outlook. Vedi le tabelle
ovviamento il massimo lo ottieni con l'automazione access outlook
perchè il modello ad oggetti di outlook non è proprio di facile
intuizione, almeno non lo è stato per me per quel poco che mi è
servito.
Ottimo link questo con tanti esempi, e poi gogogla un po' nei vecchi
post, è già stato trattato ampiamente.
http://www.helenfeddema.com/



Grazie del link ma ho trovato poco di quello che mi serviva ...
Sono riuscito in Access a collegare il calendario di Outlook ma se tento di
aggiornare/aggiungere righe mi dice che alcuni campi sono originati da
un'espressione e quindi non mi fa far nulla ... come faccio a modificare la
tabella collegata? Altrimenti c'č un altro modo?



NESSUNO MI SA AIUTARE?!?!


Newsgroup: it.comp.appl.access
Titolo: Come si richiama una funzione in una query

Gentile NG, vorrei sapere come si richiama una funzione in una query.
Grazie.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Creati nella query un campo calcolato ed in esso inserisci il nome dalla
funzione; se la funzione ha dei parametri indicali dopo il nome della
funzione racchiusi tra parentesi tonde e scanditi da punti e virgole (e non
da virgole come avresti fatto in VBA).
Insomma una cosa del genere:
NomeCampo: NomeFunzione(Parametro1; Parametro2)
Naturalmente, se la funzione non è una funzione intrinseca ma è una funzione
utente, dovrai registrarla come Public in un modulo del database.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Gli argomenti della funzione, se sono presenti in campi, pui inserire il
nome del campo tra parentesi quadre, access lo riconoscerŕ.
ESEMPIO:
nome campo calcolato: funzione ([nome campo];[nome campo])
Puoi eseguire anche in maniera diretta, cioč senza scrivere il nome
funzione, le operazioni piů semplici.
ESEMPIO:
nome campo calcolato:[nome campo]*[nome campo].
Oppure, con le query di visualizzazione puoi eseguire calcoli in verticale
sui campi.
Questi si ottengono cliccando sul pulsante "totali!" in barra degli
strumenti (ha la forma del pulsante somma di excel), compare nella struttura
della query la casella con scritto raggruppamento, cliccandoci compare la
casella di riepilogo nella quale puoi scegliere l'operazione che desideri
fare, ad esempio somma, conteggio ecc.

 fare, ad esempio somma, conteggio ecc.
Perché rispondi a me invece che ad abc?


Scusa
Newsgroup: it.comp.appl.access
Titolo: Si è verificato un errore in Microsoft Access. L'applicazione verrà chiusa.

Sto scrivendo una piccola applicazione in Access 2002, e quando apro le
maschere in struttura dopo un'po' mi da l'errore in oggetto.
Ql1 sa a cosa è dovuto?
Grazie Roberto
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.384 / Virus Database: 216 - Release Date: 21/08/2002

 ha scritto nel messaggio
news:al2rsu$6ut$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:al31od$avc$1...@lacerta.tiscalinet.it...



In genere si tratta di un errore in una maschera che si è deteriorata (in
genere è il modulo).
Per scoprirlo importa le maschere, ad una ad una, in un nuovo db. Vedrai che
alla maschera incriminata ti si presenta l'errore.
In queto caso puoi solo ricreare la maschera.
Altre volte che mi è capitato l'errore ho risolto reinstallando la versione
di Access con tutte gli aggiornamenti.
Ciao, Carlo

 Grazie Roberto
Ti dirò che nella maggioranza dei casi non si tratta di errori direttamente
attribuibili ad Access, ma al papà Windows ... non c'è di che essere allegri
ti pare?
Si trae grande beneficio dalla lettura di note come queste:
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q294301&LN=IT&SD=gn&
FR=0
Saluti.

Newsgroup: it.comp.appl.access
Titolo: Un utonto ci prova

Problema banale ma per me insolubile:
ACCESS 97
Ho la necessità di numerare i record senza ricorrere alla variabile
contatore e questo per evitare che la cancellazione di un record metta tutto
a soqquadro.
( es:
1 erterteart
2 fgfdgdafg
3 gagafgfda
4 ecc. ecc. ecc.)
Come si fa? GRAZIE

 ha scritto nel messaggio
news:R8pg9.91662$ub2.1...@news1.tin.it...
A scrivere un subject che non sia significativo!
Direi che ci sei riuscito!
Antonio

 ha scritto nel messaggio
news:R8pg9.91662$ub2.1...@news1.tin.it...

Se la tabella che contiene i dati si chiama Tabella1.
Se il campo numerico in cui vuoi la numerazione progressiva si chiama
NumRecord.
Se il controllo associato al campo NumRecord si chiama anche lui NumRecord.
Nel Valore predefinito del controllo NumRecord scrivi:
= IIf(DCount("*"; "Tabella1") = 0; 1;DMax("NumRecord" "Tabella1") + 1)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: approssimazione numero in casella di testo..

Salve..Una domandina: in una casella di testo, formattata 
come "Standard" con "2" decimali, tengo la media di alcune altre 
caselle di testo..L'Ho formattata in questo modo perchè voglio che a 
video il numero sia di 2 decimali..Soltanto che l'approssimazione del 
numero è in difetto e non in eccesso:
es. (0,80 + 0,80)/2 mi dà 0 (e non 0.80)
oppure (15,30+15,11)/2 mi dà 15 (e non 15.21)
Come posso rimediare?Grazie 1000 anticipatamente!
-- 
Alby
Inviato da 
www.mynewsgate.net

 ha scritto nel messaggio 
news:200412061...@mynewsgate.net...

Imposta la casella di testo a "numero generico" e decimali a due. Il tutto 
se si tratta di un controllo non associato.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Per Pablitomf - DB Posta Interna 1.0...

Ho scaricato il tuo DB dal sito comune e quando ho aperto l'mdb dati access
2000 mi ha chiesto di convertirlo e lo ho fatto, poi ho aperto il file posta
e non mi viene riciesta la conversione però non riesco a fare il relink
delle tabelle dal file dati (la voce gestione tabelle collegate non è
attiva, le tabelle non le posso eliminare e neanche caricare altri dati
esterni): sai cosa potrebbe essere?
Ciao
PS: la funzione per ottenere il nome macchina la posso utilizzare
liberamente? Su quali OS funziona?
Ciao

 liberamente?
Certo che puoi... fai pure.
E poi se chiedi, come si puň fare a dire di no! Bravo, cosě si fa! ;-)
-- 
Pablitomf
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Pablitomf

Newsgroup: it.comp.appl.access
Titolo: Calcolare ore da somma numerica

Ciao a tutti
ho un report dove in un controllo ,mi somma un totale numerico dovrei ,da 
questo, trasformarlo in ore e minuti
es: 2,40
      1,30
--------------
      3,70
invece dovrebbe dare come risultato
     4,10
è possibile?
Grazie 

 ha scritto nel messaggio 
news:QJOke.1436085$35.53...@news4.tin.it...

Troverai molto materiale su 
www.sitocomune.com
Scusa se non ricordo esattamente l'articolo.
Ciao, Carlo 


Purtroppo quello che cerco non l'ho trovato se qualche anima pia puň 
aiutarmi grazie 


Su 
www.sitocomune.com
 sezione Modules 5.11
sezione General 6.156  e 6.64 e 6.50
tra questi troverai certamente il modo...
Ciao, Carlo

>>
cut
Piů semplicemente:
timevalue("2.40") + timevalue("1.30")
o anche:
format(timevalue("2.40")+ timevalue("1.30"),"
hh.mm
")
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Errore run-time '5'

Un saluto a tutti i partecipanti al NG.
Ho un db Access2000 che funziona regolarmente su computer s/o win2000,
mentre se lo consulto su portatile con s/o WXP mi manda questo segnale di
errore :
Errore di run-time '5'
Chiamata di routine o argomento non validi.
e il debug si ferma su di un ciclo di controllo sulle query :
dim db as dao.database, qry as dao.querydef
set db = currentdb
for each qry in db.querydefs
    if 
qry.name
 = "miaquery" then    <===
        blablabla
il debug si ferma sulla riga evidenziata dalla freccia.
Posizionando il cursore sul "
qry.name
" per vedere quale oggetto è sotto
analisi al momento del debug, vedo che sta analizzando
"~sq_cAltraQuery~sq_cID".
Ho provato a controllare i riferimenti alle librerie e tutti i riferimenti
combaciano sia sul computer con w2000 che con wxp.
Qualcuno ha avuto lo stesso problema ? Cosa fare ?
Grazie per qualsiasi suggerimento.
Ciao - Daniele

 ha scritto nel messaggio 
news:fak1q3$c0s$1...@aioe.org...

Il codice è corretto e dovrebbe funzionare. Probabilmente manca un 
riferimento (immagino avrai già verificato la presenza di DAO tra i 
riferimenti).
Se cambi il codice così:
If qry.Name <> "miaquery" Then
    MsgBox qry.Name
End If
cosa succede?
Ciao, Carlo 

 Ciao, Carlo
Ciao Daniele

 ha scritto nel messaggio 
news:fak427$ikk$1...@aioe.org...

Prova a togliere il blocco if...then e lascia
MsgBox qry.Name tra for each...next
Cosa succede?
Ciao, Carlo 


Ciao Daniele

 ha scritto nel messaggio 
news:fak5cb$mjt$1...@aioe.org...

OK.
Nel modulo, subito sotto Option Compare Database accertati che vi sia
Option Explicit
Se non c'è mettilo e compila il database.
All'inizio del codice usa due variabili testo:
Dim NomeQry as string
Dim MioNomeQuery as string
MioNomeQuery = "Il nome della query da ricercare"
Subito dopo For Each scrivi:
NomeQry = 
qry.name
Rimetti l'if (accertati che sia all'interno del ciclo for each...Next) e 
cambialo così usando le due variabili testo:
if NomeQry = MioNomeQuery  then
'....
End if
Fammi sapere.
Ciao, Carlo 


purtroppo il risultato non cambia.
Ciao - Daniele

 ha scritto nel messaggio
news:fak1q3$c0s$1...@aioe.org...

finalmente ho scoperto come aggirare l'ostacolo :
scrivendo :
if 
qry.name
 like "miaquery" then
la routine funziona, ma ora mi resta da capire perchè sul computer con s/o
wxp devo apportare questa modifica al codice.
Ciao a tutti.
Daniele
Newsgroup: it.comp.appl.access
Titolo: Criteri della query

E' possibile da VBA modificare le caselle dei criteri nella struttura di una
query, ad uso di una successiva requery, oppure devo lasciar perdere e fare
tutto da SQL?
grazie da barbi

 wrote in message
_fsd4.2793$I3.2...@news.infostrada.it...

Da codice puoi richiamare l'istruzione SQL di una query e modificarla, ma
lavorando sempre in SQL
Ciao, Sib
--
------------------------------------------------------
Non e' grave non capire; grave e' occuparsi di cio' che non si capisce.
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

>E' possibile da VBA modificare le caselle dei criteri nella struttura di una
puoi modificare la proprieta' .sql di un oggetto querydef, come diceva
sib, oppure dare un'occhiata alla collezione parameters sull'help,
credo.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access

Newsgroup: it.comp.appl.access
Titolo: [PROBLEMA] codici sostitutivi

Ciao! chiedo se possibile un vostro aiuto con un problema riguardante dei
codici sostitutivi; ho la seguente tabella
CodiceVecchio    CodiceNuovo
            A                        E
            B
            C                         F
            D
            E                         G
            F                         H
            F                         I
...
...
la tabella sorgente č un file di testo di 63.000 record.... immaginate il
casino
il problema č trovare l'ultimo codice sostitutivo:
A -> G
C -> H e I
da contare anche i codici sostituiti da piů codici.
qualche idea?
vi ringrazio anticipatamente...
Roberto

Dim MioDB As DAO.Database, rst As DAO.Recordset, k As Integer
Set MioDB = CurrentDb()
Set rst = MioDB.OpenRecordset("TuaTabella")
Do While Not rst.EOF
  rst.MoveNext
  if rst![CodiceVecchio]=A then rst![CodiceNuovo] ="E"
  if rst![CodiceVecchio]=  then rst![CodiceNuovo] =
loop
rst.Close
Set rst = Nothing


 C -> H e I
E che vor dě?
Antonio

Newsgroup: it.comp.appl.access
Titolo: Aiuto Barra dei menu con run-time di access 2000

Ho un problema con il run-time di access 2000,
all'apertura di maschera nel DB, ho inserito il comando (DoCmd.ShowToolbar
"barra dei menu", acToolbarNo) che fa sparire la barra dei menu, questo
funziona perfettamente con access (in italiano), ma quando lo porto sul
run-time si blocca tutto e chiude l'applicazione!
Forse perchè il run-time è in inglese e non trova il nome "barra dei menu".
Volevo sapere se c'è qualcuno che sa come si chiama la barra dei menu in
inglese o se c'è un altro metodo per non fare vedere questa barra.
Grazie







 Ho un problema con il run-time di access 2000,
.......
Mi sa che hai anche un problema con la gestione dei post..
A parte gli scherzi forse ti conviene andare sul menů Strumenti-Avvio e
togliere la barra da li
Ciao