mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: assegnare valori in modo automatico

Salve a tutti.
Problema:
Dispongo di due tabelle (e relative maschere che utilizzo per inserimento
dati e controlli):
1) Tabella "Clienti": con campi IDCliente, RagioneSociale, Indirizzo, ecc.
2) Tabella "Fatture": con campi ....... oltre a IDCliente, RagioneSociale,
Indirizzo, ecc.
Le due tabelle sono legate dalla relazione che unisce gli IDCliente.
Nella maschera di inserimento "Fatture" vorrei che all'inserimento
dell'IDCliente mi venissero riportati automaticamente i valori contenuti nei
campi RagioneSociale, Indirizzo, ecc. della tabella "Clienti" e relativi al
suddetto IDCliente, negli omonimi controlli della maschera fattura.
Qual'è il sistema più comodo per ottenere tale risultato?
O forse esiste un'altra tecnica per ottenere lo stesso risultato
(Visualizzare i dati provenienti da più tabelle e legati tra loro da
identificativi comuni) magari creando delle maschere legate da sottomaschere
o...
.... il resto lo chiedo a Voi.
Ringrazio chiunque voglia aiutarmi.
Ciao.
Franco Schiraldi

 ha scritto nel messaggio
news:5uj08.21079$cU4.7...@twister1.libero.it...

1)Nella tabella fatture non riportare campi già presenti nella tabella 1
(ragione sociale, ecc.). Le relazioni servono proprio per evitare di
ripetere campi uguali in più tabelle.
2) I controlli "Ragione Sociale", ecc. della maschera fatture li rendi non
associati, su evento corrente della maschera scrivi: Me!RagioneSociale =
Dlookup ("tabellaClienti","RagioneSociale", "IDCliente="&Me!IDCliente")
Naturalmente usando i nomi veri del tuo database.
Stessa cosa per tutti i controlli che ti interessa visualizzare.
Guardati l'help di dlookup..:-)
Paolo

 ha scritto nel messaggio
news:5uj08.21079$cU4.7...@twister1.libero.it...

Anche qui sono possibili diverse strade.
La query che alimenta la maschera Fatture conterrà sia la tabella Clienti
che quella Fatture nel senso che metterai tutti i campi della tabella
Fatture e solo quei campi della tabella Clienti che ti interessano. Nella
maschera, dopo avere scelto il cliente, vedrai che i controlli con i dati
del cliente si riempiranno.     Questo se il cliente esiste. Se non esiste
dovrai provvedere a gestire l'errore.
Un'altra strada potrebbe essere quella di alimentare il controllo idCliente
della maschera con una Casella combinata che prende i dati dalla tabella
Clienti. Sull'evnto clic della casella combinata potresti scrivere:
Me.RagioneSociale = Me.CasellaCombinata.Column(3) se questa è la colonna che
contiene la ragione sociale (la terza nella query o tabella diventa la 2 nel
codice perchè parte da 0) e via dicendo.
In ogni caso è inutile duplicare i campi RagioneSociale, Indirizzo, ecc.
nelle due tabelle: basta usarli nella sola tabella Clienti.
Ti ricordo che la relazione tra Clienti e Fattura è bene impostarla a uno a
molti con integrità referenziale e cancellazione dei record correlati.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Numero pagina in report fatture .... però nell'intestazione del report

Grazie all'aiuto di Roberto da casa (che colgo l'occasione per ringraziare!)
sono riuscito ad impostare che le fatture partino dal numero uno. Tutto
funziona solo se il numero di pagina lo inserisco nel piè di pagina di un
report. Io invece, su un modulo esistente, lo devo inserire
nell'intestazione del report. Questo non lo fa.
Ho provato anche l'evento su riesame ma nulla.
Qualcuno sa come aiutarmi ? .... ringrazio comunque anticipatamente chi
volesse farlo
    Ciao da Maurino

 ha scritto nel messaggio
news:EcaPa.8810$it4.2...@news1.tin.it...

Spostalo nell'intestazione pagina non report
MAssimiliano

 ha scritto nel messaggio
news:EcaPa.8810$it4.2...@news1.tin.it...

Inserisci nell'Intestazione pagina del report una casella di testo non
associata che abbia come origine controllo:
=[Page]
ed a fronte dell'evento "Su formattazione" della sezione Piè di pagina
Fattura genera la seguente riga di codice VBA:
 Page = 0
Naturalmente in questo caso non potrai inserire il numero di pagina nel piè
di pagina pagina.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: perdonate l'insistenza

Ciao a tutto il NG  esiste la possibilità di inviare il contenuto di un
campo ad
un altro campo della stessa tabella (tramite maschera)?. Mi spiego con un
esempio:
la tabella è composta da questi campi
|campoVALORE DA SPOSTARE|    |campoUNO|    campoDUE|    |campoTRE|
quando decido se archiviare il valore contenuto nel campo VALORE DA SPOSTARE
dovrebbe transitare nel primo campo vuoto dei campi UNO DUE TRE  (se UNO è
già pieno dovrebbe inviare il valore al campo DUE)
P.S. Mi basta anche un semplice "si può fare" , "non si può fare" grazie.

 ha scritto nel messaggio
news:w%pz9.12622$Zn2.3...@twister1.libero.it...

Di fare credo si possa fare, anche se non se ne capisce l'utilità!
Intanto sarebbe opportuno sapere se l'assegnazione viene fatta tramite
maschera (come credo sia), in questo caso sull'evento "AfterUpdate" del
controllo associato al "campoVALORE DA SPOSTARE" si potrebbe inserire il
seguente codice:
if isnull(campoUNO) then
    campUNO=campoVALORE DA SPOSTARE
elseif isnull(campoDUE) then
    campoDUE=campoVALORE DA SPOSTARE
elseif isnull(campoTRE) then
    campoTRE=campoVALORE DA SPOSTARE
end if
che funziona bene solo se sicuramente uno dei tre campi è sicuramente vuoto
e se, quando i campi sono vuoti contengono il valore "null" e non 0.
Alb

 news:w%pz9.12622$Zn2.3...@twister1.libero.it...

    Beh... Certo che si puo' fare. In varii modi. Personalmente mi preoccupa
pero' l'uso che fai della parola "inviare" perche' se ti si prende alla
lettera vorrebbe dire... Hai presente quando invii un pacco? Dopo la
spedizione il pacco che era qui non e' piu' qui ma li'. E tu non vuoi questo
tipo di effetto, vero? O no? Perche' scrivi anche *spostare*...
*transitare*... Insomma. Urge un chiarimento.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.appl.access
Titolo: Errore di run-time sul codice.

