mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Command-button - testo che no va a capo

Ho piazzato su una form 20 tasti
Al caricamento della form, i tasti devono essere modificati come caption, 
colore sfondo, colore testo
All'uopo (!!!) uso il seguente codice
==============================================
    ' Aggiorna scritta su tasto esempio
    cmdTastoEsempio.Caption = Nz(Descrizione)
    '--------------------------------------------------
    ' Aggiorna colore scritta su tasto
    If IsNull(COLORE_TESTO) Then
        cmdTastoEsempio.ForeColor = RGB(0, 0, 0) ' nero
        Else
        cmdTastoEsempio.ForeColor = Nz(COLORE_TESTO)
        End If
    '--------------------------------------------------
    ' Aggiorna colore sfondo
    If IsNull(COLORE_SFONDO) Then
        lngBool = fCmdButTextPic(cmdTastoEsempio, RGB(255, 255, 255) )  ' 
bianco
        Else
        lngBool = fCmdButTextPic(cmdTastoEsempio, COLORE_SFONDO)
        End If
==============================================
Dove la funzione  fCmdButTextPic  e' presa da:
http://www.lebans.com/cmdbutton.htm
Il problema sta nel fatto che non riesco a vedere andare a caporiga le 
scritte composte da parole separate nella caption del tasto
Che possa essere la funzione di lebans (che non riporto perche' bella 
corposa) ???
Qualcuno ha usato questa funzione e riesce ad avere le caption multilinea 
sui tasti ?
Ed in extremis, potete consigliarmi un metodo alternativo per avere:
- caption command button multilinea
- possibilita' di modificare colore testo
- possibilita' di modificare colore sfondo
Ciao e grazie

Nel senso, e' chiaro che e' la funzione di Lebans che non supporta il 
multilinea
Non era questo che mi interessava sapere, volevo capire se qualcuno l'ha 
gia' modificata per supportare le caption multilinea e poteva darmi un'aiuto 
o che alternative potete consigliarmi
Ciao
RobertoA
Newsgroup: it.comp.appl.access
Titolo: Animazione





Come posso fare per inserire dei gif animati su 
delle maschere? 


Riesco solo a incollare un fotogramma del file gif. 
Grazie per i vs. risolutrici, spero, consigli.


Giallu    
:-)



...


Come posso fare per inserire dei gif animati su 
    delle maschere? 


Riesco solo a incollare un fotogramma del file 
    gif. Grazie per i vs. risolutrici, spero, consigli.


Giallu    :-)


 


 


Chissa' perche' quando sento o veldo la parola 
    animazione mi vengono in mente solo i villaggi turistici


ma un programma access mai !!


 


Carlo Ve


 


 


 


 


 


 



...


Come posso fare per inserire dei gif animati su 
    delle maschere? 


Riesco solo a incollare un fotogramma del file 
    gif. Grazie per i vs. risolutrici, spero, consigli.


Giallu    :-)


 


 


 


Prova a cercare nei post dei due mesi 
    precedenti.


Mi pare che fosse stata sollevata la stessa 
    questione e che qualcuno conoscesse un Activex per ottenere quello che 
    cerchi...


 


Ciao



 wrote in 
  message 
10rncp5$gmp$1...@fe2.cs.interbusiness.it
...


 scrisse...
Essendomi collegato con il news solo da alcuni giorni come posso fare per
avere i messaggi di 2 me fa?
Sul sito comune sono raccolti i Post di molti mesi precedenti.
http://members.xoom.it/it_db_access
Puoi anche fare ricerche su
www.deja.com
P.S. non postare in HTML.
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)
 
www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************

Newsgroup: it.comp.appl.access
Titolo: aiuto operazioni su stringa

ciao a tutti
ho guardato nell'help tra le operazioni che si possono usare per le stringhe
ma nulla sembra fare al caso mio
data una stringa, dovrei scandirla carattere per carattere, con un'indice
che indichi posizione del carattere corrente.
inoltre il carattere corrente dovrebbe poter essere copiato su una variabile
o confrontato con un'altra.
esiste un comando o funzione che faccia questo ?
ciao , grazie
PS:
per chi conosce il C o il C++,  mi servirebbe un comando o funzione in VB
che faccia:
int i;
char ch, str[80];
for( i = 0; str; i++)
    ch = str[i];

 ha scritto nel messaggio
news:geEs7.6053$aE.17...@news.infostrada.it...


 ciao , grazie
Certo che sě, č la funzione mid
mid(str,i,1) ti da l'iesimo carattere della stringa
il ciclo su i puň essere fatto con un for da 1 a len(str)
Antonio
Newsgroup: it.comp.appl.access
Titolo: Inspiegabilmente nel codice Basic le chiamate [Maschera].Requery non...

Ciao a tutti
inspiegabilmente a volte mi capita di dover fare un requery ad una
sottomaschera... oppure un requery ad una maschera aperta dopo aver fatto
un'azione... però a volte Access mi dice che non trova la maschera e a volte
invece con altre maschere funziona..
il codice è
[Mia maschera].Requery
Con alcune sottomaschere funziona e con altr no...
Qualcuno mi sa dire qualcosa?
grazie
Max

 Max
mi succede ancora, devo richiamare questa sottomascher
[Sottomaschera Dettagli Fattura Complessiva]
perň mi da un errore, mi dice che non la trova, vi volevo chiedere se
per caso access salva il nome della sottomaschera (che usa poi per
chiamarla) da qualche altra parte
oltre che ad etichetta....
la maschera quando apro il db si chiama cosě, perň lui non la trova č
possibile che access la veda sotto un altro nome??
Grazie
M.

 M.
Le sottomaschere non vengono accodate all'insieme Forms().
Per accedervi devi passare attraverso la form principale e il controllo
che la contiene:
Forms("frmPrincipale").ctlSottomaschera.Form.Requery
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

Newsgroup: it.comp.appl.access
Titolo: Come disattivare da codice la finestra "Proprietà"?

Avete presente la finestra "Proprietą" che si usa durante l'editing delle
maschere? Vorrei disattivarla (renderla non visibile) da codice, ma non ho
idea di  come fare.
Il problema č che non rientra nell'insieme CommandBars, e quindi non ho idea
di dove andarla a cercare.
Max

