mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Finestra Common Dialog

Salve a tutti
so che esiste sul sito comune il modulo per la finestra Common Dialog che ho
anche scaricato.
Però mi pare che funzioni solo su Access 97 e non sul 2000 (che
evidentemente utilizza altre API).
Qualcuno mi sa prospettare un'alternativa o una soluzione per Access 2000?

 ha scritto nel messaggio
news:HCxb8.7293$eD3.3...@twister1.libero.it...




questo funziona anche sul 2000
codice per aprire finestra selezione file
Option Compare Database
Option Explicit
Private Declare Function GetOpenFileName Lib "comdlg32.dll" _
            Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME)
As Long
Private Type OPENFILENAME
   lStructSize As Long
   hwndOwner As Long
   hInstance As Long
   lpstrFilter As String
   lpstrCustomFilter As String
   nMaxCustFilter As Long
   nFilterIndex As Long
   lpstrFile As String
   nMaxFile As Long
   lpstrFileTitle As String
   nMaxFileTitle As Long
   lpstrInitialDir As String
   lpstrTitle As String
   flags As Long
   nFileOffset As Integer
   nFileExtension As Integer
   lpstrDefExt As String
   lCustData As Long
   lpfnHook As Long
   lpTemplateName As String
End Type
Public Function cmdlg_file()
   Dim OpenFile As OPENFILENAME
   Dim lReturn As Long
   Dim sFilter As String
 
   OpenFile.lStructSize = Len(OpenFile)
   sFilter = "Immagini (*.wmf,*.bmp,*.jpg,*.tif)" & Chr(0) &
"*.wmf;*.bmp;*.jpg;*.tif" & Chr(0)
   OpenFile.hwndOwner = Application.hWndAccessApp
   OpenFile.lpstrFilter = sFilter
   OpenFile.nFilterIndex = 1
   OpenFile.lpstrFile = String(257, 0)
   OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
   OpenFile.lpstrFileTitle = OpenFile.lpstrFile
   OpenFile.nMaxFileTitle = OpenFile.nMaxFile
   OpenFile.lpstrInitialDir = "C:\"
   OpenFile.lpstrTitle = "Selezione"
   OpenFile.flags = 0
   lReturn = GetOpenFileName(OpenFile)
 
   If lReturn = 0 Then
      cmdlg_file = ""
 
   Else
      cmdlg_file = Left(OpenFile.lpstrFile, InStr(OpenFile.lpstrFile,
Chr$(0)) - 1)
      Forms![tbl_Marca]![tbl_DESCRIZIONE Sottomaschera]!Immagine =
cmdlg_file
   End If
End Function
Saluti.
Emanuele.

Ho cercato di inserire questo codice in una routine evento associata ad un
pulsante, ma non mi funziona.
Mi puoi dire come si deve procedere, volendo
aprire la finestra con un clic su un pulsante?
grazie
--------------------------------
Inviato via 
http://usenet.iol.it
 



mettici un CUT sopra se cancelli parte del messaggio...
la chiamata alle API dovevi inserirla in un modulo non collegato ad
una form specifica (vedi moduli dopo le macro...)
poi vedi di sistemare il codice della funzione cmdlg_file() per le tue
esigenze e mettila nell'evento Click 
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: cosa fare dopo conversione da macro a modulo?

Ieri ho posto una domanda su cosa fare dopo aver convertito una macro in un
modulo...
mi è stato detto che posso tranquillamente cancellare la macro e di usare il
modulo....
Oggi pongo un'altra domanda.... Un ignorante come me come "usa" un modulo?.
Ho un database con 50/60 macro che si attivano su pressione di pulsanti. Ho
convertito in moduli tutte le macro e le ho cancellate (ovviamente ho un db
backuppato)... I pulsanti non funzionano più... come faccio a collegare i
moduli ai pulsanti?
Grazie
--
skipper dixit...
www.superskipper.it


Puoi usare l'evento 'Su clic' dei pulsanti.
Scegli [Routine evento] e ...
Poi con un copia-incolla inserisci il modulo convertito
tra il 'Private Sub ...' e 'End Sub...'.

 ha scritto nel messaggio
news:3E93DC43...@libero.it...

Grazie...
ho notato che bisogna cambiare alcune cose... vista la mia essenza
neofita.... ci impiegherò un bel po' a capire...
--
skipper dixit...
www.superskipper.it

 >
Se non ricordo male (ecco a cosa serve non spezzettare i 3d) ti avevo
parlato della funzione sendkeys. La sendkeys č una macro che sostituisce le
funzioni di default dei tasti funzione f1 etc, trl, etc.
vai all'interno della macro
In nome macro iserisci per esempio F5 tra le parentesi graffe e come azione
ci inserisci esegui codice: nelle specifiche di esegui codice richiami la
funzione che ti interessa - funziona il wizard che ti porta alla funzione
che vuoi tu e ti restuisce pippo(). Ora tutte le volte che premi f5 parte
quella funzione.
Poi se per esempio 10 ex macro sono quelle di stampa in 10 maschere diverse
e tu vuoi stampare sempre con F5 nel modulo dovrai inserire
Function pippo()
if 
screen.activeform.name
 "articoli" 'cioč se ti trovi nella maschera degli
articoli
fai stampare il report che vuoi
elseif etc.
End function
quindi tu premi lo stesso tasto e a seconda della maschera che ha il fuoco
ti stampa il corrispettivo report. Cosě per tutte le altre ex tue macro
Se hai problemi fischia.
ciao MAssimiliano
p.s. salutami tuo cugino Zueg
--------------------------------
Inviato via 
http://usenet.libero.it


Per MAssimiliano.... ho salutato mio cugino Zuegg... contraccambia..... ma
Santal si è offesa...
che fai? le offri un aperitvo a base di frutta?
--
skipper dixit...
www.superskipper.it


ROTFL ;-)
Spero che tu abbia risolto il tuo problema.
ciao MAssimiliano


 prima parte dei problemi risolti.... ne seguiranno altri
grazie
--
skipper dixit...
www.superskipper.it
Newsgroup: it.comp.appl.access
Titolo: Aggiornare automaticamente un campo alla data odierna...