Ciao a tutti!
Ora ho capito come si gestisce la seriale (RS232) tramite MSCOMM32.OCX
Il problema č che mi da errore di run-time.
Ricapitoliamo:
Sulla finestra codice
Menů Strumenti
Menů Riferimenti
Carico (tramite Sfoglia) da C:\WINDOWS\SYSTEM il file MSCOMM32.OCX
Come devo fare per usarlo????????????
Dato che in questo modo non dispongo dell'oggetto da inserire nella maschera
ho pensato di scrivere:
Private Sub Comando0_Click()
   Dim MSComm1 As MSComm
   MSComm1.CommPort = 1
   MSComm1.Settings = "9600,n,8,1"
   MSComm1.PortOpen = True
   MSComm1.Output = "PROVA TESTO"
   MSComm1.PortOpen = False
End Sub
Se clicco sul tasto mi viene fuori l'errore di run-time 91:
Variabile oggetto o variabile del blocco with non impostata
PERCHE???
COSA MANCA?
GRAZIE A tutti dell'aiuto
FACE ONE

 wrote in message
news:9vh0h2$kmr$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:9vhv2o$uh5$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.appl.access
Titolo: problema con creazione mde

ciao a tutti
avrei bisogno di creare la copia mde di un database Access che ho
realizzato,
ma non riesco a compiere questa operazione apparentemente banale. Tra
l'altro mi viene generato un errore privo di spiegazioni: "Impossibile
creare copia mde".
Secondo voi dove può stare il problema?
grazie a tutti
rick
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 creare copia mde".
Vedi la FAQ 7.17 La creazione di un MDE non riesce
sul sito indicato sotto.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 sul sito indicato sotto.
Risolto grazie!
c'era un errore in un modulo che avevo creato.
Grazie ancora

Newsgroup: it.comp.appl.access
Titolo: query per selezionare solo i dati più recenti!

Salve a tutti,
ho provato un bel pò di query ma non sono riuscito a fare una semplice 
query.
In pratica ho una tabella con degli eventi legati alle persone in 
anagrafica (altra tabella).
io vorrei con una query selezionare gli id delle ultime dieci persone 
per le quali sono stati inseriti degli eventi.
Per esempio se nella tabella degli eventi ho questa situazione 
(IdEvento - IdContatto - DataEvento):
1 - 368 - 24/12/2006
2 - 347 - 25/12/2006
3 - 368 - 27/12/2006
4 - 351 - 28/12/2006
i dati risultanti dovrebbe essere:
351
368
347
Come posso fare?
Ciao,
Luigi



 ha scritto nel messaggio 
news:1170187572.1...@l53g2000cwa.googlegroups.com...
Salve a tutti,
ho provato un bel pň di query ma non sono riuscito a fare una semplice
query.





Come posso fare?
Ciao,
Luigi
Ciao Luigi
prova cosě:
SELECT TOP 10 tblEventi.IdEvento, tblEventi.IdContatto, tblEventi.DataEvento
FROM tblEventi;
Daniele 

 Daniele
Ciao Daniele,
grazie per la tua risposta. Ho già provato in questo modo ma così
facendo mi ritorna tutti i primi dieci eventi. Questo significa che se
per una persona sono stati registrati per esempio 3 eventi quella
persona mi verrebbe riportata 3 volte e invece io vorrei fosse
riportata una sola volta.
Ciao e grazie.
Luigi

 ha scritto nel messaggio 
news:1170231358.2...@j27g2000cwj.googlegroups.com...


Ciao e grazie.
Luigi
Ciao Luigi
prova con questa:
SELECT  DISTINCTROW tblEventi.IdContatto, tblEventi.DataEvento
FROM tblEventi;
Daniele 

Luigi ha scritto:

Fai la query normalmente, ordinando per data decrescente, poi vai su
visualizza/proprietà e nelle proprietà della query imposti "Primi valori"
a 10.
Se preferisci l'SQL sarà una cosa simile:
  SELECT TOP 10 IDcontatto FROM eventi
  ORDER BY DataEvento DESC;
Leggiti sull'help il funzionamento di SELECT TOP.
Ciao.
-Marco-
-- 
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

Luigi ha scritto:

SELECT *
FROM eventi
ORDER BY IdEvento DESC
LIMIT 10
-- 
Corrado Pandiani
MySQL 5 DBA Certified
MySQL 5 Developer Certified
http://gnu.inter.it/blogs/ilcorra
http://www.pandiani.com


Grazie a tutti per le risposte ma facendo le query da voi  suggerite
prendo tutti gli id degli eventi. La cosa che io vorrei fare, invece,
è prendere l'id dell'anagrafica una sola volta.
Esempio se ci sono nella tabella questi eventi (colonna 1 idevento,
colonna 2 id anagrafica, colonna 3 data evento)
1 - 324 - 01/12/2006
2 - 324 - 02/12/2006
3 - 459 - 02/12/2006
4 - 324 - 03/12/2006
5 - 231 - 03/12/2006
la query dovrebbe restiturmi (idanagrafica:)
231
324
459


Luigi ha scritto:





Usa SELECT DISTINCT o aggiungici un GROUP BY.


 questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad 
a...@newsland.it
Provato anche così.
Non funziona! Mi esclude alcuni giorni.
Ciao e grazie.
Luigi
Newsgroup: it.comp.appl.access
Titolo: VERIFICA CAMPI RECORD DA MACRO

Ciao,
ho una maschera con un pulsante
il pulsante è una macro con azione aprimaschera
vorrei aggiungere una azione sullo stesso pulsante ,prima di aprire la
maschera, che mi verifichi che i campi nome,cognome siano compilati.
grazie.
saluti


Nella colonna "Condizione" della riga con ApriMaschera
puoi scrivere (tutto in 1 riga):
Not IsNull([Forms]![Maschera1]![nome]) And
    Not IsNull([Forms]![Maschera1]![cognome])
Se invece vuoi aprire un messaggio puoi inserire due righe prima
del ApriMaschera. Nella prima riga:
Condizione: IsNull([Forms]![Maschera1]![nome]) Or
    IsNull([Forms]![Maschera1]![cognome])
Azione: FinestraMessaggio
Nella seconda riga:
Condizione: ...
Azione: ArrestaMacro
I tre punti dicono ad Access che la condizione della riga precedente
vale anche per questa riga.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 