idea di  come fare.
Provato con sendkeys?
Ma a che ti serve?
--
Lorenzo Coronati
--
<<Ragazzi, sapete indicarmi una utility in 
internet che sia in grado di recuperare le 
password da un database access e da un system mdw?
intendevo, gratuita...>>
(Marco Tullio Bisoli, 27/04/2001)
--

 Ma a che ti serve?
Che quando sviluppo spesso la scordo aperta... e quando faccio partire il DB
per provarlo mi si riapre... ed il che:
1) fa schifo
2) č molto poco professionale, specie se sei da un eventuale cliente
3) c'č il rischio che chi non deve faccia delle modifiche
Quindi vorrei nasconderla quando apro il DB, se č nascosta e non hai barre
del menu non la puoi aprire.... ma se c'č gią puoi fare dei danni.
ciao, Max

chiusa.
Non ho tempo di provare ora, ma penso che se lasci la voce
del menu predefinito di access, vai di sendkeys e poi
nascondi il menu...
Tentar non nuoce


 idea di  come fare.
Se hai A2000, trovi una delle proprietà della maschera (e se non erro, è
proprio l'ultima dell'elenco), che ti permette di impostare la
visualizzazione o meno.
Scusa se non sono + preciso, ma non ho qui A2000 x controllare.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: verificare che il recordset non sia vuoto

Come faccio a controllare se dopo la creazione di un recordset con 
l'istruzione miodb.OpenRecordset("SELECT * FROM Anagrafiche WHERE Nascosto = 
True AND RicercaAlfabetica = " & Chr$(34) & Trova & Chr$(34)), questo 
recordset contiene dei valori e non è vuoto?
Grazie in anticipo
GioVe 


 Set rsTuoRecordset = Tuodb.OpenRecordset("SELECT * FROM Anagrafiche WHERE
Nascosto = True AND RicercaAlfabetica = " & Chr$(34) & Trova&Chr$(34)),
        If rsTuoRecordset.BOF And rsTuoRecordset.EOF Then
            MsgBox "Non sono stati trovati dati relativi alla Anagrafica
immesso.", vbInformation"
        Else
        End If
SunRex

Newsgroup: it.comp.appl.access
Titolo: Disattivare finestra Database

Un cordiale saluto a tutti.
Come č possibile disattivare la finestra del database?
Dal Strumenti/Avvio ho tolto il flag da "Visualizza finestra Database", ma 
continuo a vederlo ridotto ad icona.
Vorrei visualizzarla tenendo premuto il tasto Shift al momento 
dell'apertura.
All'avvio del database utilizzo una maschera di menů che si trovano nei 
database d'esempio Microsoft.
Ci puň essere qualche interferenza?
Grazie per il Vs aiuto.
Giovanni 

Ho risolto, disattivando le seguenti linee di codice nell'evento apertura 
della maschera.
DoCmd.SelectObject acForm, "Switchboard", True
    DoCmd.Minimize
Un cordiale saluto
Giovanni
Newsgroup: it.comp.appl.access
Titolo: Aiuto per etichette...

Premetto che la mia cultura informatica (a riguardo di
Access) non va oltre la gestione alla meno peggio di un
indirizzario.
Recentemente sono passato al 2000 e alla creazione guidata
di etichette, al cliccare di "fine" casca l'asino (cioč io).
Perchč compare una finestra con:
"Variabile oggetto o variabile del blocco With non
impostata"
Che rimanda alla finestra dialogo precedente.
Chi riesce a svelarmi il significato di questa informazione
(per me assolutamente incomprensibile) e a spiegarmi in
parole semplici che cosa dovrei fare per arrivare alla fine
e stampare le mie etichette?
Anche se sono un laico, lo ricorderei nelle mie preghiere
(della serie: le preghiere di un laico valgono il doppio).
Grazie in anticipo, e buon proseguimento di questo
anno di "fine millennio" a tutti! :-)))))
Pietrone

parole semplici che cosa dovrei fare per arrivare alla fine
purtroppo non e' cosi' semplice se proprio sei completamente a
digiuno.
quel messaggio di errore si verifica quando si tenta di eseguire del
codice con un particolare errore di sintassi, che adesso sarebbe
inutile stare a descrivere.
cerchiamo di risolverlo empiricamente e poi alla fine daremo le
spiegazioni: puoi postare sul ng la parte di codice che da'
quell'errore?  quando quell'errore si verifica, appare una finestra
che ti chiede qualcosa tipo Interrompi, Debug?  se si', scegli debug,
vedrai delle righe di codice, una delle quali, quella che ha causato
l'errore, evidenziata in giallo.
copia quella routine e postala sul ng specificando qual e' la riga
evidenziata che vediamo che si puo' fare.
-----------------------------------
ATTENZIONE: il ng it.comp.database.access cambia nome e diventa it.comp.appl.access
linkatelo!
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
Newsgroup: it.comp.appl.access
Titolo: Aiuto ne sto uscendo pazzo!!!!!!!!!!!!!!!!!!!!!!!!!

Ciao a tutti
Allora....... ho un problemino un po difficile da spiegare....vediamo se
riesco a farmi capire:
In una form non associata ho un numero x di caselle di testo che devono
essere abilitate e disabilitate in momenti differenti, per evitare di
scrivere le solite 100 righe di codice ho creato una variant contenete un
array di tutte le caselle ti testo in modo che tramite due sub eseguo dei
cicli for che formattano e abilitano/disabilitano le mie caselle di testo.
Il problema è che una volta eseguita la prima sub con successo, che abilita
le caselle ti testo, eseguendo la seconda, che dovrebbe disabilitare le
caselle, mi compare un bellissimo errore di run time 424 "Necessario un
oggetto".
L'array sembra che viene passato correttamente alla sub in quanto i valori
min e max sono corretti, la cosa strana è che eseguendo la sub che genera
l'errore per prima funziona, ma se viene eseguita una seconda volta mi
ritrovo ancora con lo stesso errore di run time...........sono sull'orlo di
una crisi di nervi!!!!!!!!!!!!!
Grazie a chiunque perda 5 minuti per darmi una zampa

