title: [Access 2000] Eventi Form ?

author: Franco

text:
Ciao a tutti.
Il problema da cui non riesco a uscire è il seguente:
ho una form Master / Detail.
Ho del codice nell'evento BeforeInsert del form principale che funziona.
Se aggiungo codice (anche stupido tipo una msgbox) agli eventi della
sottomaschera (in particolare mi serve Beforeinsert) Access 2000 mi da il
seguente messaggio:
"L'espressione Prima di inserire immessa come impostazione della proprietà
di evento ha provocato il seguente errore: Errore di comunicazione con il
server OLE o con il contyrollo ActiveX.
* L'espressione non corrisponde al nome di una macro,di una funzione
definita dall'utente oppure as [Routine Evento].
* Si è verificato un errore durante la valutazione di una funzione, di un
evento o di una macro."
Tutto questo aggiungendo una Msgbox !!! :-(((
Successivamente, dopo avere tolto il codice dall'evento before insert, non
mi lascia inserire lo stesso dandomi :
"Errore di comunicazione con il server OLE o con il controllo ActiveX.
Chiudere il server OLE e riavviarlo all'esterno di Microsoft Access, quindi
ritentare l'operazione originale in Microsoft Access".
Io non ho aggiunto nessun riferimento ad OLE ne tantomeno ActiveX esterni.
Le maschere lavoravano su tabelle collegate di un altro access (97).
Per provare le ho importate (invece di collegarle) ma il risultato non
cambia.
Avete qualche idea ?!?!?
E' urgente :((((
--
Ciao
Franco


title: [Access 2000] Eventi Form ?

text:
"Franco" <
franc...@libero.it
> ha scritto nel messaggio
news:9tt5mp$4omk2$1...@ID-104779.news.dfncis.de...
> Ciao a tutti.
[STRACUT]
Risolto !!!
Ho cancellato la form secondaria e l'ho rifatta.
Funziona a meraviglia !
(chissà che @#!#[? aveva messo dentro Access ... boh !?!?! ^__^)
Grazie di tutto.
--
Ciao
Franco


title: Access e Mysql

author: mario rossi

text:
buongiorno a tutti

Vorrei convertire il file tabelle in formato Mysql a tal proposito ho trovato un tools ufficiale sul sito mysql di nome "MySQL Migration Toolkit" a quanto pare "se ho capito bene" questo tool riceve in ingresso un file di tabelle acces e restituisce un file .sql

a questo punto mi domando:

1. una volta ottenuto il file .sql che suppongo sia il file delle stesse tabelle access convertite in formato mysql, dove metto quel file? posso installare xampp e mettere quel file in una cartella dedicata in xampp?

2. in che modo collego le tabelle di mysql al client che prima aveva collegate le tabelle del file formato access? forse usando ODBC qualcuno sa delucidarmi sulla procedura?

3.
facendo questa abbinata Clent Access + Mysql tabelle ottengo una vera e propria
applicazione client server con tutti i benefici in termini di prestazioni anche se il numero di utenti e di record aumenta notevolmente?

4. effetti indesiderati di cui avete avuto esperienza facendo client access e tabelle mysql?

grazie a tutti.


title: Access e Mysql

author: Roberto Fabbri

text: Xché MySql invece di SQL server express?


title: Access e Mysql

text:
Il giorno sabato 23 marzo 2019 00:21:32 UTC+1, Roberto Fabbri ha scritto:
> Xché MySql invece di SQL server express?

in effetti Roberto non hai tutti i torti ma non so da che parte partire ne in un caso ne nell'altro, esiste una guida passo passo per chi sa zero per fare upgrade delle tabelle access in Sq Server? ma a quel punto mi sorgono alcune domande banali per alcuni di voi

che tipo di file ottengo quando è convertito il file iniziare di access delle sole tabelle? il file tabelle.accdb diventa che cosa?

in che cartella devo metterlo questo file convertito sul server?

cosa devo installare sul server per mettere a disposizione dei client questo file tabelle Sql server?

se volessi fare un backup giornaliero del file tabelle formato sql server presente sul server che file devo salvare?

il cliente sviluppato in access 2016 come lo collego alle tabelle presenti nel file formato sql server? tramite ODBC? guadagno in affidabilità e perdo in prestazioni?

Il codice vba e le query che ho sviluppato nel cliente rimarranno invariati o devo prepararmi a varie modifiche nel client a causa del nuovo formato sql server delle tabelle?

qualcuno di voi a fatto le 2 conversioni?
1 client access e tabelle mysql
2 client access e tabelle sql server?
quale delle 2 è la migliore? pregi? difetti?

grazie a tutti.


title: Access e Mysql

text:

ho provato a scaricare la versione 2017 di sql server express
file SQLServer2017-SSEI-Expr.exe
l'ho eseguito e installato la versione standard senza modificare nulla.

alla fine ottengo il messaggio:
Errore
Non è possibile installare SQL server (setup.exe)
Exit Code (decimal): -2068052378Error description: L'installazione di VS Shell non è riuscita con codice di uscita 1638

(cominciamo bene! dico io! )


title: Access e Mysql

text:

Questo vecchio tutorial, seppur non specifico per MySQL, dovrebbe chiarirti le idee sulla connettività ODBC:

http://mirror.masterdrive.it/alessandrobaraldi/DettaglioFaq.asp%3FIdFAQ=281.html

Saluti


title: Access e Mysql

text:

sono riuscito a installare sql server express 2012 ora devo aprire il file tabelle access da access e convertirlo in qualche modo in formato sql server

oppure

devo aprire sql server management e importare il file tabelle access direttamente da li?

grazie a tutti.


title: Access e Mysql

author: ogrn

text:
>sono riuscito a installare sql server express 2012 ora devo aprire il file
>tabelle access da access e convertirlo in qualche modo in formato sql
>server
>oppure
>devo aprire sql server management e importare il file tabelle access
>direttamente da li?
>grazie a tutti.

Ciao, ho realizzato un software Access + MySQL che gestisce 5.000.000 di
record, con query che forniscono risultati in mezzo secondo.
Se cerchi tra gli archivi messaggi di questo newsgroup (es. tramite Google
Gruppi) trovi varie indicazioni.
Ho utilizzato il Migration Toolkit per trasferire l'intero database Access
in MySQL. Tale software è fermo come sviluppo ma è perfettamente funzionante
e le nuove versioni dei workbench le ritengo non tanto flessibili quanto il
toolkit nel portare i db Access in MySQL.
Recentemente ho effettuato l'operazione Access a SQL Server, però il driver
riconosce il formato mdb, quindi prima salva da accdb a mdb.
Dopodiché in SQL Server Management Studio c'è la procedura wizard che ti
segue passo passo.


title: Access e Mysql

text:

grazie infinite, puoi indicarmi qui il post in cui spieghi la procedura con mysql?


title: Access e Mysql

author: RobertoA

text:

Non ho mai compreso bene se MySql si possa utilizzare gratuitamente in
applicazioni commerciali oppure bisogna cacciare il grano
Vedo che l'hai usato in passato, quindi sicuramente ne sai piu' di me
Puoi dirci qualcosa a riguardo?


title: Access e Mysql

text:
> grazie infinite, puoi indicarmi qui il post in cui spieghi la procedura
> con mysql?

Dunque, ho recuperato il post e cerco di integrare con altre informazioni
piu tecniche.
L'argomento richiederebbe la stesura di un articolo che vi prometto di
scrivere quando ho tempo.

Ho realizzato un software Access + MySQL che gestisce 5.000.000 di record,
con query che forniscono risultati in mezzo secondo.
L'installazione del DBMS "MySQL Community Edition" richiede un capitolo
parte: da quando è passato sotto Oracle, sono stati messi alcuni vincoli
soprattutto sull'utilizzo dell'utente root.
Anche riguardo l'installazione dei driver ODBC non mi soffermo in quanto
l'operazione è banale:
https://downloads.mysql.com/archives/c-odbc/

Assumo che entrambi i suddetti sistemi siano installati sotto ambiente
Windows client o server.

Ho utilizzato il Migration Toolkit per trasferire l'intero database Access
in MySQL.
Lo sviluppo di tale software è fermo ma è perfettamente funzionante, e le
nuove versioni dei Workbench non le ritengo tanto flessibili quanto il
Toolkit.
Utilizzo la vecchia versione di Migration Toolkit (v.1.0.25):
https://downloads.mysql.com/archives/migration/

che richiede un Java Runtime Environment installato, nel caso l'ultima
versione del JRE non fosse riconosciuta installatene una piu vecchia
(v.1.4.2 o 5.0) e mantenetele entrambe.
Senza il Migration Toolkit è necessario ricorrere all'opzione "Migration
Wizard" disponibile su Workbench:
https://downloads.mysql.com/archives/workbench/

ma richiede *obbligatoriamente* la definizione di una connessione tramite
driver ODBC per connettersi ad Access. Poco male, ma macchinoso e quindi da
evitare, preferendo l'utilizzo di Migration Toolkit.

Ora racconto come ho realizzato il documentale.
La mole di documenti da indicizzare ha le dimensioni nell'ordine dei 10 TB,
che comprende tutte le tipologie di file dalle foto, agli office, PDF, ecc.,
Non potendo costringere centinaia di dipendenti a catalogare i documenti con
una codifica dei nomi file decisa a priori e condivisa, oppure specificando
delle classi di appartenenza dei file, ho dovuto agire con una logica lato
server:  ogni utente/ufficio è libero di memorizzare i propri file come e
dove vuole, e con libera scelta del nomefile.
Ogni notte parte un batch schedulato dalla funzionalità di Windows "Utilita
di pianificazione" (che ho scartato in quanto non mi ha soddisfatto) oppure
da utility di terze parti come questa:
https://www.splinterware.com/products/scheduler.html

Il batch fa delle semplici DIR nelle cartelle di rete da indicizzare, il
quale produce dei file txt costituiti da elenchi di percorsi\nomefile.ext:
chcp 65001
dir "F:\File_in_Rete" /b /s > Documenti.txt

Quindi i path\nomefile.txt vengono caricati riga per riga in una tabella
MySQL "documento" tramite il comando MySQL:
DELETE FROM database.documento;
LOAD DATA LOCAL INFILE 'D:/DOCUMENTI.txt' INTO TABLE database.documento
FIELDS ESCAPED BY '';

Questi comandi memorizzati in un file .sql e schedulati per essere lanciati
da riga di comando MySQL.
Ovviamente le due operazioni vengono schedulate con margine di tempo
congruo, in altre parole, la DIR parte alle 21.00 mentre la SQL parte alle
4.00 per permettere che tutti i dati vengano completamente letti, caricati e
processati prima dell'inizio della giornata lavorativa.

Una volta alimentata la tabella, i record "percorsi\nomefile.ext" vengono
processati per isolare i singoli termini, i quali serviranno come keywords
per le ricerche su clausole Where. A tal proposito, un campo chiamato
Keywords è stato creato per contenere tali parole e su questo campo verranno
effettuate le query dal client Access.
La query (schedulata) di creazione parole chiave funziona circa cosi:
UPDATE database.documento
SET documento.Keywords = replace( replace ( ...
replace(PathFile,'\\',' '),':',' ') ... )

In conclusione ottengo la seguente tabella MySQL alimentata ogni notte in
automatico (su un server virtualizzato, quindi sempre acceso):
documento(Keywords,PathFile)

Passiamo ora al client Access.
Effettuare delle ricerche con termini liberi su 5.000.000 di record
utilizzando JET di Access produce risposte in 30 secondi... troppo!
La soluzione è stata trovata in questo modo:
- utilizzo le query Pass-Through di Access: di fatto utilizzo il server
MySQL per eseguire le query;
- il campo Keywords è di tipo FULLTEXT;
- utilizzo la clausola di MySQL "MATCH ... AGAINST" (n.b.: esiste un'analoga
per SQL Server);
- collego la tabella "documento" ad Access tramite collegamento ODBC di
MySQL;
- definisco in Access una maschera master non associata chiamata
"fDocumento", che conterrà il campo testuale "Ricerca" e il pulsante
cmdRicerca (che chiama una sub "Cerca" per poter essere riutilizzata), e
dentro di essa una sottomaschera "fDocumentoSub" con i campi della tabella
collegata "documento", a cui verrà associato il recordset restituito dalla
query Pass-Through;
- la ricerca avviene con il codice seguente (all'incirca):

Dim strRicerca as String

Private Sub Cerca()
On Error GoTo Err_Cerca
Dim db As dao.Database
Dim qdf As dao.QueryDef
Dim rst As dao.Recordset
Dim Ricerca1 As String

' Preparazione della stringa di ricerca
strRicerca = RicercaStringa(Trim(Nz(Me.Ricerca.Value, "")))

....
Set db = CurrentDb
Set qdf = db.CreateQueryDef("")
qdf.Connect =
"ODBC;DSN=MyBGV;SERVER=<ip>;UID=<username>;PWD=<password>;DATABASE=<database>;PORT=3306;;DFLT_BIGINT_BIND_STR=1;TABLE=documento"

qdf.SQL = "SELECT documento.pathfile,documento.pagina FROM
database.documento" _
& " WHERE MATCH(keywords) AGAINST ('" & strRicerca & "*' IN BOOLEAN MODE)"

qdf.ReturnsRecords = True
Set rst = qdf.OpenRecordset
Set Me!fDocumentoSub.Form.Recordset = rst

Exit_Cerca:
Exit Sub

Err_Cerca:
' Response = MsgBox("fDocumento - Sub Cerca - " & Err.Description,
vbCritical, "Errore")
Resume Exit_Cerca
End Sub

La sottomaschera fDocumentoSub mostrerà i dati restituiti da MySQL.
Poi con doppio click sul record visualizzato si può programmare l'apertura
del file grazie alle associazioni con le app correnti di Windows.

Al momento dell'interrogazione lato client, la sicurezza dell'accesso ai
file viene garantita dalle policy di Active Directory, cioè se un utente non
è autorizzato ad accedere ad una  cartella, i file non possono essere
aperti; comunque agendo sul nome utente + autorizzazioni è possibile
programmare la sicurezza anche da Access, questo anche per nascondere i
percorsi path\nomefile.ext che l'utente specifico non deve neanche leggere.
Infine il sistema è interrogabile con macro da altri programmi office oppure
con vbscript, con possibilità quindi di agganciare il sistema ad altri
software, per esempio al gestionale. A tal proposito, ecco alcuni pezzi di
codice che richiamano il client Access con un dato di filtro:

VBScript
...
Servizio = "fDocumento"
Filtro = .......
SQL = "INSERT INTO Filtro(Filtro01) VALUES ('" & Filtro & "')"
Set objConn = CreateObject("ADODB.Connection")
objConn.open Connessione
Set rs = objConn.execute("DELETE * FROM Filtro")
Set rs = objConn.execute(SQL)
set oWsh = CreateObject ("Wscript.Shell")
oWsh.run """" & "C:\Program Files\Microsoft Office\Office14\MSACCESS" & """"
& Sistema & " /x Avvio /cmd " & """" & Servizio & """"

VBA
Outlook che lancia il client Access e restituisce il percorso\file con
parola chiave una stringa selezionata con doppio click del mouse sul testo
di una email:
...
Case Else:
Sistema = SistemaMain
Servizio = "fDocumento"
Filtro = SelezioneLeggi
SQL = "INSERT INTO Filtro(Filtro01) VALUES ('" & RicercaStringa(Filtro) &
"')"
End Select

Dim db As DAO.Database
Set db = DAO.OpenDatabase(Sistema)
db.Execute "DELETE * FROM Filtro"
db.Execute SQL
db.Close

Dim Retval As Variant
Retval = Shell("""" & Connessione & """" & " " & """" & Sistema & """" & "
/x Avvio /cmd " & """" & Servizio & """", vbNormalFocus)


title: OT- Problema con Outlook xpress versione 5.01

author: Dominijanni Giuseppe

text:
Salve ,
al problema del provider Tin.it si è sommato quello della posta
elettronica;
invio risposte e nuoi messaggi al NG , risultano in Posta inviata , ma
il messaggio non arriva.
Attualmente sto utilizzando Netscape collegato a Tiscali.
Non riesco a trovare il settaggio che non va.
giuseppe


title: Aggiornamento Oggetto Ole

text:
In un sottoreport contenente un oggetto ole, vorrei aggiornare il
riferimento al file prendendo il percorso da un campo di una maschera;
cioč, una roba tipo [NomeCampo].SourceDoc =
Forms![NomeMaschera]![NomeCampo]. Cosě non va bene. Come posso fare?
Grazie


title: ACCESS & MYSQL

author: bruscoli

text:
Salve!!!
Ho problemi con un driver ODBC per l'interscambio di dati fra Access e
Mysql. Uso il MyODBC ma se provo a importare una tabella di un db da mySql
ottengo il seguente errore:
[TCX][MyODBC]Access dinied for user '@psit-b (#1045 [Microsoft][Driver
Manager ODBC] Connessione non aperta. (#0)
Ho installato MDAC 2.6 di Microsoft come consigliato nel manuale di MySql ma
la cosa non si è risolta.
Qualcuno mi può aiutare?
Grazie in anticipo.


title: ACCESS & MYSQL

author: IRISCO

text:
Io ho provato una demo del convertitore che trovi qua ...
www.convert-in.com
...sembra vada benone...
CIAO!
irisco
"bruscoli" <
sbru...@yahoo.com
> ha scritto nel messaggio
news:3b03f...@linux5.provincia.ps.it...
> Salve!!!
> Ho problemi con un driver ODBC per l'interscambio di dati fra Access e
> Mysql. Uso il MyODBC ma se provo a importare una tabella di un db da mySql
> ottengo il seguente errore:
[..]


title: ACCESS & MYSQL

author: ing. sbruscoli

text:
Grazie per l'aiuto!!!
Nel frattempo ho scoperto cosa non andava. Nel senso che sono riuscito a
passare da mysql ad access via odbc: la connessione non andava perhè fornivo
informazioni sbagliate circa user e pass. Non funziona pero il contrario
cioè da access a mysql, questo è meno grave poichè si può trasferire la
tabella di access in un file txt e usare la funzione mysqlimport di MySql.
Grazie per l'aiuto
By
"IRISCO" <in...@XYZirisco.it> ha scritto nel messaggio
news:9e19l9$a85$1...@fe1.cs.interbusiness.it...



title: between con campi vuoti..URGENTISSIMO!!!!!

author: Molokovellocet

text:
salve a tutti. ho creato una maschera con vari campi d testo tra cui
"P1" e "P2".ho creato inoltre una query con cui filtro dei risultati
con i campi di testo della maschera e posso filtrare anche in base ai
valori di un campo compresi tra P1 e P2 in pratica sotto il campo
"peso" della query ho inserito il criterio Between
[forms]![Maschera1]![P1] and [forms]![Maschera1]![P2]. Ora se filtro
solo con il criterio di peso va tutto bene, se invece voglio provare a
filtrare ad es. per nome ma lasciando P1 e P2 vuoti la query non mi da
risultati come devo fare?


author: Roberto dal portatile

text:
"Molokovellocet" <
molokov...@fastwebnet.it
> ha scritto nel messaggio
news:1165422169.1...@80g2000cwy.googlegroups.com...

Se la tabella che contiene i dati si chiama MiaTabella e il campo su cui
selezioni è di tipo numerico intero e si chiama Peso, prova a scrivere la
Between ... And in questa maniera:
Between Nz([forms]![Maschera1]![P1]; Val(DMin("Peso"; "MiaTabella")) And
Nz([forms]![Maschera1]![P2]; Val(DMax("Peso"; "MiaTabella"))
Fra l'altro questo modo di impostare le cose ti permette altre possibilità:
se non digiti qualcosa in P1 ma lo digiti in P2 verranno selezionati i
recorsd con Peso >= a P1, se invece non digiti alcunché in P1 ma lo digiti
in P2 verranno selezionati i record per i quali Peso è <= a P2.
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


text:
grazie roberto il consiglio  stato utilissimo!!! fossero tutti così
chiari come te... ancora grazie!!


title: Ancora maschere e scrittura dei record nella tabella

author: Ulysse

text:
Ci riprovo ;)
innanzi tutto buon ferragosto!!!!
Allora e' possibile che durante l'immissione dei dati in una maschera
il record non venga effettivamente creato fino all'uscita della maschera???
A me capita che in una sottomaschera non riesca ad inserire un record
perche' quello che ho creato nella maschera non e' stato ancora
effettivamente creato!!
cioe' , poiche' c'e' il vincolo di integrita' referenziale, mi dice che non
riesce a trovare
un record correlato...ma io lo ho appena creato nella maschera principale!
Se esco dalla maschera e rientro, il record viene effettivamente creato e
tutto funziona.
Coe posso forzare la scrittura del record dopo che ho immesso tutti i valori
obbligatori??
ciau diego


author: Roberto - Syd

text:

Non capisco perchè non funziona, comunque fai un refresh della maschera
principale quando la sottomaschera viene selezionata.
Ciao Roberto - Syd


title: Help su maschera

author: Milo

text:
Un saluto a tutti,
vi sarei molto grato, se mi potreste aiutare con questo problema
In una maschera ho dei dati che hanno un codice suddiviso nei campi
MM-CC-SSSSSS, a cui devo assegnare un valore in un quarto campo "ind".
Ho scelto che nella maschera non siano consentite aggiunte di dati.
Questo implica che una volta che assegnato a tutti i codici il loro valore
di ind, se apro di nuovo la maschera la trovo completamente vuota.
Sapete come posso fare apparire un msg del tipo "Non ci sono codici da
assegnare" alla apertura della maschera.
Grazie
Milo


title: problemi di visualizzazione incompleta in combobox

author: skipper

text:
ho un problema nella combobox di una maschera di un database.
In una maschera continua dove aggiungo i records ho un campo con combobox la
cui origine è una query che mi elenca tutti i clienti attivi in ordine
alfabetico.
La cosa strana è che mi fa vedere solo i primi 9 nominativi ma se digito le
iniziali (per esempio del 200° nominativo) mi visualizza il nome nel campo
ma non nell'elenco.
Una volta scritto l'intero record se mi sposto sul successivo a questo punto
l'elenco della combobox mi visualizza tutti i nominativi sino al 200°...
Se inserisco il 300° nominativo, nel record successivo la combobox mi mostra
i trecento nominativi e così via....
Il database ha sempre funzionato sino a ieri...
Ho compattato e ripristinato sia i db FE che i BE... ma nulla... il problema
persiste...
Ho provato ad aprire lo stesso dbFE su diversi pc e il risultato non cambia.
Ho provato ad aprire la query di origine della combobox e visualizza tutti
nominativi...
In un'altra maschera dello stesso db un'identica combobox mostra tutti
inominativi...
Sembra proprio un problema legato alla visualizzazione
Non ci capisco più nulla...
popolo del gnus... aiuto...
skipper dixit...


title: IFFche non funziona a dovere

author: mitico-

text:
vorrei testare piï¿œ di un dato in una query.
questo ï¿œ ciï¿œ che utilizzo oggi
credito1: IIf([TGLOB0] Is Null;0;[TGLOB0]/1,2-80)
in pratica testa il valore che c'ï¿œ nel campo [TGLOB0] se non c'ï¿œ valore
scrive zero diversamente prende il valore, lo divide per 1,2 e poi
toglie 80.
vorrei inserire un secondo test  ossia se il valore di [TGLOB0] ï¿œ
inferiore o uguale a 120 lo divide per 1,2 diversamente lo divide per
1,2 e poi toglie 80.
ho provato piï¿œ volte questa formula, ma mi da errore
credito1: IIf([TGLOB0] Is
Null;0;IIf([TGLOB0]>=120;[TGLOB0]/1,2);[TGLOB0]/1,2-80)
ma non funziona
grazie


title: IFFche non funziona a dovere

author: Antonio Biso

text:
"mitico-" <
m_avv...@yahoo.it
> ha scritto nel messaggio
news:itt2fu$1si$1...@tdi.cu.mi.it...
> vorrei testare pi� di un dato in una query.
>
> questo � ci� che utilizzo oggi
>
> credito1: IIf([TGLOB0] Is Null;0;[TGLOB0]/1,2-80)
>
> in pratica testa il valore che c'� nel campo [TGLOB0] se non c'� valore
> scrive zero diversamente prende il valore, lo divide per 1,2 e poi toglie
> 80.
>
> vorrei inserire un secondo test  ossia se il valore di [TGLOB0] �
> inferiore o uguale a 120 lo divide per 1,2 diversamente lo divide per 1,2
> e poi toglie 80.
> ho provato pi� volte questa formula, ma mi da errore
>
> credito1: IIf([TGLOB0] Is
> Null;0;IIf([TGLOB0]>=120;[TGLOB0]/1,2);[TGLOB0]/1,2-80)
>
> ma non funziona
> grazie
la penultima parentesi tonda deve essere spostata alla fine
inoltre hai sbagliato a mettere l'operatore, devi metterci <= almeno secondo
le tue specifiche
Antonio


title: IFFche non funziona a dovere

text:
Il 22/06/2011 17.51, Antonio Biso ha scritto:
> "mitico-"<
m_avv...@yahoo.it
>  ha scritto nel messaggio
> news:itt2fu$1si$1...@tdi.cu.mi.it...
>> vorrei testare piï¿œ di un dato in una query.
>>
>> questo ï¿œ ciï¿œ che utilizzo oggi
>>
>> credito1: IIf([TGLOB0] Is Null;0;[TGLOB0]/1,2-80)
>>
>> in pratica testa il valore che c'ï¿œ nel campo [TGLOB0] se non c'ï¿œ valore
>> scrive zero diversamente prende il valore, lo divide per 1,2 e poi toglie
>> 80.
>>
>> vorrei inserire un secondo test  ossia se il valore di [TGLOB0] ï¿œ
>> inferiore o uguale a 120 lo divide per 1,2 diversamente lo divide per 1,2
>> e poi toglie 80.
>> ho provato piï¿œ volte questa formula, ma mi da errore
>>
>> credito1: IIf([TGLOB0] Is
>> Null;0;IIf([TGLOB0]>=120;[TGLOB0]/1,2);[TGLOB0]/1,2-80)
>>
>> ma non funziona
>> grazie
>
> la penultima parentesi tonda deve essere spostata alla fine
> inoltre hai sbagliato a mettere l'operatore, devi metterci<= almeno secondo
> le tue specifiche
>
> Antonio
>
>
grazie risolto,
ecco la funzione corretta
    credito1: IIf([TGLOB0] Is
Null;0;IIf([TGLOB0]<=120;[TGLOB0]/1,2;[TGLOB0]/1,2-80))


title: IFFche non funziona a dovere

text:
"mitico-" <
m_avv...@yahoo.it
> ha scritto nel messaggio
news:itt3aq$2j6$1...@tdi.cu.mi.it...
> Il 22/06/2011 17.51, Antonio Biso ha scritto:
>> "mitico-"<
m_avv...@yahoo.it
>  ha scritto nel messaggio
>> news:itt2fu$1si$1...@tdi.cu.mi.it...
>>> vorrei testare pi� di un dato in una query.
>>>
>>> questo � ci� che utilizzo oggi
>>>
>>> credito1: IIf([TGLOB0] Is Null;0;[TGLOB0]/1,2-80)
>>>
>>> in pratica testa il valore che c'� nel campo [TGLOB0] se non c'� valore
>>> scrive zero diversamente prende il valore, lo divide per 1,2 e poi
>>> toglie
>>> 80.
>>>
>>> vorrei inserire un secondo test  ossia se il valore di [TGLOB0] �
>>> inferiore o uguale a 120 lo divide per 1,2 diversamente lo divide per
>>> 1,2
>>> e poi toglie 80.
>>> ho provato pi� volte questa formula, ma mi da errore
>>>
>>> credito1: IIf([TGLOB0] Is
>>> Null;0;IIf([TGLOB0]>=120;[TGLOB0]/1,2);[TGLOB0]/1,2-80)
>>>
>>> ma non funziona
>>> grazie
>>
>> la penultima parentesi tonda deve essere spostata alla fine
>> inoltre hai sbagliato a mettere l'operatore, devi metterci<= almeno
>> secondo
>> le tue specifiche
>>
>> Antonio
>>
>>
> grazie risolto,
> ecco la funzione corretta
>    credito1: IIf([TGLOB0] Is
> Null;0;IIf([TGLOB0]<=120;[TGLOB0]/1,2;[TGLOB0]/1,2-80))
>
CVD
Antonio


title: Form e Subform

text:
Sto cercando di creare un database per l'ufficio.
Ho un form (ImmissioneDatiForm) che ha il suo controllo origine in una
tabella (Lavori) con il campo Numero_lavoro come chiave primaria . Ho
inserito un subform con oggetto origine nel form 'Stato' che si riferisce ad
una tabella (Stato) anche lei con il campo Numero_lavoro con relazione una a
molti con lo stesso campo nella tabella Lavori.
Vorrei che nel subform apparissero solo i record corrispondenti al campo
Numero_lavoro della form principale. Come devo fare? (Credo sia una cosa
veramente per principianti ma proprio non ci riesco)
PS    Vorrei inoltre che dato un certo Numero_lavoro nel form principale,
venga creato (se inesistente) almeno un corrispondente record nel form
Stato.
Grazie mille (spero di essere stato chiaro)
--
/----------------------------------------------/
/  Nefasto82                              /
/  e-mail:
ste...@libero.it
        /
/---------------------------------------------/


title: Form e Subform

author: Emyr

text:
On Tue, 25 Feb 2003 11:30:43 GMT, "Nefasto82"
<
togliques...@libero.it
> wrote:
>Sto cercando di creare un database per l'ufficio.
>Ho un form (ImmissioneDatiForm) che ha il suo controllo origine in una
>tabella (Lavori) con il campo Numero_lavoro come chiave primaria . Ho
>inserito un subform con oggetto origine nel form 'Stato' che si riferisce ad
>una tabella (Stato) anche lei con il campo Numero_lavoro con relazione una a
>molti con lo stesso campo nella tabella Lavori.
>Vorrei che nel subform apparissero solo i record corrispondenti al campo
>Numero_lavoro della form principale. Come devo fare? (Credo sia una cosa
>veramente per principianti ma proprio non ci riesco)
>
>PS    Vorrei inoltre che dato un certo Numero_lavoro nel form principale,
>venga creato (se inesistente) almeno un corrispondente record nel form
>Stato.
>
>Grazie mille (spero di essere stato chiaro)
sui dopoaggiornamento del form principale puoi creare il record in
quello secondario
currentdb.execure("insert into...")
Saluti.
Emanuele.


title: Ricercare parola in un elenco- adattare codice di Sib?

author: nwrr

text:
n.b. non so se si deve adattare il codice di Sib o è tutt'altra cosa.
Ho un elenco con 4 colonne (casella di riepilogo) collegato
ad una query, che cambia in base ad un'opzione selezionata.
Devo creare una casella di testo in modo che man mano che digito
le lettere mi sposta la selezione dell'elenco sui nomi della 2a colonna
che iniziano appunto per le lettere digitate
Inoltre devo fare in modo di poter trovare la parola anche come testo
contenuto
(cioè non solo a partire dall'inizio del nome)
Sul sito comune ho trovato un esempio pertinente, solo che devo
effettuare
(non so come) le seguenti modifiche:
per ricerca inizio parola:
1) la ricerca la deve fare su un elenco e su una certa colonna
2)   deve scorrere la selezione dell'elenco man mano che digito i
caratteri
per ricerca testo contenuto:
1) la ricerca la deve fare sempre sull'elenco e su una certa colonna
2) deve posizionare la selezione sul primo testo contenuto che incontra
       e poi all'invio riposizionare la selezione sul successivo record
dell'elenco
       con il testo contenuto
'----------------------------------------------------
Riporto l'esempio (fatto salvo che sia effttivamente quello da
adattare):
Come creare un controllo di ricerca di Sib
Talvolta si presenta la necessità di avere un semplice controllo per la
ricerca rapida
 in uno specifico campo. Si pensi alla ricerca di un cliente in una
maschera.
Vero è che Access possiede una specifica autocomposizione che crea una
casella
combinata per la ricerca, ma tale casella ha qualche limite, prima di
tutto cerca il
cliente solo dopo l'aggiornamento e cioè quando date invio, e comunque
cerca a
partire dall'inizio del campo, e non per contenuto.
Col mio metodo è sufficiente creare una casella di testo che chiameremo
"Ricerca",
poi sarà sufficiente aggiungere il codice che segue:
Dim ChiaveRicerca As String
Private Sub Ricerca_Change()
   Dim rst As Recordset
   Dim strR As String
   strR = Me.Ricerca.Text
   If Not IsNull(Me!Ricerca.Text) Then
      Set rst = Me.RecordsetClone
      rst.FindFirst "DITTA like """ & ChiaveRicerca & Me!Ricerca.Text &
"*"""
      Me.Bookmark = rst.Bookmark
      rst.Close
      Set rst = Nothing
   End If
   Me!Ricerca = strR
   Me!Ricerca.SelStart = 255 'Len(Me!Ricerca.Text)
End Sub
Private Sub Ricerca_DblClick(Cancel As Integer)
   Select Case Me!Ricerca.SpecialEffect
   Case 1
      Me!Ricerca.SpecialEffect = 2
      ChiaveRicerca = "*"
      Me!Ricerca.ControlTipText = "Ricerca rapida per parte del campo"
   Case 2
      Me!Ricerca.SpecialEffect = 1
      ChiaveRicerca = ""
      Me!Ricerca.ControlTipText = "Ricerca rapida da inizio campo"
   Case Else
      MsgBox "Viene reimpostato l'aspetto della casella", vbExclamation,
"Errore"
      Me!Ricerca.SpecialEffect = 1
      ChiaveRicerca = ""
      Me!Ricerca.ControlTipText = "Ricerca rapida da inizio campo"
   End Select
End Sub
Private Sub Ricerca_KeyPress(KeyAscii As Integer)
   Dim rst As Recordset
   Dim str As String
   If KeyAscii = 13 Then
      If Not IsNull(Me!Ricerca.Text) Then
         Set rst = Me.RecordsetClone
         rst.FindNext "DITTA like """ & ChiaveRicerca & Me!Ricerca.Text
& "*"""
         If rst.NoMatch Then rst.FindFirst "DITTA like """ &
ChiaveRicerca & Me!Ricerca.Text & "*"""
         Me.Bookmark = rst.Bookmark
         rst.Close
         Set rst = Nothing
      End If
      Me!Ricerca.SetFocus
      Me!Ricerca.SelStart = 255
      KeyAscii = 0
   End If
End Sub
Si noti che "ChiaveRicerca" è una variabile globale del modulo di
classe.
Il funzionamento che si ottiene è semplice, basta iniziare a digitare
che il codice troverà
immediatamente il primo record il cui campo "DITTA" (voi userete il
campo che vi interessa)
 inizia per i caratteri che avete digitato. Se non viene trovato nulla
si resta sul primo record.
Per trovare i record successivi al primo è sufficiente premere invio.
Per effettuare una ricerca per "testo contenuto" e non per "Parte
iniziale del campo" basta
 fare doppio click sul controllo, questi assumerà l'aspetto incassato e,
quando inizierete a
digitare, troverà il primo record il cui campo "DITTA" contiene (non
semplicemente inizia)
 il testo digitato. Perche' tutto funzioni in modo corretto, bisogna
impostare il controllo
Ricerca in visualizzazione In Rilievo nella maschera, sara' poi il
codice che si occupera' del resto.


title: path DataBase...ma se....

author: EnricoV.

text:
Ho risolto il problema di impostare il path del file contenente le tabelle
tramite un simpatico file .ocx che ho scaricato dal sito comune di VB.....
Questo .ocx permette di creare,modificare e leggere i dati contenuti in un
file.INI.
Bene ora però mi si pone un problema:
Visto che il codice per reperire il percorso del DB è così:
Dim Xini As Object
Dim DB as String
Set Xini = Me!Xini
Xini.File = CurrentProject.path & "/tbl.ini"
Xini.Sezione = "Sezione1"
Xini.Chiave = "Valore1"
Xini.LeggiValore
DB= Xini.Valore
Mi starebbe alquanto per le p...e scriverlo ( o meglio copiarlo) in ogni
routine che effettua un collegamento ad una tabella o query....
C'è la possibilità di creare una costante, un modulo o altro da inserire una
sola volta nelle dichiarazioni di un form o adirittura nel DB ?!
Grazie mille
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.435 / Virus Database: 244 - Release Date: 30/12/02


title: path DataBase...ma se....

text:
"EnricoV." <
nor...@libero.it
> ha scritto nel messaggio
news:%LzZ9.56294$YG2.1...@twister1.libero.it...

Secondo me hai cazzeggiato.
Tutto quello che hai fatto non serve a nulla, se sai dove metti il File.Ini
sai anche dove sta
il tuo BE, o no....!
Invece di usare OCX potresti usare più efficacemente i Registri di Windows
che servono
proprio a queste cose.....!!!!
@Alex.


title: [Cisa] Saluti dal Cisa2 sp1

author: MA

text:
Signore e Signori,
da domani e per tutto il weekend io ed un gruppeto di partecipanti saremo al
Cisa e quindi offline.
Saluti a chi non viene, un "Ci vediamo domani" a chi viene e una promessa di
un rendiconto prima possibile.
Posso dire che spero che il Cisa2 sp1 vada bene almeno un quarto di come č
andato il Cisa1
Buon Week End  a tutti
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: [Cisa] Saluti dal Cisa2 sp1

author: VedoTondo

text:
Io muoio dall'invidia acc come vorrei essere lě!
Mi auguro di poter essere dei vostri per il cisa 3
Saluti Andrea
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:e6s0l9$qa9$1...@area.cu.mi.it...



title: [Cisa] Saluti dal Cisa2 sp1

author: Fabio Valsangiacomo

text:
MA wrote:
> Signore e Signori,
> da domani e per tutto il weekend io ed un gruppeto di partecipanti
> saremo al Cisa e quindi offline.
> Saluti a chi non viene, un "Ci vediamo domani" a chi viene e una
> promessa di un rendiconto prima possibile.
> Posso dire che spero che il Cisa2 sp1 vada bene almeno un quarto di
> come è andato il Cisa1
Lo sarà con tutta la fatica ed il lavoro che è gia stato svolto dai + sarà
solo un successo
Noi, io, baby access user,  aspetterò il risultato in particolare
sull'automazione con ward che mi pare era un tema...
Auguri a tutti
Fabio



title: [Cisa] Saluti dal Cisa2 sp1

author: Sergio MAZZA

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:e6s0l9$qa9$1...@area.cu.mi.it...

Arriviamoooooo....
Ciao.
--
Sergio MAZZA


title: [Cisa] Saluti dal Cisa2 sp1

author: Pablitomf (Maurizio Facciuti)

text:
Sergio MAZZA ha scritto:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:e6s0l9$qa9$1...@area.cu.mi.it...
> > Signore e Signori,
> > da domani e per tutto il weekend io ed un gruppeto di partecipanti saremo
> > al
> > Cisa e quindi offline.
> > Saluti a chi non viene, un "Ci vediamo domani" a chi viene e una promessa
> > di
> > un rendiconto prima possibile.
> > Posso dire che spero che il Cisa2 sp1 vada bene almeno un quarto di come è
> > andato il Cisa1
> > Buon Week End  a tutti
> >
> > --
> > _ _
> > Ciao
> > MAssimiliano Amendola
www.accessgroup.it
> > Cisa - Conferenza Italiana per Sviluppatori Access
> > Info:
www.donkarl.com/it
> Arriviamoooooo....
ma che è un orgia? :-D uff... e io con il polso spezzato che fo? reggo il
moccolo? :-D
> Ciao.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [Cisa] Saluti dal Cisa2 sp1

text:
VedoTondo ha scritto:
> Io muoio dall'invidia acc come vorrei essere lì!
> Mi auguro di poter essere dei vostri per il cisa 3
> Saluti Andrea
quoting please...
Ps. e xkè nn ti sei iscritto!?!!! suvvià, bastano un paio di banconote da
100 sotto banco e mi sbarazzo immediately di MA dalla camera! :)



title: [Cisa] Saluti dal Cisa2 sp1

text:
"Pablitomf (Maurizio Facciuti)" <
maurizio...@accessgroup.it
> ha scritto
nel messaggio news:e6tlg5$tgu$1...@news.newsland.it...
>
> ma che è un orgia? :-D uff... e io con il polso spezzato che fo? reggo il
> moccolo? :-D
>
Per quello che si farà, basta e avanza...
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
> Access : Ver.97 - 2K
>
> ----------------------------------
>
http://www.accessgroup.it/
>
http://www.sitocomune.com/
> ----------------------------------
> Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
> acceso e i piedi nel congelatore statisticamente ha una temperatura media.
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
Ciao.
--
Sergio MAZZA


title: [Cisa] Saluti dal Cisa2 sp1

author: Nick

text:
VedoTondo ha detto: in data 15/06/2006 18.18:
> Io muoio dall'invidia acc come vorrei essere lì!
> Mi auguro di poter essere dei vostri per il cisa 3
> Saluti Andrea
>
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:e6s0l9$qa9$1...@area.cu.mi.it...
>> Signore e Signori,
>> da domani e per tutto il weekend io ed un gruppeto di partecipanti saremo
>> al
>> Cisa e quindi offline.
>> Saluti a chi non viene, un "Ci vediamo domani" a chi viene e una promessa
>> di
>> un rendiconto prima possibile.
>> Posso dire che spero che il Cisa2 sp1 vada bene almeno un quarto di come è
>> andato il Cisa1
>> Buon Week End  a tutti
>>
>> --
>> _ _
>> Ciao
>> MAssimiliano Amendola
www.accessgroup.it
>> Cisa - Conferenza Italiana per Sviluppatori Access
>> Info:
www.donkarl.com/it
>>
>>
>
>
sigh sigh...
mi unisco agli invidiosi...
buon CISA!!!!
ciao
Nick


title: [Cisa] Saluti dal Cisa2 sp1

text:
Nick ha scritto:
[cut]
> sigh sigh...
> mi unisco agli invidiosi...
E sò 2!
nulla da fare, sei recidivo...
;-)
> buon CISA!!!!
buona permanenza a casa. hehe