Grande come al solito
grazie grazie

Newsgroup: it.comp.appl.access
Titolo: Fill Fields Automatically

Is it possible to have some fields filled in automatically as soon as a
certain value has been entered into another field?
I found this answer @ 
http://www.mvps.org/access/forms/frm0009.htm
I tried it and I get a Run-time error '3078'
Microsoft Jet Database Engine cannot find input table or querry
tblZipCode. Make sure it exist and that its name is spelled correctly.
this is the code I used with their answer to the code question
 A typical example of this is getting state and city name from Zipcodes.
If you have a Zip-Code table, you'll never have to enter the State/City
again. Add this simple code in the OnExit() event-handler for the field
containing the Zipcode.
'************* Code Start **************
' This code was originally written by Erika Yoxall.
' It is not to be altered or distributed,
' except as part of an application.
' You are free to use it in any application,
' provided the copyright notice is left unchanged.
'
' Code Courtesy of
' Erika Yoxall
Sub Zip_OnExit(Cancel As Integer)
Dim varState, varCity As Variant
    varState = DLookup("State", "tblZipCode", "ZipCode =[Zip] ")
    varCity = DLookup("City", "tblZipCode", "ZipCode =[Zip] ")
    If (Not IsNull(varState)) Then Me![State] = varState
    If (Not IsNull(varCity)) Then Me![City] = varCity
End Sub

End Sub
You'd better give different names to the field in the table and the
respective control in the form
(for intance: chrCity in the table - txtCity in the form)
Ciao
--
   Alberto
No alla guerra
Newsgroup: it.comp.appl.access
Titolo: Da Access a Word

Salve a tutti,
ogni tanto vi scrivo per usufruire dei vostri preziosi suggerimenti! ;o)
Allora questa volta ho bisogno di esportare su Word un report con dei campi
fissi, tipo cognome, e nome! E fin qui ci siamo! Il problema sorge quando
devo salvare il file! Ho necessità che il file generato si chiami col campo
"nome" del database più il campo "progressivo" e si vada ad allocare in una
directory predefinita risiedente sul server aziendale! Inoltre se il file è
già stato generato come si comporta il programma?
Vi ringrazio anticipatamente!
Francesco
--------------------------------
Inviato via 
http://usenet.libero.it


Prova ad usare il metodo OutputTo (vedi help), così darai al file di testo
il nome ed il percorso che ritieni più opportuno.
Quanto al fatto che tale file possa già esistere, prima di eseguire il
metodo OutputTo verificalo con la funzione Dir (vedi help) e se esiste e lo
vuoi cancellare usa l'istruzione Kill (vedi help).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: evitare duplicati anagrafiche

In sostituzione del post  "diverso comportamento del codice di un
controllo di una sottomaschera".
Questo codice se eseguito da maschera funziona.
Se la stessa maschera la inserisco come sottomaschera in un'altra
maschera, questo codice mi restituisce sempre un nuovo IdProprietario.
Cosa devo cambiare?
 
Private Sub txtcodiceFiscale_AfterUpdate()
    Dim strCriteria As String
    strCriteria = "codicefiscale='" & Me.txtCodiceFiscale & "'"
    Me.RecordsetClone.FindFirst (strCriteria)
        If Me.RecordsetClone.NoMatch Then
        Me.IdProprietario = Nz(DMax("[IdProprietario]",
"[tblProprietario]"), 0) + 1
        Else
        Me.Undo
        Form.Bookmark = Me.RecordsetClone.Bookmark
        End If
End Sub
 
Grazie anticipate.
Giuseppe.

 End Sub
 
Sei sicuro che in tutte e due situazioni la maschera/sottomaschera
contiene gli stessi dati?
Non è che c'è un collegamento (=filtro) tra la sottomaschera e
la maschera principale, cioè qc. nelle proprietà "Collega campi
secondari" e "Collega campi master" del controllo sottomaschera?
In questo caso il RecordsetClone non contiene tutti i dati.
 
Hai controllato con un punto di interruzione o Debug.Print ecc.
se il critierio è come aspettato?
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 se il critierio è come aspettato?
Ho messo il segno di interruzione sulla riga  strCriteria =
"codicefiscale='" & Me.txtCodiceFiscale & "'"
dopo aver digitato il codice fiscale, si è aperto il Microsoft Visual
basic e mi ha evidenziato la riga su riportata.
Ciao Karl, scusa se mi dilungo troppo.
Buona serata.


Nessun aiuto?
Si può ottenere quanto sperato?
Giu

Newsgroup: it.comp.appl.access
Titolo: bloccare campo fra scelte possibili!!!

Avrei bisogno di bloccare i dati di un campo in una maschera di access, mi 
spiego meglio... il canpo deve avere delle scelte possibili oltre le quali 
non deve essere possibile andare, access non deve accettare dati non 
compresi in un elenco a discesa preconfigurato...
Il fatto è che se lo specifico nelle proprietà del campo nella tabella 
correlata, nella maschera cmq mi da la possibilità di scrivere altro. C'è un 
altro modo?
Grazie 

 Grazie
-- 
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 > Grazie
Giusto, ma se non sbaglio dovresti fare la gestione errori a livello
di Form.
Fai un test per quello che hai suggerito, e mettiti ad inserire
qualche cosa di diverso(non previsto)...!
Dovresti ottienere un fastidioso errore.
Se è' corretto quanto mi risulta servirebbe
intercettarlo e skipparlo su Evento Form_Error 
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @Alex


 > @Alex
Si ma lo devi fare per ognuno del controlli.
Prova a farlo a livello di Form intercettando
l'errore corretto.
In questo modo basta solo quello.

Newsgroup: it.comp.appl.access
Titolo: Query: lista su immissione

Ciao a tutti,
dovrei creare una query che dopo aver immesso, ad esempio, il nome di una 
persona me lo cerchi in un dato campo.
Per questo ho, nei criteri relativi al campo stesso della query, inserito la 
seg. linea:
"In ([Immettere nome])".
Sfortunatamente il testo deve corrispondere alla precisione.
Se volessi trovare, invece, tutti i campi che contengano il testo immesso, 
come devo fare?
Anticipatamente grazie,
Fabio

 ha scritto nel messaggio 
news:C_nKe.46178$2U1.2...@news3.tin.it...

Nei criteri:
Like "*" & [Immettere il nome] & "*"
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: somma  dati sottomaschera