Non è che fai casino con le variabili locali?
Hai provato ad usare variabili globali, invece che passare l'array?
hai provato a considerare le variabili locali statiche?
Son solo spunti...
ciao, Max

 wrote in message
3kc57.2279$sE4....@news6.giganews.com...

Nomina i controlli con un indice tipo
txt1
txt2
...
txtN
a questo punto il ciclo lo fai su
Function AbilitaDisabilita(rvForm as Form,...)
Dim ctl as Control
    For i = 1 to 100
        set ctl = rvForm.Controls("txt" & i)
        ctl.Enabled = ...
    Next i
End Function
da qualche parte nel modulo della maschera invocherai
    AbilitaDisabilita Me,...
HTH
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Sul mio sito
http://maengineering.20m.com
è possibile trovare del materiale relativo ad Access
scritto da me, freeware e shareware
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Newsgroup: it.comp.appl.access
Titolo: metodi create workspace e openconcrion

debbo convertire un db da access97 in access 2000
nel db c'è un collegamento ODBC che in access 97 mi ha sempre funzionato ma
che con access 2000 mi da dei problemi. nel sommario non ho trovato nulla
che mi potesse aiutare, anzi mi sono venuto dei dubbi.
in access 2000 i metodi create workspace e open connection sono uguali
oppure debbono essere scritti in maniera differente?
grazie sin da ora per l'attenzione e la cortesia della eventuale risposta.
mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio
news:80Z205Z49Z170Y1...@usenet.libero.it...

Non tento di dirti nulla di preciso, perchè non lo so con esattezza, ma
quasi sicuramente c'entrano le librerie DAO e ADO nei riferimenti di VBA o
il modo relativo di scrivere la connessione.


A riguardo del metodo che usi per la connessione ODBC non hai detto nulla
pertanto non sò come aiutarti, ma ipotizzo che con A97 tu usassi DAO
come di Default, mentre in A2000 le Lib di Default sono ADO, che hanno
Metodi e Proprietà differenti.
Dovresti pertanto andare nei Riferimenti di VBA e Deselezionare ADO,
Selezionare DAO, dopo di che se pensi di usare anche ADO lo riselezioni.
La cosa fondamentale è ESPLICITARE le chiamate:
Dim rs asD DAO.Recordset
Dim wks as DAO.WorkSpace
Dim rsA as ADODB.Recordset
Ciao
@Alex.


grazie a tutti e due per la cortese risposta. ho provato anche io prima di
scrivere l'email di cambiare i riferimenti ma non mi e' sortito nulla di
buono. tra i miei tentativi mi e' mancato l'esempio qui sopra che provero'
appena mi lasceranno 5 minuti consecutivi di concentrazione.
grazie
pizario


Newsgroup: it.comp.appl.access
Titolo: Come determinare da VBA se una maschera è su NuovoRecord

Ciao.
Come faccio da VBA a capire se una maschera non è posizionata su un record
esistente, ma sull'inserimento di uno nuovo?
Se guardo l'AbsolutePosition del Recordset collegato mi da la posizione
dell'ultimo record inserito.
MI spiego meglio se avessi una situazione di questo genere:
AbsPos VAL
---------------------
0 Paolo
1 Giorgio
2 Gigi
*
Quando la maschera è sull'ultima posizione (quella contrassegnata con *)
cioè sto inserendo un nuovo record, se guardo l'AbsolutePosition del
Recordset il valore è 2 (considerando anche lo 0), non 3 come mi aspetterei!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 dell'ultimo record inserito.
Proprietà NewRecord
Ciao, Carlo 


OK, ho fatto la figura del pollo....
:-P

Newsgroup: it.comp.appl.access
Titolo: prova

prova

 prova
prova e riprova si impara a postare

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

Devo calcolare una differenza di ore in questo modo:
se la differenza supera il 31° minuto allora si arrotonda
all'ora superiore altrimenti  all'ora inferiore.
ho utilizzato questa routine:
OreR: Round(DateDiff("n";[txtPartenza];[txtRientro])/60)
dove sbaglio, cosa manca ...
txtPartenza   txtRientro  OreR
0.02.00       0.01.00       0
12.00.00   12.30.00       0
12.00.00   12.31.00       1
12.00.00   12.35.00       1
12.00.00   13.00.00       1
11.00.00   13.01.00       2
txtPartenza txtRientro  OreR
23.00.00 1.00.00       -22
in questo caso dovrebbe segnarmi 2 ore
qualche ideaaaa,
ciao, grazie, il pizz


e provare ad aggiungere 24 quando [txtPartenza] > [txtRientro]..
ciao

 ha scritto nel messaggio
news:GhyWb.223117$VW.90...@news3.tin.it...

Direi che questa č la tua soluzione:
IIf(DateDiff("n";[tabella2].[ora1];[tabella2].[ora2]) Mod
60<=30;Int(DateDiff("n";[tabella2].[ora1];[tabella2].[ora2])/60);Int(DateDif
f("n";[tabella2].[ora1];[tabella2].[ora2])/60)+1)
Marco
Newsgroup: it.comp.appl.access
Titolo: Access un aiuto

Ciao a tutti
 Ho due  problemini da risolvere in access.  li sarň grato se  qualcuno mi
potesse aiutare.
1-  Come potrei ad aggiornare i dati  [Prezzi], di una specifica
categoria.so che bisogna farlo da una query o la query di aggiornamento ma
in che modo?
2- dovrei usare un terminale di codice a barre (che  ancora non ho)per
rilevare i dati e fare una lista come si fa a scaricare i dati dal terminale
in una tabella  o query.  Grazie  Shari

 in una tabella  o query.  Grazie  Shari