title: Report basata su query multipla...

author: SuperPippo®

text:
ciao a tutti... non sono pratico di Access per cui scusatemi
se il titolo del messaggio è sballato....
ho un report per la stampa di codici basata su una query
di cui allego il codice....
SELECT II_parte.CODICE, I_parte.codice, I_parte.descrizione
FROM II_parte LEFT JOIN I_parte ON II_parte.link = I_parte.link
WHERE (((II_parte.CODICE) Like [Digitare Codice Esenzione]));
funziona benissimo.. . solo che posso digitare indi stampare
solo un codice per foglio....
io vorrei che digitando uno o più codici essi venissero stampati
tutti su un foglio...
come faccio ???


title: Report basata su query multipla...

author: Roberto da casa

text:
" SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:5GGBa.45860$Ny5.1...@twister2.libero.it...

Per la selezione multipla non te la puoi cavare semplicemente con una query
di selezione; devi usare un oggetto nel quale puoi effettuare una selezione
multipla, ad esempio una casella di riepilogo; vai sul Sito Comune (link qui
sotto) e nella Sezione Report leggi la FAQ intitolata "Come si può filtrare
un report in base alla selezione multipla effettuata su una casella di
riepilogo?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Report basata su query multipla...

text:
Roberto da casa wrote:
> " SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio>
<CUT>
> Per la selezione multipla non te la puoi cavare semplicemente con una
> query di selezione; devi usare un oggetto nel quale puoi effettuare
> una selezione multipla, ad esempio una casella di riepilogo; vai sul
> Sito Comune (link qui sotto) e nella Sezione Report leggi la FAQ
> intitolata "Come si può filtrare un report in base alla selezione
> multipla effettuata su una casella di riepilogo?".
------
Grazie Rob... ci vado a dare un'occhiata...