salve,
In una maschera (Maschera1) ho una sottomaschera (Sottomaschera1) che mi 
rappresenta in forma tabellare (foglio dati) i dati provenienti da una query 
[query1 - che mi ragguppa i dati e in un campo (campo1)mi fa la somma.]
Ora vorrei con un campo calcolato nella maschera principale sommare i dati 
del campo1 della query.
come devo fare ?
Nel campo calcolato della maschera ho provato
= somma(Query1!SommaCampo1)
ma mi da errore!
ho provato a fare riferimento al campo della Sottomaschera ma il risultato è 
uguale: errore!!
Ma forse non mi sono spiegato bene.
scusate!
grazie
antonio 

 antonio
 Non si capisce. Fai un esempio.


Dsum+F1 nell'editor VBA
-- 
Ciao
Geppo

Newsgroup: it.comp.appl.access
Titolo: Elencare solo i primi 100 record dei risultati di una query

Salve a tutti, ho questo problema:
utilizzando A97 collegato in ODBC con un BE MySql su un dominio Internet, ho 
il problema della lentezza nella visualizzazione dei risultati di una query 
(soprattutto in tabelle di grandi dimensioni)!
Ho notato infatti, (e così mi è stato già dal NG confermato) che il 
rallentamento sta nella mole dei dati trasferiti dei dati attraverso la 
linea (ADSL).
Quindi, ho pensato:
a parte ridurre al minimoil num. dei campi di ogni record da visualizzare, 
di limitare il num. dei record visualizzati (trasferiti), a xx.
Come posso indicare alla query, a livello di codice (quindi da me 
impostabile in modo variabile) questo valore?
Grazie 1000 a tutti.
Marco

 ha scritto nel messaggio 
news:T9d5i.1277$nT2...@tornado.fastwebnet.it...

Lo puoi mettere come varibile globale e nella select Top fai riferimento a 
quello
o meglio ci fai una funzione che valorizzi come vuoi
-- 
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007
Newsgroup: it.comp.appl.access
Titolo: Non saprei che metterci..comunque è un problema!!

Ciao a tutti!! dunque questo è quel che desideravo fare: da un form
tramite una casella a menu a tendina io dovrei scegliere un mese ad
esempio gennaio, all'azione di scelta si devre aprire una maschera in
cui compaia il nome del mese selezionato ( e fin qui ci arrivo ), poi in
una casella combinata ( non associata, ma con origine una query che
contiene il campo data ) ottenere solo le date di gennaio, quindi tutte
quell"?/01/2002"....in questo ultimo caso mi inabisso, non so che pesci
pigliare!! qualcuno ha suggerimenti????
grazie infinite.......ciaoooooo
mike
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
5f1f9e8fee33c903aa...@mygate.mailgate.org...

Troppo difficile il controllo calendario di sistema?
--
Maurizio75

 Troppo difficile il controllo calendario di sistema?
Mah.non saprei.e come dovrei usarlo il controllo calendario????...già lo
sto usando per
selezionare il giorno del mese e funziona....ma tu come lo utilizzeresti
il controllo
nel problema che ho spiegato???


 wrote in message
5f1f9e8fee33c903aa...@mygate.mailgate.org...

Dimmi a che ti serve questa casella con tutte le date di quel mese e fammi
capire meglio, perchè se mi chiedi come puoi risolvere il problema spiegato
con il controllo calendario, ti assicuro che non ci sto capendo nulla...!!!
Spiegami meglio le tue esigenze.
--
Maurizio75

 Maurizio75
Dunque Maurizio...la casella di riepilogo in questione mi serve per
poter
controllare gli orari di ingresso e uscita giornalieri. Ovviamente ci
sta una
tabella principale in cui ci sono tutti gli orari e le date dei giorni.
La cosa a parola mi par semplice ma poi.........io ho gią una query che
raccoglie solo 3 campi ( data, mese, e diffgiorno ) e volendo applicando
un
criterio sulla stessa ottengo ciņ che voglio, vale a dire solo le date
del
mese di gennaio...ma ovviamente io vorrei che ciņ avvenisse tramite,
come
spiegavo, una selezione da menu ( scelgo il mese ) e quindi l'apertura
di una
maschera in cui ci sia una casella che mi  elenchi soli i giorni del
mese selezionato!!!
spero di esser stato chiaro.........ciao e grazie


 mike
Bò!!!!.... facciamo una cosa... ti mando un esempio nella tua mail
personale, vediamo se ci ho capito qualcosa

Prepari una TUA TABELLA con tutti i giorni dell'anno
Saluti

 ha scritto nel messaggio
news:5f1f9e8fee33c903aa...@mygate.mailgate.org...

Allora tu ti fai un'altra query di due campi uno è il campo data così: month
([nomecampodata])  poi nei criteri gli scrivi
[forms]![tuamaschera]![tuacombo] e aggiungi nuovamente il campo data.
Nella maschera associ l'oggetto del risultato(un elenco ad esempiio)a questa
query



vedi la funzione month e year per ottenere un campo con mese e anno
oppure format con solo mesi e anni e poi imposta il filtro
(quest'ultimo più comodo)
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Licenza d'uso e ODBC

Ciao a tutti,
  se sviluppo un'applicazione mediante un linguaggio di programmazione
non Microsoft (Omnis Studio di Raining Data) e uso come database di
appoggio Access 2000.
Accedo ad ai dati via ODBC.
Per rivenderlo č necessaria qualche licenza Access? Access l'ho
acquistato per mezzo dell'MSDN.
Sapete dirmi a chi mi posso rivolgere o dove posso trovare ulteriori
informazioni sulle licenze di Access?
Grazie per la collaborazione
Paola

 acquistato per mezzo dell'MSDN.
Difficile dirlo, la licenza che accompagna Office Developer Edition č
estremamente subdola e discretamente protezionistica.
Al posto tuo contatterei Microsoft.
Comunque, per quale ragione non sfrutti il motore predefinito di Omnis
invece che ricorrere a ODBC per agganciarti ad Access?
Ciao.

 Ciao.
Sono ancora in fase di analisi e sto valutando tutti i pro e contro.
E' vero che ora lo posso vedere via ODBC come un database relazionale.
Comunque Grazie.
Contatterò Microsoft.
Ciao

 E' vero che ora lo posso vedere via ODBC come un database relazionale.
Mah, sinceramente non vedo molti pro su un'accoppiata del genere.
I produttori di "Target Cross" si agganciano _in maniera assai rozza_ a MS
SQL Server da Omnis, ma in quel caso parliamo di un robusto Server di
database...
Ciao.


[Startup Task]
   Cosa vedoooo!!
   Allora non sono l'unico che usa SQL Omnis Access e Target :-)
   Ok Ok adesso smetto di tirarmela ;-)