La tua richiesta e' un po' vaga.. ma vediamo un po'  :)).
Dipende , Se il terminale che usi e' modile o fisso.
Se e' mobile , devi farti dire dal fornitore in modo scarica di dati sul pc.
Solitamente i dati dal terminale vengono scaricati su un file di testo con i
campi a linghezza fissa  in una cartellina del tuo pc. A questo punto quando
hai il file di testo devi importarlo dentro access .
e qui le possibilita' diventano moltissime.
Alcuni esempi possono essere:
1) Lo importi direttamente dentro la tabella con File->Collegamenti->Importa
2) Crei da codice un sistema di import nella tabella e colleghi il codice ad
un particolare evento nel tuo database
3) Imposti dentro una tabella temporanea e poi rimodifichi i dati da codice
prima di immetterli nella tabella definitiva
Etc. Etc. Etc....
Se e' fisso in emulazione di tastiera non devi fare nulla in quanto lui
legge il codi a barre , lo trasforma in numeri e li scrive al posto tuo nel
campo dove e' posizionato il cursore.
Se ad esempio il cursore e' posizionato dentro il campo "articolo" di una
maschera , lui scrivera' li codice.
e qui pero' entra in gioco il discorso dei vari standard di BarCode che
esitono e quindi il campo dove vai a salvare i dati deve essere coerente con
il tipo di dati che leggi.
Spero di essermi speiagato abbasta , non e' una cosa semplice :) , ti
consigli anche di leggerti i messaggi vecchi di questo news group dove
l'argomento e' stato piu' volte affrontato e discusso :)
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: Come impostare il format data

Su doppio click di un controllo maschera Data Vendita, ho impostato il 
seguente codice:
Private Sub Data_Vendita_DblClick(Cancel As Integer)
On Error GoTo Err_Data_Vendita_DblClick
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "Vendite"
    stLinkCriteria = "[Data Vendita]=" & "#" & Me![Data Vendita] & "#"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Data_Vendita_DblClick:
    Exit Sub
Err_Data_Vendita_DblClick:
    MsgBox Err.Description
    Resume Exit_Data_Vendita_DblClick
End Sub
affinchè quando lo clicco, mi si apre la maschera vendite con il dettaglio 
della stessa...
il problema nasce quando la data può essere interpretata in due modi, e cioè 
se il primo numero, che rappresenta il giorno, è inferiore a 12 e quindi 
potrebbe essere anche un mese.... la seconda maschera mi si apre 
invariabilmente sulla seconda data..
Es. se la data è 19/mar/08 va tutto bene...
ma se invece è 5/feb/08 la seconda maschera si apre al 2 Maggio anzichè al 5 
febbraio!
so che dovrei usare il format nella routine..ma non so come....mi potete 
aiutare?


Le date non sono altro ch enumeri e quindi converti il confronto in numero 
"clng([Data Vendita])=" & clng(Me![Data Vendita])
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access

 ha scritto nel messaggio 
news:g3e15n$53m$1...@tdi.cu.mi.it...



Grazie, perfetto!!!
Post Chiuso.

Newsgroup: it.comp.appl.access
Titolo: query su tabelle diverse...

Salve a tutti i postatori!
Mi rivolgo a voi affidandomi alla vostra enorme competenza (si, ora la
smetto di leccare i piedi :-))
Ho questo piccolo problemino e mi ci sono arenato.
Devo recuperare dei record in base all'impostazione di un campo di una
tabella: se è "Dischi" devo recuperarli dalla tabella dischi, se è "Prod"
dalla tabella prod e così via...
sapete darmi qualche consiglio?
saluti a tutti e buon lavoro

 ha scritto nel messaggio
news:b%2sb.5984$ZH3....@tornado.fastwebnet.it...

nel pulsante che ti esegue la query prima di eseguirla inserisci il controllo:
if campo = "dischi" then
    docmd.openquery "queryuno"
else
    docmd.openquery "querydue"
end if

Paolo C. ha scritto:

Le tabelle "dischi", "prod", ecc... hanno tutte la stessa struttura?
Namor
-- 
Aiuta chi ne ha bisogno, non ti costa niente:
www.shopmon.it
  -  
www.porloschicos.com
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

no, non hanno la stessa struttura, altrimenti non  ne avrei fatto 2 tabelle
separate...
cmq grazie 1000 per il consiglio... Mi domandavo però se esistesse un modo
per realizzare la stessa cosa solo in sql
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.538 / Virus Database: 333 - Release Date: 10/11/2003

 separate...
E dove sta il resto di almeno parte del quoting necessario per capire il
thread?!?!?!?!?
Antonio
Newsgroup: it.comp.appl.access
Titolo: Calcolo delle provvigioni

Salve a tutti. Sono nuova di questo newsgroup.
Ho questo problema.
Sto creando un programmino con access che mi calcoli le provvigioni
degli agenti.
Io ho una tabella contratti fatti dove dentro ho il campo IDAgente (in
relazione con la tabella agenti) il campo utile e cosi via. Ho creato
una query che mi calcola la somma degli utili di un agente in un mese.
Devo a questo punto calcolare la provvigione. Il dato provvigione è
nella tabella agenti.
Come devo fare?
Grazie a tutti
Anna

 ha scritto nel messaggio
news:9b2495c7.04021...@posting.google.com...

crea una query unendo la query che hai creato con la tabella agenti.
Ciao Max

Newsgroup: it.comp.appl.access
Titolo: in una query di raggruppamento

visualizzo in maschere continua i valori di una query di raggruppamento
sommando i minuti
ho per esempio
stefano 127
roberto 36
ecc....
vorrei al fianco un controllo non associato che assuma il valore in ore dei
minuti totali quindi
stefano 127     02.07
roberto 36      00.36
mi sapreste aiutare? grazie.

 ha scritto nel
messaggio news:q%z09.8749$n04.2...@twister2.libero.it...

Ci metti un controllo non associato con origine dati =tuafun(minuti)
minuti è il nome del controllo associato che da i minuti.
Tua fun è una funzione (che tu sai fare!) che prende i minuti e restituisce
ore-minuti (da mettere nella maschera stessa)
Provata, funziona!
Antonio
Newsgroup: it.comp.appl.access
Titolo: Aggiornare due tabelle uguali

Salve a tutti
Mi trovo due tabella identiche,
tab1
nome azienda       numero telefono
azienda 1                06449987
azienda 2                0642348
azienda 3                0223448
azienda 4                0664446
azienda 7                6679980
tab2
nome azienda        numero telefono
azienda 1
azienda 2
azienda 3
azienda 4
azienda5
azienda6
azienda7
Vorrei far in modo che nella tab2 vi fossero i numeri corrispondenti
presenti nella tab1,
il problema è che purtroppo non posso indicizzarare in campo nome
azienda perchè vi sono nomi duplicati
come posso fare??
grazie cari
CLA

 ha scritto nel messaggio 
