author: MA

text:
Roberto da Parma wrote:
> La soluzione proposta da sergio va bene e direi che il codice è quasi
> perfetto...se non fosse che al momento dell'apertura chiusura
> naturalmente vengono segnate nella barra di windows le finestre
> aperte...cercherò di rimediare...
>
Vai nelle opzioni
e togli la spunta al settaggio appropriato
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Modificare una proprietà di tutte le maschere presenti

author: Sergio MAZZA

text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio news:llpqg.10191$yg6....@tornado.fastwebnet.it...
> Scusa sergio ma la maschera non puo' essere aperta hidden?
> Sempre se ho capito il problema
> --
> ac
E' possibile; non mi sono mai cimentato nella modifica di form ma solo di un report inserendo/rimuovendo i gruppi e, se non ricordo
male, in hidden mi presentava errore mentre con l'echo a off no.
Tutto ciň in access'97...
Ciao.
--
Sergio MAZZA


author: Alessandro Cara

text:
Sergio MAZZA wrote:
> "Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio news:llpqg.10191$yg6....@tornado.fastwebnet.it...
>
>>Scusa sergio ma la maschera non puo' essere aperta hidden?
>>Sempre se ho capito il problema
[cut]
> E' possibile; non mi sono mai cimentato nella modifica di form ma solo di un report inserendo/rimuovendo i gruppi e,
io nenche questo
  [cut]
> male, in hidden mi presentava errore mentre con l'echo a off no.
> Tutto ciň in access'97...
ahhh...ecco il coniglio.
--
ac


text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio news:qJqqg.10336$yg6....@tornado.fastwebnet.it...
> io nenche questo
Evabbé oh! Non fare così che mi commuovo...
> ahhh...ecco il coniglio.
Sono un nostalgico; ma ora mi hanno dato la "bella" notizia di passare all'ultima versione e speriamo si decidano a comprare la 2003
non la 2007!
Aiutoooo...
> --
> ac
Ciao.
--
Sergio MAZZA


title: domanda su query

author: ringo

text:
Salve a tutti,
se ho una tabella cosě:
collab       famiglia      produzione        budget
------------------------------------------------
pippo       verdura               100            1000
pippo       frutta                   150              500
pluto        verdura                50                700
č possibile con una query avere:
collab      famiglia         informazione     valore
------------------------------------------------
pippo       verdura         produzione            100
pippo       verdura        budget                  1000
pippo       frutta            produzione            150
pippo       frutta            budget                   500
pluto       verdura         produzione               50
pluto       verdura        budget                    700
Grazie!
ringo


title: domanda su query

text:

usa una query di unione
:-)
ringo


title: conversione numero

author: Daniele Vitali

text:
Ciao, come da oggetto vorrei convertire un numero (esempio 65) in stringa
(sessantacinque).
Come posso fare?
C'è già del codice a riguardo?
Grazie mille
Daniele


title: conversione numero

author: ALESSANDRO Baraldi

text:
"Daniele Vitali" <
daniele...@inwind.it
> ha scritto nel messaggio
news:5hbDd.17387$_E5.4...@twister2.libero.it...

Sul sito Comune sotto linkato trovi un demo già predisposto.
Se non ricordo male alla sezione General
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: distribuzione runtime 32/64

author: mario rossi

text:
buongiorno a tutti,

secondo voi è fattibile distruibuire il runtime già installato con un creatore di pacchetti tipo innosetup?

mi spiego, installo il runtime32 su un pc senza office in c:\mioprogramma\runtime32
nel pacchetto innosetup includo un file lnk che copio sul desktop che esegue
c:\mioprogramma\miodb.accde c:\mioprogramma\runtime32\nomeruntime.exe

idem per 64?


title: distribuzione runtime 32/64

author: MC

text:

Ciao Mario, noi abbiamo creato 2 pacchetti, uno per 32 bit e uno per 64 bit, se presente non installa runtime, viceversa si.

Questo il codice INNOSETUP per installare su PC a 32BIT:

[Setup]
AppId={{3A7A5135-F8F9-4DCB-9397-99D8D4C981C4}
AppName=EBP-SW
AppVersion=1.5
AppPublisher=ChiMa Group
AppPublisherURL=
https://www.xxx.it/

AppSupportURL=
https://www.xxx.it/

AppUpdatesURL=
https://www.xxx.it/

CreateAppDir=no
OutputBaseFilename=EBP-SW Setup
Compression=lzma
SolidCompression=yes
WizardStyle=modern
WizardSmallImageFile=EBP_FaviconPOS_BMP.bmp
UninstallDisplayIcon={userdesktop}\EBP-SW_32Bit.accde

[Languages]
Name: "italian"; MessagesFile: "compiler:Languages\Italian.isl"

[Files]
Source: "C:\Users\Mauro\Desktop\CRM\EBP-SW_32Bit.accde"; DestDir: "{userdesktop}"; Flags: ignoreversion
Source: "C:\Users\Mauro\Desktop\CRM\OfficeSetup32.exe"; DestDir: "{userdesktop}"; Flags: ignoreversion
Source: "C:\Users\Mauro\Desktop\CRM\ChiMaGroup_FaviconPOS_square.ico"; DestDir: "{tmp}"; Flags: dontcopy nocompression

[Code]
function IsAccess365Installed(): Boolean;
var
  AccessExePath: string;
begin
  AccessExePath := ExpandConstant('C:\Program Files (x86)\Microsoft Office\root\Office16\msaccess.exe');
  Result := FileExists(AccessExePath);
end;

procedure InitializeWizard();
begin
  if (not IsAccess365Installed()) then
  begin
    if (MsgBox('Access 365 non è installato. Proseguo con l''installazione di EBP-SW?', mbConfirmation, MB_YESNO) = IDNO) then
    begin
      WizardForm.Close;
    end
    else
    begin
      ExtractTemporaryFile('OfficeSetup32.exe');
    end;
  end;
end;

procedure CurStepChanged(CurStep: TSetupStep);
var
  ResultCode: Integer;
  IconPath: string;
  AttribCmd: string;
begin
  if (CurStep = ssPostInstall) then
  begin
    if (not IsAccess365Installed()) then
    begin
      IconPath := ExpandConstant('{tmp}\ChiMaGroup_FaviconPOS_square.ico');
      ExtractTemporaryFile('ChiMaGroup_FaviconPOS_square.ico');
      ExtractTemporaryFile('OfficeSetup32.exe');

      FileCopy(IconPath, ExpandConstant('{userdesktop}\EBP-SW_32Bit.accde'), False);

      AttribCmd := ExpandConstant('attrib +r +h +s "{userdesktop}\EBP-SW_32Bit.accde"');
      Exec('cmd.exe', '/C ' + AttribCmd, '', SW_HIDE, ewWaitUntilTerminated, ResultCode);

      Exec(ExpandConstant('{userdesktop}\OfficeSetup32.exe'), '', '', SW_SHOW, ewWaitUntilTerminated, ResultCode);
    end;
  end;
end;

procedure DeinitializeSetup();
var
  OfficeSetupPath: string;
begin
  OfficeSetupPath := ExpandConstant('{userdesktop}\OfficeSetup32.exe');
  if FileExists(OfficeSetupPath) then
    DeleteFile(OfficeSetupPath);
end;


title: distribuzione runtime 32/64

author: RobertoA

text:

Quindi non si tratta di 'runtime gia installato' ma dell'eseguibile per
installare il runtime di Access
Si certo che e' fattibile, per InnoSetup esistono anche degli script che
mostrano come avviare il setup del runtime di Access
Stessa roba sia 32bit che 64bit


title: distribuzione runtime 32/64

text:

e se hanno un office versione diversa e quindi cambia il percorso di msaccess.exe che quindi esiste ma lo script inno non lo trova?
installa il runtime immagino?


title: distribuzione runtime 32/64

text:

Se non lo trova vuol dire che lo script di InnoSetup e' fatto male
Una volta corretto, deve trovarlo


title: Tendenza in Grafici:Access con Excel?

author: bizio

text:
Ciao di nuovo a tutti del newsgroup!
Lavoro in Access e dovrei pensare il modo di fare dei grafici più
approfonditi prendendo appunto i dati da tabelle/query!Ho già
implementato report con dei grafici generati da parametri immessi nelle
query.Finora tali grafici (sono a barre o torte 3D) mi evidenziano
l'incidenza dei vari valori sul totale.Ora però avrei bisogno di
creare "Grafici di Tendenza" (non pensate male..;-) ) quindi avere più
valoria confronto in archi temporali!!
Vi faccio l'esempio specifico:
Query q_statistiche con i campi:
data          data
località      testo 20
sesso        testo 1
ecc.
Dovrei ad esempio creare un grafico avente sull'asse delle Y i vari
valori della Località e su quello delle X archi temporali da poter
stabilire (01/01/2006-30/06/2006   01/07/2006-31/12/2006   ecc.) in
modo da poter mettere a confronto dati semestralmente.
E' possibile fare tutto ciò e inoltre è consigliabile interagire
Access con Excel e fare comunque tutto in Access?
Ho provato ad essere il più chiaro possibile e vi ringrazio in
anticipo per eventuali suggerimenti!!


title: Stampa Report

author: Marco

text:
Buongiorno a tutto l'NG.
Devo stampare lo stesso report in tre copie, ma vorrei che su ciascuna di
esse ci fosse a piè di pagina un testo diverso,
p.es
. "copia per il
destinatario",  "copia per il Cliente". etc.
Sono costretto a fare tre report e mandarli in stampa in successione oppure
c'è un'altra soluzione ?
Grazie, Marco


title: Stampa Report

text:

dim i as integer
for i = 1 to 3
reports!tuoreport!tuaetichetta.caption = choose( i, "Cliente", "Destinatario", "pippo")
next
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Stampa Report

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fm1ucs$igi$1...@tdi.cu.mi.it...


Grazie, Ma.
Ho inserito l'evento sul piè di pagina del report, ma nello stampare le tre
copie mi stampa solo il primo testo (Cliente) su tutte e tre.
Dove sbaglio ?


title: Stampa Report

text:
Marco wrote:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:fm1ucs$igi$1...@tdi.cu.mi.it...
> Marco wrote:
>> Buongiorno a tutto l'NG.
>> Devo stampare lo stesso report in tre copie, ma vorrei che su
>> ciascuna di esse ci fosse a piè di pagina un testo diverso,
p.es
.
>> "copia per il destinatario",  "copia per il Cliente". etc.
>> Sono costretto a fare tre report e mandarli in stampa in successione
>> oppure c'è un'altra soluzione ?
>> Grazie, Marco
>
> dim i as integer
> for i = 1 to 3
> reports!tuoreport!tuaetichetta.caption = choose( i, "Cliente",
> "Destinatario", "pippo")
> next
> --
nell'inserilo nel report
mettilo nel pulsante di stampa
ovvio che ogni volta ci metti un bel docmd.openreport ...



title: Evento su chiusura

author: Lucio

text:
Ho impostato la proprietą su chiusura in questo modo:
me.nomecontrollosecondocampo=date ()
ma alla chiusura mi dice impossibile assegnare un valore all'oggetto.
Grazie ancora Lucio


title: Evento su chiusura

author: Reds

text:
"Lucio" <
151...@virgilio.it
> ha scritto nel messaggio
news:xLMl8.6388$S52.1...@news2.tin.it...

> non puoi assegnare un valore ad un controllo dopo aver chiuso la form che
lo contiene.ti crei un pulsante 'Chiudi' e metti il codice
> me.nomecontrollosecondocampo=date ()
> Docmd.close acform, Me.name
ciao roberto


title: Evento su chiusura

author: Max De Poli