[Quit method]
Non sono sicuro al 100%, ma secondo me, se uso il database di Access 
"solo" come base dati, non credo proprio che debba avere una licenza per 
il semplice fatto che i dati sono i miei!!
Questo discorso mi incuriosisce perchè in caso contrario tutte quelle 
applicazioni scritte in visual basic che circolano + o - liberamente e 
che usano files mdb per salvare i dati sarebbero fuorilegge?
Claudio(BS)
x pvt=Aggiungi claudio all'indirizzo

 che usano files mdb per salvare i dati sarebbero fuorilegge?
Ripeto, la cosa è ambigua e imho è meglio sentire MS.
Le licenze di Visual Studio e Office Developer consentono la distribuzione
royaltee Free di msde e Ms Jet.
Non sono sicuro che sia possibile fare altrettanto con altri ambienti, senza
possedere una delle succitate licenze.
Ciao.

 
Svelato l'arcano, ho contattato Microsft. Per utilizzare database
Access è sufficente possedere una licenza di Office Developer (via
MSDN o puro)
Ciao e grazie.
Paola
Newsgroup: it.comp.appl.access
Titolo: ottenere un report filtrato da un filtro impostato su una form

mi spiego meglio:
possiedo una maschera con vari texbox in cui posso inserire dei filtri,
successivamente con pusante applica
eseguo la construzione del filtro
filtro = textbox1 & textbox2 eccc......
me.filter = filtro
me.filteron=true
questo filtro però ha effetto solo sulla maschera, o almeno credo, quindi vi
chedo se volessi un report che mostra i record che rispettano le condizioni
impostate nella maschera è possibile otttenerlo?
grazie a tutti.

 ha scritto nel
messaggio news:RBu19.17963$lu5.5...@twister1.libero.it...

usa il comando docmd.OpenReport mettendo come ultimo argomento del comando
la stringa filtro.
mioReport=nome del tuo report
filtro=il tuo filtro (Naturalmente senza la clausola WHERE)
 docmd.OpenReport "nome del tuo report", "tipo di visualizzazione ",
"Istruzione SQL completa (tipo SELECT * FROM ...) o Query", "condizione
where(qui inserisci il tuo filtro) "
ES:   docmd.OpenReport mioReport,Print Prewiev, ,filtro
N.B nota che io ho lasciato uno spazio vuoto apposta in quanto gli passo una
condizione where NON un istruzione SQL completa.
Comunque se hai dei dubbi guarda nella guida in linea, sotto OpenReport
Ciao da Stefano
Newsgroup: it.comp.appl.access
Titolo: Strano comportamento della maschera di input.

Salve
A00/W98
Qualcuno mi sa spiegare il motivo per il quale questa maschera di input non
funziona?
Il campo testo mi dovrebbe memorizzare un codice di questo tipo 123BZ548
cioč tre numeri, due lettere e ancora tre numeri.
Io ho creato la seguente maschera di input: >000LL000. Nella creazione
guidata funziona alla perfezione, nella tabella invece no. Mi permette di
inserire una lettera all'inizio, tre numeri, due lettere oppure due numeri,
tre numeri.
Praticamente la maschera di input risulterebbe cosě: ?000aa000. Infatti non
completando l'inserimento mi esce l'avviso "il valore immesso non č valido
per la maschera di input ?000aa000;; specificata per il campo", ma io non ho
specificato questa per il campo!!!
Paolo
Grazie in anticipo.



bug access
Saluti.
Emanuele.

 ha scritto nel messaggio
news:01cinusc2bhc4b2ja...@4ax.com...

Grazie.
Paolo.

Newsgroup: it.comp.appl.access
Titolo: Ridimensionamento automatico schermo

Ho creato due maschere di access una per una definizione dello schermo
800x600 e una per una definizione di 1024x768, come posso ora fare in modo
che all'avvio di access questo analizzi la definizione dello schermo e apra
la maschera giusta?

 ha scritto nel messaggio

www.sitocomune.com
Sib

Sono andato su 
sitocomune.it
 ma non mi è parso di trovare nessuna soluzione
per questo problema.
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:6p60b.102295$cl3.3...@news2.tin.it...


 per questo problema.
Prima di tutto rispondi dopo il quoting.
Per venire a quanto dici, evidentemente hai cercato male.
C'e' una bellissima faq nella sezione forms che fa cose interessanti
riguardo la dimensione delle maschere, mentre nella sezione general c'e' una
faq che fa esattamente quello che chiedi, anzi molto di piu'.
Sib

 wrote in message
VR50b.101642$cl3.3...@news2.tin.it...

Penso che sia più facile e meno laborioso creare la maschera solo con la
risoluzione più bassa (800x600) ed impostare tale definizione prima di
aprire la maschera; per avere un'idea di come vai sul Sito Comune (link qui
sotto) e nella Sezione General prova a leggere la FAQ di Carlo Costarella
intitolata "Modificare la risoluzione video".
In alternativa creati la maschera per la risoluzione video maggiore
(1024x768) quindi ridimensioanala automaticamente per la risoluzione video
usata; per far questo vai sul Sito Comune (link qui sotto) e nella Sezione
Forms leggi la FAQ di Alberto Marchi intitolata "Modificare la risoluzione
video".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: CDOSYS su Windows 7

Buongiorno,
sembra che il problema dell'invio email con Windows 7 sia dovuto al fatto 
che con la mancanza di Windows Mail il componente CDOSYS non funzioni pi�, 
posso sbagliarmi ma credo di aver tradotto bene i vari forume newsgroup 
stranieri.
Qualcuno ha avuto lo stesso problema ed ha risolto in qualche maniera , 
magari installando altri software concorrenti ?
Oppure, come invio email sempre da VBA e ACCESS 2007 utilizzando le MAPI ?
Grazie e mille e scusate se ho detto delle bischerate....
Saluti 
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4795 (20100121) __________
Il messaggio � stato controllato da ESET NOD32 Antivirus.
www.nod32.it