news:fa74b994-abe8-43f3...@s12g2000prg.googlegroups.com...
Salve a tutti
Mi trovo due tabella identiche,
tab1
nome azienda       numero telefono
azienda 1                06449987
azienda 2                0642348
azienda 3                0223448
azienda 4                0664446
azienda 7                6679980
tab2
nome azienda        numero telefono
azienda 1
azienda 2
azienda 3
azienda 4
azienda5
azienda6
azienda7
Vorrei far in modo che nella tab2 vi fossero i numeri corrispondenti
presenti nella tab1,
il problema č che purtroppo non posso indicizzarare in campo nome
azienda perchč vi sono nomi duplicati
come posso fare??
grazie cari
CLA
-----------------------------------------
Fammi capire: nella tabella 1 l'azienda compare piů volte con numeri di 
telefono diversi? Oppure una azienda un telefono?
Ciao, Carlo 

 Ciao, Carlo
si, può capitare che vi sia una medesima azienda che ha numeri di
telefono diversi presente su record differenti anche perchè cambia un
dato su un terzo campo

 ha scritto nel messaggio 
news:fa74b994-abe8-43f3...@s12g2000prg.googlegroups.com...



se entrambe le tabelle hanno un id contatore, puoi inserire questo 
codice
su clic di un pulsante e provare.
ATTENZIONE! fai prima una copia delle tue tabelle. un eventuale errore
dei nomi tabelle potrebbe cancellare tutti i dati del campo 
numeroTelefono.
verifica i nomi dei campi e delle tabelle, eliminando eventuali spazi 
tra nomi.
Dim rst1 As Recordset
Dim rst2 As Recordset
Set rst1 = CurrentDb().OpenRecordset("Tab2", dbOpenDynaset)
Set rst2 = CurrentDb().OpenRecordset("Tab1")
rst2.MoveFirst
Do Until rst2.EOF
    rst1.FindFirst "ID=" & rst2!ID
    If rst1.NoMatch Then
        rst1.AddNew
        rst1!ID = rst2!ID
        rst1!NumeroTelefono = rst2!NumeroTelefono
        rst1.Update
    Else
        rst1.Edit
        rst1!NumeroTelefono = rst2!NumeroTelefono
        rst1.Update
    End If
    rst2.MoveNext
Loop
Set rst1 = Nothing
Set rst2 = Nothing
Ciao
Daniele 

 ha scritto nel messaggionews:fa74b994-abe8-43f3...@s12g2000prg.googlegroups.com...

Grazie daniele, rispondo appena adesso causa influenza
tutto è andato liscio
alla prossima
CLaudio
Newsgroup: it.comp.appl.access
Titolo: Report: Visualizzare un Record per Pagina

esiste un'impostazione che mi permette di visualizzare un solo record per
pagina del report o addirittura solo un record e basta  per esempio solo il
primo, o solo l'ultimo?
Perdonate il precedente post che faceva riferimento alle query
grazie per l'aiuto.
Luca


Sě entrambe.
Se vuoi un record per pagina mettici un'interruzione di pagina
la trovi nella casella degli strumenti
Se invece vuoi solo un record
se l'origine della sottomaschera č
select * from tua tabella
sostituiscila con
select top 1 tuatabella.* from tuatabella
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

[cut]
se hai più record e ne vuoi solo uno per pagina, usa la funzione 
*interruzione di pagina*
ciao!
-- 
**********
EmMeCi
********** 

 ha scritto nel messaggio 
news:gfJef.140$rQ4...@news.it.colt.net...


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

Ciao. Vorrei sapere se qualcuno e' in grado di spiegarmi come mai in una
espressione del tipo :
format([miadata];"mm/aa")
utilizzata in una banalissima query, Access tende a sistemare la data 01/00
tra la data 09/99 e 12/99.
Dov'è l'errore ?? le date della tabella che io sto utilizzando sono delle
date con formato predefinito Date(), niente di sofisticato. Io avrei la
necessità che le date rispettassero il normale ordine cronologico, cioè
09/99,12/99,01/00. Ci deve essere qualcosa che mi sfugge.Immaginate un
grafico a linee dove le date sono a "caso", non è proprio il massimo ...
Qualcuno sa consigliarmi?
Grazie. Luca.

 wrote in message
8572d4$1ki$1...@fe1.cs.interbusiness.it...

  Ordinando il campo in base al _campo_ [miadata] si ottiene l'ordinamento
corretto.
  Penso invece che ordinando in base al risultato del Format, che
restituisce un dato di tipo Variant o Stringa, Access effettui l'ordinamento
alfabetico e non in base alla data. Se infatti provi ad ordinare secondo
un'aspressione del tipo:
format([miadata];"aaaa-mm") vedrai che il risultato sara' corretto
(ovviamente per avere un ordinamento corretto, l'anno, per quanto sopra
detto, dovra' essere scritto con 4 cifre).
  Ciao.

09/99,12/99,01/00. 
Usa il campo data originale per l'ordinamento.
--
Lorenzo Coronati
--
ICDA Forever official member
<<...buona la pasta coi ricci>>
--
Newsgroup: it.comp.appl.access
Titolo: stringa con variabile in DMAX

[numero] progressivo generale
[sottonum] progressivo relativo allo stesso settore
[settore]
CasellaCombinata199 si riferisce a una tabella con campi [imposta] e
[settoreimp]
[Numero] = (DMax("[Numero]", "registro rimborsi") + 1)
a = CasellaCombinata199.Column(1, CasellaCombinata199.ListIndex)
[Sottonum] = (DMax("[sottonum]", "registro rimborsi", [settore] = a) + 1)
non mi riesce impostare correttamente la stringa di [sottonum]
cosě come sopra la condizione non serve a niente perchč o mancano le
virgolette a [settore] o mancano quelle sulla variabile A (mi da IIDD io
voglio "IIDD")

 voglio "IIDD")
[Sottonum] = (DMax("[sottonum]", "registro rimborsi", "[settore] = " &  a )
+ 1)
Se ho capito bene, cosě dovrebbe digerirla meglio ....
OndaMax

 OndaMax