text:
"Lucio" <
151...@virgilio.it
> wrote in message news:<xLMl8.6388$
S52.1...@news2.tin.it
>...
> Ho impostato la proprietą su chiusura in questo modo:
> me.nomecontrollosecondocampo=date ()
> ma alla chiusura mi dice impossibile assegnare un valore all'oggetto.
Per forza, ormai la maschera e' chiusa... vai su "Su scaricamento"
(form_unload... traduzione orrenda, ma sempre meglio di Form_ENTER che
e' diventato Form_INVIO....ROFL!)
Cia'
Max


title: macro per inserire data oggi

text:
salve
io vorrei sapere come inserire la data oggi nei campi di diverse maschere
con un click
ho provato con aggiornavalore e funziona ma solo su un determinato campo
mentre io ho moltissimi campi data nella mia maschera
grazie


title: macro per inserire data oggi

author: Francesco R.

text:
"Lucio" <
luc...@keycomm.it
> ha scritto nel messaggio
news:blm457$mf1$1...@geronimo.keycomm.it...

Vedi se ti è sufficiente la combinazione di tasti CTRL+SHIFT+;
Ciao.


title: macro per inserire data oggi

author: Gippe

text:
"Lucio" <
luc...@keycomm.it
> ha scritto nel messaggio
news:blm457$mf1$1...@geronimo.keycomm.it...

Potresti inserire il seguente codice
Private Sub mioText_Click()
mioText.Text = Now()
End Sub
dove mioText è il nome della casella di testo
Saluti
Gippe


title: modificare icone contenute in ImageList

author: maurizio

text:
Ciao a tutti sto cercando di usare i controlli ocx Treeview e Listview,
vorrei aggiungere icone con il comando Imageview ma non so come fare a
cambiare quelle già presenti nel controllo Imageview aggiungendovene altri
Mi potete aiutare?


title: modificare icone contenute in ImageList

author: Carlo Costarella

text:
"maurizio" <
vos...@email.it
> ha scritto nel messaggio
news:SEBwe.15877$h5.8...@news3.tin.it...

Per aggiungere icone al controllo Listview ti sarà sufficiente aggiungere
almeno un controllo ImageList (potresti aggiungerne anche due: icone normali
e ridotte) e caricare in questo le icone. Poi nelle proprietà del controllo
Listview indicherai il o i controlli ImageList da usare. Prima salva la
maschera con i nuovi controlli ImageList.
Ciao, Carlo


title: modificare icone contenute in ImageList

text:
Carlo Costarella ha scritto:

E come si caricano le icone in ImageList?


title: modificare icone contenute in ImageList

text:
maurizio wrote:
[cut]
>>
> E come si caricano le icone in ImageList?
cosi'
oList.ListImages.Add 1, "FolderClose", application.LoadPicture(sPath &
\DSFolderClose.ico")
--
a.cara


title: modificare icone contenute in ImageList

text:

oList.ListImages.Add 1, "FolderClose", LoadPicture(sItem &
"\DSFolderClose.ico")
--
a.cara


title: modificare icone contenute in ImageList

text:
"maurizio" <
vos...@email.it
> ha scritto nel messaggio
news:hOWwe.96697$75.44...@news4.tin.it...

Allora ha ragione Alessandro Cara!
Devi anche sforzarti un po', magari con una occhiatina alla
guida...NG...ecc.
...tastino destro sul controllo...oggetto ImageList...proprietà....e poi
prova a fare da solo.
Ciao, Carlo


title: modificare icone contenute in ImageList

text:
Carlo Costarella wrote:
[cut]
> Allora ha ragione Alessandro Cara!
> Devi anche sforzarti un po', magari con una occhiatina alla
> guida...NG...ecc.
> ...tastino destro sul controllo...oggetto ImageList...proprietą....e poi
> prova a fare da solo.
Perdona l'intromissione, ma sembrava una cosa di vita o di morte ;<)
--
a.cara


title: modificare icone contenute in ImageList

text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:zlXwe.38667$bc.2...@tornado.fastwebnet.it...
> Carlo Costarella wrote:
> [cut]
>> Allora ha ragione Alessandro Cara!
>> Devi anche sforzarti un po', magari con una occhiatina alla
>> guida...NG...ecc.
>> ...tastino destro sul controllo...oggetto ImageList...proprietà....e poi
>> prova a fare da solo.
>
> Perdona l'intromissione, ma sembrava una cosa di vita o di morte ;<)
> --
> a.cara
>
Nessuna intromissione...ho creduto volessi spingere Maurizio (non senza un
pizzico di sprone) verso quello che è il modo più flessibile di usare
Access: il codice VBA.
No, no Maurizio è ancora alle prime armi e non deve credere di avere la
pappa pronta... anche perchè sarà lui, un domani, a dare una mano a chi
inizia.
Ciao, Carlo


title: differenza di orari

text:
Salve a tutti
Confido in qualche aiutino per risolvere il seguente problema:
in tabella ho due campi con i dati ORA Inizio e ORA fine; all'interno
della Query vorrei determinarmi le ore trascorse tra questi due valori,
come fare?
Grazie infinite per i suggerimenti
Vincenzo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: differenza di orari

author: antonio

text:
"salvin168" <
salv...@lycos.it
> ha scritto nel messaggio
news:es6uhh$15q$1...@news.newsland.it...

Differenza: DateDiff("h";[ORAfine];[ORAinizio])
Ciao
Antonio


title: differenza di orari

text:
antonio ha scritto:

> Ciao
> Antonio
Ciao Antonio,
ci siamo quasi...sarebbe grandioso avere le ore con una o due cifre
decimali  .. purtroppo mi approssima il valore per eccesso da 9,83 a 10,00
Grazie 1000



title: differenza di orari

author: Roberto dal portatile

text:
"salvin168" <
salv...@lycos.it
> ha scritto nel messaggio
news:es6uhh$15q$1...@news.newsland.it...
> Salve a tutti
>
> Confido in qualche aiutino per risolvere il seguente problema:
> in tabella ho due campi con i dati ORA Inizio e ORA fine; all'interno
> della Query vorrei determinarmi le ore trascorse tra questi due valori,
> come fare?
Se i due campi di cui sopra sono di tipo Data/ora e se la differenza la vuoi
in ore e centesimi di ora separati da una virgola, prova così:
DiffOre = (ORAfine - ORAinizio) * 24
Naturalmente il formato per la visualizzazione di DiffOre dovrà essere
Standard.
>
> Grazie infinite per i suggerimenti
Prego.
>
> Vincenzo
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Manuali di programmazione

author: zagor

text:
Mi potete indicare un buon manuale di acces, con esempi chiari di
programmazione e di codice?
Quale consigliate, dove si può trovare e approssimativamente quanto costa?
Grazie


title: Manuali di programmazione

author: Fabio

text:
"zagor" <
nplv...@libero.it
> ha scritto nel messaggio
news:ILCf9.11243$6O4.1...@twister1.libero.it...

Sul sitocomune c'è una sezione apposita
Fabio


title: Manuali di programmazione

text:
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:zMCf9.11245$6O4.1...@twister1.libero.it...

Scusate, ma quale è questo sito comune.
Potreste indicare l'indirizzo.
grazie, gabriele


title: Manuali di programmazione

author: Roberto da casa

text:
"
tin.it
" <
gtri...@tin.it
> ha scritto nel messaggio
news:1DIf9.92515$pX1.3...@news2.tin.it...
[CUT]
> > Sul sitocomune c'è una sezione apposita
> >
> > Fabio
> >
> Scusate, ma quale è questo sito comune.
> Potreste indicare l'indirizzo.
> grazie, gabriele
www.sitocomune.com
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Manuali di programmazione

author: SimonenomiS

text:
> Scusate, ma quale è questo sito comune.
> Potreste indicare l'indirizzo.

http://www.sitocomune.com/


title: Query selezione

author: Giorgio M

text:
Salve
Ho un db che contiene questi campi:
telefono (testo)
riservato (flag si/no)
utente (testo - con nome utente - inserito in fase di inserimento numeri))
Vorrei creare una query di selezione dove vorrei che l'utente possa
visualizzare tutti i numeri che non sono riservati (quindi flag =0)
e tutti i numeri riservati il cui nome utente è uguale a quello di
inserimento
La prima query riesco a farla (è semplicissima)non riesco pero' se è
possibile ad inserire anche la seconda conidizione nella stessa query
Grazie
Ciao
Giorgio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Query selezione

text:
[cut]
SELECT tel.riservato, tel.telefono, tel.utente
FROM tel
WHERE (((tel.riservato)<>0) AND ((tel.utente) Like [Nome Utente]));
Aggiusta i nomi campi, verifica se può andare, se ho capito bene, questo è
quello che ti serve!
--
strano...mavero
mail: mauro . chiarello @ gmail . com
ICQ: 292-118-822
Web: Under Construction
"Un'idea che non sia pericolosa non merita affatto di essere chiamata idea"
Oscar Wilde


title: Cancellare un file collegato

author: Roland Mayr - Chipware

text:
Salve,
ho collegato una tabella con un file txt esterno. Per poter cancellare
questo file mi tocca cancellare la tabella collegata e uscire da Access.
Qualcuno mi sa dire come posso cancellare il file txt senza uscire da
MsAccess ?
Grazie in anticipo.
Rolly


title: Cancellare un file collegato

author: MA

text:
"Roland Mayr - Chipware" <
info.c...@tin.it
> ha scritto nel messaggio
news:bpfehp$2vf$1...@newsreader.mailgate.org...

Istruzione Kill seguita dal percorso
MAssimiliano


title: immagini clikkabili

author: fsangio

text:
Ho una cartina geografica, e voglio vedere dati diversi a seconda della
regione su cui clikko. E' possibile? Come si fa?
Grazie e ciao


title: gestire il numero di decimali in tutto il db

text:
siccome il mio db può andare a clienti con esigenze diverse devo poter
gestire piu decimali
io pensavo di impostare a 4 decimali ogni campo valuta presente nel db e poi
in quanche modo
far decidere all'utente quanti decimali usare in tutto il db, ma come
dimisuisco i decimali?
con la funzione round utilizzata per ogni valuta nel codice? e i campi delle
form come li faccio diventare a valuta 2 decimali esempio se l'utente ne
vuole solo 2?
mi sapete indicare un procedimento semplice e agevole?
grazie.


author: Alessandro Baraldi

text:
"Simba883" <
simb...@libero.it
> wrote in message
news:c7dg0o$9d$
1...@lacerta.tiscalinet.it

Salva le Impostazioni in un File esterno, ed importale
all'Apertura salvandole in una Variabile di tipo Public
in un Modulo.
Il problema è che devi modificare anche la Proprietà delle
TextBox [DecimalPlaces] impostandola = al valore recuperato
dal File.
Io ti consiglio l'uso di un File INI, è semplice da Leggere
e Scrivere con funzioni ad OC.
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c5e9ecacdb3c6c23fc...@mygate.mailgate.org...

io vorrei fare un ciclo for che fà passare tutti i campi delle tabelle e se
il campo e del tipo che dico io lo imposta al tal numero di decimali.
lo stesso vorrei fare con le textbox di tutte le form con un ciclo for
e anche nei calcoli eseguiti nel codice vba
sai come fare?


title: Collegamento con Excel

author: Ser ?

text:
E' possibile collegare un valore di un campo di una forms/report di un db di
A97 con una cella di Excel2000 in maniera di rendere quest'ultima dinamica
al valore ?
grazie
Gio


title: Problemi dopo ripulitura da malware

author: il barbi

text:
Mi si e' riempito il PC di troiani e malware e mi pareva di essere riuscito
a ripulirlo, ma mi e' sorto un grave problema in Access: quando voglio
aprire un database Access, mi dice:
 "Impossibile trovare il file .mdb o uno dei suoi componenti - Verificare
che il percorso e il nome del file siano corretti e che tutte le librerie
necessarie siano disponibili"
do' ok, poi resta li' bloccato per circa 1' dopo di che si sblocca e
funziona normalmente
Ho provato a reinstallare Access ma il problema persiste...
Non vorrei essere costretto a reinstallare Windows, cosa posso fare?
il barbi


title: Problemi dopo ripulitura da malware

author: PBsoft

text:

Credo che tu sia molto vicino ad una reinstallazione completa.
Comunque, per cercare di scongiurare il problema, non appena la macchina
torna ad essere utilizzabile, puoi controllare il registro eventi di Windows
XP per vedere se per caso trovi qualche segnalazione di servizio che non
riesce ad avviarsi.
Poi da lì continui con Google.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Problemi dopo ripulitura da malware

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea3551df698...@news.tin.it...
>
> Credo che tu sia molto vicino ad una reinstallazione completa.
>
> Comunque, per cercare di scongiurare il problema, non appena la macchina
> torna ad essere utilizzabile, puoi controllare il registro eventi di
Windows
> XP per vedere se per caso trovi qualche segnalazione di servizio che non
> riesce ad avviarsi.
>
ho Windows 98...
Ma perche' dopo un po' comincia a funzionare?
Tra l'altro lo stesso avviso mi capita quando apro un .htm ma li' non c'e'
ritardo e le volte successive va tutto ok, mentre invece con Access devo
aspettare tutte le volte che apro un .mdb
(Ho notato che facendo ctrl-alt-canc non mi compare piu' explorer)
il barbi


title: Problemi dopo ripulitura da malware

text:
> ho Windows 98...
> Ma perche' dopo un po' comincia a funzionare?
> Tra l'altro lo stesso avviso mi capita quando apro un .htm ma li' non
> c'e'
> ritardo e le volte successive va tutto ok, mentre invece con Access
> devo aspettare tutte le volte che apro un .mdb
> (Ho notato che facendo ctrl-alt-canc non mi compare piu' explorer)
Purtroppo non so cosa altro consigliarti senza poter mettere le mani sul
tuo computer.
Credo comunque che, anche se potessi intervenire direttamente, sarei praticamente
costretto a reinstallare.
Considera sempre che, mentre per reinstallare ci metti un tempo lungo ma
ben definito, per risolvere un problema cosě subdolo potresti anche impiegarci
un tempo indefinito.
Conclusione: in qualche modo creati una nuova installazione senza distruggere
quella attuale, cosě non perdi i dati.



title: Problemi dopo ripulitura da malware

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea3551e18c8...@news.tin.it...
>
> Considera sempre che, mentre per reinstallare ci metti un tempo lungo ma
> ben definito, per risolvere un problema cosě subdolo potresti anche
impiegarci
> un tempo indefinito.
> Conclusione: in qualche modo creati una nuova installazione senza
distruggere
> quella attuale, cosě non perdi i dati.
>
il problema e' sempre quello: c'e' sempre qc che si perde... Ma e' sicuro
che se reinstallo Win98 su se stesso non devo reinstallare tutti i
programmi? E mi ripristina automaticamente tutti i collegamenti?
il barbi


title: Problemi dopo ripulitura da malware

text:
> il problema e' sempre quello: c'e' sempre qc che si perde... Ma e'
> sicuro
> che se reinstallo Win98 su se stesso non devo reinstallare tutti i
> programmi? E mi ripristina automaticamente tutti i collegamenti?
No!!!!
Se reinstalli 98 su se stesso quello che è sicuro è che devi reinstallare
tutto!!!!!
Siccome tanto devi reintallare comunque tutto, per evitare problemi di nomi
di directory, il mio consiglio è quello di dotarsi di un disco nuovo (potendo,
ovviamente), ed fare su quello la nuova installazione di Windows 98, poi
con calma cerchi di recuperare tutto quello che ti serve dalla precedente
installazione.



title: Problemi dopo ripulitura da malware

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea3551e4ac8...@news.tin.it...
> > il problema e' sempre quello: c'e' sempre qc che si perde... Ma e'
> > sicuro
> > che se reinstallo Win98 su se stesso non devo reinstallare tutti i
> > programmi? E mi ripristina automaticamente tutti i collegamenti?
>
> No!!!!
>
> Se reinstalli 98 su se stesso quello che è sicuro è che devi reinstallare
> tutto!!!!!
>
infatti l'ultima volta che l'ho fatto ho perso le macro di Word e i messaggi
dei newsgroup...:-(
e poi le palle di riscaricare tutti gli aggiornamenti fatti a Win e ai
pacchetti...
il barbi


title: Ribbon 2007: button per azionare un editbox

author: ruggeroxa

text:
salve
access 2007
in un ribbon personalizzato ho inserito un editbox per filtrare i records
della maschera corrente.
in pratica si digita una parola nell'editbox, si preme invio e, se trovata
una corrispondenza in uno qualsiasi dei campi pre-impostati, la maschera
corrente filtra i records. poi con apposito button si rimuove il filtro e
vengono mostrati tutti i records.
nell'editbox rimane la parola digitata nella ricerca, ma se voglio ripetere
la stessa ricerca devo per forza ridigitare la stessa parola e dare invio.
vorrei aggiungere un button che al click faccia eseguire di nuovo
all'editbox la ricerca  sulla base della parola che è rimasta nell'editbox
stesso.
ho smanettato un bel pò, ma senza successo.
qualche dritta?
grazie
ruggero


title: A97 - Verifica esistenza record

author: Gianni

text:
Ciao a tutti :)
vorrei sapere come fare a verificare l'esistenza di un record in una
maschera prima del suo salvataggio.
Ho creato una maschera con parecchi controlli e sottomaschere e ho bisogno
che dopo l'inserimento del [NomeCliente] (Combinata) e sucessivamente
[CodiceArticolo] (Txt) nel caso in cui il codice articolo relativo al
Cliente fosse presente nel DB mi si apra una finestra di dialogo... "Codice
Articolo presente...vuoi continuare? [S靅 [NO] [?]    (Per NO chiudi
maschera) ( Per ? mi apre una finestra con una maschera che mi mostra
un'anteprima dell' Articolo).
Se qualche buona anima ha voglia di scrivermi il codice...
Grazie Mille.
Gianni.


title: A97 - Verifica esistenza record

author: Antonio Biso

text:
"Gianni" <
giann...@hotmail.com
> ha scritto nel messaggio
news:F_wTb.9824$U4.3...@twister1.libero.it...

No, scriverti tutto il codice no, ma tu, studente volenteroso, scoprirai
tutto un mondo guardando sull'help la funzione DLookup
Antonio


title: Formattare da Access un foglio xls

author: Toni

text:
Salve a tutti,
Il mio problema era inviare i dati di una query su un foglio di excel e
formattare le varie celle, tutto ciň premendo un pulsunte da un form di
Access.
Dopo varie prove aiutato dal NG, sono arrivato a questo risultato, perň
funziona solo la prima volta che premo il pulsante, dopodichč per rifarlo
funzionare, devo chiudere il database e riaprirlo. Mi potete dire cosa non
va?
----------------------------------------------------------------------------
--------
Function RipartizioneSpeseEsporta()
On Error GoTo RipartizioneSpeseEsporta_Err
    DoCmd.OutputTo acQuery, "04 Ripartizioni spese", "MicrosoftExcel(*.xls)_
    ", "C:\Documents and Settings\administrator\Desktop\spese.xls", True, ""
RipartizioneSpeseEsporta_Exit:
    Exit Function
RipartizioneSpeseEsporta_Err:
    MsgBox Error$
    Resume RipartizioneSpeseEsporta_Exit
End Function
--------------------------------------------------------------------
Sub formatta()
    Rows("1:1").Select
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 90
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    Selection.Font.Bold = True
    Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    Selection.Borders(xlEdgeLeft).LineStyle = xlNone
    Selection.Borders(xlEdgeTop).LineStyle = xlNone
    Selection.Borders(xlEdgeBottom).LineStyle = xlNone
    Selection.Borders(xlEdgeRight).LineStyle = xlNone
    Selection.Borders(xlInsideVertical).LineStyle = xlNone
    Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
    Selection.Interior.ColorIndex = xlNone
    Cells.Select
    Cells.EntireColumn.AutoFit
    Cells.EntireRow.AutoFit
    Range("A1").Select
End sub
----------------------------------------------------------------------------
-
Private Sub Comando48_Click()
    Dim ex As Object
    Set ex = CreateObject("excel.application")
    RipartizioneSpeseEsporta
    formatta
End Sub


title: Formattare da Access un foglio xls

author: Sergio MAZZA

text:
"Toni" <
To...@libero.it
> ha scritto nel messaggio
news:p1Bma.36358$DT4.1...@twister1.libero.it...

Devi impostare a nothing le variabili oggetto; in questo caso "ex".
Quindi dopo la chiamata alla sub "formatta" inserisci:
Set ex = nothing
Ciao.
--
Sergio MAZZA


title: Formattare da Access un foglio xls

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:b7eu1r$c1h$1...@canarie.caspur.it...
> "Toni" <
To...@libero.it
> ha scritto nel messaggio
> news:p1Bma.36358$DT4.1...@twister1.libero.it...
> Devi impostare a nothing le variabili oggetto; in questo caso "ex".
> Quindi dopo la chiamata alla sub "formatta" inserisci:
> Set ex = nothing
>
> Ciao.
>
> --
> Sergio MAZZA
>
Ho provato ad inserire Set ex = nothing dopo la chiamata ma fa la stessa
cosa. La prima volta funziona, la seconda mi dice:
Errore di run-time '1004':
Metodo 'Rows' dell'oggetto '_Global' non riuscito
che chiaramente si riferisce alla sub formatta.
Ne sai qualcosa? sicuramente ho dimenticato una cazzata da qualche
parte!!!!!!!
grazie


title: Formattare da Access un foglio xls

author: Steve Huges


title: Formattare da Access un foglio xls

author: Maurizio Borrelli

text:
"Toni" <
To...@libero.it
> wrote in message
news:p1Bma.36358$DT4.1...@twister1.libero.it...
[...]
> Il mio problema era inviare i dati di una query su un foglio di excel e
> formattare le varie celle, tutto ciň premendo un pulsunte da un form di
> Access.
> Dopo varie prove aiutato dal NG, sono arrivato a questo risultato, perň
> funziona solo la prima volta che premo il pulsante, dopodichč per rifarlo
> funzionare, devo chiudere il database e riaprirlo. Mi potete dire cosa non
> va?
    Dovresti studiare gli esempi di automazione excel presenti sul sito
comune. E approfondire cio' che e' scritto nella guida a proposito di
CreateObject e GetObject.
    La questione, vedi anche cio' che ti scrive Sergio MAZZA, sta nel fatto
che non usi correttamente gli oggetti di automazione. Oltre a non
distruggere gli oggetti con Nothing, nemmeno li crei. Osserva la struttura
di questo esempio:
        Private Sub Esempio()
            Dim objXlApp As Excel.Application
            Dim objXlWbk As Excel.Workbook
            Dim objXlWsh As Excel.Worksheet
            Set objXlApp = New Excel.Application
            Set objXlWbk = objXlApp.Workbooks.Add
            Set objXlWsh = objXlWbk.Worksheets.Item("Foglio1")
            With objXlWsh
                ' fai quel che vuoi
            End With
            objXlWbk.SaveAs "NomeDelFile"
            objXlApp.Quit
            Set objXlWsh = Nothing
            Set objXlWbk = Nothing
            Set objXlApp = Nothing
        End Sub
    Nel tuo codice invece l'oggetto "ex" e' creato localmente in una
procedura, quindi all'uscita da questa non potrai piu' riferirti ad esso, ma
dato che non chiudi Excel in quella procedura la variabile non ha piu' scopo
ma excel resta ancora aperto e lo sara' anche all'uscita da access
probabilmente. Poi pero' usi l'excel cosi' aperto senza fare riferimento a
nulla in particolare: scrivi:
        Selection
        Rows
        Cells
ma senza precisare a chi appartengono tali oggetti. Pensa che se Access
possedesse degli oggetti con quel nome il tuo codice farebbe riferimento a
quelli di Access e non a quelli di Excel. Cosa che puo' facilmente capitare
se in una procedura Access usi sia Word che Excel, che hanno oggetti con lo
stesso nome: Selection, Range, ...
    Dovresti scrivere, per esempio:
        objXlApp.Selection
in modo che sicuramente il tuo codice si riferira' a proprieta' e metodi di
quel preciso oggetto.
    Quindi dichiara a livello di modulo le variabili che dovrai usare anche
in altre procedure. E usale, senza affidare al compilatore un compito che e'
invece tuo.
    Ma nel caso specifico del tuo codice, visto che Comando48_Click conduce
le danze, la cosa migliore sarebbe chiamare le procedure
"RipartizioneSpeseEsporta" e "formatta" passando come argomento l'oggetto
excel in uso:
        Private Sub Comando48_Click()
            Const c_strNomeCartellaExcel As String _
              = "C:\Documents and Settings\administrator" _
              & "\Desktop\spese.xls"
            Dim objXlApp As Object
            Dim objXlWbk As Object
            If ( _
              RipartizioneSpeseEsporta(c_strNomeCartellaExcel) _
            ) Then
              Set objXlApp = CreateObject("excel.application")
              Set objXlWbk _
                = objXlApp.Workbooks.Open(c_strNomeCartellaExcel)
              If (formatta(objXlWbk)=True) Then
                objXlWbk.Save
              Else
                objXlWbk.Saved=True
              End If
              objXlApp.Quit
              Set objXlWbk=Nothing
              Set objXlApp=Nothing
            End If
        End Sub
        Function RipartizioneSpeseEsporta( _
          ByVal NomeCartella As String _
        ) As Boolean
            Me.Application.DoCmd ...
            RipartizioneSpeseEsporta=True
            ' In caso di errore: RipartizioneSpeseEsporta=False
        End Function
        Function Formatta(Byval o As object) As Boolean
            On error ...
            With o
                .Application.Selection ...
                .Range ...
            End With
            Formatta=True
            Exit Function
        ' Gestione errori
           Formatta=False
        End Sub
> Function RipartizioneSpeseEsporta()
> On Error GoTo RipartizioneSpeseEsporta_Err
>     DoCmd.OutputTo acQuery, "04 Ripartizioni spese",
"MicrosoftExcel(*.xls)_
>     ", "C:\Documents and Settings\administrator\Desktop\spese.xls", True,
""
[...]
> End Function
> Sub formatta()
>     Rows("1:1").Select
>     With Selection
[...]
> End sub
> Private Sub Comando48_Click()
>     Dim ex As Object
>     Set ex = CreateObject("excel.application")
>     RipartizioneSpeseEsporta
>     formatta
> End Sub
    ... piu' o meno.
--
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------


title: Formattare da Access un foglio xls

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:WdHma.40658$%p6.25...@news.edisontel.com...
>     Dovresti studiare gli esempi di automazione excel presenti sul sito
> comune. E approfondire cio' che e' scritto nella guida a proposito di
> CreateObject e GetObject.
>
Lo sapevo che avevo fatto una cazzata!!!! Ti ringrazio e ora mi metto a
studiare!!!!!!


title: Formattare da Access un foglio xls

text:
"Steve Huges" <
hu...@email.it
> ha scritto nel messaggio
news:yIDma.13660$LB6.3...@news1.tin.it...
Certo che tu c'hai sempre la FAVA in mano o in bocca eh?
Antonio


title: Formattare da Access un foglio xls

text:
"Toni" <
To...@libero.it
> ha scritto nel messaggio
news:ovDma.36933$DT4.1...@twister1.libero.it...
>
> Ho provato ad inserire Set ex = nothing dopo la chiamata ma fa la stessa
> cosa. La prima volta funziona, la seconda mi dice:
> Errore di run-time '1004':
> Metodo 'Rows' dell'oggetto '_Global' non riuscito
>
> che chiaramente si riferisce alla sub formatta.
> Ne sai qualcosa? sicuramente ho dimenticato una cazzata da qualche
> parte!!!!!!!
> grazie
>
oltre al suggerimento di Maurizio Borrelli, considera anche il fatto di non
dividere le istruzioni che formattano dalla creazione/distruzione degli
oggetti. Lasciali tutti nella stessa sub o function, gestisci meglio un
eventuale errore (on error goto)...
Ciao.
--
Sergio MAZZA


title: [1/2 OT] Origini dati multiple per stampa unione di Word

author: Pelo

text:
Salve a tutti.
E' possibile utilizzare due database distinti di access come origine dati
per la stampa unione di word?
Mi spiego meglio: i campi del modello di word della stampa unione dovrebbero
essere riempiti con dati provenienti da due database distinti.
Si puň fare?
Se sě, come? L'help non mi ha aiutato...
Grazie mille
Pelo


text:
"Pelo" <
IONOi...@tin.it
> ha scritto nel messaggio
news:357avcF...@individual.net...

Dal db A colleghi le tabelle di quello B e
fai il campo unione da lě
MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:zKuHd.5384$fq5....@news.edisontel.com...
> Dal db A colleghi le tabelle di quello B e
> fai il campo unione da lì
praticamente nel database B creo una tabella "fittizia" che contiene tutti i
campi del database A e B che mi servono.
Ho capito giusto?
Grazie e scusate, ma sono niubbo....
Ciao
Pelo


text:
>> Dal db A colleghi le tabelle di quello B e
>> fai il campo unione da lì
>
> praticamente nel database B creo una tabella "fittizia" che contiene tutti
> i
> campi del database A e B che mi servono.
> Ho capito giusto?
> Grazie e scusate, ma sono niubbo....
> Ciao
> Pelo
>
No, dal db A
File
Carica dagli esterni
collega tabelle
e hai le tabelle del db B
MAssimiliano


title: (OT) Creazione PDF con Adobe Acrobat - licenze

author: Master

text:
Buongiorno a tutti,
avendo la necessità di creare saltuariamente dei PDF, ho provato,
tempo fa, a cercare nei thread di questo newsgroup una soluzione free,
ed ho provato ad installare il software PDF995.
In seguito, ho cambiato quest'ultimo con CutePDF, una stampante
virtuale come il primo, ma che, a differenza di questo, non fa partire
il browser con link pubblicitari.
La ricerca di una soluzione free, in effetti, era dettata proprio
dalla sporadicità con la quale creavo dei file PDF: l'acquisto di un
software "professionale", in fondo, non era necessario.
Ora, però, vorrei avere a disposizione un prodotto "programmabile":
vorrei creare, infatti, una procedura da inserire in un FE di Access
per inviare via email ad una serie di destinatari degli allegati PDF
creati da report di Access stesso o da fogli elettronici di Excel.
Penso, quindi, che Adobe Acrobat 5.0 sia diventata una necessità:
vorrei avere un vostro consiglio sulla fattibilità di questo e se,
effettivamente, sia il ripiego migliore.
Inoltre, proprio perché voglio inserire la funzione riportata sopra
nel codice di un FE le cui copie sono state distribuite agli utenti di
una rete, vorrei sapere, da chi ha già utilizzato Acrobat, se è
necessario installarlo in tutti i posti di lavoro che la utilizzano, o
se, invece, è possibile condividere la stampante virtuale, comprando,
di fatto, una sola licenza.
Grazie a tutti per l'attenzione.
Denis


author: Paolo opg

text:
costa...@inwind.it
 (Master) wrote in news:9c2f74f8.0309050014.7f1b4f16
@
posting.google.com
:
[cut]
>
> Penso, quindi, che Adobe Acrobat 5.0 sia diventata una necessità:
> vorrei avere un vostro consiglio sulla fattibilità di questo e se,
> effettivamente, sia il ripiego migliore.
>
[cut]
prova un pò ghostscript + redmon.
trovi tutte le info e i programmi qui:
http://www.cs.wisc.edu/~ghost/
ti viene creata una stampante fittizia (come con acrobat) che crea anche
files pdf.
io uso il driver della "Apple Color LW 12/660 PS" su win2k e riesco a
ottenere pdf a colori con risultati più che accettabili, per documenti da
ufficio.
per sapere se è scriptabile o meno, devi fare qualche prova...
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------


author: Jonathan Canova

text:
"Master" <
costa...@inwind.it
> ha scritto nel messaggio
news:9c2f74f8.03090...@posting.google.com...
> Buongiorno a tutti,
> Ora, però, vorrei avere a disposizione un prodotto "programmabile":
> vorrei creare, infatti, una procedura da inserire in un FE di Access
Guarda
www.win2pdf.it
Per la programmazione (in inglese) vai su
http://www.daneprairie.com/doc/
 e
scegli "Developer Information".
--
Jonathan Canova
www.aladinoinformatica.com


text:
Paolo opg <
w...@ne.com
> wrote in message news:<
Xns93ED7C28C...@151.99.250.3
>...


Ti ringrazio per la dritta, adesso provo a vedere se è "scriptabile".
Ciao, Denis.


text:
costa...@inwind.it
 (Master) wrote in
news:9c2f74f8.03090...@posting.google.com
:
>
>
> Ti ringrazio per la dritta, adesso provo a vedere se è "scriptabile".
>
ovvio che se riesci a fare qualcosa, un cenno è gradito.
al momento non mi serve, ma non si sa mai...
:-)
e poi, magari si può metterlo sul sitocomune...



text:
"Jonathan Canova" <
gio...@galactica.it
> wrote in message news:<wq%5b.26838$
R32.8...@news2.tin.it
>...
> "Master" <
costa...@inwind.it
> ha scritto nel messaggio
> news:9c2f74f8.03090...@posting.google.com...
> > Buongiorno a tutti,
> > Ora, però, vorrei avere a disposizione un prodotto "programmabile":
> > vorrei creare, infatti, una procedura da inserire in un FE di Access
>
>
> Guarda
www.win2pdf.it
> Per la programmazione (in inglese) vai su
http://www.daneprairie.com/doc/
 e
> scegli "Developer Information".
Ti ringrazio, ma purtroppo Win2Pdf funziona solo con Windows XP ed NT,
mentre io ho bisogno che funzioni anche su sistemi Win 9x/ME.
Ciao, Denis.


text:
costa...@inwind.it
 (Master) wrote in message news:<
9c2f74f8.03090...@posting.google.com
>...

Non ti preoccupare, non manchero' di farlo, nel caso.
Grazie ancora, Denis.


title: RunTime2007

author: Roberto da Parma

text:
Ciao a tutti, qualcuno ha provato se un'applicazione fatta con AC2000,
AC2003 funziona con il RunTime2007?
--
Roberto da Parma


title: RunTime2007

author: IgnazioC

text:
Roberto da Parma ha pensato forte :
> Ciao a tutti, qualcuno ha provato se un'applicazione fatta con AC2000, AC2003
> funziona con il RunTime2007?
esperienza personale:
ho realizzato un programma in a2k3 e funziona bene con il
runtime..bisognerebbe però verificare se ci sono delle funzionalità che
non ci sono...cmq se ti può essere d'aiuto avevo installato access 2003
su un portatile con vista premium non era per niente stabile, cmq
volevo provare ad installare il runtime 2007..risultato...acess 2003
non mi parte più.
--
ignazioc


title: RunTime2007

author: MA

text:
Roberto da Parma wrote:
> Ciao a tutti, qualcuno ha provato se un'applicazione fatta con AC2000,
> AC2003 funziona con il RunTime2007?
sì, è tranquillo
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: RunTime2007

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fij910$9c5$1...@tdi.cu.mi.it...


Grasssie....
--
Roberto da Parma


title: Qualquno ha scoperto come usare le GIF animate in access?

author: Bruno - S95

text:
Ciao,
    Se sai come usare le gif animate in Access 2000, per cortesia puoi
spiegarmi come diavolo si fa. Mille grazie
Bruno


author: ALESSANDRO Baraldi

text:
"Bruno - S95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:ZFUYd.650537$b5.29...@news3.tin.it...

Vai in Google ---> Gruppi e digita:
[Access GIF Animate]
Trovi qualche terabyte di risposte.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Collegamento ipertestuale

author: XXXXXXX

text:
Un Saluto
E' possibile aprire un file in un archivio zippato da un collegamento
ipertestuale ?
esempio c:\archivio.zip\miofile.doc
Grazie
Ciao


title: Collegamento ipertestuale

text:

Ti crei un pulsante
Me.BtnTuoPulsante.Hyprlinkaddress C:\....
--
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: Impossibile modificare il record. Nella tabella "xxx" è necessario un record correlato.

text:
Ciao a tutti.
Ho impostato una sottomaschera su una query composta da diverse tabelle
compresa quella dei Fornitori. Nella sottomaschera non ho messo riferimenti
alla tabella fornitori in quanto ho l'IDFornitore nella maschera che
contiene la sottomaschera. Quando cerco di aggiungere o modificare record
esce il messaggio in oggetto.
Da cosa dipende?
Grazie
Ciao
Stefano


text:

dalle relazioni 1 a molti con integrità referenziale che hai impostato
--
--
Massimiliano Amendola
www.accessgoup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:egfs10$hq2$1...@area.cu.mi.it...

Ottimo! Grazie.
In effetti avevo un pò una ragnatela.
Ovviamente a questo punto posso confermare di non aver capito bene neanche
le relazioni. Bene. A volte è molto frustrante fare l'autodidatta. Continui
ad andare per tentativi e tante volte non arrivi a niente. Adesso ad esempio
sto facendo un migliaio di tentativi per stampare un cavolo di report che
abbia un pò di classe ma sembra che access si sia accorto chi ha davanti e
che si stia divertendo un mondo a vedermi sbattere la testa sul monitor e
prendere a calci il pc (forse è per quello che non funzionano i report?).
Vabbè! Scusate lo sfogo.
Per fortuna c'è l'NG!
Grazie mille
Ciao


title: settaggio stampante

author: Giuseppe

text:
Salve a tutto il NG.
Ho questo problema.
Nei miei report utilizzo spesso la funzione sotto riportata per la
stampa di un rettangolo per ogni pagina del report.
Private Sub Report_Page()
   Me.Line (0, 0)-(Me.ScaleWidth, Me.ScaleHeight - 5), , B
End Sub
Il problema è che se stampo sulla Fotocopiatrice Panasonic collegata
in rete col mio pc, la stampa è tutta ok.
Se stampavo sulla HP LaserJet 4 non mi stampava la linea verticale dx.
Ora ho cambiato quest'ultima stampante con una HP LaserJet 2100TN e
non mi stampa sempre la linea dx verticale e sia la linea orrizzontale
inferiore.
Ovvio che ho provato a modificare i margini della pagina senza
ottenere risultati. Da cosa dipende e come devo settare le
impostazioni della stampante?
Ciao e grazie.


title: problema references

text:
PROBLEMA:
Io ho un database A.mdb che tra le references ha un'altro database
B.mdb.Il

mio path di sviluppo è C:\svilippo. Se rinomino la cartella in c:\prova ed
eseguo il database a.mdb, questo mi da errore e mi dice che non riese a
trovare b.mdb. Come posso fare in modo che anche se cambio path mi trovi
sempre il database b.mdb
Ciao e grazie


title: problema references

author: Alessandro Baraldi

text:
news.edisontel.com
 ha scritto:

Verifica che la referenza non sia Corrotta(IsBroken) ed eventualmente
ripristinala
Ti passo qualcosa che devi ovviamente implementare:
Property IsBroken As Boolean
    sola lettura
    Membro di Access.Reference
Function AddFromFile(FileName As String) As Reference
    Membro di Access.References
If References("nomeriferimento").IsBroken=True then
   References.AddFromFile NuovaPath
End if
Ciao
@Alex


title: problema references

author: Roberto dal portatile

text:
"
news.edisontel.com
" <
in...@studioarchimede.it
> ha scritto nel messaggio
news:UvNmg.26331$6e2....@news.edisontel.com...

Credo che da VBA non sia possibile reimpostare i riferimenti di un database.
Credo che, la prima volta che apri a.mdb dopo aver ambiato il nome della
cartella di sviluppo, sia necessario che tu reimposti manualmente i
riferimenti di A,mdb relativi a B.mdb.
Non ti nascondo perè che mi piacerebbe essere smentito.
>
> Ciao e grazie
Prego
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: problema references

text:
Roberto dal portatile ha scritto:
[CUT]
> Credo che da VBA non sia possibile reimpostare i riferimenti di un database.
> Credo che, la prima volta che apri a.mdb dopo aver ambiato il nome della
> cartella di sviluppo, sia necessario che tu reimposti manualmente i
> riferimenti di A,mdb relativi a B.mdb.
> Non ti nascondo perè che mi piacerebbe essere smentito.
>
> >
> > Ciao e grazie
>
> Prego
>
> --
> Roberto
Smentito.
;-)
Leggi il mio post
Ciao Roberto
@Alex


title: problema references

author: Marco Pizzamiglio

text:
Roberto dal portatile ha scritto:
> "
news.edisontel.com
" <
in...@studioarchimede.it
> ha scritto nel messaggio
> news:UvNmg.26331$6e2....@news.edisontel.com...
> > PROBLEMA:
> >
> > Io ho un database A.mdb che tra le references ha un'altro database
> >
B.mdb.Il
 mio path di sviluppo è C:svilippo. Se rinomino la cartella in
> > c:prova ed eseguo il database a.mdb, questo mi da errore e mi dice che
> > non riese a trovare b.mdb. Come posso fare in modo che anche se cambio
> > path mi trovi sempre il database b.mdb
> Credo che da VBA non sia possibile reimpostare i riferimenti di un database.
> Credo che, la prima volta che apri a.mdb dopo aver ambiato il nome della
> cartella di sviluppo, sia necessario che tu reimposti manualmente i
> riferimenti di A,mdb relativi a B.mdb.
> Non ti nascondo perè che mi piacerebbe essere smentito.
Negli .mde non si può fare, negli .mdb si.
Se ne era parlato anche in un altro post tempo fa.
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


title: Prova. Non Leggere

author: Micio

text:
Marco ha scritto nel messaggio <87f367$mmh$
2...@lacerta.tiscalinet.it
>...
>aaaa
bbbb
oddio... ho letto!!!
... e adesso???
Micio


title: Prova. Non Leggere

author: Marco

text:
>bbbb
>
>oddio... ho letto!!!
>... e adesso???
>Micio
>
cccc
Gentilmente ti rispondo.
Ciao
Marco


title: Prova. Non Leggere

author: Luciano

text:
Micio <...@...> ha scritto nel messaggio <87f42q$aqi$
1...@nslave2.tin.it
>...
>oddio... ho letto!!!
>... e adesso???
E mo' so' cazzi tua!:-)))
Saluti.
Luciano