Ciao a tutti,
avrei cortesemente bisogno di una mano su una questione che per molti
di voi è certamente semplice semplice.
Ho una maschera Ordini che include un campo ULTIMO_AGGIORNAMENTO.
La mia intenzione è di fare in modo che in caso uno qualunque degli
altri campi della maschera venga aggiornato, nel campo
ULTIMO_AGGIORNAMENTO venga automaticamente inserita la data del momento
in cui si aggiorna la scheda.
Ho provato a lavorare nelle proprietà di tabella,
su “dopoaggiornamento”, ma non riesco ad ottenere quello che desidero.
Avete per caso qualche idea da suggerirmi?
Grazie in anticipo e buon week end a tutti voi.
Andrea
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 in cui si aggiorna la scheda.
La funzione Date() inserisce al data del sistema a quel momento.
Se è una casella di testo non associata:
Scrivi =Date() in Proprietà - 'ValorePredefinito'.
Se invece ho capito bene ed è associata ad un campo di una tabella, ti consiglio di srivere Date
(senza l'=)in ValorePredefinito del campo della tabella stessa.

 (senza l'=)in ValorePredefinito del campo della tabella stessa.
Difatti, la casella è associata.
In realtà, facendo come suggerisci, il sistema mette nel campo "Ultimo
Aggiornamento" automaticamente la data odierna ad ogni apertura della
maschera.
Io, invece, vorrei che questa operazione avvenga SOLO se interviene
qualche modifica in uno qualunque dei campi della maschera.
Grazie ancora per un aiuto.
AW






Prova con del codice (come evento che risponda alle esigenze che esprimi   -DopoAggiornamento)
dietro la maschera impostando la proprietà "DefaultValue" del campo nella maschera.
Prova a 'giocare' un po' tu col codice.

 data ultima modifica.
Grazie infinite per avermi dedicato il vostro tempo!!!!
Il codice corrisponde esattamente a quello che mi serve.
Vi auguro un'eccellente giornata.
A Presto
AW

Newsgroup: it.comp.appl.access
Titolo: Automazioni con Outllok

Ho creato una form dove l'utente inserisce, in una casella di testo (text1
formato data), la data di un appuntamento, in un'altra (text2 formato testo)
il motivo dell'incontro, (text3 formato ora breve 24h) l'ora di inizio,
(text4 formato ora breve 24h) l'ora di fine.
Sull'evento doppio clic della text1 ho generato il seguente codice:
Private Sub text1_DblClick(Cancel As Integer)
Set myOlApp = CreateObject("Outlook.Application")
Set myApptItem = myOlApp.CreateItem(olAppointmentItem)
myApptItem.Start = Me.text1.Value & Me.text3.Value
'myApptItem.End = Me.text1.Value & Me.text4.Value
myApptItem.Subject = Me.text2.Value
myApptItem.Save
End Sub
Così facendo l'errore che mi segnala è il seguente:
Errore di runtime '-
2147352571
 (80020005)
Incompatibilità tra tipi. Impossibile forzare il valore del parametro.
Impossibile tradurre la stringa.
Eliminando la parte & Me.text3.Value e Me.text4.Value funziona tutto, ma non
riesco ad impostare l'ora di inizio e fine dell'appuntamento.
Come posso fare e dove sbaglio?
Grazie dell'interessamento
Ciao Mauro

myApptItem.Start = Me.text1.Value & Me.text3.Value
Converti in data: cdate(me.text1 & " " & me.text3)
Bai
-- 
Lorenzo Coronati
---
[si parla di ODE/MOD, ndr]
<<chi sarebbe cosi' gentile da passarmelo? 
in caso posso ricambiare con qualache mp3...:)))>>
(Koala, 5/3/2001)
---

Newsgroup: it.comp.appl.access
Titolo: Bloccare/sloccare inserimento dati di una sottomaschera da maschera

Ciao a tutti sono Dino.Ho questo quesito da porvi.In una maschera ho
realizzato un pulsante di comando con il quale posso bloccare/sloccare
(Me.AllowEdits = True o False a seconda dell'evento) la modifica dei
dati nella form.In tale maschera ho inserito anche una
sottomaschera,la quale sembra non volerne sapere del mio blocco.
Come posso fare???
Grazie in anticipo
Dino

 Come posso fare???
Me!NomeDelControlloSottoMaschera.Form.AllowEdits = True o False 
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it


Grazie Karl per l'indicazione.
Dino

Newsgroup: it.comp.appl.access
Titolo: Come non fare arrotondare i decimali ?

Scusate la banalita'
Ma ho una piccola applicazione in asp che prende e mette i dati in un .mdb
I dati sono relativi a cifre in euro.
Il database mi arrotonda i decimali e se quindi ho 10,51 questo diventa
automaticamente 11 !!
Ho cercato fra i vari formati numerici di access ma non trovo la risposta.
Help !
Grazie a tutti

 ha scritto nel messaggio
news:xGRB7.12934$C57.3...@news1.tin.it...

Io farei un "precisione singola" con 2 cifre decimali...

 wrote in message
news:xGRB7.12934$C57.3...@news1.tin.it...

Prova a guardare l'istruzione Format:
Da Help:
MyStr = Format(334.9, "###0") ' Restituisce "335".
@Alex
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: protezione access

Qualcuno sa la procedura esatta per proteggere un database Access che
risiede su un server dall'accesso di più utenti che devono possedere
diverse autorizzazioni (es. solo lettura o solo scrittura)? Grazie
l.ri...@tiscalinet.it

 Qualcuno sa la procedura esatta per proteggere un database Access ...
Si', io la so.
Sib
PS: vai al sito comune :-)

Newsgroup: it.comp.appl.access
Titolo: Domanda su SQL Server (MSDE)

Se ho capito bene con MSDE tutti i componenti del DB stanno sul server...
tabelle, query, maschere, report, moduli...
Ma allora il singolo file ADP creato con access dovrebbe avere + o meno
sempre le stesse dimensioni e restare sempre piccolo, visto che tutti i dati
stanno sul server.
Ho capito bene?
Grazie, Max


sbagliato
le tabelle stanno sul server
le query anche, ma non sono query, sono viste o stored procedures
maschere, report e moduli stanno nell'adp perché sql server non possiede
oggetti di questo tipo

 ha scritto nel messaggio
news:9vdge3$ehls7$1...@ID-106197.news.dfncis.de...

Aaaaaahhh ecco, mi pareva....
che tu sappia esiste un modo di usare delle tabelle collegate con SQL
Server?
Voglio dire... ho un DB cui accedo via ODBC, con access estraggo i dati che
mi servono da delle tabelle collegate e li metto in quelle locali.... e con
SQL Server come faccio?
Grazie, Max
Newsgroup: it.comp.appl.access
Titolo: errore: TempMSysAccessObject già esistente