title: Opload fallito

author: Greg

text:
Ogni notte un file mdb Access2003 viene uppato in uno spazio web Altervista usando la funzione Api FtpPutFile.
Tutto bene fino a una decina di giorni fa quando ha cominciato (random, non sempre) a scrivere il file, ma il contenuto
è vuoto o incompleto, quidi illegibile.

Siccome immagino che il problema sia più lato web, qualcuno ci è gia passato e come ha risolto? Usanfo un'altra
funzione o un programmino già pronto da lanciare all'ora x? Grazie per ogni info

Public Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" _
(ByVal hFtpSession As Long, ByVal lpszLocalFile As String, _
      ByVal lpszRemoteFile As String, _
      ByVal dwFlags As Long, ByVal dwContext As Long) As Boolean

--
Greg


title: Opload fallito

text:
Diciamo che se usi solo la chiamata che hai esposto... sicuramente risparmi codice... ma...
Ad esempio la connessione la presenza della connessione ad Internet la Verifichi...?
La connessione al Server FTP la verifichi...?

Perchè non usi una funzione più strutturata...?

Guarda questa:

https://analystcave.com/vba-downloading-files-from-ftp-using-vba/

ma ancora meglio questo metodo che consente la gestione SINCRONA del pacchetto...

https://www.experts-exchange.com/questions/21591651/Finally-FTP-Wininet-Async-Callback-BUT.html