title: Modificare filtro maschera?

author: Nike

text:
E' possibile modificare il filtro di una mashera da un altra maschera??
Garzie


title: Modificare filtro maschera?

author: Alessandro Cara

text:
Nike wrote:
>
> E' possibile modificare il filtro di una mashera da un altra maschera??
> Garzie
si.
Forms!Altramaschera.Filter = ilfiltrochevuoi
--
a.cara
Togli qualcosa dall'email


title: Modificare filtro maschera?

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E4FC496...@blunet.it...

stò provando, ma continuo a ricevere l'errore, "inpossibile trovre la
maschera 'x' a cui si fa riferimento in una marco o in un espressione visual
basic"...
mi sai aiutare??
grazie!


title: Modificare filtro maschera?

author: Sib

text:
"Nike" <
none...@tiscali.it
> ha scritto nel messaggio
> "Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
> > Nike wrote:
> > >
> > > E' possibile modificare il filtro di una mashera da un altra
maschera??
> > > Garzie
> >
> > si.
> >
> > Forms!Altramaschera.Filter = ilfiltrochevuoi
> > --
> > a.cara
> > Togli qualcosa dall'email
>
> stņ provando, ma continuo a ricevere l'errore, "inpossibile trovre la
> maschera 'x' a cui si fa riferimento in una marco o in un espressione
visual
> basic"...
Sei sicuro di non sbagliare il nome della maschera?
Sib