ciao a tutti,
da qualche tempo all'uscita dal database mi esce il seguente messaggio di
errore, credo in fase di compattazione:
Tabella 'TempMSysAccessObject' già esistente
avete un'idea del perchè?
come posso fare a risolvere il problema?
grazie come sempre per il vostro aiuto,
em.an


Non ne abbiamo parlato nei giorni scorsi?
NOn ricordo se l'ho fatto con te.
Cmq, è un caso di corruzione.
Visualizza gli oggetti di sistema,
crea un file nuovo
importa tutti gli oggetti tranne quelli di sistema
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


ciao MA,
anzitutto grazie per il suggerimento!
ho seguito il tuo consiglio ed ho visualizzato gli oggetti di sistema: però
quando procedo con la creazione del nuovo file e chiedo di importare le
tabelle e quant'altro dal vecchio db access mi dice (giustamente)che il file
di origine è protetto (nel vecchio file ho infatti creato gli utenti con
relative password contenut nel file .mdw).. come dovrei procedere?
scusa se sono pedante ma mi trovo in una situazione poco piacevole!
em.an


Alla fine ho risolto usando un file di backup di ieri pomeriggio, quindi ho
svuotato questo file ed ho proceduto ad importare gli oggetti da qua: tutto
bene..
A questo punto mi chiedo: cosa potrebbe aver causato la corruzione di cui
sopra?
em.an

 em.an
Dai i permessi al nuovo file


Newsgroup: it.comp.appl.access
Titolo: esportazione in excel

Ciao a tutti,
come fare ad esportare da access ed importare in excel un report
mantenendo le posizioni esattamente come sono nel report?
grazie a chi sa darmi qualche consiglio..


Che senso ha questa cosa...???
Mi rispondo:
NESSUNO.
Excel è un foglio dati... perchè violentare gli applicativi per fargli
fare quello per il quale non sono fatti...???
Boh...
@Alex

 
+1
un report e' da consultare.
se ti servono i dati prendi i dati, non una loro rappresentazione che poi 
dovresti rimaneggiare per poterci (di nuovo) lavorare.
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

 - Mostra testo citato -
Lo so anch'io, ma dovrei prendere i dati con i raggruppamenti e i
totali che solo il report mi fa vedere... credo...

 
il report *visualizza* i dati che prende da una tabella, da una query o
da altra fonte; scopri da dove arrivano i dati che il report visualizza
e usa la stessa origine per esportare i dati... 
raggruppamenti e conteggi li puoi fare con una query basata su questa
origine. 
se poi ti mancano le somme totali o parziali che ti fa il report, quelle
puoi farle sia con una query in access che in excel una volta esportato
il tutto. 

Newsgroup: it.comp.appl.access
Titolo: query di aggiornamento crea entità inesistenti

ho fatto una semplicissima query di aggiornamento su di un campo in
modo che aggiornase a "[Sito_Puntuale]![ID_SPU] & "-" &
[Indagini_Puntuali]![tipo_ind] & [Indagini_Puntuali]!
[pkey_indpu]" (cioè per capirsi ad una stringa derivata dai campi di
altre tabelle) e dando come criterio "Is Null" (aggiornava cioè solo i
campi vuoti).
la query funzionava egregiamente nel primo database, ma quando l'ho
importata in un secondo database (che è una copia esatta del primo, ma
svuotato e riempito con dati diversi) oltre a fare il suo lavoro mi
crea 150 nuove entità alle quali poi riempie il campo in oggetto della
query.. e se rieseguo la query me ne rifa altre 150!!
 
sto ragionando sul fatto che la tabella "madre" ([Sito_Puntuale]) ha
154 entità e a 4 di queste ho già collegato delle entità nella tabella
"figlia" [Indagini_Puntuali] (che è collegata con rapporto 1-molti)
mentre nel database precedente ad ogni elemento della prima tabella
corrispondeva almeno uno della seconda..
 
come posso aggiornare la query o verificare che nello svuotamento del
database non ci sia stato qualche intoppo?
GRAZIE!!!

nessun suggerimento???
ho provato a compattare anche il database ma non cambia niente! (in
realtà non cambia PROPRIO niente...!)

Newsgroup: it.comp.appl.access
Titolo: Impossibile nascondere finestra database

Ciao a tutti,
ho la necessità di blindare la mia procedura access ai colleghi per 
evitare danni.
Access è in versione 2002 e l's.o. è XP sp2 e il db è in versione .MDE
La procedura è composta da una form principale che dovrebbe occupare 
tutto lo schermo.
Su form load eseguo le seguenti righe per disabilitare i menù standard, 
portare a pieno schermo e disabilitare il tasto chiusura
...
'Disabilita barra menù principale
CommandBars.ActiveMenuBar.Enabled = False
'Espande form
DoCmd.Maximize
'LockAppWindow Screen.ActiveForm
'Disabilita tasto chisura
hMenu = GetSystemMenu(GetParent(GetParent(Me.hWnd)), False)
DeleteMenu hMenu, SC_CLOSE, MF_BYCOMMAND
...
Il tutto funziona alla perfezione finchè l'utente non iconizza la procedura.
Sulla taskbar appaiono due task, una con il nome della form e l'altra 
col il nome del database.
Se l'utente clicca sulla prima il tutto torna come in origine (OK), se 
invece clicca sulla seconda mi appare la finestra del db (grosso guaio 
perchè l'utente incomincia a vedere oggetti vari anche se non li può 
modificare).
Ricliccando sull form adesso, essa appare ridotta nelle dimensioni ma 
non più ridimensionabile causa impostazioni iniziali.
Se provo il tutto con access 2000 funziona correttamente perchè nella 
task bar appare solo il task corrente e non il database.
Da cosa può dipendere?
C'è qualche settaggio in Access che possa modificare tale comportamento?
I miei problemi sono due; uno che si vede la finestra del db, l'altro è 
che la form principale si riduce e non resta espansa.
Nicoletta


Prova questo:
www.sitocomune.com
 Sezione General
6.126 Funzione per Nascondere o Mostrare la Finestra di MSAccess (2)
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: A07: immissione dati nei report

Ciao a tutti,
Come noto, in A07 è disponibile una nuova visualizzazione dei reports:
la visualizzazione report, ove è possibile inserire anche pulsanti di
comandi e rendere il report "interattivo".
Tuttavia, non pare possibile modificare i dati presenti nel recordset
sottostante agendo direttamente dalle caselle di testo del report.
Qualcuno sa se è possibile fare ciò?