CDO sembra prendere le configurazioni dell'account 'Predefinito' se non 
espressamente dichiarate nello schema:
    .Item("
http://schemas.microsoft.com/cdo/configuration/smtpusessl
") = 
False
quindi nel mio caso usava la porta 995 perch� l'account era di una email su 
GMAIL.
Spero sia di aiuto a qualcun'altro.
Ssluti 
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4805 (20100125) __________


 Ssluti
Ciao perch�  non ne fai un articolo per AccessGroup.it?

Newsgroup: it.comp.appl.access
Titolo: Utilizzare Windows Desktop Search in Vba

E' da tempo che sto cercando di utilizzare Wds in una applicazione per
effettuare veloci ricerche di file sul pc, ma non ci sono mai riuscito.
Ho anche visto il sito Microsoft dedicato all'argomento con le api relative.
Qualcuno può aiutarmi almeno per iniziare?
Ogni alternativa altrettanto efficiente per la ricerca di file è bene
accetta, ho anche provato Filesearch ma non offre la velocità desiderata.
Grazie

 wrote in message
news:43d4f98e$0$30478$
4faf...@reader2.news.tin.it

Non ho mai avuto modo di usare WDS, io adoperavo una classe
che ora non trovo più, ma il segreto è una buona gestione
delle funzioni Ricorsive.
http://www.freevbcode.com/ShowCode.Asp?ID=2318
http://www.freevbcode.com/ShowCode.asp?ID=3510
questo presumo faccia al caso tuo.
http://www.vbcity.com/forums/faq.asp?fid=9&cat=Files&#TID101917
quì devi lavorare un pò ma trovi tutto:
http://vbnet.mvps.org/code/fileapi/recursivefiles_minimal_multiple.htm
http://vbnet.mvps.org/code/fileapi/recursivefiles_minimal_multipleselective.htm
http://vbnet.mvps.org/code/fileapi/filesearchinfo.htm
http://vbnet.mvps.org/code/fileapi/recursesave.htm
http://vbnet.mvps.org/code/fileapi/recursesaveadv.htm
Beh penso che tu abbia abbastanza materiale....!
Io solitamente mi appoggio a vbNet, è il miglior sito che tratta
di API nel WEB.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: ODBC CA su AS400 da Access mi ha cancellato i record!!!!

Ho fatto una semplice query con un paio di tabelle collegato ad Access su
AS400 con C/A tramite ODBC.
2/3 volte ha funzionato correttamente, la volta successiva mi si è
impinantato per un po' e poi ho scoperto che su AS400 mi aveva eliminato
parte di una delle tabelle agganciate (con gran panico degli utonti).
A qualcuno è mai accaduta una cosa del genere?
Grazie
--
------ C.E.D. - L'Abbondanza Srl -----
Lorenzo Piombini & Vigna Federico
Email : 
abbon...@technet.it
------------------------------------------------------

 wrote in message
10lar0n$ol9$1...@fe2.cs.interbusiness.it...



Non sono un gran conoscitore della faccenda ma se il data base Access e' su
un PC con W95/98 dei fare una macro su access che importa la tabella da una
tabella collegata su as400 o da un file di testo che trovi in una cartella
dell'as.
Poi se vuoi che questa cosa sia fatta in automatico dall'AS devi attivare la
possibilita' di far eseguire dei comandi remoti dal PC, funzione prevista
nel CA/400, e nel tuo CL che gira, per esempio di notte, esegui RUNRMTCMD
con la stringa di attivazione di access. Se la macro che hai scritto in
acces e' di quelle in autoesecuzione all'apertura del data base l'effetto e'
quello di vedere il PC che da solo apre access, attiva la macro, si fa
l'importazione dei dati e poi chiude.
Noi lo facciamo tutte le sere per riempire le tabelle del piccolo dataware
house che abbiamo in Access.
Speranto di non aver fatto piu' confusione del necessario
Antonio


Mai lavorato con AS400 e/o con questo particolare driver odbc,
ma non ci credo. Se la cosa stesse in questi termini, cioè se una
semplice select t' avesse cancellato dei dati sul server potresti
con tutta tranquillità citare il produttore del driver stesso...
Non credo mettano sul mercato dei driver con un "buco" del genere.
Bye, Ste

la prossima volta...DSN in sola lettura!
Cybersix
Newsgroup: it.comp.appl.access
Titolo: Access e MySQL

salve a tutti
volevo porvi questo quesito, ho un db access 97 con alcune tabelle su Mysql
vers. 1.4 alle quali accedo tramite Mysqlodbc 3.51
funziona tutto regolarmente eccetto quando tento di accedere ai recordset
con questo codice:
Dim wrkODBC As Workspace
Dim conn1 As Connection
Dim rs As Recordset, mysql As String
Set wrkODBC = CreateWorkspace("NewodbcWorkspace", "admin", "", dbUseODBC)
Set conn1 = wrkODBC.OpenConnection("mySQL", dbDriverNoPrompt, ,
"ODBC;DRIVER={MySQL ODBC 3.51
Driver};DESC=;DATABASE=PROVA;SERVER=localhost;PASSWORD=;PORT=3306;OPTION=;ST
MT=")
mysql = "SELECT * from Personale"
Set rs = conn1.OpenRecordset(mysql, dbOpenDynaset)
mi da sempre errore ODBC called- failure
da notare che la stringa di connessione la ricavo dalla propietà delle
tabelle collegate,
 ho provato allora a sostituire la stringa di connessione con la seguente:
Set conn1 = wrkODBC.OpenConnection("mySQL", dbDriverNoPrompt, ,
"ODBC;SERVER=localhost;PASSWORD=;UID=;DNS=nomeDNS")
l'errore è sempre lo stesso, verificando sul sito 
mysql.com
 apprendo che  la
versione del DB e quella dei driver sono compatibili.
qualcuno ha qualche idea ?
grazie in anticipo roberto

 ha scritto nel messaggio
news:MPhna.23855$LB6.5...@news1.tin.it...

Perchè non ti crei tabelle collegate con ODBC direct che funziona
benissimo....?
Io salvo la Stringa di connessione in un File Esterno, ma è questa...:
StrConnection="ODBC;DRIVER={MySQL ODBC 3.51
Driver};DESC=;DATABASE=NomeTuoDB;SERVER=127.0.0.1;UID=TuoID;PWD=;PORT=3306;O
PTION=0;"
Poi all'apertura del DB Linko le Tabelle direttamente a MySQL quindi lavoro
in modo NATIVO con Access
con LinkedTable.....!
Public Function RlnkODBCTbl() As Boolean
   On Error GoTo Err_RlnkODBCTbl
   Dim tdf As TableDef
   Dim rs As Recordset
   Dim s As String
   Dim strSql As String
   RlnkODBCTbl = False
   strSql = "SELECT MsysObjects.Name FROM MsysObjects " & _
          "WHERE ((Left$([Name], 4) <> 'Msys') And (MsysObjects.Type = 4))"
   Set rs = CurrentDb.OpenRecordset(strSql)
   rs.MoveLast
   rs.MoveFirst
   Do Until rs.EOF
      s = rs.Fields(0).Value
      CurrentDb.TableDefs.Delete s
      Set tdf = CurrentDb.CreateTableDef(s)
      tdf.Connect = StrConnection
      tdf.SourceTableName = s
      CurrentDb.TableDefs.Append tdf
      Set tdf = Nothing
      rs.MoveNext
   Loop
   RlnkODBCTbl = True