title: Modificare filtro maschera?

author: nike

text:
Sib wrote:
> "Nike" <
none...@tiscali.it
> ha scritto nel messaggio
> > "Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
> > > Nike wrote:
> > > >
> > > > E' possibile modificare il filtro di una mashera da un altra
> maschera??
> > > > Garzie
> > >
> > > si.
> > >
> > > Forms!Altramaschera.Filter = ilfiltrochevuoi
> > > --
> > > a.cara
> > > Togli qualcosa dall'email
> >
> > stň provando, ma continuo a ricevere l'errore, "inpossibile trovre la
> > maschera 'x' a cui si fa riferimento in una marco o in un espressione
> visual
> > basic"...
> Sei sicuro di non sbagliare il nome della maschera?
> Sib
be sě, il nome della maschera č corretto.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Modificare filtro maschera?

text:
"nike" <
nes...@tiscali.it
> ha scritto nel messaggio
> Sib wrote:
> > "Nike" <
none...@tiscali.it
> ha scritto nel messaggio
cut
> > Sei sicuro di non sbagliare il nome della maschera?
>
> > Sib
>
> be sě, il nome della maschera č corretto.
Ma sei anche sicuro che la maschera sia aperta?
Sib


title: creazione tabella clienti

author: peppino

text:
Salve a tutti. Ho un problema che stranamente in un file funziona
benissimo in un altro no.
Il problema è il seguente:
Ho una tabella tblAnagraficaGenerale campi IDAnagrafica (Indice),
CodiceAnagrafica, RagioneSociale ecc....
Ho creato una tabella "tblClienti" con i campi IDCliente (Indice),
IDAnagrafica e CodiceCliente.
Ho creato una query "qryClienti" così composta:
SELECT tblClienti.IDCliente, tblClienti.CodiceCliente,
tblClienti.IDAnagrafica AS tblClienti_IDAnagrafica,
tblAnagraficaGenerale.IDAnagrafica AS
tblAnagraficaGenerale_IDAnagrafica, tblAnagraficaGenerale.TipoCliente,
tblAnagraficaGenerale.RagioneSociale, ecc..      FROM
tblAnagraficaGenerale INNER JOIN tblClienti ON
tblAnagraficaGenerale.IDAnagrafica = tblClienti.IDAnagrafica;
Se immetto un nuovo cliente dalla query, appena inserisco nel campo
IDAnagrafica della tabella tblAnagraficaGenerale, tutti gli altri
campi vengono aggiornati.
Se invece, inserisco un nuovo cliente attraverso la maschera con
origine qryClienti, quando seleziono dalla combo
tblClienti_IDAnagrafica (origine tblAnagraficaGenerale campi
IDAnagrafica e RagioneSociale), mi dà il seguente messaggio:
Il campo corrente deve corrispondere alla chiave di join
tblAnagraficaGenerale_IDAnagrafica nella tabella del lato 'uno' della
relazione uno-a-molti. Immettere un record nella tabella del lato
'uno' con il valore della chiave desiderato, quindi creare la voce di
join desiderata nella tabella.
Cosa c'è che non va, sono due giorni che non riesco a risolvere questo
problema. Grazie.


