title: Creare file pdf (lungo)

text:
ho modificato parecchia parte del codice e adesso posto quello che ho
realizzato io
in un modulo ho inserito questo codice
Option Compare Database
Option Explicit
'Read INI settings
Declare Function GetPrivateProfileString Lib "kernel32" Alias _
   "GetPrivateProfileStringA" (ByVal lpApplicationName As String, _
   ByVal lpKeyName As Any, ByVal lpDefault As String, _
   ByVal lpReturnedString As String, ByVal nSize As Long, _
   ByVal lpFileName As String) As Long
'Write settings
Declare Function WritePrivateProfileString Lib "kernel32" Alias _
   "WritePrivateProfileStringA" (ByVal lpApplicationName As String, _
   ByVal lpKeyName As Any, ByVal lpString As Any, _
   ByVal lpFileName As String) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Function ReadINIfile(sSection As String, sEntry As String, sFilename As
String) As String
Dim x As Long
Dim sDefault As String
Dim sRetBuf As String, iLenBuf As Integer
Dim sValue As String
'Six arguments
'Explanation of arguments:
'sSection: ini file section (always between brackets)
'sEntry : word on left side of "=" sign
'sDefault$: value returned if function is unsuccessful
'sRetBuf$ : the value you're looking for will be copied to this buffer
string
'iLenBuf% : Length in characters of the buffer string
'sFileName: Path to the ini file
sDefault$ = ""
sRetBuf$ = String$(256, 0)   '256 null characters
iLenBuf% = Len(sRetBuf$)
x = GetPrivateProfileString(sSection, sEntry, _
           sDefault$, sRetBuf$, iLenBuf%, sFilename)
ReadINIfile = Left$(sRetBuf$, x)
End Function
sull'evento di un bottone questo (poi andrò a modificarlo e metterlo in
una pubblic function)
Private Sub Comando23_Click()
'setto la stampante predefinita PDFCreator
    ''''vecchiastampantepredefinita =
    'Dim stpPredefinita As String
    'stpPredefinita = GetDefaultPrinter
    'DefaultPrinter = stpPredefinita
    'Dim stamp As String
    'stamp = "PDFCreator"
    'SetDefaultPrinter (stamp)
Dim tmpPrinter As Printer
Set tmpPrinter = Application.Printer
Application.Printer = Application.Printers("PDFCreator")
    Dim ValRit As Long
    Dim NomeFile As String
    Dim PercorsoINI As String
    Dim PercorsoPDF As String
    PercorsoINI = "E:\Documents and Settings\Negrinelli walter\Dati
applicazioni\PDFCreator\pdfcreator.ini" ''''settare il percorso dove si
trova il file pdfcreator
    PercorsoPDF = "c:\" ''''' settare il percorso dove si vuole salvare
il file
    NomeFile = "provailfilepdf" ''''settare il nome del file che si
vuole assegnare
    'ValRit = INISetValue(PercorsoINI, "Options", "AutosaveFilename",
NomeFile)
    Dim tmppercorsopdf As String
    'Dim tmpopercorsopdf As String
    Dim tmpnomefile As String
    tmppercorsopdf = ReadINIfile("Options", "AutosaveDirectory",
PercorsoINI) 'legge dal file
    'tmppercorsopdf = ReadINIfile("Options", "OAutosaveDirectory",
PercorsoINI) 'legge dal file
    tmpnomefile = ReadINIfile("Options", "AutosaveFilename",
PercorsoINI) 'legge dal file
    x = WritePrivateProfileString("Options", "AutosaveDirectory",
PercorsoPDF, PercorsoINI) 'scrive nel file
    x = WritePrivateProfileString("Options", "AutosaveFilename",
NomeFile, PercorsoINI) 'scrive nel file
    DoCmd.OpenReport "tabella1", acViewNormal ''''settareilnomedelreport
    'ResetDefaultPrinter
    Sleep (2000)
    x = WritePrivateProfileString("Options", "OAutosaveDirectory",
tmppercorsopdf, PercorsoINI) 'scrive nel file
    x = WritePrivateProfileString("Options", "AutosaveFilename",
tmpnomefile, PercorsoINI) 'scrive nel file
'Invio anche un email con outlook
    'Dim oOutlook As New Outlook.Application
    'Dim oMessage As Outlook.MailItem
    'Dim ns As Outlook.NameSpace
    'Set ns = oOutlook.GetNamespace("MAPI")  'Return a reference to the
MAPI
'layer
'    ns.Logon , , True, True  'Logon to exchange server
'    Set oMessage = oOutlook.CreateItem(olMailItem)
'    With oMessage
'        .To = EMail
'        .CC = Nz(CC, "")
'        .Subject = Oggetto
'        .Body = TestoEMail
'        .Attachments.Add PercorsoPDF & NomeFile & ".pdf"
'        .Display
'        .Send
'        .Save
'    End With
'    ns.Logoff       'Logoff Exchange
'    Set ns = Nothing    'Cleanup
'    Set oOutlook = Nothing
Application.Printer = tmpPrinter
    Exit Sub
End Sub
ciao a tutti


title: Rimozione Relazioni da Database

author: Marco Dell'oste

text:
Ci risono...
Con il comando analizza..prestazioni, ho attivato una serie di relazioni nel
database..
Ora ogni qualvolta richiamo una query di creazione tabella mi dice che non
può eliminare tale tabella poiché esistono delle relazioni su di essa.
Ho provato a fare elimina relazioni, mi viene chiesta conferma, e
nonnostante io clicchi e salvi, l'errore permane, infatti cliccando
nuovamente su mostra relazioni mi si visualizzano le stesse anche se
precedentemente le avevo cancellate..
Come posso fare???
1k grazie e ri-ciao
Tony


title: Rimozione Relazioni da Database

author: Emyr

text:


non è per caso che le elimini dal FE? e non dal BE
Saluti.
Emanuele.


title: Rimozione Relazioni da Database

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:22d3puou2vmg92sve...@4ax.com...

Da + ignorante che mai...
Probabile........
cosa intendi per FE??  e  per BE??
Mille grazie
Tony


title: Rimozione Relazioni da Database

text:
>
>Da + ignorante che mai...
>Probabile........
>cosa intendi per FE??  e  per BE??
>
>
>Mille grazie
>
>Tony
>
>
per FE si intende Front End cioč il programma in se stesso con form
report etc...
per BE si intende il programma con i dati cioč le tabelle che vengono
collegate al FE
Saluti.
Emanuele.


title: scaricare un file da ftp

text:
ciao a tutti
ho preparato un pc con linux e 2 partizioni da 80Gb l'una da usare come ftp.
Ho creato degli utenti e tutto funziona regolarmente tranne una cosa...
devo inserire giornalmente un file eseguibile su questo ftp e alcuni utenti,
che usano un programma da me realizzato in access devono poter scaricare
questo file direttamente (senza conoscere l'indirizzo ftp e senza vedere gli
altri file ivi inseriti) attraverso dei pulsanti da cliccare, e
possibilmente (non è necessario) senza inserire ne nomeutente e password...
Per prova ho realizzato un pulsantino che contiene come collegamento
ipertstuale il percorso completo del tipo
ftp://xxx.xxx.xxx.xxx/dir1/dir2/file.exe
 però non mi chiede ne nomeutente ne
password e mi restituisce il seguente errore:
impossibile aprire
ftp://xxx.xxx.xxx.xxx/dir1/dir2/file.exe
 Impossibile
trovare l'elemento richiesto al sito internet (HTTP/1.0 404)
Sapete dirmi come risolvere???
grazie 1000
Nicola


title: scaricare un file da ftp

author: Pablitomf

text:
"N1C0L4" <nickbi@@@
virgilio.it
> ha scritto nel messaggio
news:iCxIj.152$uG5...@nntpserver.swip.net...

ftp://TuoLogin:TuaPassword@tuoindirizzo/Dir2/file.exe


title: scaricare un file da ftp

text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:fsucm7$1l5$1...@tdi.cu.mi.it...

grazie 10000|| funziona alla grande!!!
se invece volessi che vengano chiesti i dati per il login????
Nicola


title: [OT] MS Project: HELP

author: p

text:
un aiuto: sto impazzendo per risolvere questo dilemma.
Uso Ms Project Standard 2003 e devo inserire a pié di pagina una immagine
di autocad. Prima di inserire l'immagine la converto in .wmf oppure in
jpg.
Inserisco l'immagine con il classico comando "Inserisci immagine"
(utilizzo l'apposita icona presente nella finestra di dialogo in cui sono
gestite le impostazioni di pagina per la stampa).
Ma dentro a Project l'immagine viene ridimensionata (da 18x12 cm passa a
circa 15x10 cm), sia a video che in stampa su carta. Perché???
L'immagine (per questione di Standard di Qualità aziendali) deve essere di
quelle dimensioni fisse e il ridimensionamento manuale con drag&drop
risulta assai impreciso, lungo e snervante.
Ho cercato in tutte le guide ma non ho trovato una spiegazione a questo
comportamento anomalo.
QUALCUNO PUO' AIUTARMI???
grazie in anticipo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [HELP] problema con DateAdd -> data inglese - data italiana

text:
Devo aggiungere tre anni alla data di emissione di un certificato per ottenere
la data di predefinita di emissione del nuovo certificato, perciò ho inserito
questo codice
  vntData = DMax("[DataEmissione]", "[DB_Certificati]", _
        "[DB_Certificati].[ID_Impresa] = " & Me![ID_Impresa])
  vntData = DateAdd("yyyy", "3", vntData)
  vntData = CStr(vntData)
  Me.DataEmissione.DefaultValue = "#" & vntData & "#"
Solo che mi inverte i mesi con i giorni, dove sbaglio?


author: VeeJay

text:
Ciao,
il nostro "amico" interpreta le date SEMPRE nel formato Americano
MM/DD/YYYY,
per cui devi esplicitare sempre il formato della data e attenzione all'uso
del
formalismo anglosassone Day/Month/Year.
Bye
VeeJay
"Mix64" <
mi...@nettaxi.com
> ha scritto nel messaggio
news:87ucfj$3de$1...@news.cineca.it...