Exit_Here:
   rs.Close
   Set tdf = Nothing
   Exit Function
Err_RlnkODBCTbl:
   RlnkODBCTbl = False
   Resume Exit_Here
End Function
Ciao.
@Alex.


[CUT]
Benissimo, sono contento di averti dato uno spunto funzionale.
Ciao.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: il campo che somma bis

vedi intervento sotto
riassumo cercavo di sommare un campo con euro in un recordset all'interno di 
una query
mi avete fatto fare in un report un campo casella di testo con origine 
controllo
...
=Dsum("TuoCampodaSommare";"NomedellaQuery")
oppure
=Sum(Euro)
ma da sempre errore
che posso aver sbagliato
 

 che posso aver sbagliato
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Newsgroup: it.comp.appl.access
Titolo: Grazie a Federico

Caro Federico
la ringrazio per la sua gentilezza.
Ho trovato tutto quanto stavo cercando (Controllo Codice EAN)
Purtroppo però ora sono in possesso del routine in Visual Basic ma non so
dove inserirla.
Penso in un Modulo.
Ma poi come posso legare la routine al campo della maschera dove viene
inserito il codice.
Porti pazienza ! Se riesce ancora a darmi qualche utile "dritta" Le sarei
infinitamente grato.
Franco


sui ng in genere ci si da del TU, ed in ogni caso io lo preferisco :-)
- copia la funzione TestChecksumEan13 in un modulo
- se il controllo testo sulla maschera si chiama txtEAN13, allora
nel suo evento BeforeUpdate ci scrivi
Private Sub txtEAN13_BeforeUpdate(Cancel As Integer)
    If Not TestChecksumEan13(Me.txtEAN13) Then
        MsgBox "EAN13 errato"
        Cancel = True
    End If
End Sub
che naturalmente modificherai in funzione delle tue esigenze
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Aggiungere campi

Buongiorno,
vorrei sapere se č possibile aggiungere un campo in una tabella senza
passare per la struttura, se cioč lo posso fare da una maschera creata
apposta per questo.
Grazie
Gianni


Si usando Visual Basic.....e la guida in linea.......
SunRex
Nel seguente esempio vengono utilizzati i metodi Append e Delete per
modificare l'insieme Fields di un oggetto TableDef. Per eseguire la routine
è necessaria la routine AccodaEliminaCampo.
Sub AppendX()
 Dim dbsNorthwind As Database
 Dim tdfImpiegati As TableDef
 Dim fldCiclo As Field
 Set dbsNorthwind = OpenDatabase("Northwind.mdb")
 Set tdfImpiegati = dbsNorthwind.TableDefs!Impiegati
 ' Aggiunge tre nuovi campi.
 AccodaEliminaCampo tdfImpiegati, "APPEND", _
  "E-mail", dbText, 50
 AccodaEliminaCampo tdfImpiegati, "APPEND", _
  "Http", dbText, 80
 AccodaEliminaCampo tdfImpiegati, "APPEND", _
  "Quota", dbInteger, 5
 Debug.Print "Fields dopo Append"
Debug.Print , "Tipo", "Dimensione", "Nome"
 ' Elenca l'insieme Fields per mostrare i nuovi campi.
 For Each fldCiclo In tdfImpiegati.Fields
  Debug.Print , fldCiclo.Type, fldCiclo.Size, fldCiclo.Name
 Next fldCiclo
 ' Elimina i campi appena aggiunti.
 AccodaEliminaCampo tdfImpiegati, "DELETE", "E-mail"
 AccodaEliminaCampo tdfImpiegati, "DELETE", "Http"
 AccodaEliminaCampo tdfImpiegati, "DELETE", "Quota"
 Debug.Print "Fields dopo Delete"
 Debug.Print , "Tipo", "Dimensione", "Nome"
' Elenca l'insieme Fields per mostrare che
 ' i nuovi campi sono stati eliminati.
 For Each fldCiclo In tdfImpiegati.Fields
  Debug.Print , fldCiclo.Type, fldCiclo.Size, fldCiclo.Name
 Next fldCiclo
 dbsNorthwind.Close
End Sub
Sub AccodaEliminaCampo(tdfTemp As TableDef, _
 strComando As String, strNome As String, _
 Optional varTipo, Optional varDimensione)
 With tdfTemp
  ' Controlla se l'oggetto TableDef è aggiornabile.
  ' Se non è aggiornabile, il controllo ritorna
' alla routine di chiamata.
  If .Updatable = False Then
   MsgBox "TableDef non aggiornabile! " & _
    "Impossibile completare il task."
   Exit Sub
  End If
  ' In base ai dati trasmessi, accoda o elimina un
  ' campo dall'insieme Fields dell'oggetto
  ' TableDef specificato.
  If strComando = "APPEND" Then
   .Fields.Append .CreateField(strNome, _
    varTipo, varDimensione)
  Else
   If strComando = "DELETE" Then .Fields.Delete _
strNome
  End If
 End With
End Sub

 ha scritto nel messaggio
news:1E0wb.7762$up5.6...@news1.tin.it...


 ha scritto nel messaggio
news:1E0wb.7762$up5.6...@news1.tin.it...


Gianni ha scritto:

Si puň fare da vba o con una query "ALTER TABLE" (vedi help) che č piů
semplice.
docmd.runsql "ALTER TABLE .......;"
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: creazione codice univoco

Access2000 WinNT
qual'è il problema?
i è precedentemente dichiarata come long
.......................
For i = txt_ini_lungo To txt_fine_lungo
     rs.AddNew
     rs![N_tessera] = i
     rs![Prezzo_tessera_acquisto] = Me.txt_prezzo_acquisto
     rs![Prezzo_tessera_vendita] = Me.txt_prezzo_vendita
     rs![Anno_tessera] = Me.txt_anno_tessera
     rs![Tipo_tessera] = Me.txt_tipo_tessera
     rs![codice_chiave_tessera] = i + [Me.txt_anno_tessera] +