Non va bene neanche così perchè se, come penso, a contiene un valore testo,
allora deve essere circondato il suo valore da apici.
Quindi sarà
"[settore] = '" & a & "'"
Antonio

grazie tutto OK

 "[settore] = '" & a & "'"
Azz ... dici che è una valore di testo ?
In effetti, ripensandoci, è probabile ...
Sarà che riesco a postare solo la sera tardi,
ma mi sembrate tutti più lucidi di me ... :-D
Cia' ...
OndaMax
Newsgroup: it.comp.appl.access
Titolo: Riferimenti.......particolari???

Salve a tutti,
mi sta succedendo una cosa molto curiosa:
su alcuni computers in rete è installato Access 97 con XP Pro e con gli SP1
e SP2 di Office 97 (solo Access 97).
Avendo un database su un pc "server" e aprendolo da postazione remota non
tutte queste postazioni accettano il comando =date() (ed altri) su un
controllo di un campo tipo DATA come valore predefinito.
Come mai? c'è qualche rifermento che cambia da pc a pc? su tutti i pc sono
installati gli stessi programmi ed ancora non riesco a capire dov'è il
problema.
Grazie anticipatamente.
Marco.


Avevo riscontrato un problema simile probabilmente è dovuto ai riferimenti
di Access
dovresti sui client dove non funziona Date() aprire la finestra dei
riferimenti deselezionare e riselezionare una librerira qualunque e premere
il pulsante OK così dovrebbe tornare tutto a posto.
Probabilmente è dovuto al fatto che su alcuni PC Access è installato in una
cartella diversa dagli altri.

 ha scritto nel messaggio
news:ahb3iu$nd1$1...@newsreader.mailgate.org...

Grazie per la tempestiva risposta. Si, forse, sicuramente, il problema
dovrebbe essere questo che il programma Access e/o il database in questione
è installato in un percorso diverso dagli altri pc in rete.
Però il tutto è molto strano perchè, ad esempio, in un portatile il
programma Access è installato sulla stessa directory di altri pc ed il
database è installato nei documenti. Mah! mistero di Access. Chissà se
riusciamo a capirci qualcosina in più ed il perchè di questi "casini".
Grazie ancora.
Marco.

 Marco.
Se, come tu asserisci, i riferimenti dei database che non accettano la
funzione Date() sono corretti, risiamo davanti al tormentone più volte
affrontato e mai totalmente risolto. Dovrebbe però funzionare sostituendo la
funzione Date() con le funzioni Int(Now()) .
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:85P_8.14202$s74.4...@twister1.libero.it...

Grazie Roberto,
ho risolto semplicemente creando un altro database ed ho esportato il tutto
sul nuovo e tutto è tornato al proprio posto.
Chissà se così, provando, ho dato un valido suggerimento?
Grazie di nuovo e auguroni ..... ;-)
Marco.
Newsgroup: it.comp.appl.access
Titolo: ottenere ore e minuti da due campi di tipo data generica

ho una tabella in cui salvo sia data e ora in campi distinti sia un campo data generica in cui salvo "now" che è data e ora insieme
 
devo ottenere in ore e minuti la differenza ma dopo vari tentativi non ne esco
 
il campo è un campo calcolato quindi devo mettere la formula "originecontrollo"
 
qualcosa tipo 
 
=datediff("h";data1;data2) % ":" & datediff("n";data1;data2)
 
esempio 
data1 15/02/2021 ore 18.00
data2 17/02/2021 ore 16.30
 
il risultato del campo deve essere 46 ore e 30 minuti
 
qualche aiuto?


=DateDiff("n";[data1];[data2])\60 & "." & 
Format(DateDiff("n";[data1];[data2]) Mod 60;"00")
 
risultato
 
https://i.imgur.com/6ZDBxfz.png
 
 
 
BFS
 
-- 
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com
 
 


che formato hai usato nella casella di testo? a me esce solo un punto?
grazie.


nessun formato
normalissima casella di testo
 
BFS


errore mio una data non veniva valorizzata, grazie infinite
Newsgroup: it.comp.appl.access
Titolo: Maschera di ricerca

Salve a tutti.
Ho cercato un pò in giro su questo NG ma non ho trovato quello che cercavo.
Ho fatto una maschera con una casella di riepilogo. Ci ho messo anche una
casella di testo.
Vorrei che digitango qualcosa in una casella di testo, automaticamente la
casella di riepilogo cominciassea a scorrere per "avvicinarsi" a quello che
si sta scrivendo nella casella di testo.
Ho guardato nel NG ma ho trovato che si poteva fare ma la casella di
riepilogo mostrava tutti i record che contengono le lettere che si stanno
scrivendo nella casella di testo. Invece vorrei che scorresse a cercare
anche l'ordine esatto di scrittura.
E' possibile?
Grazie
Stefano

r4gtl ha scritto:

Perchè vuoi farlo con una TextBox quando la Combo già fà qello che
chiedi
senza aggiungere nulla...?
@Alex

 ha scritto nel messaggio
news:1152259795.2...@s13g2000cwa.googlegroups.com...
r4gtl ha scritto:


@Alex
Non c'è un perchè ben preciso. Ho visto cose simili in alcune applicazioni e
mi sembrava più elegante. La combo quando scrivi ti completa la frase e per
vedere i risultati vicini bisogna aprire la "tendina". O almeno è quello che
ho visto fare alle combobox. Se si può usare in un modo simile a quello che
ho descritto prima, sarei ben lieto di saperlo.
Grazie
Stefano

 Stefano
Purtroppo non si può fare come dici, si può fare un qualcosa che si
avvicina.
Quello che chiedi si potrebbe fare con una ListView che espone il
metodo di ricerca.
In ogni caso se l'origine dati della ListBox fosse così:
SELECT Campo1,Campo2 FROM T1 WHERE Campo1 LIKE
'Forms!nomeForm!NomeTextBox *'
Potresti eseguire su evento change della textbox un Requery della List.
Ovvio che la barra in realtà non scorre tutti i records, ma verranno
filtrati man mano...!
@Alex

 ha scritto nel messaggio
news:1152272134....@p79g2000cwp.googlegroups.com...
r4gtl ha scritto:






@Alex
Anche questo non sarebbe male. Anzi forse è quello che mi serve. Ma... come
va fatto? Voglio dire come si scrive il codice?
Scusa l'ignoranza
Grazie
Stefano

r4gtl ha scritto:

Praticamente quello che ti ho scritto è già il codice....!
Private Sub NomeTextBox_Change(....)
    dim sSQL as string
    sSQL="SELECT C1,C2 FROM T1 WHERE C1 LIKE '" & Me!NomeTextBox.Text &
"*'"
    Me.NomeList.RowSource=sSQL
    Me.NomeList.Requery
End Sub
Ciao
@Alex


Il nostro Sv, specialista in instant Article, ha fatto un articoleto su
Accessgroup
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 ha scritto nel messaggio
news:1152277575.2...@s13g2000cwa.googlegroups.com...
r4gtl ha scritto:



Ciao
@Alex
Grazie mille!
Era proprio quello che cercavo.
Ciao
Stefano

 ha scritto nel messaggio
news:e8lrok$8ct$1...@area.cu.mi.it...

Ha fatto un articoletto su questo discorso? Potresti dirmi come posso
trovarlo? Sono andato sul sito ma non ho trovato l'articolo.
Grazie
Stefano

 Stefano
le novità sono sempre evidenziate sulla homepage
"last Five"

Newsgroup: it.comp.appl.access
Titolo: Null

Ciao a tutti,
this is the problem:
come faccio a passare un valore nullo ad una variabile tramite codice?
Mi dice utilizzo non valido di null...

 ha scritto nel messaggio
news:342c0c37.02051...@posting.google.com...

Imposta la variabile a tipo Variant.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: Query parametrica con visualizzazione campi NULL - [HELP]