"Mirko Caporali"
Ciao a tutti,


----------------------------------------------------------------------------
---
Non direttamente.
Però puoi trovare degli escamotage: tipo su doppio click esplode la Form di
manutenzione...
Ciao...

Newsgroup: it.comp.appl.access
Titolo: Posizionamento del cursore verticale in una query

Ciao a tutti ragazzi. Innanzitutto grazie per il tempo che mi avete
concesso. Premettendo che sono un principiante vi espongo il mio problema:
vorrei che all'apertura di una query, che ha il compito di ordinare in
ordine alfabetico i dati di una tabella che necessariamente deve rimanere
ordinata secondo un codice numerico, mi comparisse una specie di casella di
testo dove io posso scrivere le lettere iniziali del record che voglio
trovare e che in questo modo il cursore verticale per lo scorrimento della
query si posizioni proprio su quel dato (o sul primo di quei dati) che abbia
come iniziali ciň che io ho scritto nella casella di testo (in pratica
vorrei che accadesse come nella cosultazione dell'indice di un HELP di una
applicazione)
Grazie 1000 anticipatamente per il vostro aiuto!!!!!       CIAO

 ha scritto nel messaggio
news:alkmjn$e8t$1...@lacerta.tiscalinet.it...

Vai sul Sito Comune (link qui sotto), nella Sezione Forms leggi la FAQ di
Davide La Mantia (Sib) intitolata "Come creare un controllo di ricerca".
Penso che faccia al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Grazie 1000!!!! Ora provo....ciao!!!


Scusate l'intrusione, ma non basta fare una casella combinata con i campi
che interessano e mettere a 'Sě' le proprietŕ 'Solo in elenco' e
'Completamento automatico'?
Riccardo Baldinotti

 Riccardo Baldinotti
Visto che Riccardo chiedeva una soluzione simile a quella usata nell'help in
linea, mi sembra che l'uso di una casella combinata non fosse quello che
cercava, mentre probabilmente la soluzione proposta da Sib sia a lui più
congeniale: mi sembra di capire che lui vuole una ricerca che si affina
sempre di più ogni volta che viene digitata una lettera in più.

Newsgroup: it.comp.appl.access
Titolo: [Soluzione]: Stampare n copie di una stessa etichetta

Questa soluzione è valida anche per altri casi.
Esistono tre proprietà dei report particolarmente adatte per risolvere
questo problema.
Dall'Help di Access:
MoveLayout: determina se MSAccess deve spostarsi alla successiva posizione
di stampa nella pagina
NextRecord: determina se una sezione deve passare al record successivo
PrintSection: determina se una sezione deve essere stmpata
Andate nell'help di Access e leggete nel dettaglio il loro significato.
Per stampare n volte una stessa etichetta, ecco il codice:
Private Sub Corpo_Format(Cancel As Integer, FormatCount As Integer)
'NumeroCopie contiene il numero di copie che devono essere stampate
'Vedete voi come assegnarla.
    If NumeroCopie > 1 AND FormatCount < NumeroCopie Then
        Me.MoveLayout = True
        Me.NextRecord = False
    End If
End Sub

 End Sub
Già nel Sito Comune era presente la soluzione. Usa un evento diverso ma il
concetto è quello.
FAQ, "Stampare N volte la stessa etichetta.", Luciano
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
   If PrintCount < Me.ct_quantita Then
      Me.NextRecord = False
      PrintCount = PrintCount + 1
   Else
      PrintCount = 0
   End If
End Sub
E' interessante controllare i parametri MoveLayout, NextRecord e
PrintSection perchè si possono ottenere cose interessanti.
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************
Newsgroup: it.comp.appl.access
Titolo: [?] Controlli con proprietà INDEX

E' possibile in una maschera di ACCESS fare riferimento a piů controlli
(pulsanti command) contemporaneamente usando il campo .Index cosě come č
possibile in Visual Basic ?
grazie in anticipo
Fabio

possibile in Visual Basic ?
non credo proprio...
come si fa in vb?
-------------------------------------------------------
concorsi pubblici truccati.  questo č solo un esempio:
http://www.fortunecity.com/business/koch/947/index.htm

 possibile in Visual Basic ?
Con access non si possono creare array di controlli, perň ogni controllo fa
parte di un insieme che č possibile ciclare.
Puoi usare un classico ciclo for:
For i = 1 to N
 Debug.Print Me(i)
Next i
dove Me(0) o anche Me.Controls(0) fanno riferimento al primo elemento di
questo insieme.
Puoi anche chiamare i controlli con un nome tipo TxtBox1, TxtBox2,
TxtBox3... ed accedervi con la sintassi:
For i = 1 to N
 Debug.Print Me("TxtBox" & i)
Next i
Dai un'occhiata anche a For...Each...Next, di solito č questa la sintassi
piů usata.
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


http://www.penguinpowered.com/~ecesena
- Come fanno i carabinieri a mettersi la lacca sui capelli?
- La spruzzano per aria e poi cercano di prenderla al volo con la testa.
		-- Da it.hobby.umorismo

Grazie 1K a tutti quanti
byte byte
Fabio
Newsgroup: it.comp.appl.access
Titolo: come disabilitare i messaggi di errore di Access?

Salve a tutti
Non sono ancora riuscito a risolvere il seguente problema :
immettendo un valore non in elenco in una casella combinata far uscire solo
il msgbox che avverte che il valore non è presente e chiede se lo si vuole
inserire senza nessun altro messaggio di Access.
Ho già impostato su non in elenco il seguente codice
Private Sub UltimoTecnico_NotInList(NewData As String, response As
Integer)
   DoCmd.SetWarnings False
   Dim risposta As Integer
   risposta = MsgBox("Tecnico non in elenco, Vuoi Inserirlo?",
vbYesNo,"ERRORE")
   If risposta = vbYes Then
      DoCmd.OpenForm "Inserimento tecnici"
    Else: Cancel = "true"
   End If
 End Sub
ma il Access continua imperterrito.
Grazie in anticipo

     Else: Cancel = "true"
Guarda che a cancel NON devi dare il valore della stringa "true", ma gli
devi dare il valore True, costante simbolica che vale -1
Antonio

 ha scritto nel messaggio
news:Kf%ha.525$mg5....@twister2.libero.it...

Grazie per la precisazione, ma continua a visualizzare la finestra che
avverte che "Il testo immesso non corrisponde ad una voce dell'elenco" ecc.

 ha scritto nel messaggio