[Me_txt_tipo_tessera]
     rs.Update
  Next i
rs.Close
Set rs = Nothing
Non mi aggiorna il recordset e si ferma all'istruzione
rs![codice_chiave_tessera] = i + [Me.txt_anno_tessera] +
[Me_txt_tipo_tessera]
dicendo "impossibile trovare il campo | a cui si fa riferimento
nell'espressione"

 wrote in message
8vld92$2c7g$1...@stargate1.inet.it...

Già...
Perchè non le togli quelle parentesi quadre che servono appunto ad indicare
un campo???
Antonio

[Me_txt_tipo_tessera]
Mi sa che [Me_txt_tipo_tessera] dove essere [Me.txt_tipo_tessera] (me
punto)

Newsgroup: it.comp.appl.access
Titolo: Sintassi per SQL in codice

Ciao a tutti,
mi trovo in questa situazione:
Devo eseguire una Query via codice, a cui devo passare un parametro ricavato
sempre da codice.
ES.
Dim Pippo as string
Pippo = 3
...
With cmd1
    .ActiveConnection = CurrentProject.Connection
    .CommandText = "SELECT tabella.campo FROM tabella WHERE tabella.campo2 =
PIPPO"
...
Logicamente PIPPO è un parametro non fisso.
Si può fare riferimento ad una variabile?? Se sì qual'è la sintassi
corretta???
Grazie a tutti
Ciao
Marco

 ha scritto nel messaggio
news:56AGa.87519$Ny5.2...@twister2.libero.it...

Prova Con:
 With cmd1
.ActiveConnection = CurrentProject.Connection
.CommandText = "SELECT tabella.campo FROM tabella WHERE tabella.campo2 =" &
"'" & pippo & "'"
Ciao
ADR

Ho risolto da solo comunque grazie mille!!!
"Alex De Rossi" <Omni...@Spamlibero.it> ha scritto nel messaggio
news:w6BGa.89099$lK4.2...@twister1.libero.it...

Newsgroup: it.comp.appl.access
Titolo: Aggiunta campo in database SQL collegato

Ho una tabella collegata di nome dbo_tblcollegata ed ho necessità di
aggiungere un campo alla tabella di tipo byte che accetti valori Null,
ho provato a fare in questo modo:
    Dim db As Database
    Dim strSQL As String
    Set db = CurrentDb
    strSQL = "ALTER TABLE dbo_tblcollegata ADD COLUMN camponew Byte
NULL;"
    db.Execute strSQL
da un errore che non è possibile eseguire modifiche su tabelle
collegate.
Qualcuno sa come posso risolvere questo tipo di problema?
Grazie
Giuseppe

 ha scritto nel messaggio 
news:1121775772.2...@g44g2000cwa.googlegroups.com...
Ho una tabella collegata di nome dbo_tblcollegata ed ho necessità di
aggiungere un campo alla tabella di tipo byte che accetti valori Null,
ho provato a fare in questo modo:
    Dim db As Database
    Dim strSQL As String
    Set db = CurrentDb
    strSQL = "ALTER TABLE dbo_tblcollegata ADD COLUMN camponew Byte
NULL;"
    db.Execute strSQL
da un errore che non è possibile eseguire modifiche su tabelle
collegate.
Al posto di usare la connessione del db (implicitamente, tramite db.execute) 
creati una nuova Connnection che punta al database in cui risiedono le 
tabelle. E lavora su quella.
-- 
Jonathan Canova
infoCHIOCCIOLAaladinoinformatica.com
www.aladinoinformatica.com
 

Potresti, gentilmente, fornirmi l'esempio?
Grazie
Giuseppe

 Giuseppe
    Dim cnnDati As New ADODB.Connection ' Connessione al DB dei dati
    Dim strSorgenteDati As String
    strSorgenteDati = "C:\Access\Dati.mdb"
    cnnDati.Open "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data 
Source=" & strSorgenteDati & ";Mode=Share Deny None"
    cnnDati.Execute "DROP TABLE TEST"
    cnnDati.Close
    Set cnnDati = Nothing

Newsgroup: it.comp.appl.access
Titolo: DoCmd.GoToRecord , , acNewRec

Probabilmente sono poco attento, o meglio "An pň Dur", cosě si dice da noi...
Pongo il problema:
FormPrincipale---->SubForm
dalla FrmPrincipale devo generare il comando in oggetto riferito alla Sub...!
In teoria č semplice, ma visto che il comando accetta una Stringa come
NomeOggetto quando passo il nome della Sub essendo appunto una Sub non lo
esegue......!
Ho risolto il problema in questo modo:
Me.Subform.form.Setfocus
DoCmd.GoToRecord , , acNewRec
Funziona, ma mi pare poco elastico.....
C'č un altro sistema piů pulito per il problema.....?
Grazie @Alex. 
-- 
Posted from  [62.98.12.100] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


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

 > Grazie @Alex.
Ciao Roberto....
Beh, devo essere sincero, prima di rispondere ho riso 5' minuti....
In effetti sto facendo un'esperimento di alchimia, e spero funzioni....
Scherzi a parte sto facendomi un Modulo di classe che mi sta incasinando
se così si può dire, ma giuro che appena è finito te ne mando una copia,
così poi puoi affondare ancora di più l'ascia, si perchè non sarà sufficiente
il "CORTELLO".... un pò come "ALBITRO"....!!!!
Per quel che riguarda la soluzione al mio attuale hai fatto come il gioco delle
tre carte, solo che quì sono 2 e uguali...;-)
Ciao @Alex.
-- 
Posted from  [62.98.13.98] 


Newsgroup: it.comp.appl.access
Titolo: importazioni di dati da excel

Io sto cercando di importare in una tabella di acces dei dati di un file di
excel ma non riesco chi puo aiutarmi?
Grazie Andrea

 ha scritto nel messaggio
news:xIIva.81030$3M4.1...@news1.tin.it...

Se leggi uno dei molti post di questo mese troverai più di una risposta.
Ciao, Carlo

 ha scritto nel
messaggio news:_NIva.81046$3M4.1...@news1.tin.it...


 ha scritto nel messaggio
news:EUIva.81064$3M4.1...@news1.tin.it...

Nella guida cerca: Metodo TransferSpreadsheet
ci sono anche degli esempi.
Ciao, Carlo