oppure questo:
https://stackoverflow.com/questions/3026308/how-can-i-upload-data-using-ftp-http-or-a-socket-from-a-spreadsheet-with-vba-f

@Alex


title: Opload fallito

text:
Il 01/03/19 15:35:20 @Alex ha scritto:
> Diciamo che se usi solo la chiamata che hai esposto... sicuramente risparmi codice... ma...
> Ad esempio la connessione la presenza della connessione ad Internet la Verifichi...?
> La connessione al Server FTP la verifichi...?

Prima controllo di avere una connessione,  era solo per formulare una domanda breve.

> Perchè non usi una funzione più strutturata...?
>
> Guarda questa:
>
>
https://analystcave.com/vba-downloading-files-from-ftp-using-vba/

questa è download
>
>
https://www.experts-exchange.com/questions/21591651/Finally-FTP-Wininet-Async-Callback-BUT.html

questa pure

> oppure questo:
>
https://stackoverflow.com/questions/3026308/how-can-i-upload-data-using-ftp-http-or-a-socket-from-a-spreadsheet-with-vba-f

e questa è identica a quella che uso, anche se wrappata in modo diverso:
Public Sub PutFile(LocalFilename As String, RemoteFilename As String)
    If FtpPutFile(m_hFtp, LocalFilename, RemoteFilename, FTP_TRANSFER_TYPE_BINARY, 0) = 0 Then
        Err.Raise vbObjectError + 1, , LastError
    End If
End Sub

io la uso cosi ma cambia poco:

x= FtpPutFile(m_hFtp, LocalFilename, RemoteFilename, FTP_TRANSFER_TYPE_BINARY, 0)
if x= 0 then
 ..........
 else
  .........
end if

--
Greg


title: Opload fallito

text:
Greg sei frettoloso... il link che dici essere per il download in realtà basta scorrere la pagina e trovi l'upload.

@Alex


title: Opload fallito

text:
Il 01/03/19 17:56:36 @Alex ha scritto:
> Greg sei frettoloso... il link che dici essere per il download in realtà basta scorrere la pagina e trovi l'upload.
>
> @Alex

Si scusa, la fretta, l'ansia...
Comuque vedo meglio adesso, ma mi pare che, con costrutti diversi, viene sempre usata la medesima funzione
FtpPutFile().

Oggi pomeriggio, non avendo ancora risolto, ho fatto varie prove, da cui si evince che la funzione va ache bene, ma non
in tutti i casi.
Ho messo di fila 3 funzioni identiche: la prima uppa un file di testo di 1K e va tutto bene, la seconda carica un mdb
da 400k e fallisce(dopo aver caricato per il 25% circa), la terza uppa un mdb da 10 MB e fallisce (dopo aver caricato
per l'80% circa). E quindi non saprei che conclusioni trarre.

 r1 = FtpPutFile(hConnection, App.Path & "\LogFile.txt", fDest, dwType, 0) 'file di 1k  ok
 r2 = FtpPutFile(hConnection, xDB, fDest3, dwType, 0)   ' fallisce dopo 100k su 400
 r3 = FtpPutFile(hConnection, xDB2, fDest4, dwType, 0)  ' fallisce dopo 7-8 mega su 10

dwType su Binary o ascii non cambia nulla

--
Greg


title: Opload fallito

text:

La funzione API per l'invio FILE FTP è quella... altrimenti devi cambiare completamente metodo...
Un'altro metodo è usare un BAT per lanciare il comando FTP, trovi quì il codice...(leggi bene tutto però)

https://www.ozgrid.com/forum/forum/help-forums/excel-general/38607-ftp-from-within-excel-vba?t=47625

Oppure questo:
https://www.reddit.com/r/excel/comments/6ye0m7/upload_xlsx_file_to_ftpserver/

Un'altro modo è usare SHELL:
http://www.riolab.org/index.php?option=com_content&view=article&id=209&Itemid=69

Altra possibilità è usare il componente INET... da istanziare ovviamente...

Sub Get_File_From_FTP()
    'Variable Declarion Section
    Dim FTP As Inet

    'Assign Host URL, Source and Destination File path
    HostURL = ThisWorkbook.Sheets(1).Cells(1, 1)
    FileSource = ThisWorkbook.Sheets(1).Cells(1, 2)
    FileDestination = ThisWorkbook.Sheets(1).Cells(2, 2)

    'Create New instance of Object and Assign the Parameters
    Set FTP = New Inet
    With FTP
        .URL = HostURL
        .Protocol = icFTP
        'Replace with your Login and Password Below. Many FTP servers allow Anonymous access with below credentials
        .UserName = "anonymous"
        .Password = "
ma...@gmail.com
"
        .AccessType = icUseDefault
        'Use "Get" to Download and "Put" Option to Upload File to FTP Server
        .Execute .URL, "Get " & FileSource & " " & FileDestination
    End With
    Do While FTP.StillExecuting
        DoEvents
    Loop

    'Status of FTP through Voice Message
    Application.Speech.Speak "Process Completed;" & FTP.ResponseInfo

    If FTP.ResponseCode = 0 Then
        'SomeTime FTP steps will execute successfully, but file will not be there in Destination path
        'Search for the file in the Path mentioned in this Message Box
        MsgBox "File is Copied to :" & VBA.CurDir
    End If
    Set FTP = Nothing
End Sub

Io usavo il Socket direttamente con il componente Activex WINSOCK ma da quanto non è più fruibile meglio INET...

Vedio tu...
@Alex


title: Opload fallito

text:
Il 02/03/19 08:29:15 @Alex ha scritto:

>
> La funzione API per l'invio FILE FTP è quella... altrimenti devi cambiare completamente metodo...
> Un'altro metodo è usare un BAT per lanciare il comando FTP, trovi quì il codice...(leggi bene tutto però)

>
> Io usavo il Socket direttamente con il componente Activex WINSOCK ma da quanto non è più fruibile meglio INET...
>
> Vedio tu...
> @Alex

Grazie Alex, vedrò di riprendere in mano e l'oggetto INET che a suo tempo avevo scartato in favore dell'Api, in quanto
un oggetto in meno da portarsi dietro.
Ciao

--
Greg


title: Opload fallito

author: GiorgioDaPrato

text:
> Siccome immagino che il problema sia più lato web, qualcuno ci è gia passato e come ha risolto?

mi sembra (MI SEMBRA ...) che in precedenza un quesito simile abbia avuto una auto-risposta:

che in Altervista era cambiata la policy di accettazione file e che si doveva espressamente indicare un file mdb (anche zippato ?) come file "accettabile"


title: Opload fallito

text:
Il 02/03/19 12:51:00 GiorgioDaPrato ha scritto:

Ciao Giorgio,
hai buona memoria, se ti riferisci al mio 3d dello scorso settembre:
https://groups.google.com/forum/#!searchin/it.comp.appl.access/altervista%7Csort:date/it.comp.appl.access/41ooURS3k0g/8C4_5-IzCQAJ

Allora, si avevo risolto cambiando un flag nell'api, ma stavolta non saprei cosa fare.
Ieri sera sembrava risolto perchè per qualche ora andava tutto bene, ma da stamattina di nuovo tutto bloccato.
I files viengono uppati ma sono a zero bytes

--
Greg


title: Opload fallito

text:
> Ciao Giorgio,
> hai buona memoria, se ti riferisci al mio 3d dello scorso settembre:
>
https://groups.google.com/forum/#!searchin/it.comp.appl.access/altervista%7Csort:date/it.comp.appl.access/41ooURS3k0g/8C4_5-IzCQAJ

>
> Allora, si avevo risolto cambiando un flag nell'api, ma stavolta non saprei cosa fare.
> Ieri sera sembrava risolto perchè per qualche ora andava tutto bene, ma da stamattina di nuovo tutto bloccato.
> I files viengono uppati ma sono a zero bytes

allora posso aggiungere un' altra possibilità di upload via FTP
a me funziona da qualche anno su uno spazio FTP aziendale
(è una routine in cui ho copiato pari pari istruzioni vbscript,
ricordo di averla testata proprio su Altervista, ma NON di recente)

Sub invioFtp(pathFile) 'pathFile: percorso completo del file
On Error GoTo erore
Set oShell = CreateObject("Shell.Application")
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Const copyType = 16 '-->16: lo indico direttamente quando necessario
FTPUser = "stringaUser"
FTPPass = "stringaPassword"
FTPHost = "stringaHost" 'qui, per me è proprio il nome del sito
FTPDir = "stringaDirectory" 'qui, per me, ci sono slash INIZIALE E FINALE

strFTP = "ftp://" & FTPUser & ":" & FTPPass & "@" & FTPHost & FTPDir
Set objFTP = oShell.NameSpace(strFTP)

'Upload single file
Set objFile = objFSO.GetFile(pathFile)
strParent = objFile.ParentFolder
Set objFolder = oShell.NameSpace(strParent)

Set objItem = objFolder.ParseName(objFile.Name)
objFTP.CopyHere objItem, 16

Set oShell = Nothing
Set objFSO = Nothing
Set objFTP = Nothing
Set objFile = Nothing
Set objFolder = Nothing
Set objItem = Nothing

Exit Sub

erore:

MsgBox Err.Number & " " & Err.Description, vbCritical
End Sub


title: Opload fallito

text:
> > La funzione API per l'invio FILE FTP è quella... altrimenti devi cambiare completamente metodo...
> > Un'altro metodo è usare un BAT per lanciare il comando FTP, trovi quì il codice...(leggi bene tutto però)

>
> Grazie Alex, vedrò di riprendere in mano e l'oggetto INET che a suo tempo avevo scartato in favore dell'Api, in quanto
> un oggetto in meno da portarsi dietro.

Potresti provare anche Ftp.exe che è preinstallato su windows.
In rete trovi parecchi esempi.

Saluti


title: Opload fallito

text:
Speriamo non sia uno dei suggerimenti che avevo dato prima... ;-) e che bastava leggere... questo come l'altro...