news:1m%ha.538$nD4....@twister1.libero.it...

Stralcio da un mio caso:
Dim msg As String
    Dim risposta As Integer
    Response = acDataErrContinue
    msg = "Fornitore non presente in archivio!@Si vuole inserire nel sistema
"
    msg = msg & "il nuovo fornitore " & NewData & "?@"
    risposta = MsgBox(msg, vbInformation + vbYesNo, "Conferma operazione!")
    If risposta = vbYes Then
        DoCmd.OpenForm "Ins_Mod Fornitore", , , , acFormAdd, , "Ins-Ins"
    Else
        Fornitore.Undo
    End If
Antonio


Grazie Antonio, sei gentilissimo.

Newsgroup: it.comp.appl.access
Titolo: Eliminare messagio di aggiunta riga

Ciao ragazzi,
questo è il primo messaggio che posto qui e spero di ricevere una risposta:
Come faccio ad eliminare quel messaggio che mi avverte che è stata 
aggiunta una riga ad una tabella quando inserisco tramite maschera dei 
dati in essa? Ovviamente tramite codice....
Grazie a tutti!
*kInAsH*

 dati in essa? Ovviamente tramite codice....
www.donkarl.com/it
 FAQ 2.4 Eliminare i messaggi d'avviso
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + CISA2
Conferenza Italiana per Sviluppatori di Access, Ancona, 22+23/4/2006
Newsgroup: it.comp.appl.access
Titolo: Quesito da Inesperto

Salve,
ogni tanto mi capita di prendere spunti ed esempi dal 
Sito Comune del newsgroup it.comp.appl.access.
Questa volta mi stavo arrovellando su un'idea, premettere che sono un 
dilettante-autodidatta e cinquantenne, volevo cercare di cambiare la 
risoluzione del video.
Esempio..aprire una maschera e scegliere se settare lo schermo 800x600 
oppure 1024x768 quindi sul sito alla sezione Moduli trovo
5.54 API - Cambia Risoluzione Video.
Ma purtroppo non avendo esperinza o tecnica non so come utilizzare 
questa risorsa.
Al limite se mi date qualche link dove potermi documentare o risolvere 
questo mio problema.
Grazie a tutti 
-- 
-- 
Ciao Lino - GAP Napoli
http://www.gapnapoli.org/

 ha scritto nel messaggio
news:MPG.1ea5fdbac...@news.libero.it...


 
http://www.gapnapoli.org/
All'inizio pensavo di aver sbaglio NG, ciao Lino tutto bene?
Che si dice al GAP?
Saluti Andrea 

Quel modulo è abbastanza semplice, con l'accezione del termine
Semplice, e si basa
sulle API del SO per ricavare i settaggi Video salvati in una
UDT(Struttura dati chiamata DevMode).
Le strutture complesse sono uno dei mezzi più frequenti usati dalle
API per scambiarsi
i dati.
Quindi all'interno della struttura si vanno a modificare i 2
atomi dmPelsWidth/dmPelsHeight, che rappresentano i valori di
risoluzione attuali,
con quelli NUOVI, quindi si ripassa la struttura all'API di
modifica...!
La difficoltà delle API è capire che per usarle spesso serve
appoggiarsi a strutture
dati complesse prestabilite, e che quello è l'unico modo di poter
dialogare con le funzioni.
L'uso del Modulo è banale anche se riporta un'errore dovuto ad una
procedura
non presente che salvava i dati in un file INI, ma non dà anomalie di
funzionamento...!
Le 2 chiamate da fare sono queste:
' Con la prima imposti la Risoluzione all'apertura del tuo applicativo
Public Function StartUp()
   Call ChangeRes("1024", "768", True)
End Function
' Con la 2° ripristini l'impostazione originale
Public Function SetOldRes()
   Call ChangeRes(HoldX, HoldY, False)
End Function
Se ora vuoi andare a ridimensionare i controlli in base alla
risoluzione, cosa
che trovo scandalosamente INUTILE, allora le cose si complicano.
Ciao
@Alex

 Saluti Andrea 
Ciao carissimo, anche a me pare strano incontrarti da queste 
parti....:-)
Affettuosamente ti saluto e ti auguro una serena Pasqua.


 Semplice, e si basa....cut
Grazie per la risposta ....la mia era pura curiosità tecnica.
Quindi volevo cimentarmi ed imparare.
Una sola domanda, scusami l'ignoranza abissale ma lo avevo premesso,
come posso sfruttare le 2 chiamate che mi hai scritto con due pulsanti 
su una maschera che farò partire all'avvio del database?
Grazie ancora e serena Pasqua.


 
http://www.gapnapoli.org/
Auguri anche a tutti voi, salutami tanto anche Geppy!
Saluti Andrea
Newsgroup: it.comp.appl.access
Titolo: automazione ma solo dopo aver visualizzato la form

vorrei visualizzare il caricamento dei dati mediante una barra di
avanzamento.
i dati vengono caricati all'apertura della maschera, ma gli eventi
open,load,activate e current si verificano prima della visualizzazione
della form e quindi i dati sono già stati inseriti nella  tabella che
uso come temporanea.
come posso far partire il caricamento dei dati dopo la visualizzazione
della form? grazie


Da provare: potresti rendere la form unbound e quindi provvedere alla modifica 
della RecordSource tramite VBA.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution

Newsgroup: it.comp.appl.access
Titolo: chiamata http POST

salve a tutti,
dovrei inviare dei file con una chiamata http POST con Basic Authentication con username e password.
E' possibile da Access ?
grazie
Maurizio


Hai ovviamente bisogno di un Controllo preposto alla comunicazione via WEB...
Questo controllo è INET e, una volta istanziato fa quello che ti gli dici di fare...
 
https://www.experts-exchange.com/questions/21008845/upload-a-file-with-the-inet-control-in-VBA.html
 
 
@Alex


ciao Alex, grazie per la risposta.
Sto usando Access 2000 e Access 2007. Dove trovo il controllo INET ?
Maurizio

 Maurizio
 
SE lo hai lo trovi nei componenti COM nei riferimenti... "Microsoft Internet Transfer Control", se non clo hai sarebbe strano, puoi scaricarlo ed aggiungerlo con ADD REFERENCE... (MSINET.OCX)
 
 
@Alex


ciao Alex,
ho aggiunto il controllo msinet.ocx ma adesso mi dice "il componente activex non è in grado di creare l'oggetto"
 
le istruzioni sono:
  Dim myHTTP As Inet
 
  Const LocalFileName As String = "C:\test\Prodotti.xls"
  Const sScriptURL As String = "