Seguendo le indicazioni sul sito comune ho realizzato una query che
visualizza tutti i record di una tabella anche se null.
Il problema che incontro e' che se il campo viene riempito con una volore la
query funziona restituendomi soltanto gli eventuali record contenenti il
valore digitato, diversamente, se lascio il campo vuoto ma indico altri
parametri, questi vengono ignorati e vengono comunque visualizzati tutti i
record in tabella. :-(
Come ovviare al problema ?
Grazie
Fabio

 ha scritto nel messaggio
news:UG7R6.12401$Uo3.4...@news6.giganews.com...

L'esempio del Sito Comune effettua la selezione su un unico campo e pertanto
i due criteri di selezione, per farli operare in OR, sono stati scritti uno
nella riga Criteri: e l'altro nella riga Oppure:.
Se la selezione deve essere effettuata in AND con i criteri su altri campi,
scrivi i criteri relativi a tali campi sia sulla riga Criteri: che, scritti
alla stessa maniera, nella riga Oppure:.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: esportare in excel i report del front end

ciao a tutti
struttura:
server contenente BE
client su cui viene installato un package realizzato con Developer che
contiene il FE
dal FE si ottengono report
come faccio ad esportare quei dati in excel?
nell'applicativo sul client non c'è il pulsante per la pubblciazione con
Excel o con Word, è possibile aggiungerlo?
grazie

"giogio" <gio...@giogio.giogio> ha scritto nel messaggio
news:b6gv94$5a4$1...@grillo.cs.interbusiness.it...

Sull'help dai un'occhiata al Metodo OutputTo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Roberto
grazie
ho visto... ma non ho capito molto bene
ho provato a leggermi l'help ma non ho capito come fare ad avere quel
pulsante sempre presente nell'applicazione su client
devo specificarlo per ogni singolo report?
io vorrei che qualunque sia il report richiesto una volta visualizzata
l'anteprima si possa esportarla in un file access in automatico, come si puň
fare utilizzando access senza BE ed FE, senza dover specificare oggetti di
origine e file di output e cosě via...
abbiate pazienza ma sono piuttosto imbranato
grazie

 grazie


 a studiare, così proverai più soddisfazione e meno frustrazioni.
è un ottimo consiglio!!! e se potessi (e volessi) lo farei
io faccio tutt'altro e tutt'altro devo studiare per poter fare quello che
faccio
quello di access per me è un grattacapo temporaneo che finirà tra poco...
cmq grazie mille
sei stato molto gentile
spero che voglia aiutarmi un'ultima volta dicendomi come fare ad avere
quella voce nel menù sul client
di nuovo grazie
bye

 bye


 Ci sono molti seri professionisti disposti a farlo al posto tuo.
se dipendesse da me ti assumerei subito e ti farei fare il lavoro al posto
mio ottenendo un risultato infinitamente migliore, ma credimi non posso
farlo, non dipende da me! non funziona sempre così!
cosa credi che io vada in giro a cercare di rubare il lavoro ai seri
professionisti?
io non sono un professionista, sono un dipendente ma sono altrettanto serio
e di certo non stupido!
cmq di nuovo grazie
Gio
Newsgroup: it.comp.appl.access
Titolo: campi calcolati che non calcolano? dove sbaglio?

Ciao a tutti
sto cercando di creare una maschera che, recuperata una serie di valori da
una query, faccia dei calcoli matematici.
I campi che estraggo sono NrRilevazione, Percentuale di esposizione, Media
Nrg.
Ho provato a creare una  maschera continua con l'autocomposizione maschera.
E fin qui... Ho aggiunto una casella di testo non associata nel corpo della
form passandole come origine controllo la formula:
=IIf([MediaNrg]>0;[PercEspo]*(10^([MediaNrg]/10));0)  E qui calcola tutto. E
mi fa vedere il valore.
Il problema mi si crea quando, nel pič di pagina della form, vado ad
inserire un'altra casella di testo che ha come origine controllo:
=Abs(Int(10*Log(Somma([calcolo])/100)*-1)) . Eseguendo la form questa
casella visualizza solo il messaggio #Nome? e nulla +.....
Dove sbaglio? Qualcuno sa darmi qualche idea?
Ho provato anche a dirgli di convertire gli eventuali valori Null in Zero ma
niente... :.((
Grazieeee!! E scusate per il tema!
Wh|t3C0m4
------e il resto, dopo una botta tremenda, fu silenzio.-----------


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


In effetti a rileggere il mio post non sono stato proprio chiarissimo, perň
hai azzeccato il problema..
Sigh, ti sarň debitore a vita! :)


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

Non sono riuscito a trovare in Access una funzione di estrazione testo quale
Stringa.Estrai di Excel.
Grazie
Ciao Enrico Cannoni

Enrico Cannoni ha scritto:

kaiser fa?
ciao
a.cara

 wrote in message
l1dq6.45522$Xj7.3...@news.infostrada.it...


A QUESTO INDIRIZZO POTRAI TROVARE TUTTO QUELLO CHE SERVE AD UN WEBMASTER PER
COSTRUIRE PAGINE WEB
http://digilander.iol.it/onlinefree/index.htm

 Ciao Raffaele
Hai provato a scrivere DOPO il quoting?
Comunque str restituisce un valore di tipo stringa senza estrarre nulla
Antonio

 wrote in message
Q71r6.69612$Xj7.1...@news.infostrada.it...


 che cos'e' il quoting ???
La parte di messaggio precedente che lasci nella tua risposta.
Deve stare prima della tua risposta, o al massimo puoi intercalare righe
vecchie a righe della tua risposta.
Antonio

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

Cari amici ho un problemino molto fastidioso...
Ho cercato di inserire un controllo activex in una maschera e ho notato che
l'elenco (che prima mi appariva in tutta la sua "magnificenza"..?) è vuoto.
Il problema della mancanza di controlli activex mi influisce spesso anche su
altre applicazioni (tipo browser)...
Come faccio a recuperare la situazione precedente?
Grazie a tutti e ciao
Massimiliano!

Ho il tuo stesso problema su un portatile, fammi sapere se lo risolvi.
Ciao, Bobbit
Newsgroup: it.comp.appl.access
Titolo: [aiuto] - sulla stampa unione appare l'ID e non il valore

Ho creato un documento word che con una stampa unione viene riempito dai
dati provenienti da una query riassuntiva di certe informazioni...
all'interno di questa query c'è un campo id che fa riferimento ad un'altra
tabella; sul documento word appare quindi l'id del valore di quel campo e
non il valore che assume in questa tabella... come faccio a far si che
appaia il valore che sta all'interno della tabella e non l'id che sta
all'interno della query? Premetto che la tabella è molto grossa e che quindi
non la posso costruire come elenco di scelta di un campo!
grazie per l'aiuto
--------------------------------
Inviato via 
http://usenet.libero.it


Nella tua query metti in join (in base all'id) anche la tabella che contiene
le descrizioni dell'id, quindi creati in essa un campo che contiene la
descrizione prelevandola da tale tabella; usa nella stampa unione questo
campo contenente la descrizione invece che l'id.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Report: formattare casella di testo

Salve a tutti,
come posso fare a sbiancare il contenuto di una
casella di testo se il valore è null o zero?
è possibile tramite qualche proprietà della casella di testo?
grazie
ringo

 ha scritto nel messaggio
news:b358au$lj$2...@newsread.albacom.net...


 ha scritto nel messaggio
news:9Kq5a.287498$AA2.10...@news2.tin.it...

grazie!

Newsgroup: it.comp.appl.access
Titolo: Cambiare origine tabella collegata

Ciao a tutti.
Ho un database FE collegato con un BE.
Nel BE ho 2 tabelle uguali come struttura che si chiamano Dati1 e Dati2.
Nel FE ho il collegamento con la Dati1. Il nome del collegamento è DATI.
È possibile, da codice Vba, creare un istruzione che modifichi l'origine del collegamento di DATI da Dati1 a Dati2, e viceversa, da cambiare al bisogno?
Grazie
Stefano


puoi cancellare il link e rifarlo
esempio cosi:
 
 
Dim db As Database
Dim tdf As TableDef
Dim tuaTabellaCollegata As String
tuaTabellaCollegata = "dati"
 
Dim percorsoDB As String
percorsoDB = "c:\......mdb"  '<-qui metti il percorso del BE
 
Dim tabellaDaLinkare As String
tabellaDaLinkare = "dati1"    '<-nome tabella del BE da linkare
 
Set db = CurrentDb()
Set tdf = db.TableDefs(tuaTabellaCollegata)
db.TableDefs.Delete tuaTabellaCollegata
 
 
DoCmd.TransferDatabase acLink, "Microsoft Access", percorsoDB, acTable, 
tabellaDaLinkare, "dati"
 
 
 
puoi farti una funzione e passare come parametro il valore di
tabellaDaLinkare
 
BFS
 


Grazie mille
Newsgroup: it.comp.appl.access
Titolo: Problema con TransferDatabase

Ciao a tutti, vi espongo un problema che mi si presenta quando per collegare
le tabelle utilizzo il comando TransferDatabase come nel seguente esempio di
codice:
__________
Const TMP = "C:\dati.mdb"
   strdb = "dati.mdb"
   Set oAcc = New Access.Application
   strpwd = ";PWD=" & Forms!Password.txt
   Set db = oAcc.DBEngine.OpenDatabase(TMP, False,  False, strpwd)
    oAcc.OpenCurrentDatabase TMP
    DoCmd.TransferDatabase A_ATTACH, "Microsoft  Access", strdb, A_TABLE,
table_name, table_name
_________
Il problema consiste nel fatto che al percorso che io passo in input viene
concatenato un altro percorso che varia in modo (apparentemente) casuale, di
conseguenza mi viene visualizzato un messaggio di errore che dice che non
trova (ovviamente) questo percorso. Ho anche provato a scrivere il nome del
database invece di passare la stringa ma la situazione non cambia.
Grazie a chiunque abbia un suggerimento da darmi.

 wrote in message
90007f$22p4$1...@stargate1.inet.it...

______-
Da quello che so io , o piu' che altro l'help di Access la sintassi č
questa:
DoCmd.TransferDatabase [tipotrasferimento], tipodatabase, nomedatabase[,
tipooggetto], origine, destinazione[, solostruttura][, salvaidconnessione]
dove nome database e':
nomedatabase:  Espressione stringa che č il nome completo, compreso il
percorso, del database che si desidera utilizzare per importare, esportare o
collegare dati.
quindi prova magari inserendo:
strdb="c:\dati.mdb"
se si trova in c:\, in quanto dovresti inserire il percorso e nome completo.
ciao Riccardo