title: Report Con LinkCriteria Riferito a DATA (Non ho avuto Risposta)

author: Franchi Flavio S.r.l.

text:
Devo Togliere --> forms![MiaMaschera]
Facciamo un esempio:
Se [ID Ordine] è numerico:
LinkCriteria = LinkCriteria+ " And ([ID Ordine]=forms![MiaMaschera]![ID
Ordine]"
Senza forms![MiaMaschera]-> LinkCriteria = LinkCriteria+ " And [ID Ordine]="
& [ID Ordine]
Se [ID Cliente] è un testo:
LinkCriteria = LinkCriteria+ " And ([ID Cliente]=forms![MiaMaschera]![ID
Cliente]"
Senza forms![MiaMaschera]-> LinkCriteria = LinkCriteria+ " And [ID
Cliente]='" & [ID Cliente] & "'"
Se [Data Ordine]  e [Startdata] e [Enddata] è formato DATA
LinkCriteria = LinkCriteria+ " And ([Data Ordine] Between
forms![MiaMaschera]![Startdata] And forms![MiaMaschera]![Enddata])"
SOLUZIONE?
Grazie
Ciao
Graziano
--
Distinti Saluti,
Best Regards,
Franchi Flavio S.r.l.
Graziano Franchi
----------------------------------------------------------------
Franchi Flavio S.r.l. Attrezzature a Rulli
Via Origgio 112 Caronno P.lla 21042 ITALIA
Tel.:
+39-02-9650402
Fax.:
+39-02-96451235
Mob.:
+39-335-8087247
E-Mail: mailto:
franchi....@tiscali.it
Web:
www.franchiflavio.it
Skype:franchi.flaviosrl
http://www.google.com/maps?q=45.5961+9.03465
RISERVATEZZA/CONFIDENTIALITY
In ottemperanza al Decreto Legislativo n. 196 del 30 giugno 2003, "Codice in
materia di Protezione dei dati personali", le informazioni contenute in
questo messaggio sono strettamente riservate e sono esclusivamente
indirizzate al destinatario indicato (oppure alla persona responsabile di
rimetterlo al destinatario), tenendo presente che qualsiasi uso,
riproduzione o divulgazione di questo messaggio è vietata. Nel caso in cui
aveste ricevuto questo mail per errore, vogliate avvertire il mittente al
più presto a mezzo posta elettronica e distruggere il presente messaggio.
Accordingly to Italian Decree N. 196/2003 Concerning Privacy, If You Are Not
The Adressee (or responsible for delivery of the message to such person) You
are here by notified that any disclosure, reproduction, distribution or
other dissemination or use of this communication is strictly prohibited. If
you have received this message in error, You Should Destroy It And Please
Notify Us Immediatly By Email.


author: Karl Donaubauer

text:
Franchi Flavio S.r.l. wrote:
> Devo Togliere --> forms![MiaMaschera]
>
> Facciamo un esempio:
>
> Se [ID Ordine] è numerico:
> LinkCriteria = LinkCriteria+ " And ([ID
> Ordine]=forms![MiaMaschera]![ID Ordine]"
> Senza forms![MiaMaschera]-> LinkCriteria = LinkCriteria+ " And [ID
> Ordine]=" & [ID Ordine]
>
> Se [ID Cliente] è un testo:
> LinkCriteria = LinkCriteria+ " And ([ID
> Cliente]=forms![MiaMaschera]![ID Cliente]"
> Senza forms![MiaMaschera]-> LinkCriteria = LinkCriteria+ " And [ID
> Cliente]='" & [ID Cliente] & "'"
>
> Se [Data Ordine]  e [Startdata] e [Enddata] è formato DATA
> LinkCriteria = LinkCriteria+ " And ([Data Ordine] Between
> forms![MiaMaschera]![Startdata] And forms![MiaMaschera]![Enddata])"
> SOLUZIONE?
p.e.
LinkCriteria = LinkCriteria & " And [Data Ordine] Between " & _
clng(forms![MiaMaschera]![Startdata]) & " And " &
clng(forms![MiaMaschera]![Enddata])
Vedi anche:
 Passare una data ad una stringa SQL

http://www.donkarl.com/it?FAQ6.8
In genere usa & invece di + per concatenare le stringhe.
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
1000 Grazie NUMBER ONE
Naturalmente FUNZIONA
Saluti
Graziano


title: (OT)matrici

author: Marco Benini