https://api.percorso
"
  Const sScriptLogin As String = "user=demo&submit=Upload&pass=demo"
  Const sScriptHdrs As String = "Content-Type: multipart/form-data; boundary=---------------------------7d43992f3f0642"
 
  Set myHTTP = New Inet
  With myHTTP
 
    .Execute sScriptURL, "POST", sScriptLogin, sScriptHdrs
    Do While .StillExecuting
      DoEvents
    Loop
 
  End With
  Set myHTTP = Nothing
 
cosa dovrei fare ?
Maurizio

 
 
esiste il file  file MSINET.OCX in \windows\system32 ?
 
registra il componente con il comando:
 
regsvr32 \windows\system32\msinet.ocx
 
 
 
Inoltre, il controllo in questione e' soggetto a controllo della 
licenza, e su un PC in cui non e' installato VB, potrebbe dare quei 
problemi. Per questo motivo ti consiglio anche di scaricare da
 
http://support.microsoft.com/kb/194751/it
 
 
il file VB6Cli.exe ed eseguirlo sul PC dove hai l'errore.


ciao Andrea,
grazie per la risposta.
MSINET.OCX è presente e lo avevo già registrato.
 
Il link che mi hai passato non funziona
Maurizio


se devi richiamare api di un webserver puoi usare anche questo sistema
 
https://codingislove.com/http-requests-excel-vba/
 
 
io lo uso per le fatture di aruba e per la gestione sms skebby
 
BFS
Newsgroup: it.comp.appl.access
Titolo: ricerca del primo carattere numerico a partire da destra