Vabbè...

@Alex


title: Opload fallito

text:
> Speriamo non sia uno dei suggerimenti che avevo dato prima... ;-) e che bastava leggere... questo come l'altro...

Non ci giurerei, ma se anche fosse sopravviveremo!

Saluti


title: Opload fallito

text:
Prova a leggere bene... ma ovviamente io ceno ugualmente oggi ed anche domani...

@Alex


title: Opload fallito

text:
Il 02/03/19 19:26:36 @Alex ha scritto:
> Speriamo non sia uno dei suggerimenti che avevo dato prima... ;-) e che bastava leggere... questo come l'altro...
>
> Vabbè...
>
> @Alex

Scusami Alex, lo so che sono andato troppo veloce a leggere il tuo pos, ma mi avevi suggerito pure ftp.exe? Ma devo
essere orbo, non lo vedo ancora :(
Dovrei pure rinnovare la patente il mese prossimo, speriamo bene!

--
Greg


title: Opload fallito

text:
Il 02/03/19 16:48:59
simoca...@gmail.com
 ha scritto:

> Potresti provare anche Ftp.exe che è preinstallato su windows.
> In rete trovi parecchi esempi.

Grazie del suggerimento, in rete ho trovato poco, perchè sono tutti post molto vecchi e il link spesso risulta non
funzionante.
Ad ogni modo ne ho trovato uno per un as400, l'ho adattato, sono riuscito a connettermi, e files risultano caricati e
scaricati parzialmente, in fase di upload ha pure segnalato l'errore, in fase di download no, ma il file è incopleto lo
stesso.

Questi i comandi inviati:
open xxxx
user xxx
put C:\dati.mdb aaaa.mdb
get test.txt c:\test.txt
close
quit

Queste le risposte:
ftp> Connesso a ftp.xxxx
open xxxx
220---------- AlterVista FTP ----------
220-Sei l'utente numero 14 di 256 consentiti
220-L'ora locale è 19:41. Porta del server: 21.
220-Questo è un sistema privato - Nessun login anonimo
220 Sarai disconnesso dopo 5 minuti di inattività.
ftp> user xxxx
331 Utente xxxx OK. Richiesta password
230-La velocità di download via FTP è limitata, usa il browser se devi fare il download di files molto grandi
230 OK. La directory limitata corrente è /
ftp> put C:\dati.mdb aaaa.mdb
200 Comando PORT eseguito con successo
150 Mi sto collegando alla porta 33392
226-Errore durante la scrittura sul file  <- QUI ERRORE
226-Trasferimento annullato
226 0.222 secondi (misurati qui)
ftp: 65536 bytes sent in secondi Kbyte/sec)
ftp> 0,27241,83get test.txt c:\test.txt
200 Comando PORT eseguito con successo
150-Mi sto collegando alla porta 33393
150 11.8 kbytes da downloadare
226-File trasferito con successo         <- NON è VERO, FILE INCOMPLETO
226 0.067 secondi (misurati qui)
ftp: 12213 bytes received in secondi Kbyte/sec)
ftp> 0,06190,83close
221-Arrivederci. Hai uploadato 76 e downloadato 12 kbytes.
221 Logout.
ftp> quit

Ho notato che i comandi sono quelli che usa Filezilla, che va bene, tuttavia Filezilla ne usa molti di piu, ma non
saprei come valorizzarli, ag ogni modo li elenco sotto:

syst
feat
typeI
pasv
mlsd

--
Greg


title: Opload fallito

text:
Si in generale come già ti dissi all'inizio hai espresso una discreta fretta nella lettura...

https://www.ozgrid.com/forum/forum/help-forums/excel-general/38607-ftp-from-within-excel-vba?t=47625

La riga di comando che leggi secondo me usa... ftp.exe che essendo un exe supporta l'omissione dell'estensione...

Anche quanto suggerito da Giorgio è presente in un'altro link...

In ogni caso... farai un po come ti pare...

@Alex


title: Opload fallito

text:
Il 02/03/19 20:55:05 Greg ha scritto:

> 226-Errore durante la scrittura sul file  <- QUI ERRORE
> 226-Trasferimento annullato
> 226 0.222 secondi (misurati qui)
> ftp: 65536 bytes sent in secondi Kbyte/sec)
> ftp> 0,27241,83get test.txt c:\test.txt
> 200 Comando PORT eseguito con successo
> 150-Mi sto collegando alla porta 33393
> 150 11.8 kbytes da downloadare
> 226-File trasferito con successo         <- NON è VERO, FILE INCOMPLETO

Correggo: l'errore sul download non c'è, il file ha le stesse dimensini.
C'è un solo errore, sull'upload di un file di circa 300k

--
Greg


title: Opload fallito

text:
> Prova a leggere bene... ma ovviamente io ceno ugualmente oggi ed anche domani...

Troppa fatica leggere tutta quella roba, soprattutto dopo mesi di FT Xml.
Ma, come dicevo, se pure avessi replicato cose già scritte, il mondo non crollerà.

Saluti


title: Opload fallito

text:
Nutro grande passione pure io per la F.E. finalmente un argomento interessante... e purtroppo pare, che nemmeno per questo ottimo spunto di innovazione tecnica si fermi il mondo...

Buona domenica.
@Alex


title: Opload fallito

text:
Il 02/03/19 20:57:20 @Alex ha scritto:

Allora oggi pomeriggio ho fatto qualche prova con Ftp.exe.
Si connette, comincia a caricare e poi si verifica un errore.
Però per scrupolo ho voluto provare su un altri spazi web, sia altervista che non, e l'Ftp.exe funziona smepre bene,
sempre con il medesimo file di test.

A questo punto non è piu nel codice, ma mi chiedo cosa potrebbe essere e non ho idea

Un grazie a tutti e due
Buona domenica, quello che resta :)

--
Greg


title: Opload fallito

text:
> Nutro grande passione pure io per la F.E. finalmente un argomento interessante... e purtroppo pare, che nemmeno per questo ottimo spunto di innovazione tecnica si fermi il mondo...

Dici?
Il mondo magari non si fermerà per la F.E., ma l'Italia ci sta andando vicino!

Saluti


title: Opload fallito

text:
Il 03/03/19 18:55:19
simoca...@gmail.com
 ha scritto:

>Secondo il Sole24ore è in forte aumento il nero

--
Greg


title: Opload fallito

text:
Il 03/03/19 18:55:19
simoca...@gmail.com
 ha scritto:

Secondo IlSole24Ore è in forte aumento il nero

--
Greg


title: Opload fallito

text:
> A questo punto non è piu nel codice, ma mi chiedo cosa potrebbe essere e non ho idea
>
ricontrolla le regole di fruizione del servizio Altervista,
avevo (ho ancora, ma poco usata) una iscrizione free
e ho ricevuto, anche di recente, comunicazioni a riguardo con variazioni "unilaterali" (come è da aspettarsi)

In particolare per le utenze free, SE è il tuo caso,
NON è possibile usare il loro spazio come mero "deposito cloud".
In altre parole: un download NON può essere privo di link
evidente in una delle pagine pubblicate
(e pagine "davvero" pubbliche:
perchè credo possano riuscire a distinguere chi scarica gli upload  ...)


title: Opload fallito

text:
Il 04/03/19 10:40:10 GiorgioDaPrato ha scritto:

Per questo  non ci sono problemi, i download hanno un link sulla pagina pubblica, ma io parlavo di Upload

--
Greg


title: Opload fallito

text:
Il 04/03/19 11:51:54 Greg ha scritto:

Il tuo post mi ha fatto venire però un altro dubbio: che ci fosse unq aulche limitazione allo spazio?
Ed era proprio quallo il problema, bastare ripulire roba vecchia e inutile e tutto è tornato normale.

Il guaio è che gestendo molti siti con Filezilla perchè è piu comodo, invece di accedere con l'interfaccia dell'host,
si perdono i messaggi come questo: spazio esaurito!

Si impara sempre.
Un grazie a tutti

--
Greg


title: Euro

author: Graziano Franchi (Dal Portatile)

text:
Senza fare delle prove potete indicarmi come impostare il campo EURO?
Facciamo un esempio:
Devo convertire tutti i prezzi in euro e naturalmente le fatture.
Il presso in euro è di tipo Valuta con 2 cifre decimali???
Saluti e 1000Grazie


title: Euro

author: oliones

text:
Graziano Franchi (Dal Portatile) <
franchi....@tiscalinet.it
> wrote in
message 9jki0m$qo8$1...@lacerta.tiscalinet.it...

tipo campo valuta, decimali 2, formato "? "#.###,##
prova sostituendo il ? con il codice Euro sulla tastiera dovrebbe essere
sotto alla "E" premi Alt Gr + e
su access 2000 c'è la valuta in euro
ciao


title: Euro

author: Arturo

text:
> Devo convertire tutti i prezzi in euro e naturalmente le fatture.
>
> Il presso in euro è di tipo Valuta con 2 cifre decimali???
Se hai access 2000 puoi usare (es. in una query
di aggiornamento o in un campo calcolato) la funzione:
EuroConvert ([prezzo in lire]; "ITL"; "EUR")
fa gli arrotondamenti necessari e mette 2 decimali.
Ciao
Arturo


title: Utilizzo di Iif nelle query

author: Roberto