text:
Avendo una matrice di tot. elementi
Dim arr(#) as Integer
come faccio ad assegnare ad un'altra variabile la somma di tutti gli
elementi?
Grazie per la vostra pazienza.
Ciao.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: (OT)matrici

author: Antonio Biso

text:
"Marco Benini" <
mar...@libero.it
> ha scritto nel messaggio
news:843f3c9e52dbce7380...@mygate.mailgate.org...
> Avendo una matrice di tot. elementi
> Dim arr(#) as Integer
> come faccio ad assegnare ad un'altra variabile la somma di tutti gli
> elementi?
for i = 1 to #
  x = x + arr(i)
next
Buttata là...
Antonio


title: arrotondamento access

text:
"giuseppe" <
giusepp...@yahoo.it
> ha scritto nel messaggio
news:b6tufm$vtn$1...@news.newsland.it...
> non mi riesce l'arrotondamento in campi espressione di access. Per capirsi
> tipo la normale funzione arrotonda in execel.
> Se qualcuno ha la dritta.
Se ti serve per l'euro cerca la funzione fctround sul sito comune
Antonio


title: arrotondamento access

author: giuseppe

text:
non mi riesce l'arrotondamento in campi espressione di access. Per capirsi
tipo la normale funzione arrotonda in execel.
Se qualcuno ha la dritta.
Grazie
Giuseppe
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Tasti funzione.

author: Linea

text:
Per favore, qualcuno mi spiega perchè non riesco ad assegnare dei tasti ad
operazioni che faccio di ruotine, per
esempio, vorrei che il tasto F4 mi faccia andare indietro al record
precedente in una maschera chiamata "Articoli".
Se faccio una macro il tasto F4 mi funziona su tutte le maschere presenti
nel mio DB, io vorrei che mi funzionasse solo
nella maschera o nel campo che io desidero.
Il codice che uso (ma non funziona) è questo
Private Function AutoKeys__F4_()
On Error GoTo AutoKeys__F4__Err
    DoCmd.GoToRecord , [Forms]![Articoli], acPrevious
AutoKeys__F4__Exit:
    Exit Function
AutoKeys__F4__Err:
    msgbox Error$
    Resume AutoKeys__F4__Exit
End Function
Spero in una risposta veloce e comunque, grazie!
Lino


title: Tasti funzione.

author: Carlo Costarella

text:
"Linea" <
mcl...@libero.it
> ha scritto nel messaggio
news:roqNf.15149$A83.4...@twister1.libero.it...
> Per favore, qualcuno mi spiega perchč non riesco ad assegnare dei tasti ad
> operazioni che faccio di ruotine, per
> esempio, vorrei che il tasto F4 mi faccia andare indietro al record
> precedente in una maschera chiamata "Articoli".
> Se faccio una macro il tasto F4 mi funziona su tutte le maschere presenti
> nel mio DB, io vorrei che mi funzionasse solo
> nella maschera o nel campo che io desidero.
> Il codice che uso (ma non funziona) č questo
>
> Private Function AutoKeys__F4_()
> On Error GoTo AutoKeys__F4__Err
>
>    DoCmd.GoToRecord , [Forms]![Articoli], acPrevious
>
> AutoKeys__F4__Exit:
>    Exit Function
>
> AutoKeys__F4__Err:
>    msgbox Error$
>    Resume AutoKeys__F4__Exit
>
> End Function
>
> Spero in una risposta veloce e comunque, grazie!
> Lino
...all'una di notte!!!!!!!!!!!!!!!!!!
Nel tuo caso mi sembra piů giusto utilizzare l'evento KeyDown per il
controllo.
Questo un esempio:
Private Sub Testo15_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 115 Then
MsgBox "hai premuto F4"
End If
End Sub
Ciao, Carlo


title: Tasti funzione.

text:
Ringrazio per la risposta:
il problema è che desidero che il tasto funzione o altro tasto funzionino
solo per quella determinata maschera.
Ciao, Lino


title: Tasti funzione.

author: Alessandro Baraldi

text:
"Linea" <
mcl...@libero.it
> wrote in message
news:HlJNf.15973$
PR2.3...@twister2.libero.it

'//	EVENTO KEYDOWN DI FORM
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

  Dim TastoShift As Integer, TastoAlt As Integer, TastoCtrl As Integer
  TastoShift = (Shift And acShiftMask) > 0
  TastoAlt = (Shift And acAltMask) > 0
  TastoCtrl = (Shift And acCtrlMask) > 0

  If TastoShift And TastoAlt And TastoCtrl Then
        MsgBox "SHIFT + ALT +CTRL"
  End If

  If TastoShift And TastoCtrl And KeyCode = vbKeyF10 Then
        MsgBox "SHIFT + CTRL + F10"
  End If

  If TastoCtrl And KeyCode = vbKeyY Then
        MsgBox "CTRL + Y"
  End If

End Sub
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Form chiamante una funzione:

author: M C

text:
Salve a tutti.
Ho risolto il problema riguardo i nomi dei Form chiamanti nel seguente modo.
Vorrei un parere di qualche esperto:
Situazione: Form A Chiama Form B
Il form A ha un bottone che apre il form B:
Private Sub PulsanteInserisci_Click()
DoCmd.OpenForm "InserimentoCliente", , , , , acDialog, Me.Name
End Sub
Il  form B ha un pulsante che visualizza il nome del form A
Private Sub PulsanteVisualizza_Click()
  MsgBox Me.OpenArgs
End Sub
Fatemi sapere, grazie


title: Form chiamante una funzione:

text:

Non è chiaro cos'è il problema o la domanda qui.
Usare OpenArgs per passare il nome della maschera chiamante
è un metodo abbastanza diffuso e normale.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Query x Stampa etichette

author: Fabietto

text:
Vorrei stampare le etichette per gli articoli caricati in magazzino.
Il problema sta nello stampare una etichetta per articolo in quantitativo
pari agli articoli disponibili in magazzino.
In pratica dovrei fare in modo che si crei una tabella o una query con tante
righe quanti sono gli articoli per ogni articolo...
Mi sa che e' una cosa che va fatta tramite codice... ne avete uno di esempio
?
...non lo digerisco ancora molto bene come avrete capito ;-)
Grazie
Fabio


title: Query x Stampa etichette

author: Sib dal portatile

text:
"Fabietto" <
fab...@supereva.it
> ha scritto nel messaggio
news:sJeG6.188048$lj4.5...@news6.giganews.com...
> Vorrei stampare le etichette per gli articoli caricati in magazzino.
>
> Il problema sta nello stampare una etichetta per articolo in quantitativo
> pari agli articoli disponibili in magazzino.
>
> In pratica dovrei fare in modo che si crei una tabella o una query con
tante
> righe quanti sono gli articoli per ogni articolo...
>
> Mi sa che e' una cosa che va fatta tramite codice... ne avete uno di
esempio
> ?
E' molto piu' facile di quanto pensi.
Si fa con i report. Sul sito comune c'e', come quasi sempre, un esempio.
Sib


title: Query x Stampa etichette

text:
> E' molto piu' facile di quanto pensi.
> Si fa con i report. Sul sito comune c'e', come quasi sempre, un esempio.
Se fossi una donna non so che ti farei per ringraziarti !!! ;-)
Grazissime davvero! Mi hai tolto un peso dallo stomaco!
Fabio


title: Query x Stampa etichette

text:
"Fabietto" <
fab...@supereva.it
> ha scritto nel messaggio
news:3qgG6.188189$lj4.5...@news6.giganews.com...
>
> > E' molto piu' facile di quanto pensi.
> > Si fa con i report. Sul sito comune c'e', come quasi sempre, un esempio.
>
> Se fossi una donna non so che ti farei per ringraziarti !!! ;-)
Per carita' non dire cosi' che senno' poi arriva qualcheduna che ci viene a
raccontare che non da il suo e-mail perche' qui siamo tutti maniaci.
Sib


title: Aiuto urgente con vba

author: Gabriele Preatoni

text:
Ho scritto questo codice, che funziona, in modo che alla pressione di
pulsante, il testo scritto in un campo memo [lettera] della maschera venga
inviato a word.
Seguendo alcuni esempi e riadattandoli ho usato la stampa-unione in modo da
creare un modello di documento word "demo.dot"che contenesse i campi
[cognome] e [indirizzo] sostituiti di volta in volta nel contenuto a seconda
dei dati del record in access.
Ho Inserito poi con .insertafter [lettera] il contenuto del campo memo nel
documento modello.
Il mio problema sono le formattazioni, nel senso che vorrei formattare tutto
il testo della lettera in giustificato, ma inserire invece "tutto a destra"
la formula di saluto con la denominazione aziendale.
Non riesco a separare le due cose e ci sto sbattendo da un po' la testa
senza soluzione.
Avevo pensato alla definizione di paragrafi, ma esendo il contenuto della
lettera variabile la cosa non è applicabile.
la soluzione + semplice sarebbe stata quella di immettere anche nel modello
un campo[lettera] da far sostituire alla routine, ma mi da un errore per:
"parametro di stringa troppo lunga" nella riga di codice: .execute....(in
blu) e non riesco a capire perchè.
Grazie per l'aiuto
Private Sub Comando177_Click()
    Dim dbLocale As DAO.Database
    Dim rstCodici As DAO.Recordset
    Dim strDocFinale As String
    Dim varCodici As Variant
    Dim docWord As Word.Document
    Dim rngCorrente As Word.Range
    'On Error GoTo errore_click
    Set dbLocale = CurrentDb()
    strDocFinale = "D:\demo.dot"
    Set appWord = New Word.Application
    Set docWord = appWord.Documents.Add(strDocFinale)
    appWord.Visible = True
    Set rngCorrente = docWord.Content
        With rngCorrente
            .InsertAfter [Lettera] & Chr(13) & Chr(13)
            .InsertAfter "Distinti saluti," & Chr(13) & "Latticini S.p.A" &
Chr(13) & "Servizio Acquisti" & Chr(13) & "Gestione Reclami"
            .Paragraphs.Alignment = wdAlignParagraphJustifyHi
        End With
    Set rstCodici = dbLocale.OpenRecordset("CodiciDaSostituire",
dbOpenSnapshot)
    Do While Not rstCodici.EOF
        varCodici = Eval(rstCodici!NomeCampo)
        varCodici = IIf(IsNull(varCodici), " ", CStr(varCodici))
        With docWord.Content.Find
            If rstCodici!CodiceDaSostituire = "[Cognome]" Then
                With .Replacement
                    .ClearFormatting
                    '.Font.Bold = True
                    .Font.AllCaps = True
                End With
            End If
            If rstCodici!CodiceDaSostituire = "[Indirizzo]" Then
                With .Replacement
                    .ClearFormatting
                    '.Font.Bold = True
                    .Font.AllCaps = True
                End With
            End If
            .Execute FindText:=rstCodici!CodiceDaSostituire,
ReplaceWith:=varCodici, Format:=True, Replace:=wdReplaceAll
        End With
        rstCodici.MoveNext
    Loop
    rstCodici.Close
    Exit Sub
'errore_click:
   ' Beep
   ' Exit Sub
End Sub


title: Aiuto urgente con vba

author: Sergio MAZZA

text:
"Gabriele Preatoni" <
gabriele...@inwind.it
> ha scritto nel messaggio
news:Owt3a.120993$ZE.33...@twister2.libero.it...

Prova a dividere in sezioni logiche la lettera. Ovvero, "ingabbia" il testo
in una tabella e imposta la formattazione di ogni cella. Altro metodo è
quello di definirti degli stili che applicherai al testo...
Ciao.
--
Sergio MAZZA


title: contatore formato testo

author: luigiOnofrio