Ciao a tutti. In A97 ho un campo contenente una stringa di testo fatta
sempre in questo modo:
DescrizioneIndirizzo (spazio) CAP (spazio) DescrizioneComune
Vorrei separare la DescrizioneComune dal reso e ho pensato di estrarre
tramite query tutto quello che c'č nel campo, a partire da destra, finchč
non incontra un numero (l'ultimo numero del CAP). Ho pensato di fargli
cercare lo (spazio), ma non va bene Xchč ci sono dei comuni formati da 2 o
piů parole.
Per trovare la lunghezza della stringa da estrarre pensavo di utilizzare
InStr, ma non riesco a fargli trovare un valore numerico.
InStr([campo1];"#") non funzia.
Sapete darmi qualche suggerimento?
Grazie a tutti.
Giancarlo

 Davide
Se č vero che il CAP č l'unica sottostringa lunga 5 contenente solo numeri.
Se i dati da suddividere sono contenuti in un campodi tipo testo chiamato
TuttoInsieme in una tabella chiamata Tabella1.
In un modulo del tuo database memorizza il seguente codice VBA:
Public Function DividiIndirizzo(IndirizzoUnico _
As String, PrimaDopo As Integer) As String
Dim Conta As Integer
Dim Conta2 As Integer
Dim Pippo As String
DividiIndirizzo = ""
For Conta = 1 To Len(IndirizzoUnico) - 5
    Pippo = ""
    For Conta2 = 0 To 4
        If IsNumeric(Mid(IndirizzoUnico, _
        Conta + Conta2, 1)) Then
            Pippo = Pippo & Mid(IndirizzoUnico, _
            Conta + Conta2, 1)
        End If
    Next Conta2
    If Len(Pippo) = 5 Then
        If PrimaDopo = 1 Then
            DividiIndirizzo = Left(IndirizzoUnico, _
            Conta - 1)
            Exit Function
        Else
            DividiIndirizzo = Mid(IndirizzoUnico, Conta)
            Exit Function
        End If
    End If
Next Conta
End Function
Quindi per ottenere la divisione dell'indirizzo in due campi creati una
query che abbia il seguente codice SQL:
SELECT Tabella1.TuttoInsieme, DividiIndirizzo([TuttoInsieme],1) AS Campo1,
DividiIndirizzo([TuttoInsieme],2) AS Campo2
FROM Tabella1;
-- 
Roberto
==============================
Penso che dovrebbe aiutarti a risolvere il tuo problema.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:OXNbd.42053$H11.1...@twister1.libero.it...

Accidenti!
Complimenti.
Grazie. Giancarlo

Newsgroup: it.comp.appl.access
Titolo: Perche' il file mdb si 'gonfia' ?

Le classiche procedure di magazzino, vendite, ecc...
Sistema = Access 2003 + Postresql via odbc + Windows Xp pro
Sull'mdb non ci sono dati che sono solo su Postgresql
Se creo un file mdb vuoto ed importo tutte le form, query, report, moduli 
dal file del progetto originale, il file mdb si riduce a circa 20 Mbyte
Dopo qualche ora di lavoro, cresce a 50, 60 anche 100 Mbyte
Ogni tanto compatto e ripristino, e mi ritorna a circa 50 Mbyte
Se compatto, ripristino, trasformo in versione file Access2003 (normalmente 
lavoro con la versione file Access2000) e trasformo in mde, mi restituisce 
un 20 Mbyte
Da notare che il file in versione Access2003 e' sempre sui 50 Mbyte, solo 
l'mde si riduce
Pero' se re-importo tutto in un file appena creato, re-ottengo un file mdb 
da 20 Mbyte circa
La domanda e':  considerando che i dati sono da un'altra parte, perche' il 
file mdb di lavoro non riesco a ridurlo sotto i 50 Mbyte?
Attenzione, non ci sono problemi funzionali di nessun tipo, era solo una 
curiosita' che volevo soddisfare, volevo capire il perche' di queste taglie 
variabili del file di lavoro
Ciao e grazie
RobertoA 

 file mdb di lavoro non riesco a ridurlo sotto i 50 Mbyte?
I  dati si ma tutta la parte attiva (i.e. forms etc) sta sull'mdb di 
lavoro. Se muovi una riga in un reports access riscrive duta la 
definizione del report nell'mdb.
--
ac

Alessandro Cara ha scritto:
duta = tutta
--
ac


Perche? Quella che gia' c'e' gia' dentro non gli basta?
Quello che non capisco e' come mai ha bisogno di un file da 50 mega, se 
appena importato (e quindi col file da 20 mega) gia' funziona tutto 
correttamente?
Quante copie delle stesse cose si tiene dentro (definizione report, form, 
ecc...)?
E se davvero fosse cosi', e' possibile risalire all'ultima copia, alla 
penultima, alla terz'ultima?
Ciao e grazie
RobertoA


Alcune cause trovi qui:
 La dimensione del database cresce molto
 
www.donkarl.com/it?FAQ1.22
Molto frequente � codice male e/o compilato male.
Puoi provare cosa succede sulla dimensione dopo un decompile
(
www.donkarl.com/it?FAQ1.23
) e la successiva compressione del db.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 penultima, alla terz'ultima?
Non con strumenti normali ma, probabilmente, se ti metti a scrivere un 
bel programmino in "C" o assembler potresti anche riuscirci sperando che 
qualche nuova versione non modifichi la struttura di base del file. E' 
un po' quello che succede quando si recuperano i file cancellati nel 
sistema operativo o si ricostruiscono le catene di 
puntamento/collegamento fra le varie parti di un qualsiasi spezzatino 
(cfr. Abu Simbel o svariate piramidi Maya ;-{))
SQS-->HTH
--
ac
Newsgroup: it.comp.appl.access
Titolo: Come iinibire la chiusura form se si fà click sul pulsante "X" ?

Ciao a tutti, non riesco a trovare una soluzione per inibire la chiusura
delle maschere quando si fà click sul pulsante di chiusura contrassegnato da
una "X" che si trova a destra, in tutte le barre del titolo di tutte le
finestre.
Ringrazio tutti in attesa di aiuto. Paolo

 ha scritto nel messaggio 
news:lLQpf.15735$Cn4....@tornado.fastwebnet.it...

verifica sul sito di karl c'è un bell'esempio.
www.donkarl.it
\cisa 

 ha scritto nel messaggio 
news:lLQpf.15735$Cn4....@tornado.fastwebnet.it...

http://www.donkarl.com/it/index.htm?/it/FAQ/FAQ4Maschere.htm
faq 1.12 

 ha scritto nel messaggio
news:do8le8$d22$1...@fittipaldi.interac.it...


 ha scritto nel messaggio 
news:lLQpf.15735$Cn4....@tornado.fastwebnet.it...

Io sono riuscito a toglierla la X, basta andare in struttura maschera, 
proprietà della maschera e poi trovi la voce "pulsante chiusura" e scegli 
NO, in questo modo sparisce del tutto.
Saluti Andrea 

 ha scritto nel messaggio 
news:43a80583$0$27598$4faf...@reader1.news.tin.it...

leggi bene ... la finestra di access ...

Newsgroup: it.comp.appl.access
Titolo: Totale listbox

Buonasera a tutti , perdonatemi per la banalità, sto cercando di usare le 
listbox ma non riesco a capire come fare il totale di una colonna.
SO winxp+access2000
ho provato così ma non funziona
Private Sub LstOrdine_Click()
Dim x As Integer
Dim Tot As Double
Tot = 0
Me.LstOrdine.ListIndex = 0
For x = 0 To (Me.LstOrdine.ListCount) - 1
Me.LstOrdine.ListIndex = ((Me.LstOrdine.ListIndex) + 1)
MsgBox (Me.LstOrdine.ListIndex), , "ListIndex" 'controllo se il listindex 
cambia
'[LstOrdine].Column(3)=quantità
'[LstOrdine].Column(4)=prezzo
'aggiorno il totale
Tot = Tot + (([LstOrdine].Column(3)) * ([LstOrdine].Column(4)))
Next x
Me.TxtTotOrdine = (Tot)
End Sub
 Se qualcuno mi può spiegare dove sbaglio lo ringrazio in anticipo.
Maurizio 


Private Sub elenco_forniture_AfterUpdate()
Dim avvisi As Integer
Dim nomi_forniture
Dim frm As Form, ctl As Control
    Dim varItm As Variant
    Set frm = Me.Form
    Set ctl = frm!elenco_forniture
    For Each varItm In ctl.ItemsSelected
        avvisi = Int(avvisi) + Int(ctl.Column(2, varItm))
        'MsgBox avvisi
        nomi_forniture = nomi_forniture & ctl.Column(1, varItm) & " -
(" & ctl.Column(0, varItm) & ")" & vbCrLf
    Next varItm
    Me.avvisi_selezionati = avvisi
    Me.forniture_selezionate = nomi_forniture
    Me.conteggio_selezionati = ctl.ItemsSelected.Count
End Sub
questo funziona perfettamente, adattalo e sei ok
ciao
Newsgroup: it.comp.appl.access
Titolo: Problema con confronto date

Ciao a tutti
effettuando questo controllo:
If Me.DataFine < Me.DataInizio Then
..........
end if
mi sembrava che funzionasse ma poi mi sono accorto che considera DataFine <
DataInizio anche se non è vero e mi sembra di aver capito che fa questo
perche non considera il mese
e l'anno....basta cioè che il solo giornoInizio si > di Fine che mi salta il
controllo
perche?????
ciao e grazie
=======================================
 -------------------------- Giaino Flower --------------------------
=======================================

 ciao e grazie
Ciao
Secondo me il problema e' il formato della data e magari access considera il
giorno come fosse il mese.
E' probabile che il problema sia questo ma non garantisco.
Ciao Alessandro

 Ciao Alessandro
Grazie Alessandro
ho controllato il formato e mi sembra okkei
comunque ho aggirato il problema con la funzione DateDiff
Grazie 1000

 end if
a me era capitato, il problema era che il formato dei controlli (o dei campi
di origine, non ricordo) non era "data".
Ho risolto il problema così (convertendo i valori in date):
If  CDate(Me.DataFine) < CDate(Me.DataInizio) Then
....
end if
ciao, max
Newsgroup: it.comp.appl.access
Titolo: calcorare ore...

Salve a tutti,
avrei bisogno di calcolare il totale
delle ore tra due campi contenenti due ore
esempio
ora1  1500
ora2  1800
ore 3
grazie
sdamy

 ha scritto nel messaggio
news:adpnv2$klm$1...@lacerta.tiscalinet.it...

Visto che parli di campi e di un campo calcolato, devo presupporre che stai
lavorando in uan query.
Fai in maniera che nella tabella su cui è basata la query i campi ora1 e
ora2 siano di tipo Data/ora e quindi contengano 15:00 e 18:00.
Per determinare il campo calcolato ore in una colonna vuota della griglia di
struttura della tua query scrivi:
ore: [ore2] - [ore1]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:ct%L8.15558$86.3...@twister1.libero.it...

Avevo già fatto come dici te
ma mi risulata 0,125
io vorrei avere come risultato 3.... ore
i campi li ho impostati come data/ora - ora24h
grazie
sdamy

 sdamy
Hai ragione; occorre moltiplicare il risultato per 24:
ore: ([ore2] - [ore1])*24


Newsgroup: it.comp.appl.access
Titolo: dcount e dsum uguali?

"Utilizzare la funzione DCount per contare il numero di record contenuti in un
dominio quando non č necessario conoscere i relativi valori specifici. Anche se
l'argomento espr č in grado di eseguire un calcolo in un campo, la funzione
DCount conteggia semplicemente il numero di record. Il valore di qualsiasi
calcolo eseguito da espr non č disponibile."
perchč a me invece somma il valore dei singoli campi?
a me va bene cosě...
ma nella guida dice il contrario...
quindi dcount e dsum sono uguali?
Ciao
Silvia.
 --
www.silvietta.it
...everyone's invited!
Prima di offendere qualcuno contate fino a dieci: vi verranno in mente molti piu' insulti!

 quindi dcount e dsum sono uguali?
Non hai dato info fondamentali come il tipo dei campi e i possibili valori.
La dsum e la dcount sono uguali solo se la dsum la applichi su un campo che
assume solo valore 1
Antonio

assume solo valore 1
la applico su un campo numerico di tipo single, con valori alti.
e in questo caso (differentemente dal caso in cui fosse stato stringa o altro),
le due 2 funzioni mi sembra si equivalgono


 le due 2 funzioni mi sembra si equivalgono
Puoi postare i due SQL e il risultato?
Antonio

Newsgroup: it.comp.appl.access
Titolo: report - annullare spazi vuoti con diagonali di asterischi

Come si fa a tirare una diagonale negli spazi vuoti delle pagine (laddove
c'è il salto pagina o lo spazio dell'ultima pagina)? Magari anche con l'uso
degli asterischi.
Grazie
ciao
-- 
Fabio Dalla Villa

 ha scritto nel messaggio

Hai un cliente paranoico?
Comunque la cosa migliore e' usare il metodo line che ti consente di
disegnare linee in qualunque punto del report, devi vedere pero' di
calcolare da quale altezza far partire la linea, e questo si puo' fare solo
capendo come hai strutturato il report.
Sib
Newsgroup: it.comp.appl.access
Titolo: errore segnalibro su client se elimino record da server

ho un db installato su 2 pc diversi, entrambi puntano allo stesso file dati entrambi hanno una form sempre aperta "visualizzazione record continui" con un contatore, se elimino un record da una form nella stessa form dell'altro computer esce il messaggio segnalibro non valido, in che modo evitare questo fastidioso errore?
 
grazie.

Imponendo un Requery Temporizzato...
 
@Alex

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

Quando eseguo il setup, su qualche computer segnala "Could not write to the
file. Currently being used by another application..." riferito alle dll
WININET.DLL e URLMON.DLL.
Segnala questo anche se ho appena riavviato il computer.
Da cosa può essere dovuto?
E poi mi domando perché il setup debba per forza copiare i suoi file anche
se già sono presenti sul computer?
Saluti.
Sandrobi

 ha scritto nel messaggio
news:7jItb.122553$e6.43...@twister2.libero.it...

La risposta da scegliere è "Ignore" e il setup continua senza errori.
Questo errore è ben docmentato da MSDN ed è principalmente dovuto alla
versione di Explorer in uso, mi pare fino alla 4.1.
Puoi consultare i seguenti articoli:
KB201357 e
KB174508 (solution 3)
Link:
http://support.microsoft.com/default.aspx?scid=kb;en-us;201357
e
http://support.microsoft.com/default.aspx?scid=kb;en-us;174508
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: (new entry) come fare...........

per prima cosa un saluto a tutti.
Adesso passo ad esporvi il mio problemino, presto capirete che sono agli
inizi e magari di queste cose ne avete parlato tanto, ma ci provo lo stesso.
ho una tabella articoli così composta : codice, descrizione, prezzocosto,
prezzovendita io vorrei creare (con una maschera) una nuova tabella dove io
inserendo il codice mi tirasse fuori tutti i campi su citati ed in più io
vorrei aggiunger un nuovo campo "quantita". Non so se qualcuno di voi guru
ha voglia di aiutarmi, Vi ringrazio comunque.

 ha scritto nel messaggio
news:uzql6.24033$k55.6...@news.infostrada.it...

Perché vuoi creare una nuova tabella?
Dovrebbe bastarti aggiungere i campi opportuni (QtaCarico, QtaScarico,
ScortaMinima ecc.) nella tabella articoli e poi basare la maschera su questa
tabella.
Nella maschera, inoltre, potresti visualizzare l'esistenza di ogni articolo
inserendo un controllo calcolato come differenza tra la QtaCarico e la
QtaScarico.
Il tutto dovrebbe essere + semplice...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 il problema è che la tabella articoli non posso fare nessun aggiunta di
campo e poi io devo tirare fuori da quella tabella solo una parte di codici
e non tutti 8come ad esempio vuoi fare una fattura che accedi solo a parte
dei codici disponibile e sono variabili di volta in volta) spero di aver
chiarito ciao mario

 chiarito ciao mario