text:
Cosi' sembra funzionare:
  vntData = Format$(DMax("[DataEmissione]", "[DB_Certificati]", _
        [DB_Certificati].[ID_Impresa] = " & Me![ID_Impresa]), "mm/dd/yyyy")
  vntData = Format$(DateAdd("yyyy", "3", vntData), "dd/mm/yyyy")
  vntData = CStr(vntData)
  Me.DataEmissione.DefaultValue = "#" & vntData & "#"
Mi posso fidare?



text:
"Mix64" <
mi...@nettaxi.com
> ha scritto nel messaggio
news:87ul0r$8s5$1...@news.cineca.it...
> Cosi' sembra funzionare:
>
>   vntData = Format$(DMax("[DataEmissione]", "[DB_Certificati]", _
>         [DB_Certificati].[ID_Impresa] = " & Me![ID_Impresa]),
"mm/dd/yyyy")
>   vntData = Format$(DateAdd("yyyy", "3", vntData), "dd/mm/yyyy")
>   vntData = CStr(vntData)
>   Me.DataEmissione.DefaultValue = "#" & vntData & "#"
>
> Mi posso fidare?
>
OKKO, a occhio mi pare che possa andare...
ma tu la data la vedi "italiana" ?
Bye
VeeJay



text:
>OKKO, a occhio mi pare che possa andare...
>ma tu la data la vedi "italiana" ?
Esatto. E penso che il problema nasceva proprio da questo ....
Grazie mille per l'aiuto
Ciao
>Bye
>VeeJay


title: disattivare tasti pag/sù - pag/giù

author: michele

text:
Potreste suggerirmi come disattivare i tasti pagina su / paginagiů
Grazie
--------------------------------
Inviato via
http://usenet.libero.it


title: disattivare tasti pag/sù - pag/giù

author: Roberto da casa

text:
"michele" <
mic...@inwind.it
> ha scritto nel messaggio
news:213Z82Z248Z178Y...@usenet.libero.it...
> Potreste suggerirmi come disattivare i tasti pagina su / paginagiů
> Grazie
>
Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ di
Federico Luciani intitolata "Disabilitare l'effetto dei tasti Page down e
Page up".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: disattivare tasti pag/sù - pag/giù

author: Sib

text:
"michele" <
mic...@inwind.it
> ha scritto nel messaggio
> Potreste suggerirmi come disattivare i tasti pagina su / paginagiů
La risposta te l'ha data roberto, ma io, che ho la brutta abitudine di
entrare nel merito, devo dirti che preferisco spiegare agli utenti la grande
utilita' di questi tasti per sostarsi tra i record piuttosto che
disabilitarli.
Sib


title: disattivare tasti pag/sù - pag/giù

author: MIX

text:
A che siamo in tema, come si disabilita il pulsante centrale del mouse che
consente lo scrolling.
In pratica, anche disabilitando i tasti pagina, lo scrolling vanifica tutto.
Ciao ciao.
Toni


title: disattivare tasti pag/sù - pag/giù

text:
"MIX" <
no...@tin.it
> ha scritto nel messaggio
news:m9q4a.197362$0v.55...@news1.tin.it...

Vai su Google e cerca tra i messaggi arretrati di questo NG usando come
chiave di ricerca la parola rotellina: penso che verrà fuori tanto materiale
da poterci scrivere un romanzo intitolato "Quella maledetta rotellina".
Comunque mi sembra di ricordare che solo in pochissimi thread si è arrivati
ad una soluzione, quindi armati di santa pazienza nel fare la ricerca.



title: disattivare tasti pag/sù - pag/giù

text:
Sei grande!
Grazie.
Ciao


title: disattivare tasti pag/sù - pag/giù

author: MA

text:
Il 18 Feb 2003, 12:20,
mic...@inwind.it
 (michele) ha scritto:
> Potreste suggerirmi come disattivare i tasti pagina su / paginagiů
> Grazie
Richiamati l'evento nella macro autokeys e fagli fare ciň che vuoi.
Quindi oltre all'evitare lo sfogliare dei record puoi fargli visualizzare
messaggi o qualsiasi altra cosa.
Ciao
MAssimiliano



title: disattivare tasti pag/sù - pag/giù

text:
Il 18 Feb 2003, 15:27,
massimilia...@kksrl.com
 (MA) ha scritto:
> Il 18 Feb 2003, 12:20,
mic...@inwind.it
 (michele) ha scritto:
> > Potreste suggerirmi come disattivare i tasti pagina su / paginagiů
> > Grazie
>
>
> Richiamati l'evento nella macro autokeys e fagli fare ciň che vuoi.
> Quindi oltre all'evitare lo sfogliare dei record puoi fargli visualizzare
> messaggi o qualsiasi altra cosa.
> Ciao
> MAssimiliano
Lo usa anche Biso, che quando conosce una ragazza gli monta una macro
autokeys e lei ad ogni tastata di Biso fa quello che vuole lui.
scusa se ti fornito un esempio solo in appendice.
ciao MAssimiliano



title: OT - concatenare in modo corretto 2 file

author: Pino

text:
Scusate ne ho bisogno per la mia applicaz access.
Vorrei concatenare due file con il copy /b del dos solo che il
risultato e' il seguente:
file a
1
1
1
file b
2
2
2
quando vado a concatenare mi esce una cosa del genere:
1
1
12
2
2
io voglio che l'inizio del contenuto del file b sia messo come testo a
capo in modo da mantenere l'ordine dei dati.
Come si fa a dire in dos 'prima di concatenare vai a capo'
Grazie


author: Popi - TheBadHabits

text:

echo.>c:\tmp\aggiunta

Questo comando crea il file "c:\tmp\aggiunta" mettendoci un crlf
(sarebbe il punto che segue il comando echo.

Quindi dovrai fare copy /b TuoFileA + c:\tmp\aggiunta + TuoFileB
Destinazione

HTH
Popi


title: Quali sono i font che riproducono i codici a barre???

author: tiscali

text:
Salve,
Oltre alla domanda posta in oggetto, posso chiedere come si fa ad
utilizzarli????
Grazie


author: p. bianchi

text:
tiscali wrote:
> Oltre alla domanda posta in oggetto, posso chiedere come si fa ad
> utilizzarli????
Come "quali sono"? i font barcode sono quelli che quando li usi stampi i
codici a barre :-).
Ne esistono tanti tipi di tanti produttori, penso anche freeware, quelli
che ho installati sul mio pc hanno nomi tipo CIA codabar medium, CIA
code 39 tall, e simili.
Li ottieni in un formato sorgente, li carichi sul computer da pannello
di controllo / Tipi di carattere e ti diventano font come qualunque
altri, quindi nel report quello che vuoi far apparire sotto forma di
barcode dovrai solo formattarlo usando come font designato uno dei font
barcode.
Ciao


title: Notizie su access

author: Maria

text:
Ciao a tutti, mi sapete dire se access e' distribuito anche come pacchetto
singolo
fuori dall' office ?, eventualmente ci sono versioni differenti ? quanto
costano?
e se fosse e' corredato con MSDE ? questa ultima cosa mi interessa
particolarmente visto che userei access per mettere a punto la struttura del
DB e verificare l' esattezza delle query, ma poi come linguaggio host  uso
VS.net.
Ringrazio in anticipo per le risposte e per qualsiasi altra informazione sul
prodotto. Mary


title: Notizie su access

author: Carlo Costarella

text:
"Maria" <
maria...@hotmail.com
> ha scritto nel messaggio
news:%rM3a.188221$0v.52...@news1.tin.it...

Sě Access č venduto anche come applicativo a sč.
Unico incoveniente č che non puoi distribuire i programmi da te realizzati.
Per fare ciň hai bisogno di Office Developer.
Forse vale la pena di acquistare questo pacchetto dove trovi tutto ma
proprio tutto.
MSDE č liberamente scaricabile dal sito Microsoft.
Ciao, Carlo


title: Notizie su access

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:jLN3a.251663$AA2.9...@news2.tin.it...

Grazie Carlo per le info, pero' sul sito Microsoft non riesco a trovare MSDE
mi sapresti dare il link esatto. Saluti Mary


title: Qualcuno lo sa far funzionare?

author: GnamGnam

text:
Ciao a tutti...
volevo chiedere se qualche anima buona riesce a capire perche'
questo mdb
web.tiscalinet.it/leleftp/gnam.zip
gira su access97 e non su 2000?
Qualcuno mi puo' aiutare? Sarebbe utilissimo...
Sul 97 funziona benissimo ma sul 2000 la macro non gira....
se qualcuno mi dice come correggerla grazie mille...
magari ci sara' qualche incompatibilita' di linguaggio.
Mah
Eventualmente
E.mail        gnamgnam
              chiocciolina
              libero
              punto
              it
(ehheh anti spam si spera)


title: Sostituzione di msgbox con form

author: stefano (kabisa)

text:
Salve a tutti
Ho la necessità di sostituoire dei msgbox con delle form
Il problema è che i msgbox sono all'interno di funzioni e se faccio aprire
la una form col messaggio che mi interessa non riesco a bloccare il codice
in attesa di risposta al messaggio.
Ho pensato che potrei riscrivere le funzioni e dare in base alla risposta
della nuova form gli eventi che mi interessano, ma sono veramente tanti i
msgbox devo cambiare.
Sto cercando una funzione ATTENDI EVENTO ma non la trovo .
Grazie per l'aiuto
Stefano


title: Sostituzione di msgbox con form

text:
"stefano (kabisa)" <
stl...@tin.it
> ha scritto nel messaggio
news:s9n3a.245604$AA2.9...@news2.tin.it...

Non è necessaria alcuna funzione attendi evento.
Imposta a Si le proprietà Popup e A scelta obbligatoria delle maschere che
sostituiscono i msgbox e quando le apri con la DoCmd.OpenForm imposta ad
acDialog l'argomento modalitàfinestra (vedi help); così facendo il codice
VBA viene bloccato sino a quando non chiudi la maschera, proprio come se
usassi un msgbox.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Sostituzione di msgbox con form

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Kko3a.119888$ZE.33...@twister2.libero.it...

Grazie
Funziona bene e mi ha risparmiato molto lavoro.
Stefano


title: access 97 e access 2000 usati insieme ....

author: Auli

text:
> Utilizzando un db in formato access 97 (in rete) da un applicativo
> sviluppato in access 97 e poi convertito in access 2000 riscontro un
> rallentamento considerevole nelle normali attività di lettura e scrittura
> record.
> Ho provato a convertire anche i dati in formato 2000 e in questo modo ho
> eliminato il problema.
> Ma dovendo pero' condividere i dati tra 2 applicazioni una in a97 e
l'altra
> in a2000, come faccio a migliorare le prestazione dell'applicativo in
A2000
> ?
>
> Grazie a tutti
>
> Auli
>


NON LEGGERE - PROVA


title: OT (ma non troppo)

author: Roberto (non quello bravo)

text:
Scusate se scrivo queste due righe, spero siano conformi alla
netiquette...
Ho scoperto l'acqua calda! E la cosa mi fa molto piacere.
Sono un vecchio (si fa per dire, ma non troppo) programmatore di QB e
CLIPPER e prima ancora di GFA basic per AtariST (chi se lo ricorda?).
Con questi linguaggi ho scritto cose egregie (nel senso che ho risolto
molti problemi di lavoro in modo efficiente e determinante).
Oggi scopro che VBA e VB (lo so che avrei dovuto saperlo da mooooolto
tempo) hanno un codice che ricalca quasi alla lettera il QB.
Per me è molto importante: in pochi minoti, facendo appello alla
memoria, ho scritto un paio di routine per access.
Lo dico per chi non ci aveva mai pensato. Forse solo io.
:;


title: OT (ma non troppo)

text:
"Roberto (non quello bravo)" <
ut...@katamail.com
> ha scritto nel messaggio
news:1129976714.1...@g47g2000cwa.googlegroups.com...

E' risaputo che sono tutti dialeti dello stesso linguaggio che si chiama
Basic.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: OT (ma non troppo)

author: lcoroll

text:
"Roberto (non quello bravo)" <
ut...@katamail.com
> ha scritto nel messaggio
news:1129976714.1...@g47g2000cwa.googlegroups.com...
Scusate se scrivo queste due righe, spero siano conformi alla
netiquette...
Ho scoperto l'acqua calda! E la cosa mi fa molto piacere.
Sono un vecchio (si fa per dire, ma non troppo) programmatore di QB e
CLIPPER e prima ancora di GFA basic per AtariST (chi se lo ricorda?).
Con questi linguaggi ho scritto cose egregie (nel senso che ho risolto
molti problemi di lavoro in modo efficiente e determinante).
Oggi scopro che VBA e VB (lo so che avrei dovuto saperlo da mooooolto
tempo) hanno un codice che ricalca quasi alla lettera il QB.
Per me č molto importante: in pochi minoti, facendo appello alla
memoria, ho scritto un paio di routine per access.
Lo dico per chi non ci aveva mai pensato. Forse solo io.
-----------------------------
Ciao,
leggo raramente questo NG, ora ho ripreso a lavorare con Access e lo scorro
xkč č stato sempre una fonte di conoscenza notevole per me.
- INIZIO NOSTALGIA -
Ti rispondo solo per dirti che un pň di nostalgia me l'hai fatta venire
citando:
QB Sigh!,  CLIPPER "sospiro", il GFA dell'AtatiST non l'ho conosciuto ma ho
ancora in soffitta e funzionante un Dragon32 (GB) con MSBasic molto valido,
(l'ho preso quando era in arrivo mio figlio... che ora fa ingegneria
informatica!)
Nel momento nostalgico pre-compleanno, di mio ci aggiungo il primo
linguaggio studiato, il COBOL e DBFast (evoluzione del Clipper che non ha
avuto molto successo).
Quando hai lavorato con QB e CLIPPER hai tutte le basi per VB e VBA, č come
andare in bicicletta e passare la prima volta ad un bel motorino, purtroppo
il controllo completo del sistema perň non lo hai piů.
Ma siamo sempre sulla breccia!
- FINE NOSTALGIA -
Cari saluti,
Luigi.


title: OT (ma non troppo)

author: massimo

text:
"lcoroll" <
lco...@toglimi.hotmail.com
> ha scritto nel messaggio
news:dje7lj$g9d$1...@nnrp.ngi.it...

!Quoto!


title: Sincronizzazione acess-mysql

author: Fimar

text:
Sono uno studente di informatica e sto per l`appunto finendo di elaborare
come tesi  un software che ha il compito di matenere sincronizzati due
database  access e mysql ,con lo scopo di rendere la migrazione da acess a
mysql piu facile e meno drastica e costosa. Se qualche azienda fosse
interessata mi puo contattare a
fi...@shineline.it
.
by fimar


title: Errore di runtime: '453'

author: Marco

text:
Sto concludendo un'applicazione Access con installata la versione 2003
su piattaforma Vista.
Riporto la parte del codice che genera un errore:
--------------------------------------Nel modulo generico:
Option Compare Database
Option Explicit
Declare Function trovaversione Lib "kernel32" Alias
"getversionExA" (lpversioninformation As OSVERSIONINFO) As Long
Public Const PIATTAFORMA_WINDOWS = 1
Public Const PIATTAFORMA_WINDOWS_NT = 2
Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String * 128
End Type
Sub controllaSO()
Dim tOSVerInfo As OSVERSIONINFO, lngValRest As Long
Dim strVerWin As String, strVerComp As String
Dim strNomeSO As String
tOSVerInfo.dwOSVersionInfoSize = Len(tOSVerInfo)
lngValRest = trovaversione(tOSVerInfo)
strVerWin = tOSVerInfo.dwMajorVersion & "." &
tOSVerInfo.dwMinorVersion
strVerComp = tOSVerInfo.dwBuildNumber And &HFFFF&
Select Case tOSVerInfo.dwPlatformId
Case PIATTAFORMA_WINDOWS
strNomeSO = "Windows 9x"
Case PIATTAFORMA_WINDOWS_NT
strNomeSO = "Windows NT"
Case Else
strNomeSO = "Sconosciuto"
End Select
End Sub
------------------------------------Nel modulo di classe del form:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
Dim testopiatt As String
Dim testovers As String
Dim testocomp As String
controllaSO
testopiatt = strNomeSO
testovers = strVerWin
testocomp = strVerComp
End Sub
----------------------------------
All'apertura del form, mi da il seguente errore di runtime: '453'
Impossibile trovare il punto di ingresso getversionExA della DLL in
kernel32.
Non ho assolutamente idea di come rimediare e vi chiedo urgentemente
un aiuto in proposito. Grazie anticipatamente.


title: Errore di runtime: '453'

author: OneEDP

text:
Marco wrote:
> Sto concludendo un'applicazione Access con installata la versione 2003
> su piattaforma Vista.
> Riporto la parte del codice che genera un errore:
>
> --------------------------------------Nel modulo generico:
>
> Option Compare Database
>
> Option Explicit
>
> Declare Function trovaversione Lib "kernel32" Alias
> "getversionExA" (lpversioninformation As OSVERSIONINFO) As Long
E' in pratica un problema di dichiarazione della funzione. I tipi di dati
non coincindo con l'api originaria
E' problema di copia e incolla ;-)
Ciao



title: Errore di runtime: '453'

text:

Senza neanche verificare ti incollo
Private Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA"
(lpVersionInformation As OSVERSIONINFO) As Long
Private Type OSVERSIONINFO
    dwOSVersionInfoSize As Long
    dwMajorVersion As Long
    dwMinorVersion As Long
    dwBuildNumber As Long
    dwPlatformId As Long
    szCSDVersion As String * 128
End Type
Private Sub Form_Load()
    Dim OSInfo As OSVERSIONINFO, PId As String
    'KPD-Team 1998
    'URL:
http://www.allapi.net/
    'KPD...@Allapi.net
    'Set the graphical mode to persistent
    'Set the structure size
    OSInfo.dwOSVersionInfoSize = Len(OSInfo)
    'Get the Windows version
    ret& = GetVersionEx(OSInfo)
    'Chack for errors
    If ret& = 0 Then MsgBox "Error Getting Version Information": Exit Sub
    'Print the information to the form
    Select Case OSInfo.dwPlatformId
        Case 0
            PId = "Windows 32s "
        Case 1
            PId = "Windows 95/98"
        Case 2
            PId = "Windows NT "
    End Select
    Debug.Print "OS: " + PId
    Debug.Print "Win version:" + Str$(OSInfo.dwMajorVersion) + "." +
LTrim(Str(OSInfo.dwMinorVersion))
    Debug.Print "Build: " + Str(OSInfo.dwBuildNumber)
End Sub


title: Errore di runtime: '453'

text:

>     'KPDT...@Allapi.net
>     'Set the graphical mode to persistent
>     'Set the structure size
>     OSInfo.dwOSVersionInfoSize = Len(OSInfo)
>     'Get the Windows version
>     ret& = GetVersionEx(OSInfo)
>     'Chack for errors
>     If ret& = 0 Then MsgBox "Error Getting Version Information": Exit Sub
>     'Print the information to the form
>     Select Case OSInfo.dwPlatformId
>         Case 0
>             PId = "Windows 32s "
>         Case 1
>             PId = "Windows 95/98"
>         Case 2
>             PId = "Windows NT "
>     End Select
>     Debug.Print "OS: " + PId
>     Debug.Print "Win version:" + Str$(OSInfo.dwMajorVersion) + "." +
> LTrim(Str(OSInfo.dwMinorVersion))
>     Debug.Print "Build: " + Str(OSInfo.dwBuildNumber)
> End Sub- Nascondi testo citato
>
> - Mostra testo citato -
Grazie infinite. Non sono esperto API. Ho adattato il codice che mi
hai postato ed ora è tutto ok.


title: Access 2000 -> Access 97 ?

author: Gianluca Busbani

text:
...esiste un softwarino che possa eseguire la conversione di un *.mdb creato
in Access 2000 in Access 97?
Per softwarino intendo un programma che giri all'esterno del pacchetto
Office 2000, in ambiente Win95+Office97...
Un favore, rispondetemi in mbx.
>>
bu...@iname.com
Grazie 2000!
GB


title: a qs punto farò un corso di access : dove ?

author: MAX

text:
Ciao a tutti : non riesco a cavarmene fuori con questo maledetto (access
n.d.r.) Chi mi sa dire dove posso fare un corso per capirne finalmente
qualcosa ? Sono di Milano
CIAO
MAX
--------------------------------
Inviato via
http://usenet.iol.it


author: Proli

text:
MAX ha scritto nel messaggio <
62Z11Z54Z112Y9...@usenet.iol.it
>...

Puoi sempre acquistare una buona guida di access  e usando il programma
passo passo
puoi raggiungere livelli egregi.
Cosě ha fatto buona parte delle persone che frequentano il NG.
Ci vuole calma, pazienza e con un pň di tempo a disposizione. Sono sicuro
che ci riuscirai.
Se ci sono riuscito io, ci possono riuscire tutti.
Ciao
Marco Dell'Oca
D.M.Software


author: Giuseppe

text:
"MAX" <
max...@hotmail.com
> ha scritto nel messaggio
news:62Z11Z54Z112Y9...@usenet.iol.it...

mi associo al consiglio di Proli
Ho conosciuto diverse persone ritornare ad usare Excel e abbandonare Access
dopo le prime difficoltà.
Conviene iniziare con libri ad indirizzo per prncipianti , seguire le
indicazioni pagina dopo pagina , considerando che un autore preferisce
approfondire alcuni punti un secondo altri  ; ti consiglio  studiare VB dopo
le macro.
Accantona database di esempio con utilizzo avanzato di VB e automatismi vari
; fermati su una richiesta di aiuto su questo NG , prova a risolverla e poi
confrontola con le risposte date ; utilizza la guida in linea , esegui e
analizza gli esempi suggeriti ; cerca di trovare un DB con migliaia di
record con campi data , il Northwind è un ottimo inizio.
Non farti tentare da altri programmi fino a che non hai raggiunto un livello
che consideri accettabile per le tue aspirazione e considera che per
ottenere risultati accettabili occorre almeno un anno di lavoro duro e
testardo .
giuseppe
p.s.
prova a dare uno sguardo a :
http://www.microsoft.com/italy/access/access_pratica/
http://www.microsoft.com/office/access/
leggi la risposta data da Roberto Re: ACCESS Informazioni Grazie!!


author: Lbo

text:
>Ciao a tutti : non riesco a cavarmene fuori con questo maledetto (access
>n.d.r.) Chi mi sa dire dove posso fare un corso per capirne finalmente
>qualcosa ? Sono di Milano
allora, la situazione è complessa.
il problema è che access è:
1. un gestore di database (quindi bisogna sapere cos'è e come si
struttura teoricamente un database)
2. dotato di una interfaccia (quindi bisogna conoscere l'interfaccia,
cioè i comandi tipici di access)
3. e di un linguaggio di programmazione (quindi bisogna saper
programmare).
in dettaglio:
1 strutturare un db può essere semplice se il db è semplice e
complicato se il db è complicato.  db è un termine generico, è come
dire "azienda" o "veicolo".  io personalmente, come professionista,
sono un'azienda e anche la fiat è un'azienda.  una bicicletta è un
veicolo e un'astronave è un veicolo.  le competenze per mandare avanti
la "mia azienda" sono diverse da quelle necessarie per mandare avanti
la fiat.  le competenze necessarie per progettare/aggiustare/guidare
una bicicletta sono diverse da quelle per l'astronave.
infatti ci sono dei libroni che non finiscono più e dei corsi
universitari sulla teoria dei database.
è necessario studiare il librone unviersitario per farsi la
rubrichetta o le fatture?  no.  però se uno dopo aver fatto la
rubrichetta ci prende gusto, forse sì, è meglio sapere come si fa a
strutturare un db dal punto di vista teorico.
2. l'interfaccia.  be', questa è semplice, è il "menu" di access, le
varie finestre, il modo con cui si compongono le query, qualche
accessorio come i report ecc..  il problema è che spesso si confonde
l'interfaccia con il db, cioè lo strumento di manipolazione con
l'oggetto manipolato, il visore con ciò che si vede.  tu puoi mettere
dell'acqua in una bottiglia o in una pentola o in un innaffiatoio, ma
né la pentola, né la bottiglia né l'innaffiatoio sono acqua.  sono
strumenti per far fare all'acqua qualcosa.
tu magari impari a memoria un manuale di access, conosci tutti i menu
ecc. e credi di poter strutturare un db.  no, sai solo quali sono gli
strumenti che access ti mette a disposizione per fare qualcosa, ma non
sai che cosa.  e soprattutto il db *non è* access.  access è un mezzo
per tradurre in pratica l'architettura teorica che è il db.
3. il linguaggio di programmazione.  be', questo è il vba.  è un modo
per interagire via codice con gli oggetti che compongono l'interfaccia
di access, interfaccia che tra l'altro è personalizzabile.  anche
sulla programmazione sono stati scritto volumi immensi.  è necessario
studiarli per fare un ciclo for..next?  no.  ma poi uno ci prende
gusto vuol fare altre cose e forse sì, un po' di teoria conviene
studiarsela.
come vedi un "corso di access" di per sé non ha senso.  è come fare un
corso sulla piscina sita in via tale numero tale.  tu devi imparare a
nuotare, poi la piscina sarà quella che sarà.  e non è detto che
nuoterai sempre in piscina.  magari nuopterai al lago o al mare, ma il
nuoto sarà sempre quello.  magari in una piscina diversa ti
chiederanno di fare una tesserina speciale ma questo nel corso non
c'era...  magari vai a nuotare in francia dove il bagnino parla in
francese ma a te al corso di nuoto il francese non te l'hanno
insegnato...
quello che voglio dire è che senza una preparazione "orizzontale"
rischi di sapere benissimo come funzionano i menu di access (sai che
soddisfazione) ma non sai che per usarli al meglio devi conoscere
tutta la enorme teoria che c'è dietro.  vabbè, magari conoscere tutta
la teoria no, ma almeno sapere che c'è e dove documentarti sì.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


author: Antonio Biso

text:
Lbo <
L...@NOSPAM.blunet.it
> wrote in message
3a54aaed...@news.edisons.it...
> >Ciao a tutti : non riesco a cavarmene fuori con questo maledetto (access
> >n.d.r.) Chi mi sa dire dove posso fare un corso per capirne finalmente
> >qualcosa ? Sono di Milano
>
> allora, la situazione è complessa.
>
> il problema è che access è:
>
> 1. un gestore di database (quindi bisogna sapere cos'è e come si
> struttura teoricamente un database)
>
> 2. dotato di una interfaccia (quindi bisogna conoscere l'interfaccia,
> cioè i comandi tipici di access)
>
> 3. e di un linguaggio di programmazione (quindi bisogna saper
> programmare).
>
> in dettaglio:
SNIP
Che UOMO !!!
Antonio


author: Luciano (DOC)

text:
Lbo ha scritto nel messaggio <
3a54aaed...@news.edisons.it
>...
>>Ciao a tutti : non riesco a cavarmene fuori con questo maledetto (access
>>n.d.r.) Chi mi sa dire dove posso fare un corso per capirne finalmente
>>qualcosa ? Sono di Milano
>
>allora, la situazione è complessa.
OMISSIS ....
Terrorista!!!!:-)))
Saluti.
Luciano
(DOC)


title: Aggiornamento casella di riepilogo dopo una connessione ADO

author: Master

text:
Buon giorno a tutti.
Ho creato, utilizzando Access, un database il cui scopo è quello di
raccogliere i dati relativi ai terzisti con i quali la ditta per cui
lavoro entra in contatto. In particolare, sono presenti una tabella
denominata "Terzisti", nella quale vengono  memorizzati i dati
personali, e una tabella denominata "Sedi", contenente, come dice il
nome stesso, le informazioni relative a tutte le sedi locali dei
terzisti.
In una maschera denominata "AnagraficaTerzisti" è presente una
sottomaschera "SediLocali", contenente, a sua volta, una casella di
riepilogo visualizzante Descrizione della sede, Indirizzo, Città,
Provincia e Stato della sede locale. Infine, è presente, un pulsante
"Modifica", la cui pressione causa l'apertura di una maschera che
consente la modifica dei dati relativi alla sede locale selezionata.
Riporto, di seguito, il codice di questo pulsante:
Private Sub cmdModifica_Click()
    Dim Cnn As New ADODB.Connection
    Dim RecSet As New ADODB.Recordset
    Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
CurrentDb.name
    RecSet.Open "SELECT * From Sedi WHERE IDSedeLocale = " &
Forms!AnagraficaTerzisti.SediLocali!crElencoSedi.Column(0,
Forms!AnagraficaTerzisti.SediLocali!crElencoSedi.ListIndex), Cnn,
adOpenKeyset, adLockOptimistic

        DoCmd.OpenForm "DettagliSedeLocale"
        Forms!DettagliSedeLocale.Caption = "Modifica dati della sede
locale del terzista:  " &
Format(Forms!AnagraficaTerzisti!txtRagioneSociale1, ">")
        ' ***************************
        ' RICHIAMO DATI DA MODIFICARE
        ' ***************************
        Forms!DettagliSedeLocale!CorniceSedeLocale.Value =
RecSet.Fields("TipologiaSede").Value
        Forms!DettagliSedeLocale.ControlloTipologiaSedeLocale
        Forms!DettagliSedeLocale!txtDescrizioneSede =
RecSet.Fields("DescrizioneSede").Value
        Forms!DettagliSedeLocale!txtIndirizzo =
RecSet.Fields("Indirizzo").Value
        Forms!DettagliSedeLocale!txtCAP = RecSet.Fields("CAP").Value
        Forms!DettagliSedeLocale!txtComune =
RecSet.Fields("Città").Value
        Forms!DettagliSedeLocale!txtProvincia =
RecSet.Fields("Provincia").Value
        Forms!DettagliSedeLocale!txtStato =
RecSet.Fields("Stato").Value
        Forms!DettagliSedeLocale!txtTelefono1 =
RecSet.Fields("Telefono1").Value
        Forms!DettagliSedeLocale!txtTelefono2 =
RecSet.Fields("Telefono2").Value
        Forms!DettagliSedeLocale!txtFax1 = RecSet.Fields("Fax1").Value
        Forms!DettagliSedeLocale!txtFax2 = RecSet.Fields("Fax2").Value
        Forms!DettagliSedeLocale!txtEmail1 =
RecSet.Fields("Email1").Value
        Forms!DettagliSedeLocale!txtEmail2 =
RecSet.Fields("Email2").Value

    RecSet.Close: Cnn.Close
    Set RecSet = Nothing: Set Cnn = Nothing
End Sub
Alla pressione del tasto "Salva" presente in questa maschera, vengono
salvate le modifiche apportate:
Private Sub cmdSalva_Click()
    Dim Cnn As New ADODB.Connection
    Dim RecSet As New ADODB.Recordset
    Dim Conferma As Integer

    Conferma = MsgBox("Salvare le modifiche apportate?", vbQuestion +
vbYesNo, "Richiesta conferma")
    If Conferma = vbYes Then

            ' ****************************************************
            ' APERTURA CONNESSIONE PER SALVATAGGIO DATI MODIFICATI
            ' ****************************************************

            Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
CurrentDb.name
            RecSet.Open "SELECT * From Sedi WHERE IDSedeLocale = " &
Forms!AnagraficaTerzisti.SediLocali!crElencoSedi.Column(0,
Forms!AnagraficaTerzisti.SediLocali!crElencoSedi.ListIndex), Cnn,
adOpenKeyset, adLockOptimistic

            RecSet.Fields("TipologiaSede").Value =
CorniceSedeLocale.Value
            RecSet.Fields("DescrizioneSede").Value =
txtDescrizioneSede
            RecSet.Fields("Indirizzo").Value = txtIndirizzo
            RecSet.Fields("CAP").Value = txtCAP
            RecSet.Fields("Città").Value = txtComune
            RecSet.Fields("Provincia").Value = txtProvincia
            RecSet.Fields("Stato").Value = txtStato
            RecSet.Fields("Telefono1").Value = txtTelefono1
            RecSet.Fields("Telefono2").Value = txtTelefono2
            RecSet.Fields("Email1").Value = txtEmail1
            RecSet.Fields("Email2").Value = txtEmail2
            RecSet.Fields("Fax1").Value = txtFax1
            RecSet.Fields("Fax2").Value = txtFax2
            RecSet.Update
        RecSet.Close: Cnn.Close
        Set RecSet = Nothing: Set Cnn = Nothing

        Forms!AnagraficaTerzisti.Repaint
        Forms!AnagraficaTerzisti!SediLocali!crElencoSedi.Requery

        DoCmd.Close

    End If

End Sub
A questo punto, le modifiche apportate con questa procedura vengono
effettivamente salvate nella tabella "Sedi", ma la casella di
riepilogo dell'anagrafica non viene aggiornata immediatamente,
nonostante il comando "requery" in fondo al codice. Questa viene
aggiornata solamente selezionando un altro terzista per poi ritornare,
in un secondo momento, a quello modificato.
Premettendo che questo accade sia che il BE sia presente su un
computer in rete, sia che sia presente sulla stessa macchina del FE, e
che lavoro con Microsoft Office 2000 SP-3, come posso ovviare a questo
problema? Ho cercato qualche suggerimento nei meandri di questo NG e
del Sito Comune, ma non ho trovato una soluzione.  Ho commesso qualche
errore nella stesura del codice?
Un grazie in anticipo a tutti...


title: Verifica estensione f

author: mario

text:
Ciao a tutti, avendo l'esigenza di verificare l'estensione di un db nuovo
che creo tramite input box, carlo mi ha gentilmente consigliato di
utilizzare la seguente funzione, solo che non gira correttamente, nel senso
che se non inserisco l'estensione appare la msgbox "manca l'estensione"
clicco su ok e la funzione prosegue creandomi il db senza estensione, se
invece oltre al nome del nuovo db dgt un'estensione scorretta questa non
viene considerata e viene creato il db con l'estesione sbagliata.
Qualche consiglio??
Grazie.
Ciao Mario
Public Function ControllaEstensione(strinput As String) As Boolean
Dim Pos As Integer
Pos = Nz(InStr(1, strinput, "."), 0)
    If Pos = 0 Then 'non trova il punto
    MsgBox "Manca l'estensione"
    Exit Function
    End If
If Mid(strinput, Pos + 1, 3) = "mdb" Then 'trova .mdb
ControllaEstensione = True
Else
MsgBox "Estensione non Corretta"
ControllaEstensione = False
End If


title: Verifica estensione f

author: Alessandro Baraldi

text:
"mario" <
ma...@penguin.com
> wrote in message
news:H8Rk7.23320$MO.8...@news.infostrada.it...

Carlo ti ha suggerito correttamente, forse tu hai qualche difficoltà
a modificare il codice a tuo uso e consumo, questa fuzione, che è quasi
quella di Carlo, ti restituisce una Stinga che avrà sempre l'estensione
".mdb", se è già presente OK, altrimenti in caso di assenza la aggiunge.
Public Function ControllaEstensione(strinput As String) As String
 Dim Pos As Integer
 Pos = Nz(InStr(1, strinput, "."), 0)
     If Pos = 0 Then 'non trova il punto
     MsgBox "Manca l'estensione"
     Exit Function
     End If
 If Mid(strinput, Pos + 1, 3) = "mdb" Then 'trova .mdb
     ControllaEstensione = strinput
 Else
    ControllaEstensione = strinput & ".mdb"
 End If
end function
Alex.
--
Posted from  [62.98.24.152]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Verifica estensione f

author: CarloCos

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:493ac126d7f09aaaee...@mygate.mailgate.org...

Caro Mario mi sà che tu bari.
La funzione è ultracorretta e restituisce True o False a seconda se
l'estensione sio o meno corretta.
Ti avevo anche detto nello stesso post, che non hai riportato integralmente,
che qualora manchi l'estensione, Access provvede da solo a metterla. Se
l'utente scrive c:\MiaCartella\Pippo Access scriverà
c:\MiaCartella\Pippo.mdb
Se invece l'utente scrive c:\MiaCartella\Pippo.mdx la funzione ti
restituisce FALSE.
Il suggerimento che ti ha dato Alessandro Baraldi è perfetto, anche se
opzionale.
E poi chi ti dà delle risposte lo fà solo in spirito di collaborazione e non
di sostituzione...anche tu devi fare qualcosa...non ti pare?
Ciao, Carlo


title: Verifica estensione f

text:
"CarloCos" <
carloco...@libero.it
> wrote in message
news:e6%k7.25784$MO.9...@news.infostrada.it...
> Caro Mario mi sà che tu bari.
> La funzione è ultracorretta e restituisce True o False a seconda se
> l'estensione sio o meno corretta.
> Ti avevo anche detto nello stesso post, che non hai riportato integralmente,
> che qualora manchi l'estensione, Access provvede da solo a metterla. Se
> l'utente scrive c:\MiaCartella\Pippo Access scriverà
> c:\MiaCartella\Pippo.mdb
> Se invece l'utente scrive c:\MiaCartella\Pippo.mdx la funzione ti
> restituisce FALSE.
> Il suggerimento che ti ha dato Alessandro Baraldi è perfetto, anche se
> opzionale.
> E poi chi ti dà delle risposte lo fà solo in spirito di collaborazione e non
> di sostituzione...anche tu devi fare qualcosa...non ti pare?
>
> Ciao, Carlo
Ciao Carlo, scusa se mi sono permesso di mettere mano al tuo codice che
Ovviamente è corretto(come ho premesso nel POST), solo mi pareva di aver
capito la richiesta in questo modo.
> E poi chi ti dà delle risposte lo fà solo in spirito di collaborazione e non
> di sostituzione...anche tu devi fare qualcosa...non ti pare?
Quì sono pienamente concorde con te, ma pare, dico pare, cheil vecchio
F1
nei nuovi computer sia stato disabilitato....
Ciao Carlo....
ALEX.
P.S.
Per quella routine di Relink ho verificato che la cartella in cui è
posto
il DB(BE) deve essere abilitata in Read e Write perforza, il resto è OK.
--
Posted from  [146.133.1.30]



title: Query a campi incrociati

author: Vittorio

text:
Ho costruito una query a campi incrociati che mi restituisce CLIENTI come
intestazione di riga, TOTALE DI TUTTI I PRODOTTI e TOTALE PER PRODOTTO come
intestazione di colonne. Vorrei ordinare il risultato della query come
decrescente per TOTALE DI TUTTI I PRODOTTI ma inserendo ordinamento
decrescente nella griglia QBE al momento di eseguire la query mi restituisce
un messaggio di errore del tipo: Impossibile avere una funzione di
aggregazione nella proposizione ORDER BY.
Sapete dirmi dove sbaglio? Come dovrei fare per risolvere questo problema?
Grazie a chiunque sappia aiutarmi.
Auguri di Buon 2002
Fil


title: Query a campi incrociati

author: Emyr

text:


sarebbe il caso che tu ci scrivessi la stringa sql della query
incriminata
Saluti.
Emanuele.


title: Query a campi incrociati

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:06133uo9g38bj8jgh...@4ax.com...

Premetto che il tutto è stato fatto usando l'autocomposizione. Comunque
l'istruzione è la seguente:
TRANSFORM Sum(Query2.TOTALE DI TUTTI I PRODOTTI) AS TOTALE DI TUTTI I
PRODOTTI
SELECT Query2.CLIENTI , Sum(Query2.TOTALE DI TUTTI I PRODOTTI) AS [Totale di
TOTALE DI TUTTI I PRODOTTI]
FROM Query2
GROUP BY Query2.CLIENTI
PIVOT Query2.TOTALE PER PRODOTTO ;


title: Query a campi incrociati

text:


mi servirebbe anche la query2 e le tabelle di origine per provare il
tutto
Saluti.
Emanuele.


title: domanda sciocchina...

author: Paola Parioli

text:
in una form, metto una quantita' e questa deve venire calcolata per un
prezzo (in un altra tabella) e messa nel campo prezzo.
In quale controllo metto il codice?
Nel campo quantita' (after update) o nel campo prezzo? (after update
dell'altro?)
Curiosita': in maniera veloce ed elegante, Access 2000 crea un controllo
combinato, l'origine del controllo e' il campo e l'origine della riga e' una
query (SELECT [OClRighe].[Articolo] FROM [OClRighe])
Che figata, penso io, adesso la faccio anche per il campo prezzo.
Non funziona, ovviamente... ma perche'?


title: domanda sciocchina...

author: Sergio MAZZA

text:
"Paola Parioli" <
ppar...@tiscalinet.it
> ha scritto nel messaggio
news:ID0f5.39786$sE5.4...@news.infostrada.it...

Prova ad inserire nell'origine dati della casella di testo che dovrebbe
contenere il risultato (prezzo o totale? Boh!) un:
nz(quantita;0)*nz(prezzo;0)
cosě te lo calcola appena i campi sono riempiti tutti e due...
Ciao.


title: domanda sciocchina...

author: lbo dal portatile

text:
>in una form, metto una quantita' e questa deve venire calcolata per un
>prezzo (in un altra tabella) e messa nel campo prezzo.
>
>In quale controllo metto il codice?
>Nel campo quantita' (after update) o nel campo prezzo? (after update
>dell'altro?)
scrivi una routine che calcoli il risultato e la fai eseguire sia nel
dopo aggiornamento dell'uno che dell'altro, a condizione che in
entrambi i controlli ci sia un valore.  questa condizione mettila
nella routine che risparmi codice.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Cena ICAA a Roma

author: TopGun

text:
Salve a tutti!
Quando organizziamo una cena tra i partecipanti del NG a Roma???
Ciao,
Marco "TopGun"


title: Cena ICAA a Roma

text:
Sarebbe bello fare una cena, ma quasi tutti
hanno impegni in settimana..., e SABATO
tutti in giro in DISCO, la domenica a
riprendersi dal sabato e/o portare mogli
e figli in giro (quelli piccoli)...
poi la cosa + importante č: se uno come me
ed altri, non fossero di roma?
Per es io sono lombardo, e maipiů parto per
venire a mangiare a roma...
č piů la strada ke il resto... :)
Ciao a tutti gli HELPER dei NGs {A.Giovanni}


title: Cena ICAA a Roma

text:
A.Giovanni ha scritto nel messaggio <85nt09$o64$
2...@nslave2.tin.it
>...
>Per es io sono lombardo, e maipiù parto per
>venire a mangiare a roma...
>è più la strada ke il resto... :)
Hmmmm.....
Che vuoi dire?
Hmmmmm...
Antonio


title: Cena ICAA a Roma

text:
> Hmmmm.....
>
> Che vuoi dire?
>
> Hmmmmm...
>
> Antonio
no..., non ho problemi di tipo "politico"...
il fatto che per una cena non penso che molti
(lontani da Roma) partano apposta in macchina.
poi molti (penso) sono anche spesso impegnati.
Ciao                                             A.Giovanni


title: Cena ICAA a Roma

author: AntoGal

text:
A.Giovanni <
stute...@tin.it
> wrote in message
85prls$ed5$1...@nslave1.tin.it...
> il fatto che per una cena non penso che molti
> (lontani da Roma) partano apposta in macchina.
> poi molti (penso) sono anche spesso impegnati.
All'ultima cena ICDA di Palermo, Lorecoro e sorella sono venuti da Belluno.
Eravamo una ventina di persone, presto le foto sul Sito Comune.
Alla prima cena (foto sul sito) si sono incontrati a Bologna gente di Roma,
Civitavecchia, e nord Italia.
Evidentemente hanno saputo gestire i loro impegni in modo ottimale.
>Per es io sono lombardo, e maipiů parto per
>venire a mangiare a roma...
mai piů? Quando č stata l'ultima volta?
>č piů la strada ke il resto... :)
per me invece a Palermo č stato piů il resto che la strada. Queste cose sono
esperienze uniche, che solo un vero "ICDAro" puň capire...
comunque, se frequenti il NG solo da una settimana posso capire.
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.tin.it/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


title: Cena ICAA a Roma

text:
> comunque, se frequenti il NG solo da una settimana posso capire.
ehhmmm da circa 2 mesi, ma scrivo da 1 mesetto...
{ All'ultima cena ICDA di Palermo, Lorecoro e sorella sono venuti da
Belluno.
{ Eravamo una ventina di persone, presto le foto sul Sito Comune.
{ Alla prima cena (foto sul sito) si sono incontrati a Bologna gente di
Roma,
{ Civitavecchia, e nord Italia.
{ Evidentemente hanno saputo gestire i loro impegni in modo ottimale
Pekkato ke non ci sia stato...
SCUSATE, ho parlato troppo in personale...  :-{
dato ke io ho quasi 18anni (mi mancano 3 mesi...)
non ho ancora i mezzi per arrivare...
cioč li ho, ma non posso ancora usarli...
ma quando divento grande...???!!!
Essendo nuovo... non lo so e x questo lo chiedo...
ma tra gli ex ICDAriani ed i new ICAAriani,
c'č qualcuno sui 18/19? nelle "facce del sito"
siete tutti anziani... ::))
----------------------------------------------------------------------------
--------
e cosě un ˝new ICAAro morě con una figura di me..da ancor
prima di diventare grande...        uheee uheee uheee sob, sig , madam,...
venne gettato dagli anziani in un pozzo senza fine, e sepolto...
e continueranno a seppellirlo in eterno...  (ce 'nanno da riempire il
pozzo...:)


title: Cena ICAA a Roma

text:
A.Giovanni <
stute...@tin.it
> wrote in message
85s1ce$4qr$1...@nslave1.tin.it...
> e cosě un ˝new ICAAro morě con una figura di me..da ancor
> prima di diventare grande...        uheee uheee uheee sob, sig ,
madam,...
> venne gettato dagli anziani in un pozzo senza fine, e sepolto...
> e continueranno a seppellirlo in eterno...  (ce 'nanno da riempire il
> pozzo...:)
"Ragazzo, stai lontano dalla droga!" (tratto da "Il principe cerca moglie"
o qualcosa di simile)
Ciao
        il 40enne gpb


title: Cena ICAA a Roma

author: RoDAgo

text:
PAROLE SANTE!!!!
Ciao RoDAgo :-)))
AntoGal <zer...@NOSPAMtiscalinet.it> scritto nell'articolo
<85qu5k$vnf$
1...@pegasus.tiscalinet.it
>...
> A.Giovanni <
stute...@tin.it
> wrote in message
> 85prls$ed5$1...@nslave1.tin.it...
> > il fatto che per una cena non penso che molti
> > (lontani da Roma) partano apposta in macchina.
> > poi molti (penso) sono anche spesso impegnati.
>
> All'ultima cena ICDA di Palermo, Lorecoro e sorella sono venuti da
Belluno.
> Eravamo una ventina di persone, presto le foto sul Sito Comune.
> Alla prima cena (foto sul sito) si sono incontrati a Bologna gente di
Roma,
> Civitavecchia, e nord Italia.
> Evidentemente hanno saputo gestire i loro impegni in modo ottimale.
>
> >Per es io sono lombardo, e maipiů parto per
> >venire a mangiare a roma...
> mai piů? Quando č stata l'ultima volta?
>
> >č piů la strada ke il resto... :)
> per me invece a Palermo č stato piů il resto che la strada. Queste cose
sono
> esperienze uniche, che solo un vero "ICDAro" puň capire...
> comunque, se frequenti il NG solo da una settimana posso capire.
>



title: Cena ICAA a Roma

text:
A.Giovanni <
stute...@tin.it
> wrote in message
85s1ce$4qr$1...@nslave1.tin.it...
> Pekkato ke non ci sia stato...
> SCUSATE, ho parlato troppo in personale...  :-{
> dato ke io ho quasi 18anni (mi mancano 3 mesi...)
> non ho ancora i mezzi per arrivare...
ah, beh, ok!
> Essendo nuovo... non lo so e x questo lo chiedo...
> ma tra gli ex ICDAriani ed i new ICAAriani,
> c'è qualcuno sui 18/19? nelle "facce del sito"
> siete tutti anziani... ::))
Emanuele Cesena (eMa) dovrebbe essere un tuo coetaneo... per il resto la
distribuzione è Gaussiana, con media centrata sui 28. Vabbò va... tanto per
dire che a chiamarci vecchi ce ne vuole :-)



title: Cena ICAA a Roma

text:
A.Giovanni ha scritto nel messaggio <85prls$ed5$
1...@nslave1.tin.it
>...
>> Hmmmm.....
>>
>> Che vuoi dire?
>>
>> Hmmmmm...
>>
>> Antonio
>
>no..., non ho problemi di tipo "politico"...
aaahhh
>
>il fatto che per una cena non penso che molti
>(lontani da Roma) partano apposta in macchina.
>poi molti (penso) sono anche spesso impegnati.
A parte le risposte degli altri e il fatto che sei giovane, sappi che anche
con quelli di IHU abbiamo fatto molte cene e persino weekend interi e hanno
partecipato anche ragazzi dell'età tua...
Antonio


title: Cena ICAA a Roma

author: Stefano Bettini

text:
Antonio Biso ha scritto nel messaggio
<861gbi$f0o$
1...@lacerta.tiscalinet.it
>...
>
>A parte le risposte degli altri e il fatto che sei giovane, sappi che anche
>con quelli di IHU abbiamo fatto molte cene e persino weekend interi e hanno
>partecipato anche ragazzi dell'età tua...
>
A quale titolo,  commensali o pietanze ?!
Bye, Ste


title: Cena ICAA a Roma

text:
Stefano Bettini ha scritto nel messaggio
<10kip8o$1b1$
1...@fe2.cs.interbusiness.it
>...

Gnam!
Antonio


title: ripristino database

author: MICHELE GALLO

text:
Salve a tutti
Oggi ho avuto un grosso problema con Access97. Forse chiudendo il programma
con un database ancora aperto, ho danneggiato il file.
Il file in questione è importante (e come un vero stupido) non ne ho una
copia di back up. Quando provo ad aprirlo mi viene chiesto di ripristinarlo,
ma il tentativo fallisce sistematicamente e compare la scritta che xyz.mdb
non può essere ripristinato o non è un file di microsoft access.
Cosa posso fare.
Ho perso il file per sempre?
Mi scuso per l'intrusione e ringrazio per chi sia in grado di fornirmi
qualche aiuto.


title: ripristino database

text:
"MICHELE GALLO" <
ram...@tin.it
> ha scritto nel messaggio
news:8vvuod$muf$1...@nslave3.tin.it...

Non mi è successo niente del genere (fino ad ora); se non sbaglio sul sito
comune (
http://members.xoom.it/it_db_access/
) c'é il link alle 'Microsoft
Jet Utilities' che dovrebbero contenere un programma per (provare) a
ripristinare l'mdb...
Ciao.


title: 2 report 2 stampanti

author: Gian

text:
Ciao
č possibile in access chiedere in automatico che il report1 venga
stampato con la stampante1 e il report2 con la stampante2?
se sě, come?
Grazie
Gian


title: 2 report 2 stampanti

text:


la maniera piů diretta e di specificargli su imposta pagina del report
una stampante specifica
Saluti.
Emanuele.


title: report su stampante ad aghi....

author: Enrico Virginio

text:
Non riesco a stampare correttamente un report tramite una stampante ad aghi
(Lekmark 2481) su fincati a modulo continuo.
Ho impostato nel driver della stampante un formato personalizzato di 30cm x
10cm., ma sebbene l'anteprima del report esca corretta, in fase di stampa la
stampante se ne frega del formato...lasciamo perdere poi il font del
carattere...
Che posso fare?
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.770 / Virus Database: 517 - Release Date: 27/09/2004


title: report su stampante ad aghi....

author: Marco Antonioli

text:
> Non riesco a stampare correttamente un report tramite una stampante ad aghi
> (Lekmark 2481) su fincati a modulo continuo.
> Ho impostato nel driver della stampante un formato personalizzato di 30cm x
> 10cm., ma sebbene l'anteprima del report esca corretta, in fase di stampa la
> stampante se ne frega del formato...lasciamo perdere poi il font del
> carattere...
> Che posso fare?
La gestione delle stampanti ad aghi, per esperienza personale ed
indiretta risulta molto, molto avventurosa se si utilizza Windows.
Potresti provare con stampante generica/solo testo, che ti lascia cmq
poco margine di manovra oppure con altri drivers compatibili.
Buona fortuna .....
Ciao+
MArco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: clonare uno o più record necessari 2 recordset?

author: IgnazioC

text:
avrei la necessità di "clonare" una serie di record in una tabella,
tranne l'id (chiave primaria) ed una chiave esterna.
devo necessariamente aprire due recordset sulla stessa tabella?
io ho fatto così:
Dim rs As DAO.Recordset
Dim rs2 As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tab1")
Set rs2 = CurrentDb.OpenRecordset("tab1")
  rs2.AddNew
  rs2("miaChiaveEsterna")=n
  rs2("desc") = rs("desc")
  rs2.Update
per funzionare funziona, ma c'è qualche metodo più efficiente?
--
ignazioc


author: Gabriele Bertolucci

text:
> avrei la necessità di "clonare" una serie di record in una tabella,
> tranne l'id (chiave primaria) ed una chiave esterna.
> devo necessariamente aprire due recordset sulla stessa tabella?
> io ho fatto così:
[omissis]
> per funzionare funziona, ma c'è qualche metodo più efficiente?
Se hai un metodo deterministico per individuare il record che vuoi clonare,
puoi anche sfruttare SQL utilizzando il comando INSERT INTO, del quale puoi
trovare un'esaustiva spiegazione all'indirizzo
http://office.microsoft.com/en-gb/access/HP010322451033.aspx
Comunque, in questo modo non devi utilizzare nessun recordset, ma
semplicemente il seguente codice:
DoCmd.RunSQL "INSERT INTO tabella(campo1, campo2, ...., campoN) " & _
             "SELECT campo1, campo2, ...., campoN FROM tabella " & _
             "WHERE campochiave = " & valoredeterminante
Devi stare attento a non considerare, nell'insieme campo1, ...., campoN,
alcun campo di tipo contatore.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:
Gabriele Bertolucci ci ha detto :

grazie mille, non conoscevo la possibilità di accodare record multipli,
penso che utilizzerò molto questo sistema..
forse faccio troppo uso dei recordset nei miei programmi. :(
--
ignazioc


text:
>> DoCmd.RunSQL "INSERT INTO tabella(campo1, campo2, ...., campoN) " & _
>>              "SELECT campo1, campo2, ...., campoN FROM tabella " & _
>>              "WHERE campochiave = " & valoredeterminante
> grazie mille, non conoscevo la possibilità di accodare record multipli,
> penso che utilizzerò molto questo sistema..
> forse faccio troppo uso dei recordset nei miei programmi. :(
Se vuoi utilizzare la tecnica sopra esposta per inserire più record, allora
puoi fare un'ottimizzazione.
Ti crei un elenco delle chiavi primarie dei record da copiare, sotto forma
di stringa con i valori separati da ", ".
Ottenuta questa stringa, utilizzi la seguente sintassi SQL:
DoCmd.RunSQL "INSERT INTO tabella(campo1, campo2, ...., campoN) " & _
             "SELECT campo1, campo2, ...., campoN FROM tabella " & _
             "WHERE campochiave IN (" & strValori & ")



text:
Scriveva Gabriele Bertolucci martedì, 18/12/2007:

al momento mi è servito copiare i record che presentavano la stessa
chiave esterna quindi la condizione era un
"WHERE FKIDcliente = " & me.miovalore
ed il tuo codice era perfetto.
cmq terrò a mente anche questo suggerimento.
grazie
ciao.
--
ignazioc


title: Semplice pulsante di chiusura

author: Paolo

text:
Inserisco, con l'autocomposizione, in una maschera un semplice pulsante di
chiusura ma all'atto di salvare il tutto si blocca senza possibilita di
uscire (devo forrzare l'uscita con ctrl-alt-canc e non ne riesco proprio a
capire il motivo.
Grazie!


title: Semplice pulsante di chiusura

author: Toni

text:
"Paolo" <
paolo...@tiscali.it
> ha scritto nel messaggio
news:ImEma.37896$iy5.1...@twister2.libero.it...

Il pulsante chiude il form o tutto il database?
Che versione di office hai? e su quale sistema operativo?


title: Semplice pulsante di chiusura

text:
"Paolo" <
paolo...@tiscali.it
> ha scritto nel messaggio
news:ImEma.37896$iy5.1...@twister2.libero.it...

Hai già provato ad importare tutto in un nuovo mdb?
Ciao.
--
Sergio MAZZA


title: e quando non ci riesco, non ci riesco.... ma che diamine

author: Simona

text:
scusate ma.....
ho due tabelle,
una "matricole" con
-----idmatricola(chiave) - matricola (univoco) - descrizione
la seconda "Interventi tecnici" con
----idintervento_tecnico(chiave) - matricola (testo) - note
sono collegate fra loro con la relazione "matricola-matricola" uno a molti,
come faccio a vedere solo i records della prima tabella che non hanno
neanche un record nella seconda
(in pratica tutte le matricole che non hanno interventi)
se qualcuno mi da una mano gli sono grato e ha una granita gratis a Catania
Saluti
Vincenzo


author: Ammammata

text:
"Simona" <
sim...@tiscli.it
> wrote in
news:58fgi.24167$
y05....@tornado.fastwebnet.it
:
> scusate ma.....
>
>
attenzione a non farvi fuorviare dal nickname
non si tratta di una donna (Simona) bensì di un uomo (Vincenzo)
quindi non rispondete ma, come d'abitudine, postate il cazziatone per
il post con oggetto assolutamente inutile e non esplicativo ;)
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
http://boinc.mundayweb.com/one/stats.php?userID=2762


author: Vincenzo

text:
"Ammammata" <
amma...@tiscalinet.it
> ha scritto nel messaggio
news:Xns995BEFDAA825Dam...@194.177.97.96...
> "Simona" <
sim...@tiscli.it
> wrote in
> news:58fgi.24167$
y05....@tornado.fastwebnet.it
:
>
>> scusate ma.....
>>
>>
>
> attenzione a non farvi fuorviare dal nickname.....
Innanzitutto ti ringrazio per l'aiuto....ed evito polemiche inutili che non
servono a nessuno.
Inoltre, mi dispiace aver fuorviato il NG con un nome di donna, (ho
utilizzato l'account di mia moglia per spedire il messaggio dato che l'ho
fatto da casa di sera, e non credo sia reato). Adesso riscrivo con il mio
account personale cercando di postare un subject più esplicativo.......
ho due tabelle,
una "matricole" con
-----idmatricola(chiave) - matricola (univoco) - descrizione
la seconda "Interventi tecnici" con
----idintervento_tecnico(chiave) - matricola (testo) - note
sono collegate fra loro con la relazione "matricola-matricola" uno a molti,
come faccio a vedere solo i records della prima tabella che non hanno
neanche un record nella seconda
(in pratica tutte le matricole che non hanno interventi)
se qualcuno, che non vuole attraccare con mia moglie solo perchè da un aiuto
su access, mi da una dritta gli sono grato e ha "BEN DUE"  granite gratis a
Catania (per ammammata, niente briochesss.) :-)
Saluti
Vincenzo


author: Massimo Piubelli

text:
Vincenzo wrote:
> "Ammammata" <
amma...@tiscalinet.it
> ha scritto nel messaggio
> news:Xns995BEFDAA825Dam...@194.177.97.96...
>> "Simona" <
sim...@tiscli.it
> wrote in
>> news:58fgi.24167$
y05....@tornado.fastwebnet.it
:
>>
>>> scusate ma.....
>>>
>>>
>>
>> attenzione a non farvi fuorviare dal nickname.....
>
> Innanzitutto ti ringrazio per l'aiuto....ed evito polemiche inutili
> che non servono a nessuno.
No, le polemiche sicuramente non servono...
Ma un oggetto significativo si, per future ricerche, neanche l'attuale non è un gran che... ^__^
> Inoltre, mi dispiace aver fuorviato il NG con un nome di donna, (ho
> utilizzato l'account di mia moglia per spedire il messaggio dato che
> l'ho fatto da casa di sera, e non credo sia reato). Adesso riscrivo
> con il mio account personale cercando di postare un subject più
> esplicativo.......
visto che il cazziatone c'è già stato e c'è la voglia di migliorare... ti si aiuta lo stesso va...  ;-)
la prossima volta magari apri un nuovo thread con l'oggetto giusto
> ho due tabelle,
> una "matricole" con
> -----idmatricola(chiave) - matricola (univoco) - descrizione
> la seconda "Interventi tecnici" con
> ----idintervento_tecnico(chiave) - matricola (testo) - note
Piccola considerazione, se matricola è univoco in maticole, perchè non farlo come chiave, renderebbe le cose decisamente più semplici
> sono collegate fra loro con la relazione "matricola-matricola" uno a
> molti, come faccio a vedere solo i records della prima tabella che
> non hanno neanche un record nella seconda
> (in pratica tutte le matricole che non hanno interventi)
Puoi partire come aiuto con la creazione guidata di una query di ricerca dati non corrispondenti.
Sostanzialmente devi cambiare la "join" (o relazione)
Click con il pulsante dx, proprietà join
E metti la spunta su "visualizza tutti i record di matricole ..."
Quindi fai un filtro sul campo IDIntervento_tecnico visualizzando solo quelli in cui is null
> se qualcuno, che non vuole attraccare con mia moglie solo perchè da
> un aiuto su access, mi da una dritta gli sono grato e ha "BEN DUE"
> granite gratis a Catania (per ammammata, niente briochesss.) :-)
grazie grazie... schedulerò le ferie in sicilia allora ;-)
Ciao,
Max


text:
"Massimo Piubelli" <massim...@accessgroup.it.invalid> wrote in
news:f5t4g1$bcr$
1...@tdi.cu.mi.it
:
>> se qualcuno, che non vuole attraccare con mia moglie solo perchč da
>> un aiuto su access, mi da una dritta gli sono grato e ha "BEN DUE"
>> granite gratis a Catania (per ammammata, niente briochesss.) :-)
>
> grazie grazie... schedulerň le ferie in sicilia allora ;-)
>
ricordati che la brioche č ottima anche con il gelato :)
la prima volta che l'ho provata fu proprio in sicilia, a mazara del vallo,
come pure il caffč freddo (quasi gelato) con la panna sopra :P



text:
Ammammata wrote:
> "Massimo Piubelli" <massim...@accessgroup.it.invalid> wrote in
> news:f5t4g1$bcr$
1...@tdi.cu.mi.it
:
>
>>> se qualcuno, che non vuole attraccare con mia moglie solo perchè da
>>> un aiuto su access, mi da una dritta gli sono grato e ha "BEN DUE"
>>> granite gratis a Catania (per ammammata, niente briochesss.) :-)
>>
>> grazie grazie... schedulerò le ferie in sicilia allora ;-)
>>
>
> ricordati che la brioche è ottima anche con il gelato :)
e la dieta???
> la prima volta che l'ho provata fu proprio in sicilia, a mazara del
> vallo, come pure il caffè freddo (quasi gelato) con la panna sopra :P
c'è niente da fare... se un thread parte male, parte male...
prima l'oggetto, ora maxi ot ;-)
Comunque grazie... la mia era una battuta (forse ^__^) essendo che non so ancora se e quando avrò ferie
ma se e quando verrò in Sicilia, un ot grande me lo concederò per chiedere info (poi, visto che la dieta è andata a quel paese... passo da MA a prendere i babbà)
Ciao,
Max


text:
Dato che le indicazioni hanno funzionato perfettamente (sbagliavo
nell'impostare l'ordine della query a campi non corrispondenti)
sono a vostra disposizione.
Saluti
Vincenzo
"Massimo Piubelli" <massim...@accessgroup.it.invalid> ha scritto nel
messaggio news:f5t5u0$d0d$1...@tdi.cu.mi.it...
Ammammata wrote:
> "Massimo Piubelli" <massim...@accessgroup.it.invalid> wrote in
> news:f5t4g1$bcr$
1...@tdi.cu.mi.it
:
>
>>> se qualcuno, che non vuole attraccare con mia moglie solo perchč da
>>> un aiuto su access, mi da una dritta gli sono grato e ha "BEN DUE"
>>> granite gratis a Catania (per ammammata, niente briochesss.) :-)
>>
>> grazie grazie... schedulerň le ferie in sicilia allora ;-)
>>
>
> ricordati che la brioche č ottima anche con il gelato :)
e la dieta???
> la prima volta che l'ho provata fu proprio in sicilia, a mazara del
> vallo, come pure il caffč freddo (quasi gelato) con la panna sopra :P
c'č niente da fare... se un thread parte male, parte male...
prima l'oggetto, ora maxi ot ;-)
Comunque grazie... la mia era una battuta (forse ^__^) essendo che non so
ancora se e quando avrň ferie
ma se e quando verrň in Sicilia, un ot grande me lo concederň per chiedere
info (poi, visto che la dieta č andata a quel paese... passo da MA a
prendere i babbŕ)
Ciao,
Max


title: M,I.5 P ersecution   abuse  in set-up  situati ons an d in p ublic

text:
-=-=-=-=-=-=-=-=-=-=-=-=--=-=-=-=-=-=-=-=-=-=-
-= abuse in set-up situations and in public. -=
-=-=-=-=-=-=-=-=-=-=-=-=--=-=-=-=-=-=-=-=-=-=-
Strangers in the street have recognized me on sight. many times, and shown
awareness of. the current thread of abuse. To give you one example, in 1992
I was seriously. ill, and a manager at work somewhat humorously said that
"it. wasn't fair" that people were bullying me. A few days later, I attended
for the first. time a clinic in London as an outpatient, and on my way out
was accosted by someone who asked if "they had. paid my fare", with emphasis
on the word. "fare". He repeated the word several times in this different
context;. that they should have paid my "fare", each time emphasizing the
word.
For two and a half years from the time. their harassment started until
November 1992 I refused to see a psychiatrist, because I. reasoned that I
was not ill of my own action or fault,. but through the stress caused by
harassment, and that a lessening of the illness would have to be. consequent
to. a removal of its immediate cause, in other words a cessation of
harassment. I also reasoned that since they were. taunting me with jokes
about mental illness, if I were to. seek treatment then the abusers would
think that they had "won" and been proved "right". Remember, the. constant
theme. of any persecution is, "we must destroy you because you're X",
whether X is a racial or other attribute. In this. case the X was "we
persecute you because you have brain disease". The similarity of this. logic
to Nazi attitudes to. the mentally ill is striking.
The same manager. who'd said "it wasn't fair" asked me in winter 1992 why I
didn't seek help from a psychiatrist; was it, he asked,. because "they would
think they had won" if I sought treatment? That was something. I'd never
said at work... again, taken. separately it proves nothing, but many such
things over a period of months proves conclusively that people. in the
company knew what was going on,. and in quite a lot of detail.
Usually harassment. in public lacks the level of finesse of "paying your
fare". Most people's imagination does not go beyond moronic parroting. of
the. current term of denigration. That is not surprising given the average
level of the abusers; if they do not have the. intelligence to distinguish
wrong from right then neither. will they have the capacity for anything
other than mindless repetition of a. monosyllabic term calculated to fit
into. their minds.
The first incidents of verbal assault in public were. in again in the summer
of 1990, although they increased in frequency. and venom with time. In July
1990 the first public incident occurred on a tube train on the. Northern
line. Two men and their. girlfriends recognised me; the women sprang to my
defence, saying "He looks perfectly normal,. he doesn't look ill". Their
boyfriends of course knew better, and followed. the party line; one of them
made reference to an "operation",. apparently to work at the tube station
but implicitly to a visit that I had made. to hospital a couple of weeks
previously.
In. August 1990 going home from college, soon after getting on a tube train
at Gloucester Road I was followed by a group of four. youths, who started a
chant of abuse. That. they were targeting me was confirmed by other people
in the carriage, one of. whom asked the other "who are they going on at, is
it the bloke who just got on?" to. which the second replied "yes, I think
so". I was tempted to reply, but as in. every other instance the abusers are
enabled in their cowardice by physically. outnumbering the abused; any
confrontation would result. in my being beaten up, followed by a complaint
to the. police that "he attacked us", and of course he's ill, so he must
have been imagining that we were getting at him. Shitty, aren't. they?
But the shittiness of the four youths. on the tube train is as nothing
compared to the episode on. the National Express coach to Dover in the
summer of 1992. While going on holiday to the Continent. I was verbally set
upon by a couple travelling sitting a few rows behind. The. boy did the
talking, his female companion contributing only a continuous empty. giggling
noise. He spoke loudly to ensure other people on. the coach heard, always
about "they". and "this bloke" but never naming either the abusers or the
person he was talking about. He said "they" had "found somebody. from his
school, and he was always really stressed at school". They must have. dug
deep to find enemies there; perhaps someone who. dropped out of school,
someone who didn't do. too well later, who was jealous and keen to get their
own back? The boy. also said "he was in a bed and breakfast for only one
night and they got him". By a not unexpected coincidence. I had been in a
B&B in Oxford a week. previously, which had been booked from work; other
things lead me to the conclusion. that the company's offices were bugged for
most of the 2 1/2 years that I was there, so. "they" would have known a room
in the B&B had been booked.. (But I'll bet "they" didn't tell the company's
managers their offices. were bugged, did they?).
After a few minutes of this I went back to where they. were sitting and
asked where they. were travelling. The boy named a village in France, and
the girl's. giggling suddenly ceased; presumably it permeated to her brain
cell what the purpose of. the boy's abuse was.
This and other set-up situations are obviously calculated to provoke. a
direct confrontation which would bring in the police, with. the abusers
claiming that they were the ones. attacked. Again in 1992, outside the
house where I was living in Oxford I was physically attacked by someone. -
not punched, just grabbed by the coat, with some verbals thrown in. for good
measure. That was something the people at. work shouldn't have known
about... but soon after a couple of people were talking right in front. of
me. about, "I heard he was attacked". The UK police have a responsibility
for preventing assault occurring, but they do not seem to. take any interest
in meeting that responsibility. I suppose their attitude is. that harassment
does not come within their remit. unless it involves physical assault, and
they will only become involved. once that happens. That is of course quite
the. wrong attitude for them to take, but as I now understand, the police
investigate only the. crime they wish to investigate; if they do not take
your complaints seriously then. there is nothing you can do to make them
take. action.
4154


title: utilizzare piu' stampanti

author: Laura

text:
Ciao a tutti,
    ho la necessita' di stampare dei report usando due stampanti di rete
distinte.
    Qualcuno mi sa aiutare?
    Grazie


title: utilizzare piu' stampanti

author: Harry Evans

text:
>     ho la necessita' di stampare dei report usando due stampanti di rete
> distinte.
Basta impostare come predefinita la stampante che vuoi usare. Questo va
fatto prima della stampa del report o del preview.
Per il modo come fare, trovi una bella funzione sul sito Comune
bye


title: utilizzare piu' stampanti

author: Lorenzo Coronati

text:
Scrisse "Laura" <
ia...@libero.it
>:
>il problema e' che il report 1
>deve essere stampato sulla stampante A e il report 2 sulla stampante B in
>maniera automatica.
Ma scusa, se e' sempre cosi', non e' suff. impostare la stampa su una
stampante specifica anziche' sulla predefinita?
Io lo faccio abitualmente (ddt sulla aghi, cartellini colorati sulla
inkjet e report vari sulla laser).
Baibai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: utilizzare piu' stampanti

author: GIAMPAOLO COLOMBO

text:
Laura <
ia...@libero.it
> wrote in message
fbTt4.23332$qv.2...@news.infostrada.it...
> Ciao a tutti,
>     ho la necessita' di stampare dei report usando due stampanti di rete
> distinte.
>     Qualcuno mi sa aiutare?
>     Grazie
>
> Devi caricare i drivers di tutte le stampanti su cui vuoi lanciare le
stampe, poi, in fase di stampa "impostazioni", imposti la stampante su cui
desideri far avere i documenti stampati.
ciao
Demolition Man


title: aiuto contatore automatico

text:
devo gestire degli interventi effettuati da alcuni operatori in sale diverse
e
ho un tracciato record cosě composto:
DATA_INT            Data/ora             - data intervento
TIPO_INT              Testo                - tipo intervento (codice)
DESCR_INT          Testo                - descrizione intervento
SALA                     Testo                -sala in cui č effettuato
l'intervento
in un eventuale campo (NUM_INT - Testo) devo far generare un numero
univoco per ogni anno e per ogni SALA ( Sala-A, Sala-B ecc.) quindi mi
dovrei ritrovare con
Sala-A 0001-02
Sala-A 0002-02
Sala-B 0001-02
Sala-B 0002-02
Sala-B 0003-02
e ogni anno la numerazione dovrebbe ricominciare da 0001 per il numero
di intervento.
non capisco niente di VBA
scusate anticipatamente e grazie


title: aiuto contatore automatico

author: bep

text:
"fr@nco" <
fpol...@libero.it
> ha scritto nel messaggio
news:GhM48.12469$6e5.4...@twister2.libero.it...
> devo gestire degli interventi effettuati da alcuni operatori in sale
diverse
> e
> ho un tracciato record così composto:
> DATA_INT            Data/ora             - data intervento
> TIPO_INT              Testo                - tipo intervento (codice)
> DESCR_INT          Testo                - descrizione intervento
> SALA                     Testo                -sala in cui è effettuato
> l'intervento
> in un eventuale campo (NUM_INT - Testo) devo far generare un numero
> univoco per ogni anno e per ogni SALA ( Sala-A, Sala-B ecc.) quindi mi
> dovrei ritrovare con
> Sala-A 0001-02
> Sala-A 0002-02
> Sala-B 0001-02
> Sala-B 0002-02
> Sala-B 0003-02
> e ogni anno la numerazione dovrebbe ricominciare da 0001 per il numero
> di intervento.
>
> non capisco niente di VBA
>
> scusate anticipatamente e grazie
>
>
>
>
la generazione automatica di chiavi è trattata bene sul sito comune. Ti puoi
scaricare anche un esempio che puoi adattare alle tue esigenze.
Non è necessario avere conoscenze approfindite di vba per usare access,
comunque ti consiglio di avvicinarti a questo linguaggio che può risolverti
molti problemi.
ciao.
www.sitocomune.com
guarda fra le faq e troverai quello che ti serve


title: 1/2 (OT) Database in rete.

author: Mak

text:
Salve a tutti,
domanda sulla rete ovvero io normalmente imposto i database in maniera che
tutti i BE risultino su una partizione "Immagine" creata all' avvio dei pc
su esecuzione automatica con un .bat che richiama subst.exe   in maniera che
all' avvio tutti i collegamenti delle tabelle risultino uguali  su qualsiasi
pc (anche se in avvio il be esegue una scansione cercando di aprire i
recordset di tutte le tabele collegate e generando un errore in caso non
riuscisse).
Quando il cliente installa su C:\programmi tutto bene;se deve per esigenze
diverse, salvarlo in luogo diverso devo crearli una subst personale a
seconda della directory o partizione scelta.
Vi chiedo se esiste, qualche utility , che generi in automatico un .bat
,dato un percorso, magari quella di installazione?
Chiedo troppo?
Saluti Mak
Access 2000 SR1


title: 1/2 (OT) Database in rete.

author: Sib

text:
"Mak" <
mak....@tiscalinet.it
> ha scritto nel messaggio
> domanda sulla rete ovvero io normalmente imposto i database in maniera che
> tutti i BE risultino su una partizione "Immagine" creata all' avvio dei pc
> su esecuzione automatica con un .bat che richiama subst.exe   in maniera
che
> all' avvio tutti i collegamenti delle tabelle risultino uguali  su
qualsiasi
> pc (anche se in avvio il be esegue una scansione cercando di aprire i
> recordset di tutte le tabele collegate e generando un errore in caso non
> riuscisse).
cut
Immagine? (dicosa)
.bat? (per fare che?)
subst.exe? (cosa e'?)
Errore di collegamento? (non e' vero finche' non apri un recordset, e
dall'FE per di piu', che c'entra il BE)
di cosa parli?
Sib


title: 1/2 (OT) Database in rete.

text:
> Immagine? (dicosa)
> subst.exe? (cosa e'?)
Nell'ormai vecchio sistema operativo MS-DOS era presente un comando molto
utile; il SUBST appunto.
Questo comando permetteva di trattare una qualsiasi directory come se fosse
una unità del disco fisso. In questo modo una directory con un percorso
molto lungo e noioso da digitare poteva essere rinominata come una lettera
di un disco.
Facciamo un esempio:
digitando il comando
subst J: c:\mieidoc\database\db
è poi possibile collegare le tabelle a
j:\miodb.mdb
invece di
c:\mieidoc\database\db\miodb.mdb
Digitando il comando
Subst J: /d
si avrà l'effetto di eliminare la SUBST istruzione precedentemente creata.
Ebbene questo comando non funzionava perfettamente sotto windows 3.xx e
poteva causare qualche spiacevole inconveniente.
SUBST.EXE è  ritornato con Windows 95 ed è possibile trovarlo nella cartella
command che si trova dentro alla cartella di windows 95.
Funziona bene e allo stesso modo di quando lo si usava in Dos e può
rivelarsi più utile che mai. L'unico difetto è che potrebbe apparirvi il
cestino anche nel disco creato con questo comando.
Inoltre è molto utile per connettere un' unità di rete da un client.
> .bat? (per fare che?)
Su esecuzione automatica  copi un file . bat con al riga di comando
subst J: c:\mieidoc\database\db
exit
cls
venendo cosi' creata l' untita immagine in apertura se no il db non funziona
>Errore di collegamento? (non e' vero finché non apri un recordset, e
dall'FE per di piu', che c'entra il BE)
Hai ragione ho sbagliato Fe :-(
Saluti


title: 1/2 (OT) Database in rete.

text:
"Mak" <
mak....@tiscalinet.it
> ha scritto nel messaggio
> > Immagine? (dicosa)
> > subst.exe? (cosa e'?)
>
> Nell'ormai vecchio sistema operativo MS-DOS era presente un comando molto
> utile; il SUBST appunto.
cut
> > .bat? (per fare che?)
>
> Su esecuzione automatica  copi un file . bat con al riga di comando
> subst J: c:\mieidoc\database\db
> exit
> cls
> venendo cosi' creata l' untita immagine in apertura se no il db non
funziona
a parte che potevi lanciare quasti comandi da VB, che motivo c'e'?
perche' non colleghi le tabelle dal loro percorso, sul sito comune trovi
degli esempi in merito
ciao
Sib


title: 1/2 (OT) Database in rete.

text:
> a parte che potevi lanciare quasti comandi da VB, che motivo c'e'?
> perche' non colleghi le tabelle dal loro percorso, sul sito comune trovi
> degli esempi in merito
>
> ciao
>
> Sib
Ciao Sib,
sono a conoscenza dei vari comandi  e  metodi per giungere al relink delle
tabelle, conosco le proprietà e i metodi dell' oggetto tabledef DAo e dell'
oggetto catalog Ado.
Il fatto che io utilizzi una subst è dato dalla facilità con cui puoi fare
le connessioni dell' unità di rete dai client senza che io intervenga, in
quanto il cliente invece che scovarsi il percorso dovrà semplicemente
trovare l' unità di connessione.
Naturalmente sono sempre soluzioni o metodi di impostazione o costruzione
dei programmi che possono essere opinabili . Apprezzo, comunque,  la tua
disponibilità al confronto.
Grazie
Mak


title: 1/2 (OT) Database in rete.

text:
"Mak" <
mak....@tiscalinet.it
> ha scritto nel messaggio
cut
> > perche' non colleghi le tabelle dal loro percorso,
cut
> Il fatto che io utilizzi una subst è dato dalla facilità con cui puoi fare
> le connessioni dell' unità di rete dai client senza che io intervenga, in
> quanto il cliente invece che scovarsi il percorso dovrà semplicemente
> trovare l' unità di connessione.
Non mi e' chiaro.
io cerco di evitare che il cliente debba cercaer alcunche'.
Ad ogni modo, per il tuo quesito iniziale, puoi usare
currentdb.name
 per
sapere il percorso completo dell'applicazione e la funzione dir() per
cercare altri file.
> Naturalmente sono sempre soluzioni o metodi di impostazione o costruzione
> dei programmi che possono essere opinabili .
Ognuno fa come ritiene opportuno, io sollevavo solo dei dubbi.
Ciao
Sib


title: Passaggio di valori tra 2 maschere

author: Rio

text:
Ciao a tutti ,
volevo chiedervi un'info : devo passare un valore contenuto in una combobox
da una maschera ad un'altra . mi spiego meglio : ho la maschera "soggetto"
nella quale viene visualizzato il valore id_soggetto . da questa maschera ne
apro una seconda attraverso un pulsante e passo il valore contenuto nella
prima memorizzandolo in una casella che lo trasferisce in un determinato
record di una tab. innanzitutto nella maschera "soggetto" ho messo il codice
vb :
Option Compare Database
Public val_id_soggetto As Double      (non so se questo possa effettivamente
                                                                      essere
utile )
nella seconda maschera ho messo il seguente codice in una casella :
=[Forms]![M_soggetto]![id_soggetto]
Il tutto funziona correttamente.
Dovevo fare la stessa cosa tra altre 2 maschere ma , facendo la stessa
procedura elencata prima ( ovviamente cambiando il nome della maschera e il
valore da copiare), il valore della casella non viene passato.
Volevo sapere se è possibile fare diversamente .
Grazie a tutti


title: Passaggio di valori tra 2 maschere

author: Roberto dalla campagna

text:
Rio <
warrior...@yahoo.it
> wrote in message
j2XIa.220406$g92.4...@news2.tin.it...
> Ciao a tutti ,
> volevo chiedervi un'info : devo passare un valore contenuto in una
combobox
> da una maschera ad un'altra . mi spiego meglio : ho la maschera "soggetto"
> nella quale viene visualizzato il valore id_soggetto . da questa maschera
ne
> apro una seconda attraverso un pulsante e passo il valore contenuto nella
> prima memorizzandolo in una casella che lo trasferisce in un determinato
> record di una tab. innanzitutto nella maschera "soggetto" ho messo il
codice
> vb :
>
> Option Compare Database
> Public val_id_soggetto As Double      (non so se questo possa
effettivamente
>
essere
> utile )
A mio avviso non serve a nulla.
>
> nella seconda maschera ho messo il seguente codice in una casella :
>
> =[Forms]![M_soggetto]![id_soggetto]
>
> Il tutto funziona correttamente.
> Dovevo fare la stessa cosa tra altre 2 maschere ma , facendo la stessa
> procedura elencata prima ( ovviamente cambiando il nome della maschera e
il
> valore da copiare), il valore della casella non viene passato.
> Volevo sapere se è possibile fare diversamente .
> Grazie a tutti
[Forms]![SecondaMaschera]![CasellaDiTesto] =
=[Forms]![M_soggetto]![id_soggetto]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: aggiornare tutti i record di una tabella mostrati una maschera

author: Giancarlo

text:
Ciao a tutti.
Ho una maschera  in visualizzazione maschere continue, che mostra i percorsi
di alcune tabelle collegate al database. Il controllo che mostra i dati si
chiama "TXTpercorso". Queste informazioni vengono prese da una tabella
"elenco_tabelle"
Nella maschera ho messo una check "copia_percorso" e vorrei fare in modo
che, se spuntata, quando inserisco il nuovo percorso nella prima textbox,
questo venga copiato in tutte le altre.
Ho due problemi:
1) Sull'evento AfterUpdate di TXTPercorso ho messo:
If Me.copia_percorso = -1 Then
    Dim dbs As Database, rst As Recordset
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("select * from elenco_tabelle")
    Do Until rst.EOF
    rst.Edit
    rst!percorso.Value = Me.TXTPercorso
    rst.Update
    rst.MoveNext
    Loop
End If
Appena seleziono un'altra textbox compare un messaggio: "Durante la corrente
sessione di modifica il record è stato modificato da un altro utente...." se
faccio "salva il record", tutti gli altri si aggiornano correttamente.
Vorrei evitere la comparsa di questo messaggio.
2) accanto a TXTpercorso ho aggiunto un pulsante che apre una Common Dialog
che permette all'utente di selezionare la nuova posizione della file con la
tabella collegata. La scelta fatta dall'utente viene scritta in TXTpercorso,
ma l'evento AfterUpdate non si verifica. Come mai?
Grazie a tutti in anticipo.
Giancarlo


author: Sergio MAZZA

text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio news:dfopcq$12f$1...@fata.cs.interbusiness.it...

Se il codice che hai inviato è tutto lì, manca la chisura e distruzione degli oggetti dbs e rst...
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dfp27s$5pl$1...@area.cu.mi.it...

Cosa dovrei aggiungere?
CurrentDb.close? poi?
grazie.
Giancarlo
>
> Ciao.
>
> --
> Sergio MAZZA
>


text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio news:dfp42f$4n1$1...@fata.cs.interbusiness.it...
>
> Cosa dovrei aggiungere?
> CurrentDb.close? poi?
>
> grazie.
> Giancarlo
Dovresti gestire anche l'eventuale errore per distruggere gli oggetti creati.
Es.
sub ...
on error goto sub_err:
...
If ...
...
End if
rst.close
dbs.close
Set rst = nothing
Set dbs = nothing
exit sub
sub_err:
    Set rst = nothing
    Set dbs = nothing
    msgbox err.number & ", " & err.description
end sub
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dfpa93$ja5$1...@area.cu.mi.it...
[CUT]
>
> Dovresti gestire anche l'eventuale errore per distruggere gli oggetti
> creati.
> Es.
> sub ...
> on error goto sub_err:
> ...
> If ...
> ...
> End if
>
> rst.close
> dbs.close
> Set rst = nothing
> Set dbs = nothing
> exit sub
>
> sub_err:
>    Set rst = nothing
>    Set dbs = nothing
>    msgbox err.number & ", " & err.description
> end sub
>
> Ciao.
>
> --
> Sergio MAZZA
>
Allora..scusa se continuo, ma non ne esco fuori...
Ho modificato il codice in questo modo:
On Error GoTo sub_err
If Me.copia_percorso = -1 Then
    Dim dbs As Database, rst As Recordset
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("select * from elenco_tabelle")
    Do Until rst.EOF
    rst.Edit
    rst!percorso.Value = Me.TXTPercorso
    rst.Update
    rst.MoveNext
    Loop
End If
rst.Close
dbs.Close
Set rst = Nothing
Set dbs = Nothing
Exit Sub
sub_err:
    Set rst = Nothing
    Set dbs = Nothing
    MsgBox err.Number & ", " & err.description
ora la maschera continua si aggiorna, però non appena seleziono un qualunque
oggetto della maschera, compare il messaggio "Durante la corrente
sessione di modifica il record è stato modificato da un altro utente...."
Grazie per la tua pazienza....
Giancarlo


text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio news:dfpiqo$2v6$1...@balena.cs.interbusiness.it...

Forse c'è qualcosa che non mi è chiaro ma da quanto vedo tu devi aggiornare un campo in una tabella. Se è così perché non fai una
query di aggiornamento?
Es.
If Me.copia_percorso = -1 Then
    docmd.setwarnings false
    DoCmd.RunSQL "Update elenco_tabelle set percorso = '" & me!TXTPercorso & "';"
    docmd.setwarnings true
end if
Ma è probabile che non abbia capito...
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dfpjo6$3ar$1...@area.cu.mi.it...

Devo aggiornare il campo [percorso] su tutti i records della tabella
elenco_tabella
>Se è così perché non fai una query di aggiornamento?
> Es.
> If Me.copia_percorso = -1 Then
>    docmd.setwarnings false
>    DoCmd.RunSQL "Update elenco_tabelle set percorso = '" & me!TXTPercorso
> & "';"
>    docmd.setwarnings true
> end if
Ho inserito quanto hai scritto e funziona benissimo, solo che mi compare lo
stesso il messaggio di cui sopra.
E' possibile che mi dia questo messaggio perchè tenta di aggiornare anche il
record che in quel momento sto "editando" (dove ho inserito il nuovo
percorso?)
Dico una cavolata?
>
> Ma è probabile che non abbia capito...
No, no hai capito benissimo.
>
> Ciao.
>
> --
> Sergio MAZZA
>


text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio news:dfpmno$15$1...@fata.cs.interbusiness.it...
> Ho inserito quanto hai scritto e funziona benissimo, solo che mi compare lo stesso il messaggio di cui sopra.
> E' possibile che mi dia questo messaggio perchè tenta di aggiornare anche il record che in quel momento sto "editando" (dove ho
> inserito il nuovo percorso?)
> Dico una cavolata?
Forse rimane appesa la modifica (proprietà Dirty della form).
Prova così:
'---
If Me.Dirty Then Me.Refresh '<-- scrivo eventuali modifiche appese
If Me.copia_percorso = -1 Then
    docmd.setwarnings false
    DoCmd.RunSQL "Update elenco_tabelle set percorso = '" & me!TXTPercorso & "';"
    docmd.setwarnings true
end if
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dfpnc5$98r$1...@area.cu.mi.it...

Funziona!
Grazie 1000



title: recordset.Recordcount

text:
Salve!
Domandina:
Dim rs as recordset
Set rs = Currentdb.Openrecordset("Tabella")
if rs.recordcount = 2 then
end if
Usando recordcount, ho soltanto il modo x sapere se una tabella è
vuota oppure no, ma non di sapere quanti record effettivamente
contiene!!
Perchè se la tabella ha 1 o + record, rs.recordcount restituisce
sempre e solo 1!!
Quale proprietà posso utilizzare x sapere esattamente quanti record
contiene una tabella?
Grazie 1000
AR


title: recordset.Recordcount

author: MA

text:
alb...@rimonda.it
 wrote:
> Salve!
> Domandina:
>
> Dim rs as recordset
> Set rs = Currentdb.Openrecordset("Tabella")
rs.movelast
> if rs.recordcount = 2 then
>
> end if
>
>
> Usando recordcount, ho soltanto il modo x sapere se una tabella è
> vuota oppure no, ma non di sapere quanti record effettivamente
> contiene!!
> Perchè se la tabella ha 1 o + record, rs.recordcount restituisce
> sempre e solo 1!!
>
> Quale proprietà posso utilizzare x sapere esattamente quanti record
> contiene una tabella?
> Grazie 1000
> AR
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: recordset.Recordcount

author: Morgan

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dq8hmr$nr3$1...@area.cu.mi.it...

Oppure
Set rs = Currentdb.Openrecordset("Tabella")
If rs.BOF And rs:EOF Then
msgbox "La tabella è vuota"
else
rs.movefirst
rs.movelast
msgobx "La tabella contiene " & rs.recordcount &" record"
End if
Ciao
Morgan


title: recordset.Recordcount

text: Grazie molte! Risolto..


title: recordset.Recordcount

author: Alessandro Baraldi

text:
"Morgan" <
mor...@hotmail.it
> wrote in message
news:43c7cfe2$0$1073$
4faf...@reader3.news.tin.it
>
[CUT]
> Oppure
>
> Set rs = Currentdb.Openrecordset("Tabella")
>
> If rs.BOF And rs:EOF Then
>
> msgbox "La tabella è vuota"
>
> else
>
> rs.movefirst
> rs.movelast
>
> msgobx "La tabella contiene " & rs.recordcount &" record"
>
> End if
>
> Ciao
> Morgan
Troppo codice inutile:
Set rs = Currentdb.Openrecordset("Tabella")
If  rs.EOF Then Msgbox"Tabella vuota":Exit Sub
msgobx "La tabella contiene " & rs.recordcount &" record"
Tutto il resto non serve a nulla.
Il MoveLast non serve, di conseguenza non serve il MoveFirst,
o meglio servono a fare della confusione ed a rallentare molto
nel caso il Dataset sia grande.
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: recordset.Recordcount

author: Roberto da casa

text:
<
alb...@rimonda.it
> ha scritto nel messaggio
news:1137166805.8...@g47g2000cwa.googlegroups.com...

Fermo restando le soluzioni che ti hanno già proposto gli altri, mi sembra
che non sia proprio il caso di aprire un recordset per sapere quanti record
ci sono in una tabella: è sufficiente usare una funzione DCount, ovvero il
tutto è risolvibile con:
If DCount("*", "Tabella") = 2 Then
>Grazie 1000
Prego
>AR
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Mostra/Nascondi campi su maschera

author: Spugna

text:
Su una maschera ho atribuito al campo stato il seguente codice.
Private Sub Stato_AfterUpdate()
mostra = Me.stato = "Riparato"
    Me.garanzia.Visible = mostra
    Me.risoluzione.Visible = mostra
End Sub
quando perņ passo da un record ad un altro non mi memorizza le
impostazioni (nel senso che non appare e scompaiono i campi come
dovrebbero)
cosa sbaglio?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Mostra/Nascondi campi su maschera

author: sv

text:
Spugna ha scritto:
> Su una maschera ho atribuito al campo stato il seguente codice.
> Private Sub Stato_AfterUpdate()
> mostra = Me.stato = "Riparato"
>     Me.garanzia.Visible = mostra
>     Me.risoluzione.Visible = mostra
> End Sub
> quando perņ passo da un record ad un altro non mi memorizza le
> impostazioni (nel senso che non appare e scompaiono i campi come
> dovrebbero)
> cosa sbaglio?
Per scorrere i records devi utilizzare l'evento Current. Prova ad inserire
su Current il tuo codice.
--
rgrds
SC



title: Mostra/Nascondi campi su maschera

author: VH

text:
"sv" <
salv...@nospbox.enel.it
> ha scritto nel messaggio
news:c41m8g$6qo$1...@news.newsland.it...

che significa?


title: Sparizione immediata elenco proprietà e metodi

author: Michele

text:
Salve a tutti.
E' un bug di Access 2010 (sotto WIN7) la sparizione immediata
dell'elenco propriet� e metodi che appare subito
dopo aver digitato il punto dopo un oggetto?
Per esempio Me.elenco48. (qui appare l'elenco delle propriet� e metodi)
L'elenco che appare subito dopo il punto,
scompare non appena si tenta di scorrerlo,
sia col mouse che con la tastiera.
In pratica � impossibile leggerlo.
Cordiali saluti.
Michele


author: Karl Donaubauer

text:

> ...
Controlla se hai un timer attivo in una maschera (aperta)
della tua applicazione. Devi fermarlo.
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
In effetti avevo un timer attivo.
Grazie per l'aiuto.
Saluti.
Michele
"Karl Donaubauer"  ha scritto nel messaggio
news:99vmi6...@mid.individual.net...



title: MI : Vendo Office Dev

author: Bryan

text:
Vendo Office dev 1.5 edition Italiano versione aggiornamento
a L. 1.000.000 fatturato.
Sono di Milano
Risposte in e-mail
pas...@usa.net
____________________________________________________________________
Get free email and a permanent address at
http://www.netaddress.com/?N=1
--
Posted from
nwcst267.netaddress.usa.net
 [204.68.23.12]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: copiare contenuto etichetta

author: Francesco

text:
Ho bisogno di copiare con l'evento click dell'etichetta il suo
contenuto e incollarlo poi in una casella di testo, nella posizione
dove il cursore era lampeggiante prima di uscire dalla casella di
testo.
In altri termini dovrei avere questo risultato:
1 - sono posizionato con il cursore nella casella di testo al centro
della frase "siamo popolo";
2 - clicco sull'etichetta che ha come Caption " un ";
3 - premo un pulsante per incollare nella casella di testo, nella
posizione che aveva precedentemente per incollare il contenuto copiato
dalla casella ed avere come risultato "siamo un popolo.
Chi mi può aiutare con un esempio ???
Grazie e buone vacanze.