text:
in una tabella ho un campo numero in formato testo
Nella maschera associata vi è un controllo del campo numero che con la
seguente formula si incrementa di 1 unità all'inserimento di nuovi record
=IIf(DCount("[numero]";"seduta di
giunta")=0;"0001";Format$(DMax("[numero]";"seduta di giunta")+1;"0000"))
vorrei però, non visualizzare e registrare gli zeri iniziali, ma agendo su
0000 e 0001 della formula non va bene,
dove sbaglio?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: contatore formato testo

author: MA

text:
"luigiOnofrio" <
onof...@tin.it
> ha scritto nel messaggio
news:cvkfol$ech$1...@news.newsland.it...
> in una tabella ho un campo numero in formato testo
> Nella maschera associata vi è un controllo del campo numero che con la
> seguente formula si incrementa di 1 unità all'inserimento di nuovi record
> =IIf(DCount("[numero]";"seduta di
> giunta")=0;"0001";Format$(DMax("[numero]";"seduta di giunta")+1;"0000"))
> vorrei però, non visualizzare e registrare gli zeri iniziali, ma agendo su
> 0000 e 0001 della formula non va bene,
> dove sbaglio?
>
metti il +1 fuori dall'istruzione format
MAssimiliano


title: contatore formato testo

text:
MA ha scritto:

come? cosi?
=IIf(DCount("[numero]";"seduta di
> > giunta")=0;"0001";Format$(DMax("[numero]";"seduta di giunta");"0000"))+1
in questo modo, mi va bene fino a 10 poi mi inserisce sempre 10 e non
incrementa più
non è che devo trasformare il campo in numerico anziche testo nella
tabella?



title: contatore formato testo

text:
"luigiOnofrio" <
onof...@tin.it
> ha scritto nel messaggio
news:cvkhaj$lq0$1...@news.newsland.it...
> MA ha scritto:
>
>> "luigiOnofrio" <
onof...@tin.it
> ha scritto nel messaggio
>> news:cvkfol$ech$1...@news.newsland.it...
>> > in una tabella ho un campo numero in formato testo
>> > Nella maschera associata vi è un controllo del campo numero che con la
>> > seguente formula si incrementa di 1 unità all'inserimento di nuovi
>> > record
>> > =IIf(DCount("[numero]";"seduta di
>> > giunta")=0;"0001";Format$(DMax("[numero]";"seduta di
>> > giunta")+1;"0000"))
>> > vorrei però, non visualizzare e registrare gli zeri iniziali, ma agendo
>> > su
>> > 0000 e 0001 della formula non va bene,
>> > dove sbaglio?
>> >
>> metti il +1 fuori dall'istruzione format
>> MAssimiliano
> come? cosi?
> =IIf(DCount("[numero]";"seduta di
>> > giunta")=0;"0001";Format$(DMax("[numero]";"seduta di
>> > giunta");"0000"))+1
>
> in questo modo, mi va bene fino a 10 poi mi inserisce sempre 10 e non
> incrementa più
> non è che devo trasformare il campo in numerico anziche testo nella
> tabella?
"0000")+1)
Cmq se non hai prefissi compsti effettivamente testo è inutile, ma non è il
motivo x cui non ti funzionava
MAssimiliano


title: contatore formato testo

text:
MA ha scritto:

strano!, trasformando il campo in numerico funziona, ma in formato testo
no anche utilizzando la formula come hai detto.



title: Incredibile

text:
Salve a tutti
secondo voi c'è una spiegazione logica a questo:
Ximporto As Double
Ximporto = Me!totale_cassa
dove Me!totale_cassa è = 899.661
dopo l'assegnazione
XIMPORTO diventa  14,808
Può dipendere dal fatto che Me!totale_cassa è un campo calcolato ?
Cosa ancora più strana se eseguo il codice con debug è tutto ok


title: Incredibile

author: miciomao

text: collegato via odbc ?


title: [Lunghetto] comportamento strano del DB su alcune macchine

text:
Un saluto a tutto il NG...
ho un db che gestisce gli ordini degli agenti localizzati su tutta la rete
nazionale, il db, dopo aver effettuato la scelta del cliente, permette di
visualizzare foto e generalità sui vari articoli di vendita.
Tra le varie generalità ci sono dati anagrafici e dati di magazzino trai
quali giacenze, impegnati ed eventuali arrivi in una sottomaschera;
in più ho posizionato su tale maschera un interruttore che mi permette di
vedere solo gli articoli che sono disponibili al momento saltando quelli che
non lo sono, in paricolare il codice di questo interruttore è:
'ordinabili è dato da giacenza-impegnato (già calcolato)
Private Sub Interruttore_Click()
If Me.Interruttore Then
Me.Filter = "[Ordinabili]>0"
Me.FilterOn = True
Else
Me.Filter = "[Ordinabili]>=0"
Me.FilterOn = True
End If
Me.Cartoni.SetFocus
End Sub
Per la visualizzazione degli arrivi e quindi il calcolo della quantità
ordinabile data x data di ogni singolo articolo ho prelevato dal sito comune
questo codice:
per quanto riguarda il codice che segue ho attivato i riferimenti DAO 3.6
come indicato sulle indicazioni del sitocomune:
Function CreaTotProgr(KeyName As String, KeyValue, NomeCampo As String)
Dim RS As DAO.Recordset
Dim Totale As Double
Totale = 0
On Error GoTo Err_CreaTotProgr
Set RS = CodeContextObject.RecordsetClone
' Cerca il record corrente.
Select Case RS.Fields(KeyName).Type
' Il tipo dati della chiave è Numerica?
    Case DB_INTEGER, DB_LONG, DB_CURRENCY, DB_SINGLE, _
    DB_DOUBLE, DB_BYTE
        RS.FindFirst "[" & KeyName & "] = " & KeyValue
' Il tipo dati della chiave è Data/ora?
    Case DB_DATE
        RS.FindFirst "[" & KeyName & "] = #" & Format(KeyValue,
"mm/dd/yyyy") & "#"
' Il tipo dati della chiave è Testo?
    Case DB_TEXT
        RS.FindFirst "[" & KeyName & "] = '" & KeyValue & "'"
    Case Else
        MsgBox "ERRORE: Tipo dati della chiave non valido!"
        Exit Function
End Select
Do Until RS.BOF
Totale = Totale + RS(NomeCampo)
RS.MovePrevious
Loop
Bye_CreaTotProgr:
         ' Restituisci il risultato.
         CreaTotProgr = Totale
         Exit Function
Err_CreaTotProgr:
         Totale = 0
         Resume Bye_CreaTotProgr
End Function
nella sottomaschera date di arrivo, calcolo quindi l'ordinabilità
dell'articolo data x data inserendo in una textbox non associata la seguente
stringa
=(Maschere!Campionario!InCasa-Maschere!Campionario!Impegnati)+CreaTotProgr("ID";[ID];"campo9")
dove campo9 è il nome del controllo non associato...
bene, sul mio pc e su molti altri funziona alla grande e sono rimasto
soddisfatto dal risultato ottenuto, ma....
su alcuni PC succede questo:
Aprendo il programma e lavorandoci così come vengono proposti gli articoli,
non c'è problema, nel momento in cui però si va ad attivare l'interruttore
che visualizza gli articoli disponibili, succede che la quantità ordinabile
sia al momento che sulle previste date di arrivo rimane fissa per tutti gli
articoli, disattivando l'interrutore tutti i campi calcolati dal modulo
riportato sopra visualizzano la voce #errore e anche altri campi con la data
di arrivo e la qtà in arrivo ed anche il campo ordinabili presenti sulla
maschera principale, questo costringe gli agenti a dover chiudere il
programma e riaprirlo...
è praticamente lo stesso errore che mi dava quando non avevo ancora attivato
i riferimenti DAO (che però in questo caso sono attivi)
Mi chiedo il motivo di questo strano comportamento su solo 2 pc su 25...
Ringrazio infinitamente chi potrà darmi risposte esaustive a questo mio
"dilemma"...
Nicola


author: Paolo

text:
N1COl4 wrote:
> Un saluto a tutto il NG...
> ho un db che gestisce gli ordini degli agenti localizzati su tutta la rete
...
> Mi chiedo il motivo di questo strano comportamento su solo 2 pc su 25...
>
> Ringrazio infinitamente chi potrà darmi risposte esaustive a questo mio
> "dilemma"...
Ciao Nicola
Non è facile risponderti è uno di quei problemi che va risolto a mio parere
con la tecnica 'ultima spiaggia'.
Metti una accanto all'altra una macchina che va e una che non va.
Ti fai una copia del sorgente e cominci a tagliare via.
Salvi una copia e tagli, procedi così fino a ridurre il programma ad un
piccolo frammento che in un caso ti da l'errore nell'altro no.
Continui a ridurre il codice .. alla fine ci arrivi.
Con questa tecnica scoprii un grave bug di di Access legato alle combobox
cinque o sei anni fa (ci volle una giornata).
Ciao


text:
"Paolo" <pa...@holzlBastaspam.it> ha scritto nel messaggio
news:bSA9g.9052$b5.1...@twister2.libero.it...
> N1COl4 wrote:
>
>> Un saluto a tutto il NG...
>> ho un db che gestisce gli ordini degli agenti localizzati su tutta la
>> rete
> ...
>> Mi chiedo il motivo di questo strano comportamento su solo 2 pc su 25...
>>
>> Ringrazio infinitamente chi potr darmi risposte esaustive a questo mio
>> "dilemma"...
>
> Ciao Nicola
> Non è facile risponderti è uno di quei problemi che va risolto a mio
> parere
> con la tecnica 'ultima spiaggia'.
> Metti una accanto all'altra una macchina che va e una che non va.
> Ti fai una copia del sorgente e cominci a tagliare via.
> Salvi una copia e tagli, procedi così fino a ridurre il programma ad un
> piccolo frammento che in un caso ti da l'errore nell'altro no.
> Continui a ridurre il codice .. alla fine ci arrivi.
>
> Con questa tecnica scoprii un grave bug di di Access legato alle combobox
> cinque o sei anni fa (ci volle una giornata).
Ho trovato il problema,
praticamente il db l'ho fatto con office xp (in modalità access2000) mentre
chi lo usa ha office2000, l'ho scoperto aggiornando un portatile con office
xp e uno con office 2003 (macchine su cui dava problemi) e ora funziona
tutto bene...
Ora però mi piacerebbe conoscere la causa di questo...
Nicola


title: developer edition

author: Paolo opg

text:
ho intenzione di acquistare una licenza di office con tutto quello che
serve per distribuire poi mdb con il runtime.
io sono rimasto ad a97 con la sua 'developer edition'.
adesso, come funziona il tutto?
ho cercato sul sito di office, ma non mi è molto chiaro cosa bisogna
comprare...
c'è ancora il pacchetto developer?
mi potete dare qualche info?
tia
    	paolo
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
| (fake address in reply-to field!)
+-------


title: developer edition

text:
"Paolo opg" <
w...@ne.com
> ha scritto nel messaggio
news:Xns94D793A87C234paoloopg@janick...
> ho intenzione di acquistare una licenza di
office con tutto quello che
> serve per distribuire poi mdb con il runtime.
>
> io sono rimasto ad a97 con la sua 'developer
edition'.
>
> adesso, come funziona il tutto?
> ho cercato sul sito di office, ma non mi è molto
chiaro cosa bisogna
> comprare...
> c'è ancora il pacchetto developer?
>
> mi potete dare qualche info?
>
> tia
>     paolo
Con O2003 non esiste + la dev edition.
Per la distribuzione del runtime devi usare Visual
Studio. okkio non gira su W98
MAssimiliano


title: developer edition

text:
"MA" <
mas...@massimilianoamendola.it
> wrote in news:eq8jc.699$%x6.273
@
news.edisontel.com
:
>
> Con O2003 non esiste + la dev edition.
> Per la distribuzione del runtime devi usare Visual
> Studio. okkio non gira su W98
> MAssimiliano
>
>
!!!
m'era venuto un accidente!
:-)
poi ho googlato un pò e ho trovato (forse) la risposta:
http://msdn.microsoft.com/vstudio/office/default.aspx
in pratica hanno cambiato il nome, ma la sostanza è quella.
ho capito bene?



title: developer edition

author: MC(BG)

text:
"Paolo opg" <
w...@ne.com
> ha scritto nel messaggio
news:Xns94D7AA21442D0paoloopg@janick...

Tra l'altro se usi un programma di file sharing, e-mule p.e. si trovano dei
file developer per access 2003, non so però se siano funzionanti o meno, non
ho mai provato a scaricarli. Prendi quindi con le pinze questa
comunicazione.


title: developer edition

text:
"Paolo opg" <
w...@ne.com
> ha scritto nel messaggio
news:Xns94D793A87C234paoloopg@janick...

Ciao,
sai darmi informazioni in merito alla versione developer edition da te
citata? Eventualmente un link al quale prendere visione, mi ha interessato
questo argomento.
Grazie,
MC


title: developer edition

text:
"MC(BG)" <
in...@dataeasy.org
> ha scritto nel
messaggio
news:c6j7vo$9hc$1...@lacerta.tiscalinet.it...

Un conto è avere il runtime, un altro è poterlo
utilizzare.
Se lo usi "pezzottato" installa direttamente
Access, sarebbe pirata uguale.
MAssimiliano


title: developer edition

text:
"MA" <
mas...@massimilianoamendola.it
> wrote in news:QD9jc.714$%x6.373
@
news.edisontel.com
:
>>
>> Tra l'altro se usi un programma di file sharing,
> e-mule p.e. si trovano dei
>> file developer per access 2003, non so però se
> siano funzionanti o meno, non
>> ho mai provato a scaricarli. Prendi quindi con
> le pinze questa
>> comunicazione.
>
> Un conto è avere il runtime, un altro è poterlo
> utilizzare.
> Se lo usi "pezzottato" installa direttamente
> Access, sarebbe pirata uguale.
> MAssimiliano
>
appunto.
io volevo essere in regola, visto che ogni tanto mi capita di dare in
giro qualche programmillo.
roba piccola, ma visto che c'è chi paga e che alcune sono aziende, tanto
vale mettersi in regola e correre un rischio in meno!



title: developer edition

author: ALESSANDRO Baraldi

text:
"Paolo opg" <
w...@ne.com
> ha scritto nel messaggio
news:Xns94D7B46F11C36paoloopg@janick...
[CUT]
>
> io volevo essere in regola, visto che ogni tanto mi capita di dare in
> giro qualche programmillo.
>
> roba piccola, ma visto che c'è chi paga e che alcune sono aziende, tanto
> vale mettersi in regola e correre un rischio in meno!
Non essere modesto lo sappiamo bene come lavori anche se ultimamente
snobbi molto questo NG.....!!
Vai sul 2002 è la versione più stabile e funzionale dopo 97, il 2003 forse
è ancora un tantino presto per affidabilità.
Ben risentito Paolo.
@Alex.


title: developer edition

author: S. Savoldi

text:
"Paolo opg"
> ho intenzione di acquistare una licenza di office con tutto quello che
> serve per distribuire poi mdb con il runtime.
> io sono rimasto ad a97 con la sua 'developer edition'.
>
> adesso, come funziona il tutto?
> ho cercato sul sito di office, ma non mi è molto chiaro cosa bisogna
> comprare...
> c'è ancora il pacchetto developer?
>
> mi potete dare qualche info?
In rapporto al 2003
http://www.microsoft.com/italy/msdn/vstudio/office/default.asp
http://www.microsoft.com/italy/msdn/vstudio/office/sviluppo.asp
Tuttavia, dato che Office 2003 gira solo sotto piattaforme XP e '2k è meglio
verificare se sia ancora in commercio la versione Developer XP.
Ciao: Silvio


title: developer edition

text:
"S. Savoldi" <
warp_k...@libero.it
> wrote in
news:O5fjc.24459$
Qc.9...@twister1.libero.it
:
>>
>> mi potete dare qualche info?
>
> In rapporto al 2003
>
>
http://www.microsoft.com/italy/msdn/vstudio/office/default.asp
>
>
http://www.microsoft.com/italy/msdn/vstudio/office/sviluppo.asp
>
> Tuttavia, dato che Office 2003 gira solo sotto piattaforme XP e '2k è
> meglio verificare se sia ancora in commercio la versione Developer XP.
>
magari...
ho provato a cercare, ma non ne ho trovate, almeno on line...
vale ancora il discorso della possibilità avere la licenza 2003 ma di
utilizzare una versione precedente?



title: query sorgente con parametri

author: Diego Lotti

text:
Ciao!
Qual'č il modo migliore per aprire una maschera basata su una query che
richiede parametri che vorrei impostare nella maschera stessa?
Mi spiego meglio, in una maschera ci sono 3 controlli non associati che
permettono di fare delle scelte e la query recordsource prende questi
valori per restituire solo i record desiderati.
Quando aggiorno i valori basta fare un requery e sono a posto, ma
all'apertura della query vorrei impostare tali valori nell'evento apertura
e fare in modo che la query mi presentasse subito i dati di default.
Invece me li presenta tutti.
L'ideale sarebbe aprire la maschera senza recordsource e assegnarlo
nell'evento apertura dopo aver impostato i parametri, ma in questo caso
tutti i controlli associati danno errore durante la compilazione perchč
non trova i campi origine.
Ovviamente per risolvere tutto basta fare un requery alla fine del codice
dell'evento apertura, ma in questo modo č come se aprissi due volte la
query e impiega piů tempo! (i record sono tanti)
Grazie delle info
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: query sorgente con parametri

author: Antonio Biso

text:
"Diego Lotti" <
diego...@iol.it
> ha scritto nel messaggio
news:b9td92$atr$1...@news.newsland.it...
> Ciao!
>
> Qual'è il modo migliore per aprire una maschera basata su una query che
> richiede parametri che vorrei impostare nella maschera stessa?
>
> Mi spiego meglio, in una maschera ci sono 3 controlli non associati che
> permettono di fare delle scelte e la query recordsource prende questi
> valori per restituire solo i record desiderati.
>
> Quando aggiorno i valori basta fare un requery e sono a posto, ma
> all'apertura della query vorrei impostare tali valori nell'evento apertura
> e fare in modo che la query mi presentasse subito i dati di default.
Ma scusa. Metti nella proprietà valore predefnito dei controlli il valore di
default e sei a posto...
Antonio


title: query sorgente con parametri

text:
> Ma scusa. Metti nella proprietà valore predefnito dei controlli il valore di
> default e sei a posto...
> Antonio
Grazie della risposta. Quindi se metto i valori predefiniti la query che
genera i record ottiene i valori mentre se li imposto nell'evento su
apertura no ? E' corretto?
Però a me piacerebbe poter aprire la maschera come non associate, fare un
pò di elaborazioni nell'evento su apertura e quindi associare la query
origine che prende dei valori da alcuni campi.
Perchè non vanno i riferimenti ai controlli in tutto il codice degli
eventi se la machera non è associata ? I controlli ci sono e quindi a
prescindere dai record origine tutto dovrebbe andare. Perchè invece non
funziona?
Grazie



title: query sorgente con parametri

text:
"Diego Lotti" <
diego...@iol.it
> ha scritto nel messaggio
news:b9vp0h$j8j$1...@news.newsland.it...
>
> > Ma scusa. Metti nella proprietà valore predefnito dei controlli il
valore di
> > default e sei a posto...
>
> > Antonio
>
> Grazie della risposta. Quindi se metto i valori predefiniti la query che
> genera i record ottiene i valori mentre se li imposto nell'evento su
> apertura no ? E' corretto?
>
> Però a me piacerebbe poter aprire la maschera come non associate, fare un
> pò di elaborazioni nell'evento su apertura e quindi associare la query
> origine che prende dei valori da alcuni campi.
>
> Perchè non vanno i riferimenti ai controlli in tutto il codice degli
> eventi se la machera non è associata ? I controlli ci sono e quindi a
> prescindere dai record origine tutto dovrebbe andare. Perchè invece non
> funziona?
Non ti seguo più...
Antonio


title: Query con parametro

author: Paolo Aulisio

text:
Acc97
Ho la necessità di fare una query che accodi dei record da una tabella
di un db esterno ad una tabella del db che contiene la query stessa.
Voglio passare il nome del db esterno come parametro, inizialmente l'ho
impostato di tipo testo, ma mi compare un messaggio di errore che dice
che la preposizione FROM necessita di un parametro 'Database', il quale
non mi sembra che esista tra quelli consentiti.
Grazie
Paolo


title: Query con parametro

text:
Paolo Aulisio <
aul...@interlogica.it
> wrote in message
3A37B563...@interlogica.it...

La sintassi giusta è questa
"SELECT * from tab in C:\Documenti\tuodb.mdb;"
Pertanto puoi passare come parametro il nome del db facendo
nomedb = "C:\Documenti\tuodb.mdb"
"SELECT * from tab in " & nomedb & ";"
Antonio


title: Query con parametro

text:
Antonio Biso ha scritto:

quello che dici è corretto, ma funziona anche in una query definita in qbe?
ovvero, come devo definire la proprietà tipo dato dell'oggetto parameters?
poni ad esempio questa definizione:
PARAMETERS NomeDB ?????;
SELECT clienti.*, *
FROM clienti IN [nomedb];
come devo definire il parametro NomeDB?
ciao
Paolo


title: Query con parametro

text:
Paolo Aulisio <
Aul...@interlogica.it
> wrote in message
3A389E9A...@interlogica.it...

Io non uso questo metodo, però direi che comunque è una stringa!
Antonio


title: Query con parametro

text:
Antonio Biso wrote:

era quello che pensavo anche io, ma con parametro stringa (cioè text), mi da il
messaggio che vuole un parametro di tipo Database.
boh, oramai è solo curiosità.
ciao
Paolo


title: Esite Immagine?

author: miikii

text:
Ho un database,
cerco di visualizzare le immagini nelle maschere collegate ovviamente al
codice prodotto.
Path è il campo dove è inserito l'indirizzo fisico della foto jpg.
L'unica cosa che da noia è il fatto che all'inserimento di un nuovo
record...
la funzione trova il campo Path vuoto e mi da errore:
Errore : tipo dati non corrispondente.
Come si puo evitare?!
Sub Form_Current()
If Len(Dir(Me.PATH)) > 0 Then
Me.PREVIEW.Picture = Me.PATH
Else
Me.PREVIEW.Picture = ([MACCHINA]) + "nondisponibile-01.jpg"
End If
End sub


title: Esite Immagine?

author: Pablitomf

text:
MA ha scritto:
> Cos'è macchina?
Ma come cos'è "MACCHINA" ?! Ops è vero, tu vai ancora in giro con quel
Trattore color Argento! :-D
> > Me.PREVIEW.Picture = ([MACCHINA]) + "nondisponibile-01.jpg"
> > End If
> > End sub
> >
> MAssimiliano
> >
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Esite Immagine?

text:
> MA ha scritto:
>
>> Cos'è macchina?
>
> Ma come cos'è "MACCHINA" ?! Ops è vero, tu vai ancora in giro con quel
> Trattore color Argento! :-D
Senti, tizio, l'unico problema della mia auto è che c'ha un culetto così
bello che ognuno si sente autorizzato a toccarlo...
mica come la tua che sembra un Buondì Motta!!!
Ah scusa noi parlavamo di automobili, non di trappole...
;-P
MAssimiliano


title: Esite Immagine?

text:
"miikii" <m_pic...@DELCAKKIOhotmail.com> ha scritto nel messaggio
news:4219e3bb$0$32344$5fc...@news.tiscali.it...
> Ho un database,
> cerco di visualizzare le immagini nelle maschere collegate ovviamente al
> codice prodotto.
> Path č il campo dove č inserito l'indirizzo fisico della foto jpg.
> L'unica cosa che da noia č il fatto che all'inserimento di un nuovo
> record...
> la funzione trova il campo Path vuoto e mi da errore:
> Errore : tipo dati non corrispondente.
>
> Come si puo evitare?!
>
prova cosě
> Sub Form_Current()
If dir(Me.path) <>"" then
> If Len(Dir(Me.PATH)) > 0 Then
> Me.PREVIEW.Picture = Me.PATH
> Else
Cos'č macchina?
> Me.PREVIEW.Picture = ([MACCHINA]) + "nondisponibile-01.jpg"
> End If
> End sub
>
MAssimiliano
>


title: Esite Immagine?

text:
MA ha scritto:
> Senti, tizio, l'unico problema della mia auto è che c'ha un culetto così
> bello che ognuno si sente autorizzato a toccarlo...
E me lo chiami Culetto? Quello è un Culone! Cavolo in quella pubblicità ne
"ABUSANO" tutti... un indecenza...
> mica come la tua che sembra un Buondì Motta!!!
Parli dello "SQUALO" non dimenticartene :-D... consuma quanto una due
litri e mezzo ed essendo una macchina coerente consente l'entrata solo a
due passeggeri e mezzo... sportiva e veloce è una delizia soprattutto nel
semetrale del pagamento RCA (:-( )
> Ah scusa noi parlavamo di automobili, non di trappole...
Trappole? Grrrrrrrrrrr... Buon per te che la mia padrona odia le alte
velocità e non mi permette il brivido degli 80... miiiii se ti ribecco in
autostrada...
:-D
> ;-P



title: type mismatch su array strano..

author: acMad

text:
a volte proprio non lo capisco VBA.. :(
ho un codicillo del genere:
================================
dim ar_o as Variant
dim remove as Variant
dim leno,i,k as integer
dim str as string
str = "6,7,9"
k=0
ar_o = split(str,",")
leno = ubound(ar_o)
for i = 0 to leno
 if inStr(str, ar_o(i)) = 0 then
  remove(k) = ar_o(i)
  k = k + 1
 end if
next i
======================
ora mi dite perche' quando arriva alla riga in cui fa
remove(k) = ar_o(i)
mi da un type mismatch?
tenendo conto che sono tutti e due tipi Variant
non ditemi perche' remove non e' un array perche' ho
anche gia' provato a dichiarare remove e ar_o come
dim ar_o(), remove() as Variant
ma niente da fare.. anzi in questo caso il type mismatch me lo
da quando fa ar_o=split(str,",") e se lascio solo remove() mi da un bel
Subscript out of range..
idee?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: type mismatch su array strano..

author: Alessandro Cara

text:


dim ar_o, remove()
>
> ma niente da fare.. anzi in questo caso il type mismatch me lo
> da quando fa ar_o=split(str,",")
sicuro  (quasi ;<))
>e se lascio solo remove() mi da un bel
> Subscript out of range..
certo
>
> idee?
>
>
Non mi dilungo
leno = ubound(ar_o)
redim remove(leno)
--
ac


title: type mismatch su array strano..

text:
Alessandro Cara ha scritto:


> Non mi dilungo
> leno = ubound(ar_o)
> redim remove(leno)
mi do del cretino da solo o ci pensi te?
ovviamente cosi' funziona...
.la stanchezza gioca brutti scherzi :)
grazie tantissimo..
non e' che c'e' anche un modo per redimmare gli array preservandone il
contenuto..
mi spiego
se io ho
array(1,2,3,,,,)
e vorrei invece avere
array(1,2,3)
eleminando cioe' i campi non utilizzati..
se po' fa?



title: type mismatch su array strano..

text:

Attento. Certe volte non mi faccio pregare piu' di tanto ;<)
> ovviamente cosi' funziona...
> .la stanchezza gioca brutti scherzi :)
in questi casi e meglio farsi una passeggiata.
Mentre si passeggia la soluzione "sprizza" spontanea
>
> grazie tantissimo..
>
> non e' che c'e' anche un modo per redimmare gli array preservandone il
> contenuto..
>
> mi spiego
>
> se io ho
>
> array(1,2,3,,,,)
>
> e vorrei invece avere
>
> array(1,2,3)
>
> eleminando cioe' i campi non utilizzati..
>
> se po' fa?
>
>
>
>
"Preserve" ma se non ricordo male funziona solo su una dimensione.
Attenzione la preserve non e' molto "performante"
Nei casi come  quello che immagino sia il tuo uso le "collezioni" che
tra l'altro essendo "array associativi" consentono anche una
indicizzazione alfanumerica
--
ac


title: elimare una virgola in una stringa

author: FANCIULLO

text:
Salve sono Fanciullo,
in un ho degli indirizzi che contengono una virgola all'interno
es:
 Via Roma , 42
Via Andrano, 35
come posso fare per eliminarle in blocco su tutti i record con una query?
Grazie a voi


title: elimare una virgola in una stringa

author: Cinzia

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:oIG7i.25297$%k.10...@twister2.libero.it...

ciao Fanciullo,
con una query di aggiornamento
Update Tuatabella set indirizzo = Replace(indirizzo, ", ", " ")
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
---------------------------------------->


title: elimare una virgola in una stringa

text:
"Cinzia" <
cinziapagani-...@tiscali.it
> ha scritto nel messaggio
news:465f382c$0$16038$5fc...@news.tiscali.it...
>
>
>
> "FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
> news:oIG7i.25297$%k.10...@twister2.libero.it...
> > Salve sono Fanciullo,
> > in un ho degli indirizzi che contengono una virgola all'interno
> > es:
> > Via Roma , 42
> > Via Andrano, 35
> >
> > come posso fare per eliminarle in blocco su tutti i record con una
query?
> >
> > Grazie a voi
> >
> ciao Fanciullo,
> con una query di aggiornamento
> Update Tuatabella set indirizzo = Replace(indirizzo, ", ", " ")
>
 --
> grazie,
 ma il fatto č che mi trovo a scuola con office 97.........dovrei farlo a
casa
importando la tabella in office 2002 e poi esportala pulita?
grazie ancora


title: elimare una virgola in una stringa

author: Carlo Costarella

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:gGO7i.25359$U01.2...@twister1.libero.it...
cut
>> grazie,
> ma il fatto č che mi trovo a scuola con office 97.........dovrei farlo a
> casa
> importando la tabella in office 2002 e poi esportala pulita?
>
E allora? Con A2002 la funzione "Replace" funziona benissimo.
A2002 legge le tabelle A97 e puņ anche salvare in formato A97 o convertire
da A2002 ad A97.
Ciao, Carlo


title: elimare una virgola in una stringa

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:f3oj0o$frf$1...@tdi.cu.mi.it...
>
> "FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
> news:gGO7i.25359$U01.2...@twister1.libero.it...
> cut
> >> grazie,
> > ma il fatto è che mi trovo a scuola con office 97.........dovrei farlo a
> > casa
> > importando la tabella in office 2002 e poi esportala pulita?
> >
>
> E allora? Con A2002 la funzione "Replace" funziona benissimo.
> A2002 legge le tabelle A97 e può anche salvare in formato A97 o convertire
> da A2002 ad A97.
>
> Ciao, Carlo
>
> Ciao Grazie Carlo


title: elimare una virgola in una stringa

author: Sergio MAZZA

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:gGO7i.25359$U01.2...@twister1.libero.it...
> grazie,
> ma il fatto è che mi trovo a scuola con office 97.........dovrei farlo a
> casa importando la tabella in office 2002 e poi esportala pulita?
>
> grazie ancora
Apri la tabella; clicchi sul nome della colonna(campo); (menù) Modifica -
Sostituisci; Confronta in: parte del campo...
Ciao.
--
Sergio MAZZA