No! Non sei stato + chiaro.
Perché non puoi aggiungere campi ad una tabella?
In alternativa potresti creare un'altra tabella in relazione 1 a 1 con la
tabella già esistente e basare la maschera su una query.
Cosa significa "e poi io devo tirare fuori da quella tabella solo una parte
di codici e non tutti 8come ad esempio vuoi fare una fattura che accedi solo
a parte dei codici disponibile e sono variabili di volta in volta)"?


 wrote in message
X8Nl6.40611$k55.8...@news.infostrada.it...

Ti ringrazio per la pazienza che hai e di questo te ne sono grato, ora passo
a spigarti cosa devo ottenere (spero di riuscirci sigh!!), ho una tabella
(articoli) che non posso aggiornare, ma in questa tabella c'è un archvio di
8000  prodotti. Ora a me serve tirare fuori da quella tabella (articoli) una
parte  dei prodotti ed una parte dei campi tramite il loro codice e quindi
lavorarli a parte. la mia difficoltà sta nel fatto che non sò come fare.
la tabella articoli ha i seguenti campi:
codice articolo
descrizione
prezzo acquisto
prezzo vendita
iva
ed altri svariati campi che a me non interessano,
ora io attraverso il codice articolo ho bisogno che mi venga ripescato e
messo in una nuova tabella i seguenti campi:
codice articolo
descrizione
facile vero? (non per me, purtroppo)
Ciao e buona domenica Mario