text:
Vediamo se qualcuno riesce ad  aiutarmi,
ho una query dove  ho inserito un campo con questa espressione:
 IIf([GiorniSospensione]<=330;"Polizza Sospesa";IIf([GiorniSospensione]
Between 330 And 365;"Attenzione!! Sta finendo il tempo limite per la
sospensione, Chiamare  il cliente ed
avvisare";IIf([GiorniSospensione]>365;"ATTENZIONE!!! La sospensione non č
piu riattivabile")))
Tutto funziona regolarmente ma a questa espressione manca ancora  una
condizione, ovvero: Se il campo datariattivazione  NON  č vuoto allora
srivimi "Polizza Riattivata"
Non sono riuscito ad  inserire  in nessun modo questa condizione all'interno
dll'espressione soprascritta.
Esiste  un modo piu ordinato e semplice di digitare le espressioni con piu
condizioni?
Ovviamente da come ho scritto l'espressione avete gia capito che non sono
molto esperto.
Grazie a tutti


title: Utilizzo di Iif nelle query

author: sv

text:
Roberto ha scritto:



IIf([DataRiattivazione] Is Not Null;"Polizza
Riattivata";IIf([GiorniSospensione]<=330;"Polizza
Sospesa";IIf([GiorniSospensione] Between 330 And 365;"Attenzione!! Sta
finendo il tempo limite per la sospensione, Chiamare il cliente ed
avvisare";IIf([GiorniSospensione]>365;"ATTENZIONE!!! La sospensione non č
piu riattivabile"))))
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Utilizzo di Iif nelle query

author: Antonio Biso

text:
"Roberto" <
v...@rcapoint.it
> ha scritto nel messaggio
news:FQIsb.111573$vO5.4...@twister1.libero.it...
> Vediamo se qualcuno riesce ad  aiutarmi,
> ho una query dove  ho inserito un campo con questa espressione:
>  IIf([GiorniSospensione]<=330;"Polizza Sospesa";IIf([GiorniSospensione]
> Between 330 And 365;"Attenzione!! Sta finendo il tempo limite per la
> sospensione, Chiamare  il cliente ed
> avvisare";IIf([GiorniSospensione]>365;"ATTENZIONE!!! La sospensione non è
> piu riattivabile")))
>
> Tutto funziona regolarmente ma a questa espressione manca ancora  una
> condizione, ovvero: Se il campo datariattivazione  NON  è vuoto allora
> srivimi "Polizza Riattivata"
> Non sono riuscito ad  inserire  in nessun modo questa condizione
all'interno
> dll'espressione soprascritta.
> Esiste  un modo piu ordinato e semplice di digitare le espressioni con piu
> condizioni?
>
> Ovviamente da come ho scritto l'espressione avete gia capito che non sono
> molto esperto.
Non mi sembra male, diciamo che l'unica cosa da obiettare è che l'ultimo
test era inutile in quanto rimaneva solo l'ipotesi >365 e quindi è inutile
testare. Quindi
IIf([GiorniSospensione]<=330;"Polizza Sospesa";IIf([GiorniSospensione]
Between 330 And 365;"Attenzione!!";"ATTENZIONE")))
Per quanto riguarda il tuo quesito non si capisce l'ordine di valutazione
delle condizioni: se datariattivazione non è vuoto NON bisogna fare il test
sui giorni di sospensione?
Se è così, l'espressione diventa:
iif(not isnull(datariattivazione);"Polizza
riattivata";IIf([GiorniSospensione]<=330;"Polizza
Sospesa";IIf([GiorniSospensione] Between 330 And
365;"Attenzione!!";"ATTENZIONE"))))
Antonio


title: Utilizzo di Iif nelle query

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:QbJsb.114556$e6.41...@twister2.libero.it...

Il problema l'ho risolto con il messaggio precedente al tuo, ma leggendo il
tuo post mi hai fatto venire dei dubbi, che differenza c'è tra  la tua
modalità e quella dell'altro ragazzo che  mi ha risposto prima?


title: Utilizzo di Iif nelle query

text:
Roby75 ha scritto:


Veramente non sono "altro ragazzo" ma SV. Ho 58 anni. ma questo non lo
potevi sapere.
La differenza è che effettivamente è inutile testare >365 in quando questa
è la condizione 'else' di "between 330 and 365".
Buon lavoro.



title: Maschere collegate e filtri

author: Nadia

text:
buongiorno a tutti
premesso che sto imparando ad usare access e che con lo studio del VBA
sono nella fase "mi cerco un buon libro per cominciare" (si accettano
consigli), ecco il problema
ho due tabelle tabSoggetti e tabDatiAB collegate con relazione 1 a molti
e due maschere di cui frmSoggetti è la maschera principale e frmDatiAB è
quella collegata  [attraverso un Pulsante di Comando impostato con la
creazione guidata]
frmDatiAB contiene due tipi di dati A e B nel campo "Tipo" e contiene
due pulsanti filtro per appunto filtrare o A o B - il codice associato
ai pulsanti filtro è
 Me.Filter = "tipo = 'A'"   (B per il secondo pulsante)
 Me.FilterOn = True
Ed ecco il problema:
quando applico il filtro in frmDatiAB il risultato non tiene conto del
fatto che i dati AB sono relativi ad uno specifico soggetto --> ovvero
mi mostra tutti i dati di tipo A o di tipo B presenti nella tabella e
non solo quelli relativi al soggetto selezionato nella frmSoggetti

questo non accade se uso frmDatiAB come sottomaschera, in questo caso
quando filtro A vedo i dati di tipo A relativi al soggetto X
solo che per vari motivi è necessario che io usi maschere collegate e
non sottomaschere
Immagino sia un problema "banale" ma sono giorni che cerco una soluzione
tra help di Access2000, e sito comune, senza trovare... e non escludo di
aver trovatato la soluzione senza capire che era quella!
Grazie per la pazienza
Nadia
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Maschere collegate e filtri

text:
"Nadia" <
nadi...@tiscalinet.it
> ha scritto nel messaggio
news:a6e820f22af4be668b0...@mygate.mailgate.org...

Prova a filtrare anche in base a IDSoggetto (chiave primaria di tabSoggetti
e chiave esterna di tabDatiAB); insomma, qualcosa del genere:
Me.Filter = "IDSoggetto=" & Forms!frmSoggetti!IDSoggetto "AND tipo = 'A'"
Me.FilterOn = True
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Maschere collegate e filtri

author: Max De Poli

text:
"Nadia" <
nadi...@tiscalinet.it
> wrote in message news:<
a6e820f22af4be668b0...@mygate.mailgate.org
>...
[cut]
> ho due tabelle tabSoggetti e tabDatiAB collegate con relazione 1 a molti
> e due maschere di cui frmSoggetti è la maschera principale e frmDatiAB è
> quella collegata  [attraverso un Pulsante di Comando impostato con la
> creazione guidata]
>
> frmDatiAB contiene due tipi di dati A e B nel campo "Tipo" e contiene
> due pulsanti filtro per appunto filtrare o A o B - il codice associato
> ai pulsanti filtro è
>  Me.Filter = "tipo = 'A'"   (B per il secondo pulsante)
>  Me.FilterOn = True
>
> Ed ecco il problema:
> quando applico il filtro in frmDatiAB il risultato non tiene conto del
> fatto che i dati AB sono relativi ad uno specifico soggetto --> ovvero
> mi mostra tutti i dati di tipo A o di tipo B presenti nella tabella e
> non solo quelli relativi al soggetto selezionato nella frmSoggetti
Non so esattamente cosa faccia la creazione guidata (Ok, potrei fare
ALT-TAB e andare a provare adesso, ma sono mooolto pigro), ma ho la
sensazione che non faccia altro che aprire la maschera frmDatiAB e
applichi un filtro per limitare i record a quelli collegati al record
corrente di frmSoggetti (lineare, eh?)
Quando fai Me.Filter="tipo='A'" elimini il filtro preesistente...
quindi, devi aggiustare i tuoi filtri in modo che somiglino a questo:
(ipotizzando che le tue tabelle tabsoggetti e tabDatiAB siano
collegate dal campo [IDSoggetto])
Me.filter = "Tipo='A' AND IDSoggetto=' & forms!frmSoggetti!IDSoggetto
& "'"
Divertiti!
Cia'
Max De Poli


title: Maschere collegate e filtri

author: Nadia Men

text:
"Max De Poli" <
rocc...@katamail.com
> wrote in message
news:c2f1e49e.02030...@posting.google.com...
> Non so esattamente cosa faccia la creazione guidata (Ok, potrei fare
> ALT-TAB e andare a provare adesso, ma sono mooolto pigro), ma ho la
> sensazione che non faccia altro che aprire la maschera frmDatiAB e
> applichi un filtro per limitare i record a quelli collegati al record
> corrente di frmSoggetti (lineare, eh?)
>
> Quando fai Me.Filter="tipo='A'" elimini il filtro preesistente...
> quindi, devi aggiustare i tuoi filtri in modo che somiglino a questo:
> (ipotizzando che le tue tabelle tabsoggetti e tabDatiAB siano
> collegate dal campo [IDSoggetto])
>
> Me.filter = "Tipo='A' AND IDSoggetto=' & forms!frmSoggetti!IDSoggetto
> & "'"
>
> Divertiti!
>
> Cia'
>
> Max De Poli
Grazie MAx e grazie Roberto, ho preso i vostri suggerimenti li ho
elaborati
per adattarli alla mia situazione ma non funziona!
A seconda di come scrivo i simboli " & ' (virgolette, e commerciale,
apice)
ottengo risultati diversi ma mai quello corretto ed i risultati sono:
Errore di run-time - tipo non corrispondente
e qui, nella mi ignoranza, ho provato di tutto persino a trasformare
il mio IDSogg da numero (č un contatore) a stringa, senza risultati
oppure
nessun codice di errore ma 0 record filtrati
e a questo punto non so neanche cosa cercare nell'help!
...č da ieri che provo e riprovo senza risultati ed ora che comincio a
non divertirmi piů!! invoco ancora aiuto
grazie ancora
Nadia
(Ps spero di star inoltrando questo Replay in modo corretto!)



title: Maschere collegate e filtri

text:
"Nadia Men" <
nadi...@tiscalinet.it
> ha scritto nel messaggio
news:3656d63c4fc2098d74a...@mygate.mailgate.org...
[CUT]
>
> Grazie MAx e grazie Roberto, ho preso i vostri suggerimenti li ho
> elaborati
> per adattarli alla mia situazione ma non funziona!
> A seconda di come scrivo i simboli " & ' (virgolette, e commerciale,
> apice)
> ottengo risultati diversi ma mai quello corretto ed i risultati sono:
>
> Errore di run-time - tipo non corrispondente
> e qui, nella mi ignoranza, ho provato di tutto persino a trasformare
> il mio IDSogg da numero (č un contatore) a stringa, senza risultati
>
> oppure
>
> nessun codice di errore ma 0 record filtrati
> e a questo punto non so neanche cosa cercare nell'help!
>
> ...č da ieri che provo e riprovo senza risultati ed ora che comincio a
> non divertirmi piů!! invoco ancora aiuto
>
> grazie ancora
> Nadia
>
> (Ps spero di star inoltrando questo Replay in modo corretto!)
Hai ragione: scusami ma mi č rimasta nei tasti una &.
Prova cosě, ora dovrebbe funzionare:
Me.Filter = "IDSoggetto=" & Forms!frmSoggetti!IDSoggetto & " AND Tipo = 'A'"



title: Maschere collegate e filtri

author: Roccia

text:
Il Thu, 7 Mar 2002 16:36:27 +0000 (UTC), Nadia Men oso' dichiarare:
> A seconda di come scrivo i simboli " & ' (virgolette, e commerciale,
> apice)
> ottengo risultati diversi ma mai quello corretto ed i risultati sono:
>
> Errore di run-time - tipo non corrispondente
> e qui, nella mi ignoranza, ho provato di tutto persino a trasformare
> il mio IDSogg da numero (è un contatore)
Ah, ecco ^___^
Sono troppo abituato a usare le stringhe come chiavi... la sintassi
corretta e' quindi
Me.filter = "Tipo='A' AND IDSoggetto=" & forms!frmSoggetti!IDSoggetto
(Comunque neanche la sintassi precendente avrebbe funzionato: ho
dimenticato un paio di virgolette)
--
Cia'
"Roccia" Max De Poli <
rocc...@katamail.com
>


title: Maschere collegate e filtri

text:
"Roccia" Max De Poli" <
rocc...@katamail.com
> wrote in message
news:MPG.16f1ea9b3...@news.tiscalinet.it...
> [CUT]
>
> Me.filter = "Tipo='A' AND IDSoggetto=" & forms!frmSoggetti!IDSoggetto
>
> (Comunque neanche la sintassi precendente avrebbe funzionato: ho
> dimenticato un paio di virgolette)
Capisco di star diventando una specie di tormentone, ma oggi mi
ci sono rimessa e ... come dire
Errore di Run-time 2001
Operazione precedente annullata
?!?!??!
per questo tipo di errore il bottone che collega all'Help non è
disponibile
e cercando nella Guida non ho trovato spiegazioni in merito!
(ma non c'è qualcosa in rete che descriva questi errori, senza impazzire
ogni volta a stanarli nel help-on-line?!)
Scusate se insisto ma se non riesco a far funzionare questo giochetto
devo
reimpostare metà del lavoro già fatto!
ancora grazie
Nadia



title: Maschere collegate e filtri

text:
Il Mon, 11 Mar 2002 17:37:43 +0000 (UTC), Nadia oso' dichiarare:
> Errore di Run-time 2001
> Operazione precedente annullata
Qualcosa ti intercetta un evento annullabile, come l'apertura di una
form o il salvataggio di un record.
Questo errore lo da' sistematicamente o solo in alcuni casi (Es.
modifichi un record, premi il pulsante del filtro e parte l'errore)?
Prova a vedere con i punti di interruzione e F8 a che punto si
inchioda...
--
Cia'



title: Maschere collegate e filtri

text:
"Roccia" Max De Poli" <
rocc...@katamail.com
> wrote in message
news:MPG.16f74256e...@news.tiscalinet.it...
> Il Mon, 11 Mar 2002 17:37:43 +0000 (UTC), Nadia oso' dichiarare:
>
> > Errore di Run-time 2001
> > Operazione precedente annullata
>
> Qualcosa ti intercetta un evento annullabile, come l'apertura di una
> form o il salvataggio di un record.
>
> Questo errore lo da' sistematicamente o solo in alcuni casi (Es.
> modifichi un record, premi il pulsante del filtro e parte l'errore)?
>
> Prova a vedere con i punti di interruzione e F8 a che punto si
> inchioda...
Allora: il codice è tutto qui
Private Sub btnA_Click()
    Me.Filter = "Tipo='A' AND IDSogg=" & Forms!frmSoggetti!IDSogg
    Me.FilterOn = True
End Sub
Il meccanismo è:
1 Apro la maschera Soggetti,
2 seleziono il soggetto che mi interessa
3 clicco sul pulsante Apri Maschera Tipo
  (il cui codice
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "frmTipo"
    stLinkCriteria = "[IDSogg]=" & Me![IDSogg]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
  è stato creato direttamente da Access)
4 nella maschera Tipo clicco sul pulsante a cui ho associato il codice
in esame
5 appare il messaggio di errore
6 la riga di codice incriminata è la prima delle due Me.Filter = ...
7 accade ogni volta che tento di applicare il filtro (che è poi l'unica
operazione che faccio
  visto che ho creato questo db al solo scopo di testare qusto codice)
radioso martedì e ancora grazie



title: Maschere collegate e filtri

author: Emyr

text:


provato con   Me.Filter = "Tipo='A' AND IDSogg=""" &
Forms!frmSoggetti!IDSogg & """"
Saluti.
Emanuele.


title: Maschere collegate e filtri

text:
"Emyr" <
fan...@lavoro.com
> wrote in message
news:fs9u8uggfsu631225...@4ax.com...
>>
> provato con   Me.Filter = "Tipo='A' AND IDSogg=""" &
> Forms!frmSoggetti!IDSogg & """"
>
>
>
> Saluti.
> Emanuele.
BINGO!!!
Non ho idea del perchè, ma per il momento mi basta che funzioni.
Grazie a tutti



title: Maschere collegate e filtri

text:
On Wed, 13 Mar 2002 14:10:24 +0000 (UTC), "Nadia"
<
nadi...@tiscalinet.it
> wrote:
>"Emyr" <
fan...@lavoro.com
> wrote in message
>news:fs9u8uggfsu631225...@4ax.com...
>
>>>
>> provato con   Me.Filter = "Tipo='A' AND IDSogg=""" &
>> Forms!frmSoggetti!IDSogg & """"
>>
>>
>>
>> Saluti.
>> Emanuele.
>
>
>BINGO!!!
>Non ho idea del perchč, ma per il momento mi basta che funzioni.
>
>Grazie a tutti
>Nadia
il perchč riguarda l'uso degli apici in presenza di stringhe e non in
presenza di numeri
il tuo contatore IDsogg č di tipo stringa e non numerico
Saluti.
Emanuele.


title: Maschere collegate e filtri

text:
> On Wed, 13 Mar 2002 14:10:24 +0000 (UTC), "Nadia"
> <
nadi...@tiscalinet.it
> wrote:
>
 >BINGO!!!
>Non ho idea del perchè, ma per il momento mi basta che funzioni.
Non si fa molta strada con questi ragionamenti...
Antonio


title: Aggiornamento tabella in SQL SERVER 2005 da tabella Access 2003

author: leonardo esposito

text:
buonasera amici del NG,
dopo mille difficoltà sono riuscito a trasferire un db di Access 2003
in SQL SERVER 2005 con l'upsize guidato.
Purtroppo ho l'esigenza di dover aggiornare settimanalmente due di
queste tabelle trasferite in SQL contenenti dei listini, ma non so
proprio come fare, dato che il trasferimento della tabella da me
aggiornata in Access (con un'importazione di file di testo) su quella
già esistente in SQL SERVER va in errore, perchè credo questa
procedura diretta di sostituzione tabella non sia possibile. Potete
suggerirmi se c'è un metodo semplice per fare questa operazione, per
me è molto molto importante.
grazie davvero
Leo


author: Gabriele Bertolucci

text:
> dopo mille difficoltà sono riuscito a trasferire un db di Access 2003
> in SQL SERVER 2005 con l'upsize guidato.
Per questa volta, ormai, hai risolto, ma per il futuro, per convertire un
archivio MDB in database SQL, ti consiglio di utilizzare SQL Server
Migration Assistant for Access.
> Purtroppo ho l'esigenza di dover aggiornare settimanalmente due di
> queste tabelle trasferite in SQL contenenti dei listini, ma non so
> proprio come fare, dato che il trasferimento della tabella da me
> aggiornata in Access (con un'importazione di file di testo) su quella
> già esistente in SQL SERVER va in errore, perchè credo questa
> procedura diretta di sostituzione tabella non sia possibile. Potete
> suggerirmi se c'è un metodo semplice per fare questa operazione, per
> me è molto molto importante.
Cerchiamo di fare chiarezza.
Adesso devi dimenticarti di Access come BE. Il tuo BE è SQL Server.
Detto questo, per arrivare a risolvere il tuo problema, bisogna capire bene
quello che devi fare.
Se devi aggiornare i dati di una tabella tramite importazione da un file di
testo, allora puoi utilizzare ADO per svuotare la tabella in questione
(cerca nei BOL il comando TRUNCATE TABLE).
A questo punto, puoi scegliere due strade, che passano entrambe per ADO:
1) gestire il file di testo da VBA e provvedere a popolare la tabella di
destinazione riga per riga;
2) utilizzare (se possibile) il comando BULK INSERT (anche di questo trovi
documentazione nei BOL).
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:

ciao Gabriele,
diciamo che ho a disposizione solo le tabelle di Access aggiornate da
dover esportare e sostituire a quelle presenti in SQL, mi sono davvero
arenato...
grazie comunque


text:
> diciamo che ho a disposizione solo le tabelle di Access aggiornate da
> dover esportare e sostituire a quelle presenti in SQL, mi sono davvero
> arenato...
Dunque, vediamo di capire meglio.
Tu stai lavorando con un ADP e le tabelle con i dati da importare stanno
dentro un file MDB: giusto?



title: setfocus in sub.sourceObject

text:
ho una maschera con un controllo casella combinata dove scelgo che maschera
aprire nel controllo sottomaschera.
esempio:
Private Sub cmbSelTipoInserimento_AfterUpdate()
Me.Sub.Visible = True
If Me.cmbSelTipoInserimento = "Inserimento Conferme" Then
Me.Sub.SourceObject = "InserimentoConferme"
ElseIf Me.cmbSelTipoInserimento = "Inserimento dettagli conferme" Then
Me.Sub.SourceObject = "mRicerca"
ElseIf Me.cmbSelTipoInserimento = "Stampa Produzione" Then
Me.Sub.SourceObject = "Data"
End If
End Sub
come si fa a passare il setfocus dal controllo casella combinata della
maschera principale ad un controllo del sourceObject?
es:
forms!mascheraprincipale!data!txtnome.setfocus
grazie
ciao


title: setfocus in sub.sourceObject

text:
"T@Roberto" <
tas...@libero.it
> ha scritto nel messaggio
news:qw0G9.41238$2B1.1...@twister2.libero.it...

Prima sposta il fuoco sul controllo sottomaschera e poi sposta il fuoco sul
controllo contenuto nella sottomaschera, ovvero:
forms!mascheraprincipale!Sub.SetFocus
forms!mascheraprincipale!Sub!txtnome.SetFocus
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: setfocus in sub.sourceObject

text:
> Prima sposta il fuoco sul controllo sottomaschera e poi sposta il fuoco
sul
> controllo contenuto nella sottomaschera, ovvero:
>
> forms!mascheraprincipale!Sub.SetFocus
> forms!mascheraprincipale!Sub!txtnome.SetFocus
>
grazie di nuovo
funziona tutto (come sempre)


title: Intercettare in una tabella il record che sta per essere modificato

author: Roberto da Parma

text:
Ciao a tutti,
non so se è una cosa fattibile....ma mi piacerebbe sapere se e quando un
record sta per essere modificato in un'altra istanza...
Da maschera posso intercettare l'evento Dirty ma se sono in un'altra
postazione (es. PC2) come posso sapere che (es. PC1) sta modificando un
certo record?
E se comunque la modifica di un record viene fatta da VBA, come posso sempre
da VBA intercettare il record sulla tabella che sta per essere modificato?
Spero di essermi spiegato bene...
Saluti
--
Roberto da Parma


author: Marco Pizzamiglio

text:
Roberto da Parma ha scritto:
> Ciao a tutti,
> non so se è una cosa fattibile....ma mi piacerebbe sapere se e quando un
> record sta per essere modificato in un'altra istanza...
> Da maschera posso intercettare l'evento Dirty ma se sono in un'altra
> postazione (es. PC2) come posso sapere che (es. PC1) sta modificando un
> certo record?
> E se comunque la modifica di un record viene fatta da VBA, come posso sempre
> da VBA intercettare il record sulla tabella che sta per essere modificato?
Setti un flag o un ID da VBA in una tabella condivisa che l'altro
PC può leggere per sapere quale record è in fase di modifica.
Oppure passi ad un'altro motore database tipo SQL Server ed usi i trigger.
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:fuphcs$nsg$1...@news.newsland.it...

Eh eh...alla fine la risposta è sempre SQL Server ...prima o poi faccio
questo passo...di conversione...
Penserò alla soluzione di un flag ... che naturalmente però deve essere
riportato a zero dopo il salvataggio ... e qui sarà un casino perchè credo
di dover portare il flag a zero appena prima di salvare se no cado in un
loop ... giusto?
Grazie mille Marco!
--
Roberto da Parma


text:
Roberto da Parma ha scritto:
> >> Ciao a tutti,
> >> non so se è una cosa fattibile....ma mi piacerebbe sapere se e quando un
> >> record sta per essere modificato in un'altra istanza...
> >
> >> Da maschera posso intercettare l'evento Dirty ma se sono in un'altra
> >> postazione (es. PC2) come posso sapere che (es. PC1) sta modificando un
> >> certo record?
> >
> >> E se comunque la modifica di un record viene fatta da VBA, come posso
> >> sempre
> >> da VBA intercettare il record sulla tabella che sta per essere
> >> modificato?
> > Setti un flag o un ID da VBA in una tabella condivisa che l'altro
> > PC può leggere per sapere quale record è in fase di modifica.
> > Oppure passi ad un'altro motore database tipo SQL Server ed usi i trigger.
> > Ciao.
> > -Marco-
> Eh eh...alla fine la risposta è sempre SQL Server ...prima o poi faccio
> questo passo...di conversione...
> Penserò alla soluzione di un flag ... che naturalmente però deve essere
> riportato a zero dopo il salvataggio ... e qui sarà un casino perchè credo
> di dover portare il flag a zero appena prima di salvare se no cado in un
> loop ... giusto?
> Grazie mille Marco!
> --
> Roberto da Parma
Puoi azzerarlo quando vuoi perchè azzerandolo da codice non scattano gli
eventi di aggiornamento e non va in loop.
Anziché di un flag boolean potresti usare un numerico così salvi l'ID
utente e puoi sapere chi sta lavorando sul record.



title: Modifica tabella

author: Giuseppe

text:
Ho modificato i criteri di alcuni campi in access stabilendo che non
potessero essere vuoti , avevo già creato query e maschere , Access mi
dice ora che devo salvare la tabella con nome cosi avrò una nuova
tabella con gli stessi campi ma tutte le query e maschere ora
funzionano sulla tabella iniziale :-( come posso fare a far capire ad
access che tutto ora deve riferirsi alla tabella modificata?
Scusate troppo per la confusionaria esposizione del problema mi auguro
possiate capire ugualmente.


title: Modifica tabella

author: Alessandro Cara

text:
Giuseppe wrote:
> Ho modificato i criteri di alcuni campi in access stabilendo che non
> potessero essere vuoti , avevo gią creato query e maschere , Access mi
> dice ora che devo salvare la tabella con nome cosi avrņ una nuova
> tabella con gli stessi campi ma tutte le query e maschere ora
> funzionano sulla tabella iniziale :-( come posso fare a far capire ad
> access che tutto ora deve riferirsi alla tabella modificata?
>
> Scusate troppo per la confusionaria esposizione del problema mi auguro
> possiate capire ugualmente.
>
In genere non mi chiede di salvare la nuova tabella con "nome" a meno
che non sia una tabella di sistema (MSysObjects tanto per intenderci)
Ma tu vuoi che vada sul nuovo nome o ti va bene anche il vecchio?
Nella seconda ipotesi (ti va bene anche il vecchio)
1) Togli la spunta da correzione automatica nome ( se e' attiva,
Strumenti-->Opzioni-->Generale)
2) Rinomina la "vecchia"  con altro nome e la "nuova" tabella con il
"vecchio" nome.
3) Mi piace quando c'e' questa contaminazione fra "vecchio" e "nuovo" ;<)
ultimamaente sono contrario all'inglese ed agli inglesismi. SQS che tra
l'altro e' piu' carino di HTH
--
ac


title: Modifica tabella

text:
Alessandro Cara wrote:
> Giuseppe wrote:
> > Ho modificato i criteri di alcuni campi in access stabilendo che non
> > potessero essere vuoti , avevo già creato query e maschere , Access mi
> > dice ora che devo salvare la tabella con nome cosi avrò una nuova
> > tabella con gli stessi campi ma tutte le query e maschere ora
> > funzionano sulla tabella iniziale :-( come posso fare a far capire ad
> > access che tutto ora deve riferirsi alla tabella modificata?
> >
> > Scusate troppo per la confusionaria esposizione del problema mi auguro
> > possiate capire ugualmente.
> >
>
> In genere non mi chiede di salvare la nuova tabella con "nome" a meno
> che non sia una tabella di sistema (MSysObjects tanto per intenderci)
> Ma tu vuoi che vada sul nuovo nome o ti va bene anche il vecchio?
>
> Nella seconda ipotesi (ti va bene anche il vecchio)
> 1) Togli la spunta da correzione automatica nome ( se e' attiva,
> Strumenti-->Opzioni-->Generale)
> 2) Rinomina la "vecchia"  con altro nome e la "nuova" tabella con il
> "vecchio" nome.
>
> 3) Mi piace quando c'e' questa contaminazione fra "vecchio" e "nuovo" ;<)
> ultimamaente sono contrario all'inglese ed agli inglesismi. SQS che tra
> l'altro e' piu' carino di HTH
> --
> ac
utilizzero il secondo sistema come mi hai consigliato d'altronde i dati
sono uguali  quindi mi è indifferente Grassie


title: bmp negli elenchi a cascata

author: Gianluca

text:
Signori salve a tutti.
Qualcuno di voi sa dirmi se e come è possibile inserire una bmp in
corrispondenza della voce contenuta in una combobox o in una list box?
per intenderci, una cosa simile al colore del bordo in Formato -> Bordi e
sfondo su Word...
Grazie!


title: stampare più reportcome unico documento

text:
Salve, ho bisogno di aiuto per il seguente problema:
(premetto che non sono un genio in access ma provo a cavarmela)
ho un database composto da 20 tabelle (trattasi di listini prezzi), per ogni
tabella esiste un report, se voglio stampare avrň 20 listini diversi, ognuno
con una numerazione propria (per es. da pag.1 a pag.15); invece a me
servirebbe poter stampare quei 20 report come se fossero un unico listino,
fermo restando le caratteristiche proprie di ogni listino, in modo tale da
ottenere una numerazione pagina unica del listino finale, (che vada da pag.1
a pag.300), che č quello che mi preme e mi manca, cosě da poter creare poi
un indice con i vari numeri di pagina ecc... credete si possa fare?
grazie e buon fien settimana a tutti.
evaluna


title: stampare più reportcome unico documento

author: IvanDaBologna

text:
evaluna@diesel ha scritto:
> Salve, ho bisogno di aiuto per il seguente problema:
> (premetto che non sono un genio in access ma provo a cavarmela)
> ho un database composto da 20 tabelle (trattasi di listini prezzi), per ogni
> tabella esiste un report, se voglio stampare avrò 20 listini diversi, ognuno
> con una numerazione propria (per es. da pag.1 a pag.15); invece a me
> servirebbe poter stampare quei 20 report come se fossero un unico listino,
> fermo restando le caratteristiche proprie di ogni listino, in modo tale da
> ottenere una numerazione pagina unica del listino finale, (che vada da pag.1
> a pag.300), che è quello che mi preme e mi manca, così da poter creare poi
> un indice con i vari numeri di pagina ecc... credete si possa fare?
> grazie e buon fien settimana a tutti.
> evaluna
>
>
la soluzione potrebbe essere in una query Unione che riunisca le varie
tabelle. Poi inserisci un campo che identifica le tabelle per poter
'raggruppare' il report finale (che devi costruire) e tenere, così,
separati i vari listini all'interno del report.
Le pagine doivrebbero essere sequenziali .... per l'indice(mhh) non
saprei. Forse contando da codice le righe corrispondenti ed inserendo in
una matrice per poter generare l'indice, ma è un metodo rompimaroni.
O forse affidando a Word ogni tabella per ogni sezione e lasciando fare
a lui gli indici...
Metodi ce ne possono essere svariati
--
IvanDaBologna
-=-=-==--==-=-=-
sottOFFICEale             - il mio blog
barbera del monferrato    - il mio vino
carmen                   - la mia donna
non necessariamente nello stesso ordine


title: stampare più reportcome unico documento

text:
"IvanDaBologna" <
ivan...@tin.it
> ha scritto nel messaggio
news:49d74cdd$0$1118$4faf...@reader1.news.tin.it...
> evaluna@diesel ha scritto:
>> Salve, ho bisogno di aiuto per il seguente problema:
>>-cut-  servirebbe poter stampare quei 20 report come se fossero un unico
>>listino, fermo restando le caratteristiche proprie di ogni listino, in
>>modo tale da ottenere una numerazione pagina unica del listino finale,
>>(che vada da pag.1 a pag.300), -cut-
>> evaluna
> la soluzione potrebbe essere in una query Unione che riunisca le varie
> tabelle. Poi inserisci un campo che identifica le tabelle per poter
> 'raggruppare' il report finale (che devi costruire) e tenere, cosě,
> separati i vari listini all'interno del report.
Devo quindi creare un report unico per tutte le tabelle.... perň prima devo
fare la query unione: questo mi pare difficilino, dovrei creare una query
con tutti i campi delle varie tabelle.... aspetta aspetta, mi vado a leggere
qualcosina in proposito, poi ci provo e poi magari ne riparliamo - cioč
chiedo aiuto nuovamente ;-)
> Le pagine doivrebbero essere sequenziali .... per l'indice(mhh) non
> saprei. Forse contando da codice le righe corrispondenti ed inserendo in
> una matrice per poter generare l'indice, ma č un metodo rompimaroni.
> O forse affidando a Word ogni tabella per ogni sezione e lasciando fare a
> lui gli indici...
per l'indice solitamente faccio con word, quello non č un problema (lo
sarebbe se volessi fare come dici tu da codice......no no no....non mi ci
metto proprio non č per me!)
Grazie mille per i suggerimenti, magari mi rifaccio viva tra qualche giorno
e tra qualche tentativo!
Ciao,
evaluna


title: stampare più reportcome unico documento

author: M C

text:
"evaluna@diesel" <
eva.l...@email.it
> ha scritto nel messaggio
news:gr7ng4$k3j$1...@tdi.cu.mi.it...

Ciao,
1) I nomi delle colonne sono uguali per tutte le tabelle?
Ad esempio Tabella1(Nome,Descrizione,Prezzo)
                   Tabella2(Nome,Descrizione,Prezzo)
                   Tabella3(Nome,Descrizione,Prezzo)
2) Come si chiama ciascuna tabella, e ciascuna colonna?


title: stampare più reportcome unico documento

text:
> Devo quindi creare un report unico per tutte le tabelle.... però prima devo
> fare la query unione: questo mi pare difficilino, dovrei creare una query
> con tutti i campi delle varie tabelle.... aspetta aspetta, mi vado a leggere
> qualcosina in proposito, poi ci provo e poi magari ne riparliamo - cioè
> chiedo aiuto nuovamente ;-)
la query unione è una cosa concettualmente semplicissima.
Serve a 'unire' in un unico risultato, records provenienti da due o più
queries che abbiano ESATTAMENTE lo STESSO NUMERO DI CAMPI( e i campi
devono essere anche dello stesso tipo nelle colonne corrispondenti).
Es
--- tAnagrafica
[cognome] testo
[nome] testo
[eta] numerico-intero
--- tAttori
[cogn] testo
[nom] testo
[quantiAnniHa] numerico-intero
posono essere raggruppati(uniti) in un unica query del tipo:
SELECT cognome, nome, eta
FROM tAnagrafica
UNION SELECT cogn, nom, quantiAnniHa
FROM tAttori;
e volendo puoi unire quante queries ti pare, mettendo il punto e virgola
solo all'ultima riga ed utilizzando la parola UNION.
I nomi delle colonne finali prenderanno il nome dei campi nella prima
query, in questo caso avarai [cognome],[nome],[eta].



title: stampare più reportcome unico documento

text:
"M C" <
mca...@tiscali.it
> ha scritto nel messaggio
news:49d814f6$0$695$5fc...@news.tiscali.it...
>
> "evaluna@diesel" <
eva.l...@email.it
> ha scritto nel messaggio
> news:gr7ng4$k3j$1...@tdi.cu.mi.it...
>>
>> "IvanDaBologna" <
ivan...@tin.it
> ha scritto nel messaggio
>> news:49d74cdd$0$1118$4faf...@reader1.news.tin.it...
>>> evaluna@diesel ha scritto:
>>>> Salve, ho bisogno di aiuto per il seguente problema:
>>>>-cut-  servirebbe poter stampare quei 20 report come se fossero un unico
>>>>listino, fermo restando le caratteristiche proprie di ogni listino, in
>>>>modo tale da ottenere una numerazione pagina unica del listino finale,
>>>>(che vada da pag.1 a pag.300), -cut-
>>>> evaluna
> Ciao,
> 1) I nomi delle colonne sono uguali per tutte le tabelle?
> Ad esempio Tabella1(Nome,Descrizione,Prezzo)
>                   Tabella2(Nome,Descrizione,Prezzo)
>                   Tabella3(Nome,Descrizione,Prezzo)
Sono uguali quasi per tutte.... in alacune tabelle al posto della quantità
c'è la differenziazione DX -SX
> 2) Come si chiama ciascuna tabella, e ciascuna colonna?
Ogni tabella porta il nome del listino a cui si riferisce (alternatori -
faretti - cambi - ecc...), e le colonne sono Descrizione - quantità -
prezzo, e in alcune tabelle al posto di quantità c'è dx o sx, come detto in
precedenza.
scusa il ritardo con cui rispondo, ma non sono sempre online.... e comunque
grazie!!
evaluna


title: stampare più reportcome unico documento

text:
"IvanDaBologna" <
ivan...@tin.it
> ha scritto nel messaggio
news:49d85df6$0$834$4faf...@reader5.news.tin.it...
>
>> Devo quindi creare un report unico per tutte le tabelle.... perň prima
>> devo fare la query unione: questo mi pare difficilino, dovrei creare una
>> query con tutti i campi delle varie tabelle.... aspetta aspetta, mi vado
>> a leggere qualcosina in proposito, poi ci provo e poi magari ne
>> riparliamo - cioč chiedo aiuto nuovamente ;-)
>
> la query unione č una cosa concettualmente semplicissima.
> Serve a 'unire' in un unico risultato, records provenienti da due o piů
> queries che abbiano ESATTAMENTE lo STESSO NUMERO DI CAMPI( e i campi
> devono essere anche dello stesso tipo nelle colonne corrispondenti).
>
> Es
> --- tAnagrafica
> [cognome] testo
> [nome] testo
> [eta] numerico-intero
>
> --- tAttori
> [cogn] testo
> [nom] testo
> [quantiAnniHa] numerico-intero
>
> posono essere raggruppati(uniti) in un unica query del tipo:
>
> SELECT cognome, nome, eta
> FROM tAnagrafica
> UNION SELECT cogn, nom, quantiAnniHa
> FROM tAttori;
>
> e volendo puoi unire quante queries ti pare, mettendo il punto e virgola
> solo all'ultima riga ed utilizzando la parola UNION.
> I nomi delle colonne finali prenderanno il nome dei campi nella prima
> query, in questo caso avarai [cognome],[nome],[eta].
 devo provarci, solo allora potrň dire se riesco o meno... per il momento
grazie!
evaluna


title: Utilizzo di NotInList

author: Sergio MAZZA

text:
Ho una bella casella combinata (xNominativo) con origine riga una "select
nominativi, id...". Nessun problema se non per il fatto che mi sono deciso
per utilizzare l'evento "NotInList" per dare la possibilità di inserire il
nominativo direttamente dalla casella di riepilogo. Seguendo le istruzioni
dell'help ho fatto così:
'-------------------------
Private Sub xNominativo_NotInList(NewData As String, Response As Integer)
If MsgBox("Nominativo non in elenco, vuoi inserirlo?", vbYesNo, "Inserimento
Nominativo") = vbYes Then
    Response = acDataErrAdded
    DoCmd.SetWarnings False
    DoCmd.RunSQL "INSERT INTO t_dipendenti ( Nominativo ) SELECT '" &
NewData & "' AS NuovoNominativo;"
    DoCmd.SetWarnings True
Else
    Response = acDataErrContinue
End If
End Sub
'-------------------------
Tutto ok se non per il fatto che il recordset della maschera non viene
aggiornato e mi ritrovo la casella di riepilogo e la tabella che contengono
l'inserimento effettuato mentre la maschera non lo vede.
Ho provato ad inserire dopo il docmd.setwarnings true un Me.Requery o
Refresh ma l'effetto è quello ciclare continuamente nella richiesta
dell'inserimento nominativo con il risultato (ovviamente) di riempire la
tabella con lo stesso nominativo appena inserito.
Lo stesso risultato lo ottengo con docmd.showallrecords mentre con:
Me.Filter = "" e Me.FilterOn = True non sorta fora nulla.
L'unica via che ho trovato è inserire, sempre dopo DoCmd.SetWarnings True un
SendKeys "%RI".
E' proprio l'unica via?
Ciao.


title: Utilizzo di NotInList

author: Roberto dal portatile

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:8p8h5o$19v$1...@suite03.caspur.it...

Hai provato anziché Me.Requery con Me![NomeCasellaCombinata].Requery ??
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: Utilizzo di NotInList

author: Federico Luciani

text:
Sergio MAZZA wrote:
> Ho una bella casella combinata (xNominativo) con origine riga una "select
> nominativi, id...". Nessun problema se non per il fatto che mi sono deciso
> per utilizzare l'evento "NotInList" per dare la possibilità di inserire il
> nominativo direttamente dalla casella di riepilogo. Seguendo le istruzioni
> dell'help ho fatto così:
> '-------------------------
> Private Sub xNominativo_NotInList(NewData As String, Response As Integer)
> If MsgBox("Nominativo non in elenco, vuoi inserirlo?", vbYesNo, "Inserimento
> Nominativo") = vbYes Then
>     Response = acDataErrAdded
>     DoCmd.SetWarnings False
>     DoCmd.RunSQL "INSERT INTO t_dipendenti ( Nominativo ) SELECT '" &
> NewData & "' AS NuovoNominativo;"
>     DoCmd.SetWarnings True
> Else
>     Response = acDataErrContinue
> End If
> End Sub
Perfetto.
> Tutto ok se non per il fatto che il recordset della maschera non viene
> aggiornato e mi ritrovo la casella di riepilogo e la tabella che contengono
> l'inserimento effettuato mentre la maschera non lo vede.
> Ho provato ad inserire dopo il docmd.setwarnings true un Me.Requery o
> Refresh ma l'effetto è quello ciclare continuamente nella richiesta
> dell'inserimento nominativo con il risultato (ovviamente) di riempire la
> tabella con lo stesso nominativo appena inserito.
> Lo stesso risultato lo ottengo con docmd.showallrecords mentre con:
> Me.Filter = "" e Me.FilterOn = True non sorta fora nulla.
> L'unica via che ho trovato è inserire, sempre dopo DoCmd.SetWarnings True un
> SendKeys "%RI".
> E' proprio l'unica via?
Non mi e' chiaro se la combo e' legata ad un campo o la usi solo per filtrare
il recordset della form?
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Utilizzo di NotInList

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:VKQt5.23689$_U1.3...@news.infostrada.it...
>
>
> Hai provato anziché Me.Requery con Me![NomeCasellaCombinata].Requery ??
>
>
> --
>
> Roberto
>
> ---------------------------------------------
> il sito comune di it.comp.appl.access:
>
http://members.xoom.it/it_db_access/
> ---------------------------------------------
>
>
La casella combinata si aggiorna benissimo con Response = acDataErrAdded; è
il recordset della maschera che non viene aggiornato se non facendo da menù
record - rimuovi filtro/ordina.
Solo per completare il quadro aggiungo che la casella combinata (non legata
a nessun campo) la utilizzo per inserire i nuovi nominativi e per "navigare"
nei record (me!id.setfocus: docmd.findrecord me!nomecasellacombinata)...
Ciao.