title: Riconetti unita di rete via codice

author: Alberto

text:
Bunona Sera a tutti,
ho un probelema che mi sta facendo dannare.
Mi sapreste dare una mano o darmi una dritta per far ricollegare un unità di
rete all'apertura della maschera principale visto che il database è posto su
un altro pc con unita di rete y e capita che all'avvi del pc non si
collegano in rete automaticamente perche pultroppo non anno un server.
Grazie mille


title: Riconetti unita di rete via codice

author: Alessandro Baraldi

text:
"Alberto" <
al...@tele2.it
> wrote in message
news:H%U0f.40912$
hV3....@nntpserver.swip.net

Non ho molto tempo per spiegarti il codice, quindi
ti passo direttamente le Routine complete, poi decidi tu
quale metodo usare.
Per mappare una risorsa di rete hai 2 metodi:
---------------------------------------------------------
1)API
---------------------------------------------------------
Private Declare Function WNetAddConnection2 Lib "mpr" _
    Alias "WNetAddConnection2A" _
   (lpNetResource As NETRESOURCE, _
    ByVal lpPassword As String, _
    ByVal lpUserName As String, _
    ByVal dwFlags As Long) As Long

Private Declare Function WNetCancelConnection2 Lib "mpr" _
    Alias "WNetCancelConnection2A" _
   (ByVal lpName As String, _
    ByVal dwFlags As Long, _
    ByVal fForce As Long) As Long

Private Const ERROR_SUCCESS = 0
Private Const CONNECT_UPDATE_PROFILE = &H1
' The following includes all the constants defined for NETRESOURCE,
' not just the ones used in this example.
Private Const RESOURCETYPE_DISK = &H1
Private Const RESOURCETYPE_PRINT = &H2
Private Const RESOURCETYPE_ANY = &H0
Private Const RESOURCE_CONNECTED = &H1
Private Const RESOURCE_REMEMBERED = &H3
Private Const RESOURCE_GLOBALNET = &H2
Private Const RESOURCEDISPLAYTYPE_DOMAIN = &H1
Private Const RESOURCEDISPLAYTYPE_GENERIC = &H0
Private Const RESOURCEDISPLAYTYPE_SERVER = &H2
Private Const RESOURCEDISPLAYTYPE_SHARE = &H3
Private Const RESOURCEUSAGE_CONNECTABLE = &H1
Private Const RESOURCEUSAGE_CONTAINER = &H2
' Error Constants:
Private Const ERROR_ACCESS_DENIED = 5&
Private Const ERROR_ALREADY_ASSIGNED = 85&
Private Const ERROR_BAD_DEV_TYPE = 66&
Private Const ERROR_BAD_DEVICE = 1200&
Private Const ERROR_BAD_NET_NAME = 67&
Private Const ERROR_BAD_PROFILE = 1206&
Private Const ERROR_BAD_PROVIDER = 1204&
Private Const ERROR_BUSY = 170&
Private Const ERROR_CANCELLED = 1223&
Private Const ERROR_CANNOT_OPEN_PROFILE = 1205&
Private Const ERROR_DEVICE_ALREADY_REMEMBERED = 1202&
Private Const ERROR_EXTENDED_ERROR = 1208&
Private Const ERROR_INVALID_PASSWORD = 86&
Private Const ERROR_NO_NET_OR_BAD_PATH = 1203&
Private Declare Function GetLogicalDriveStrings Lib "kernel32" _
   Alias "GetLogicalDriveStringsA" _
  (ByVal nBufferLength As Long, _
   ByVal lpBuffer As String) As Long
Public Function ConnectNextFreeNetworkDrive(sServer As String) As String
   ' Questa funzione cerca di Mappare una risorsa del SERVER
   ' ciclando le lettere da C÷Z nella speranza di trovare una Risorsa
   ' libera.
   '
   '----------------------- ESEMPIO DI CHIAMATA ------------------------
   '
   '  Call ConnectNextFreeNetworkDrive("\\Server\SharedFolder"
   '
   '--------------------------------------------------------------------
   Dim NETR As NETRESOURCE
   Dim errInfo As Long
   Dim x As Long
   Dim testDrv As String

  ' Imposta la prima lettera disponibile a C (ASCII 67) in realtà da 68
  ' come si vedrà poi, quindi se già esistente incrementa di uno
  ' fino alla Z (ASCII 90).
  ' Ne troverà uno libero....!!!
   x = 67
   Do
     ' Incrementa la Lettera del DRIVE di 1 ma partiremo da "D"
      x = x + 1
      testDrv = Chr$(x) & ":"

      With NETR
         .dwScope = RESOURCE_GLOBALNET
         .dwType = RESOURCETYPE_DISK
         .dwDisplayType = RESOURCEDISPLAYTYPE_SHARE
         .dwUsage = RESOURCEUSAGE_CONNECTABLE
         .lpRemoteName = sServer
         .lpLocalName = testDrv
      End With
      ' Impostare la PASSWORD e lo USERNAME
      ' La PWD può essere passata come vbNullstring
      errInfo = WNetAddConnection2(NETR, _
                                   "Password", _
                                   "username", _
                                   CONNECT_UPDATE_PROFILE)

   Loop Until x = 90 Or errInfo = ERROR_SUCCESS   '90 = "z"

   ' Se avrà successo verrà restituita la lettera del DRIVE
   If errInfo = ERROR_SUCCESS Then
      ConnectNextFreeNetworkDrive = testDrv
   Else
      MsgBox "ERRORE: " & errInfo & " - Connessione di Rete Falita !",
vbCritical, "AVVISO"
      ConnectNextFreeNetworkDrive = "NONE"
   End If

End Function
Public Function RemoveNetworkDrive(strDrive As String) As Boolean
   Dim errInfo As Long
   ' Questa funzione rimuove la risorsa mappata passando
   ' la lettera del DRIVE, e verificandone l'esistenza.

   '----------------------- ESEMPIO DI CHIAMATA ------------------------
   '
   '  Call RemoveNetworkDrive("H:")
   '
   '--------------------------------------------------------------------

   If DriveExists(strDrive) Then
      errInfo = WNetCancelConnection2(strDrive, vbNullString,
CONNECT_UPDATE_PROFILE)
      RemoveNetworkDrive = errInfo = ERROR_SUCCESS
   End If
End Function
Private Function DriveExists(SDrive As String) As Boolean
   ' Questa funzione verifica l'esistenza del DRIVE
   Dim tmp As String
   Dim nBuffersize As Long
  'Call the API with a buffer size of 0.
  'The call fails, and the required size
  'is returned as the result.
   nBuffersize = GetLogicalDriveStrings(0&, tmp)
  'pad a string to hold the results
   tmp = Space$(nBuffersize)
   nBuffersize = Len(tmp)
  'and call again
   If GetLogicalDriveStrings(nBuffersize, tmp) Then
     'if the drive letter passed is in
     'the returned logical drive string,
     'return True. Use vbTextCompare for
     'a case-insensitive match (remembering
     'that when a compare method is specified,
     'the start position must also be specified.
      DriveExists = InStr(1, tmp, SDrive, vbTextCompare)
   End If
End Function
---------------------------------------------------------
2)WMI
---------------------------------------------------------
' Mappa una Risorsa di RETE
Public Function MapNetworkDrive(sServer As String) As String
   Dim WshNetwork
   Dim allDrives
   Dim i                   As Integer
   Dim x                   As Integer

   Dim AlreadyConnected    As Boolean
   Dim mDrive              As String

   Set WshNetwork = CreateObject("WScript.Network")
   Set allDrives = WshNetwork.EnumNetworkDrives()
   ' Anche quì cicleremo le lettere Mappate con la speranza
   ' di trovarne una libera e partiremo da ASCII 68=D
   AlreadyConnected = False
   For x = 68 To 90
      mDrive = Chr(x)
      AlreadyConnected = DriveExist(mDrive)
      If AlreadyConnected = False Then
         ' Impostare la PASSWORD e lo USERNAME
         ' La PWD può essere passata come vbNullstring
         WshNetwork.MapNetworkDrive mDrive & ":", sServer, "Utente",
"password"
         'MsgBox "Drive " & DriveLetter & " connected successfully."
         MapNetworkDrive = mDrive
         Set WshNetwork = Nothing
         Set allDrives = Nothing
         Exit Function
      End If
   Next
   Set WshNetwork = Nothing
   Set allDrives = Nothing
   MapNetworkDrive = vbNullString
   MsgBox "Attenzione la risorsa Server non è mappata", vbCritical,
"AVVISO"
End Function
Public Function RemoveMapNetwork() As Boolean
   Dim WshNetwork
   Dim allDrives
   Set WshNetwork = CreateObject("WScript.Network")
   Set allDrives = WshNetwork.EnumNetworkDrives

   ' Se non esiste nessuna risorsa mappata non proseguo
   If allDrives.Count = 0 Then
      MapDrive = vbNullString
   End If
   If DriveExist(MapLetter) Then WshNetwork.RemoveNetworkDrive MapDrive
Exit_Here:
   Set WshNetwork = Nothing
   Set allDrives = Nothing
End Function
Public Function DriveExist(strLetter As String) As Boolean
   Dim fso, d, dc
   DriveExist = False
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set dc = fso.Drives
   For Each d In dc
   Set d = fso.GetDrive(d.DriveLetter)
       If d.DriveLetter = strLetter Then
          DriveExist = True
          Exit Function
       End If
   Set d = Nothing
   Next
   Set d = Nothing
   Set dc = Nothing
   Set fso = Nothing
End Function
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Riconetti unita di rete via codice

author: Bruno Campanini

text:
"Alberto" <
al...@tele2.it
> wrote in message
news:H%U0f.40912$hV3....@nntpserver.swip.net...

Ma se invece di collegarti al drive Y: (così mappato sul tuo
computer, al quale drive corrisponde supponiamo il drive C:
sul server) ti colleghi direttamente al drive C: del server
con \\<NetPath>\C\, non risparmi tempo e fatica?
Bruno


title: Riconetti unita di rete via codice

author: Franchi Bonizzoni

text:
"Alberto" <
al...@tele2.it
> ha scritto nel messaggio
news:H%U0f.40912$hV3....@nntpserver.swip.net...

Dimmi se ho capito.
PC Nome A
E' il primo pc che si accende al mattino.
Vi sono tutte le tabelle, E' IL COMANDANTE.
PC Nome B
Si accende in un secondo tempo. Quando si accende i dati li scrive sul PC
Nome A tramite unita' di rete.
Se questo è vero vuol dire che la cartella del PC A la hai connessa con
unita' di rete xxx e le tabelle le hai collegate con la stessa unita' di
rete.
SBAGLIATO!!!! Stai attento mica che vengono fuori CASINI o ti siincazza il
TUTTO.
Nel PC Nome A devi avere i dati sotto cartella esempio c:\Mio Database.
Condividi questa cartella.
Nel PC Nome B devi connettere con unita di rete xxx la cartella condivisa
del PC A
A questo punto dei avere 2 Programmi.
Nel PC Nome A devi avere il programma PROG dove le tabelle devono essere
collegate con C:\Mio Database.
Nel PC Nome B devi avere il programma RETE dove le tabelle devono essere
collegate con la stessa unita' di rete xxx
Attenzione nel PC A devi TOGLIERE la connseeione a unita' di rete xxx.
Nel PC A devi lanciare il programma PROG.
Nel PC B devi lanciare il programma RETE.
Un domani che colleghi un altro PC C basta copiare il programma rete.
La differenza dei due programmi è solo IL COLLEGAMENTO DELLE TABELLE. Quindi
crei un nuovo Database RETE. Alleghi le tabelle ed importi query, maschere
eccetere dal database PROG.
Buon Lavoro


title: Riconetti unita di rete via codice

text:
"Franchi Bonizzoni" <
franchi....@tiscali.it
> ha scritto nel messaggio
news:4344b966$0$8487$5fc...@news.tiscali.it...

Ce lo fatta... grazie mille a tutti


title: Riconetti unita di rete via codice

author: Giacomo Alessandroni

text:
Franchi Bonizzoni wrote:
> Nel PC Nome A devi avere i dati sotto cartella esempio c:\Mio Database.
> Condividi questa cartella.
> Nel PC Nome B devi connettere con unita di rete xxx la cartella condivisa
> del PC A
Questo e' sacrosanto.
Io sono diversi anni che uso access perche' mi risparmia un sacco di
tempo, l'unico problema e' la protezione dei dati [al di la' degli
ovvi backup].
Nel caso del Pc A che funge da server, la cartella condivisa *deve*
consentire i diritti di lettura e scrittura? Io ho sempre pensato di
si', ma se una mattina qualcuno impazzisce e cancella il database
[dove naturalmente da cinque mesi non facevano backup, Murpie docet]
che accade al mio destino?
--
Giacomo Alessandroni
g.aless...@peacelink.it
Associazione PeaceLink
http://www.peacelink.it/
VoIP @ Skype
callto://galessandroni


title: Riconetti unita di rete via codice

text:
"Franchi Bonizzoni" <
franchi....@tiscali.it
> wrote in message
news:4344b966$0$8487$5fc...@news.tiscali.it...
[...]
> La differenza dei due programmi č solo IL COLLEGAMENTO DELLE TABELLE.
> Quindi crei un nuovo Database RETE. Alleghi le tabelle ed importi query,
> maschere eccetere dal database PROG.
Se anche nel server il programma ha le tabelle collegate a
\\<NetServerPath>\C piuttosto che piů semplicemente a C:\, allora
tutti programmi della rete sono perfettamente uguali.
Ciao
Bruno


title: Applicazione access su PC remoto : funziona su pc locale anche se ...

author: Squalo Tigre

text: ... Questo pc locale NON ha installato Access ?!?


text:
On 12 Feb, 01:05, Squalo Tigre <
squalo.tigre.v...@alice.it
> wrote:
> ... Questo pc locale NON ha installato Access ?!?
Che domanda sarebbe...?
Se ti sforzi a scrivere una cosa leggibile potresti avere risposta
utile....
@Alex


text:
Squalo Tigre ha scritto:
>... Questo pc locale NON ha installato Access ?!?
Certo che l'hai espressa male!
Se sei in remoto cosa importa cosa c'è o non c'è sul pc locale? Diverso se sei
collegato
--


author: Carlo Costarella

text:
"Squalo Tigre" <
squalo.t...@alice.it
> ha scritto nel messaggio
news:f3961891-915b-4a83...@x11g2000yqc.googlegroups.com...
> ... Questo pc locale NON ha installato Access ?!?
Non funziona.
Ma forse ti sei espresso male...Usi desktop remoto? Se č cosě funziona a
patto, ovviamente, che il "server" abbia Access o il suo runtime.
Ciao, Carlo


text:

Secondo te come funziona l'apertura in Locale di un'applicativo
remoto...?
Un file remoto, senza il Client preposto è solo un File con una
estensione ignota...!
Come quando si usa un file MDB da VB6.... non serve avere Access
installato... ma se fai doppio click sul file MDB col piffero che si
apre...
Stessa cosa in remoto... il file viene interpretato dal Client
locale(Access) solo se questo è installato.
Altrimenti è come dice Carlo, ma in quel caso si usa il TS che sfrutta
sostanzialmente il DesktopRemoto quindi l'apertura del file avviene
con il Client Remoto e visualizzata
via RDP in Locale.
@Alex


text:
@Alex ha scritto:
>On 12 Feb, 13:52, Fair87<
roby....@gmail.com
> wrote:
>> Squalo Tigre ha scritto:
>>
>> >... Questo pc locale NON ha installato Access ?!?
>>
>> Certo che l'hai espressa male!
>> Se sei in remoto cosa importa cosa c'=E8 o non c'=E8 sul pc locale? Diver=
>so se sei
>> collegato
>>
>> --
>
>Secondo te come funziona l'apertura in Locale di un'applicativo
>remoto...?
>
>Un file remoto, senza il Client preposto =E8 solo un File con una
>estensione ignota...!
>Come quando si usa un file MDB da VB6.... non serve avere Access
>installato... ma se fai doppio click sul file MDB col piffero che si
>apre...
>
>Stessa cosa in remoto... il file viene interpretato dal Client
>locale(Access) solo se questo =E8 installato.
>
>Altrimenti =E8 come dice Carlo, ma in quel caso si usa il TS che sfrutta
>sostanzialmente il DesktopRemoto quindi l'apertura del file avviene
>con il Client Remoto e visualizzata
>via RDP in Locale.
>
>@Alex
Eccerto che è così! Mica Access è uno standalone! :)
Ma la qestione era proprio sull'RDP (x come l'ho capita io) e non sul
file-sharing o client-server...da qui la mia risposta
--


text:
....
>
> Eccerto che è così! Mica Access è uno standalone! :)
> Ma la qestione era proprio sull'RDP (x come l'ho capita io) e non sul
> file-sharing o client-server...da qui la mia risposta
>
> --
Guarda... io quando faccio una supposta spiego le mie motivazioni...
nel rispondere tu hai fatto una supposta, ma la tua tesi aveva lo
stesso livello di comprensione della domanda ... ed io l'ho
interpretata a mio modo...
La prossima volta fai come Carlo... che ha specificato BENE quello che
intendeva lui..., poi quello che intende l'OP lo spiegerà meglio
l'OP...
Sarà ma quando sento gente fare supposte io mi ci aggiungo sempre...
con gusto.
@Alex


title: spostarsi su una scheda specifica

author: Giorgio Conte

text:
Ho una maschera contenente 5 schede, generate con struttura schede, ho
la necessita tramite un comando in visua basic, in base ad alcune
condizioni, di spostarmi automaticamente su una scheda specifica della
maschera.
Vorrei sapere se esiste un comando che esegua questo tipo di operazione,
ho se questo nn e possibile. Grazie
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: spostarsi su una scheda specifica

author: spedysoft

text:
"Giorgio Conte" <
plu...@libero.it
> ha scritto nel messaggio
news:f1a36012de78660c029...@mygate.mailgate.org...

mah....penso che se la scheda 4 si chiami per es."Pagina4" allora basterà un
Me.Pagina4.Setfocus
penso...


title: Impostazioni Pagina Report?

author: Donato

text:
Normalmente per settare i margini di un report vado sul menù file di access
mentre il report è aperto e poi su "Imposta Pagina" .
Le imostazioni risultano normalmente corrette alla successiva riapertura di
quel report, dato che access le tiene in memoria....
Dico normalmente perchè, non so come, ma ogni tanto si perdono e mi tocca
ogni volta andare a reimpostarli...
Qualcuno sa il perchè tali impostazioni ogni tanto vengono perse? E come
fare per dare dei margini al report DEFINITIVI!?
--
A presto!
Donato Mazzocchetti
ark...@tin.it


title: [form] applyfilter su sottomaschera

author: massimo

text:
E' una strafaq. Lo so. Non si puņ usare applyfilter su sottomaschera.
Ma č veramente cosģ? Se proprio non voglio usare le proprietą filter
e filteron sono obbligato a modificare dinamicamente il rowsource
della subform? Altre strade?


title: [form] applyfilter su sottomaschera

author: Alessandro Cara

text:
massimo ha scritto:
>
> Se proprio non voglio usare le proprietà filter
> e filteron
perche?
--
a.cara
togli qualcosa dall'email


title: [form] applyfilter su sottomaschera

text:
On 15 set 2003, Alessandro Cara <
alexqu...@blunet.it
> wrote in
news:3F6633F9...@blunet.it
> massimo ha scritto:
>>
>> Se proprio non voglio usare le proprietà filter
>> e filteron
> perche?

Sarò io imbranato, ma non mi trovo bene nella combinazione di
istruzioni where su più campi. Paradossalmente mi trovo meglio nella
costruzione dinamica della stringa SQL anche se a sbagliare la
stringa ci vuole un attimo.


title: [form] applyfilter su sottomaschera

text:

non mi torna. Mi spiego.
Perche' sia con l'applyfilter che con la costruzione dinamica della query non
"devi" comunque impostare le condizioni?
--
a.cara
Togli qualcosa dall'email


title: [form] applyfilter su sottomaschera

text:
On 18 set 2003, Alessandro Cara <
alexqu...@blunet.it
> wrote in
news:3F69EFA6...@blunet.it

>> Sarň io imbranato, ma non mi trovo bene nella combinazione di
>> istruzioni where su piů campi. Paradossalmente mi trovo meglio
>> nella costruzione dinamica della stringa SQL anche se a
>> sbagliare la stringa ci vuole un attimo.
>
> non mi torna. Mi spiego.
> Perche' sia con l'applyfilter che con la costruzione dinamica
> della query non "devi" comunque impostare le condizioni?

Questa mia avversione nasce dal fatto che filter e filteron sono la
prima strada che ho seguito. Avevo noie nella combinazione logica
delle condizioni, noie che ho affrontato piů agevolmente nella
concatenazione delle stringhe SQL. Bah, ciň che apprendo spesso č
rappresenta il ritratto bislacco di un'esperienza distorta. Del
resto, inizialmente non sapevo nemmeno istruire una semplice
condizione if then else.


title: [form] applyfilter su sottomaschera

text:
massimo wrote:
[cut]
> Bah, ciň che apprendo spesso č
> rappresenta il ritratto bislacco di un'esperienza distorta.
;<)



title: stampa di doc testa/righe in Word

text:
Data una query di access di questo tipo
nome1 corsoA
nome1 corsoB
nome2 corsoA
nome2 corsoB
nome2 corsoC
è possibile mandare la stampa in word in modo che mi vengano 2 documenti
instestati a ciascun nominativo con all'interno l'elenco dei corsi da questi
frequentati?
Ho provato con la stampa unione ma mi vengono tanti documenti quante sono le
righe della query.
Grazie per l'aiuto,
Rosa


title: stampa di doc testa/righe in Word

author: ciroteo

text:
"Rosa.Rab" <
rosa.rabc...@virgilio.it
> ha scritto nel messaggio
news:ds9thk$bo0$1...@balena.cs.interbusiness.it...
> Data una query di access di questo tipo
>
> nome1 corsoA
> nome1 corsoB
> nome2 corsoA
> nome2 corsoB
> nome2 corsoC
>
> č possibile mandare la stampa in word in modo che mi vengano 2 documenti
> instestati a ciascun nominativo con all'interno l'elenco dei corsi da
> questi
> frequentati?
> Ho provato con la stampa unione ma mi vengono tanti documenti quante sono
> le
> righe della query.
> Grazie per l'aiuto,
>
> Rosa
>
>
ciao rosa, un esempio molto bello di automazione in word si trova sul
sitocomune.
nei post precedenti l'esempio č stato discusso piů volte.
l'autore č il mitico namor, famoso piů per la sua grappa che per la sua
bravura con access ...
tu prova a cercare l'esempio se non riesci proviamo a darti una mano.


title: Stampa Unione da Access

author: Mauritap

text:
Salve e scusate se il post sar� un po' lungo!
Premessa:
Ho creato un DB per la gestione di una piccola scuola di danza: Iscrizioni,
Pagamento quote ecc..., il tutto automatizzato con VBA, anche grazie ai
vostri suggerimenti.
Ora sto affrontando il problema delle Domande d'iscrizione che vorrei
inviare agli iscritti dell'anno precedente gi� precompilate. E fino a qui
nessun problema, ho creato una query ad hoc con i campi necessari, in word
ho creato il documento in cui ho inserito i campi unione e quando faccio
partire il file in Word, dopo avermi chiesto di associarlo alla query, tutto
funziona e posso stampare le domande.
Ho voluto per� affrontare la sfida di comandare la stampa unione da Access e
mi sono reso conto di non avere le competenze per farlo.
Presumo che la sequenza dovrebbe essere, a grandi linee:
- Creare una query adatta e modificabile da access (Questo lo so fare)
-Aprire il file Word "DomandeIscrizione.doc"
-Associare al file Word la Query creata in Access
-Stampare le domande (Vorrei comandarlo da Access)
-Chiudere word e continare ad adoperare access
Il problema � che non lo so programmare.
Non chiedo che mi risolviate la cosa (anche se qualche dritta sarebbe
gradita), ma vorrei che mi indicaste dove potermi documentare per arrivare a
realizzare quanto vorrei.
Grazie infinite per la vostra pazienza.


title: Stampa Unione da Access

author: almorel

text:
On 21 Feb, 10:00, "Mauritap" <
mauri...@alice.it
> wrote:
> Salve e scusate se il post sarà un po' lungo!
> Premessa:
> Ho creato un DB per la gestione di una piccola scuola di danza: Iscrizioni,
> Pagamento quote ecc..., il tutto automatizzato con VBA, anche grazie ai
> vostri suggerimenti.
> Ora sto affrontando il problema delle Domande d'iscrizione che vorrei
> inviare agli iscritti dell'anno precedente già precompilate. E fino a qui
> nessun problema, ho creato una query ad hoc con i campi necessari, in word
> ho creato il documento in cui ho inserito i campi unione e quando faccio
> partire il file in Word, dopo avermi chiesto di associarlo alla query, tutto
> funziona e posso stampare le domande.
> Ho voluto però affrontare la sfida di comandare la stampa unione da Access e
> mi sono reso conto di non avere le competenze per farlo.
> Presumo che la sequenza dovrebbe essere, a grandi linee:
> - Creare una query adatta e modificabile da access (Questo lo so fare)
> -Aprire il file Word "DomandeIscrizione.doc"
> -Associare al file Word la Query creata in Access
> -Stampare le domande (Vorrei comandarlo da Access)
> -Chiudere word e continare ad adoperare access
> Il problema è che non lo so programmare.
> Non chiedo che mi risolviate la cosa (anche se qualche dritta sarebbe
> gradita), ma vorrei che mi indicaste dove potermi documentare per arrivare a
> realizzare quanto vorrei.
> Grazie infinite per la vostra pazienza.
Ciao,
perchè vuoi usare Word per la stampa ? Non ti basta la grafica del
report ?
Se puoi fare a meno di formattazioni particolari non ti conviene usare
word.
Ciao
Alberto


title: Stampa Unione da Access

text:
"almorel" <
alm...@gmail.com
> ha scritto nel messaggio
news:d35830ad-d7e7-41c1...@f29g2000yqa.googlegroups.com...
On 21 Feb, 10:00, "Mauritap" <
mauri...@alice.it
> wrote:
> Salve e scusate se il post sar� un po' lungo!
> Premessa:
> Ho creato un DB per la gestione di una piccola scuola di danza:
> Iscrizioni,
> Pagamento quote ecc..., il tutto automatizzato con VBA, anche grazie ai
> vostri suggerimenti.
> Ora sto affrontando il problema delle Domande d'iscrizione che vorrei
> inviare agli iscritti dell'anno precedente gi� precompilate. E fino a qui
> nessun problema, ho creato una query ad hoc con i campi necessari, in word
> ho creato il documento in cui ho inserito i campi unione e quando faccio
> partire il file in Word, dopo avermi chiesto di associarlo alla query,
> tutto
> funziona e posso stampare le domande.
> Ho voluto per� affrontare la sfida di comandare la stampa unione da Access
> e
> mi sono reso conto di non avere le competenze per farlo.
> Presumo che la sequenza dovrebbe essere, a grandi linee:
> - Creare una query adatta e modificabile da access (Questo lo so fare)
> -Aprire il file Word "DomandeIscrizione.doc"
> -Associare al file Word la Query creata in Access
> -Stampare le domande (Vorrei comandarlo da Access)
> -Chiudere word e continare ad adoperare access
> Il problema � che non lo so programmare.
> Non chiedo che mi risolviate la cosa (anche se qualche dritta sarebbe
> gradita), ma vorrei che mi indicaste dove potermi documentare per arrivare
> a
> realizzare quanto vorrei.
> Grazie infinite per la vostra pazienza.
Ciao,
perch� vuoi usare Word per la stampa ? Non ti basta la grafica del
report ?
Se puoi fare a meno di formattazioni particolari non ti conviene usare
word.
Ciao
Alberto
Il problema � proprio questo, ho creato e formattato la stessa domanda
d'iscrizione in un layout di report.
Tecnicamente funziona (anche se ho riscontrato il problema che sulla
stampante di casa � ok mentre su quella nella sede della scuola mi stampa
l'intestazione sul secondo foglio), per� non ho la stessa elasticit� di
formattazione in quanto nel report la parte, cosidetta di "testo" non riesco
a giustificarla e qualche altra cosetta.
Insomma per gestire una lettera o un documento di testo Word � molto pi�
elastico.
E poi, non � importante, per� ci terrei anche a imparare.
grazie del tuo suggerimento ciao
Maurizio


title: Stampa Unione da Access

text:
On 21 Feb, 13:40, "Mauritap" <
mauri...@alice.it
> wrote:
> "almorel" <
almo...@gmail.com
> ha scritto nel messaggionews:d35830ad-d7e7-41c1...@f29g2000yqa.googlegroups.com...
> On 21 Feb, 10:00, "Mauritap" <
mauri...@alice.it
> wrote:
>
>
>
> > Salve e scusate se il post sarà un po' lungo!
> > Premessa:
> > Ho creato un DB per la gestione di una piccola scuola di danza:
> > Iscrizioni,
> > Pagamento quote ecc..., il tutto automatizzato con VBA, anche grazie ai
> > vostri suggerimenti.
> > Ora sto affrontando il problema delle Domande d'iscrizione che vorrei
> > inviare agli iscritti dell'anno precedente già precompilate. E fino a qui
> > nessun problema, ho creato una query ad hoc con i campi necessari, in word
> > ho creato il documento in cui ho inserito i campi unione e quando faccio
> > partire il file in Word, dopo avermi chiesto di associarlo alla query,
> > tutto
> > funziona e posso stampare le domande.
> > Ho voluto però affrontare la sfida di comandare la stampa unione da Access
> > e
> > mi sono reso conto di non avere le competenze per farlo.
> > Presumo che la sequenza dovrebbe essere, a grandi linee:
> > - Creare una query adatta e modificabile da access (Questo lo so fare)
> > -Aprire il file Word "DomandeIscrizione.doc"
> > -Associare al file Word la Query creata in Access
> > -Stampare le domande (Vorrei comandarlo da Access)
> > -Chiudere word e continare ad adoperare access
> > Il problema è che non lo so programmare.
> > Non chiedo che mi risolviate la cosa (anche se qualche dritta sarebbe
> > gradita), ma vorrei che mi indicaste dove potermi documentare per arrivare
> > a
> > realizzare quanto vorrei.
> > Grazie infinite per la vostra pazienza.
>
> Ciao,
> perchè vuoi usare Word per la stampa ? Non ti basta la grafica del
> report ?
> Se puoi fare a meno di formattazioni particolari non ti conviene usare
> word.
> Ciao
> Alberto
>
> Il problema è proprio questo, ho creato e formattato la stessa domanda
> d'iscrizione in un layout di report.
> Tecnicamente funziona (anche se ho riscontrato il problema che sulla
> stampante di casa è ok mentre su quella nella sede della scuola mi stampa
> l'intestazione sul secondo foglio), però non ho la stessa elasticità di
> formattazione in quanto nel report la parte, cosidetta di "testo" non riesco
> a giustificarla e qualche altra cosetta.
> Insomma per gestire una lettera o un documento di testo Word è molto più
> elastico.
> E poi, non è importante, però ci terrei anche a imparare.
> grazie del tuo suggerimento ciao
> Maurizio
Ciao Maurizio,
non è difficile fare una stampa unione. A parte la sorgente dei dati
che può essere una tabella o una query di Access, si fa tutto da Word.
Visualizza la barra "stampa unione", colleghi il tuo documento al DB
Access dove sceglierai la sorgente dei dati.
Metti nel documento Word i vari campi legati alla sorgete dei dati e
il gioco è fatto.(bè è un poco più complicato di così, ma non tanto.
Word ti aiuta molto).
C'è poi un'altra tecnica che è quella di utlizzare i bookmark
esemplificata in questa demo di Marco Pizzamiglio (trovata in rete).
http://myfreefilehosting.com/f/b52def8178_0.41MB
Nel tuo caso però è più indicata la "stampa unione"
Ciao
Alberto
P.S.
> stampante di casa è ok mentre su quella nella sede della scuola mi stampa
> l'intestazione sul secondo foglio.
Attenzione ai margini di stampa, non tutte le stampanti li hanno
uguali.
Specialmente quelle a getto possono avere un'area non stampabile
piuttosto grande a piè di pagina.


title: guide access97

author: Ingrid

text:
Qualcuno saprebbe indicar,mi un sito dove è possibile scaricare una guida in
italiano di Access 97?
Grazie mille
in...@iname.com


title: guide access97

author: Sib

text:
"Ingrid" chiede
> Qualcuno saprebbe indicar,mi un sito dove è possibile scaricare una guida
in
> italiano di Access 97?
> Grazie mille
Perdona la domanda,
ma tu ce l'hai Access o ne hai solo sentito parlare?
Access e' uno dei pochi programmi che ha una guida in linea da fare paura.
Installatela dal CD-ROM di Office
Ciao, Sib


title: guide access97

author: Carlo Ve

text:
Ingrid ha scritto nel messaggio
<6c085.15045$
2s6.2...@news.infostrada.it
>...
>Qualcuno saprebbe indicar,mi un sito dove è possibile scaricare una guida
in
>italiano di Access 97?
>Grazie mille
Se proprio la guida di Access ti fa paura
prova a vedere qui che dovresti trovare qualcosina  terra terra
www.manuali.net
Carlo Ve
ma proprio per sapere di cosa stiamo parlando
>
>
in...@iname.com
>
>


title: guide access97

author: lbo dal portatile

text:
>Qualcuno saprebbe indicar,mi un sito dove è possibile scaricare una guida in
>italiano di Access 97?
nooo, allora ce fa'...
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Controllo maschere aperte

author: Catlory

text:
Buondì a tutti.Sapete un metodo per controllare se una determinata
maschera è aperta?mi serve per poter fare requery altrimenti mi dice
che la maschera non esiste!grazie per l'aiuto.


title: Controllo maschere aperte

author: Karl Donaubauer

text:
Catlory wrote:
> Buondě a tutti.Sapete un metodo per controllare se una determinata
> maschera č aperta?mi serve per poter fare requery altrimenti mi dice
> che la maschera non esiste!grazie per l'aiuto.
Come tutti che non rivelarono una versione di Access automagically
hanno la versione attuale, puoi usare:
If CurrentProject.AllForms("TuaMaschera").IsLoaded Then
    Forms!TuaMaschera.Requery
End If
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: Controllo maschere aperte

text: Grazie infinite Karl!


title: FDF Toolkit e PDF corrotto!

text:
Ciao a tutti
Sul sito
www.simply4you.it
 ho trovato il codice, che riporto qui sotto,
per compilare automaticamente campi di un file PDF direttamente da
codice.
Le istruzioni sono per VBA pero in un post precedente mi sembra di aver
capito che non dovrebbero esserci problemi o sbaglio?
Ho seguito tutte le istruzioni e cioè
1 - scaricare e registrare dll FDFACX e FDFTK (nessun messaggio errore)
2 - creare campo nel file PDF denominato txtcognome (con programmi
online)
3 - scrivere una routine evento con il codice qui sotto
Mi sembra di aver fatto tutto correttamente, però se decido di salvare
il file PDF con nuovo nome, quando lo apro mi dice che il file è
corrotto, nonostante non mi venga visualizzato alcun messaggio d'errore.
Avete qualche idea di dove possa essere l'errore?
Grazie
Dim FdfAcx As New FDFACXLib.FdfApp
Set myFDf = FdfAcx.FDFCree
varCognome= me.COG_NOM
myFDf.FDFSetValue "txtCognome", varCognome, False
myFDf.FDFSetFile "C:\Delega.pdf"
myFDf.FDFSaveToFile "C:\Delega2.pdf"
myFDf.FDFClose
Set myFDf=Nothing
Set FdfAcx=Nothing


title: FDF Toolkit e PDF corrotto!

text:
On 21 Dic, 22:05, P.SIMONE <
sim...@studiopilan.com
> wrote:
> Ciao a tutti
> Sul sitowww.simply4you.itho trovato il codice, che riporto qui sotto,

NO... tu nell'altro post NON hai parlato di OCX o DLL(Activex)... ma
di codice VB6... e sono decisamente da valutare in modo differente.
Il codice base VB67A è uguale, il problema è che tu ora parli di
COMPONENTI ESTERNI che molte volte non funzionano su Access...!
Questo in particolare non lo conosco, ma ti suggerisco di scrivere
all'autore e chiedere lui conferma per la compatibilità con VBA per
Access.
@Alex


title: FDF Toolkit e PDF corrotto!

text:
Grazie per la risposta, da inesperto a prima vista pensavo che fossero
simili, non sapendo che dovessi specificare anche che utilizzavo ocx e
dll. Proverò a sentire l'autore. In ogni caso non sai se in access posso
raggiungere lo stesso risultato con altri codici? Se mi dai qualche
riferimento poi approfondisco le ricerche!
Ciao e ancora grazie



title: HTML HELP WORKSHOP:DOWNLOAD + MANUALE

author: Simone Bianchi

text:
QUESTO E' IL SITO PER IL DOWNLOAD:
http://www.ilsoftware.it/querydl.asp?ID=559
QUESTO E' IL SITO PER I MANUALI:
http://digilander.libero.it/nuska2000/manuali/manuali.htm


title: etichetta e numeri e data

author: Lomba

text:
Di nuovo ciao.
dovrei creare un numero da inserire in una etichetta che sia composto da:
n° anno + 0 + numero inserito da maschera
ho provato con
year(now) &"0" & miocontrollo
ma non mi torna...
io vorrei scrivere in una casella di testo che ha origine da "miocontrollo" il seguente numero (esempio) 17033 (33= miocontrollo)
qualcuno puo aiutarmi?
grazie.
Luca


title: etichetta e numeri e data

text:
Salve,

Lomba:
> dovrei creare un numero da inserire in una etichetta che sia composto da:
> n° anno + 0 + numero inserito da maschera
> ho provato con
> year(now) &"0" & miocontrollo
> ma non mi torna...
> io vorrei scrivere in una casella di testo che ha origine da "miocontrollo" il seguente numero (esempio) 17033 (33= miocontrollo)

"non mi torna" è scarso come descrizione cosa succede e non ti piace. Se
il problema è solo il formato dell'anno con due ciffre, prova:

Right(year(now), 2) & "0" & miocontrollo

Se non è questo, descrivi meglio cosa succede e incolla il tuo codice reale.

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


title: etichetta e numeri e data

text:
ciao KARL, intanto grazie
mi dice "sintassi errata"
cosa c'è che non va?
= Right(year(now), 2) & "0" & "NUMERO_NC"

Numero_Nc va racchiuso con?

grazie ancora
Luca


title: etichetta e numeri e data

text:
Salve,

Lomba:
> mi dice "sintassi errata"
> cosa c'è che non va?
> = Right(year(now), 2) & "0" & "NUMERO_NC"
>
> Numero_Nc va racchiuso con?

Nel primo messaggio non hai scritto che si tratta di un'espressione e
mancava "=" per vederlo. Per questo ti ho risposot con codice VBA. Prova
con:

=Right(year(now); 2) & "0" & "NUMERO_NC"

o se "NUMERO_NC" è un controllo o campo:

=Right(year(now); 2) & "0" & NUMERO_NC



title: etichetta e numeri e data

text:
PERFETTO!!!!!
grazie mille Karl!!
> Luca


title: Help ... probabile problema di condivisione

author: Rosi Asperti

text:
Sono alle prese da poco tempo con ACCESS e ho già riscontrato delle
difficolta' che bene o male ho risolto. Adesso mi trovo in questa situazione
disastrosa:
il data base che ho creato con micorsoft access è stato condiviso in una
rete locale e solo dopo due giorni di condivisione e' apparso questo
messaggio:
"il data base c\: ... .mdb deve essere ripristinato o non e' un data base. E
' possibile che microsft Access sia stato chiuso inaspettatamente mentre un
database era aperto.."
Non sono riuscita a ripristinare il database. I dati che erano inseriti in
questo database sono recuperabili in qualche modo? E' possibile condividere
un file .mdb senza avere di nuovo questo problema?
Lo so che potro' sembrarvi ignorante . ma lo sono, e se vorrete aiutarmi in
qualche modo ve ne saro' lieta. Grazie per la disponibilita'.
Rosy


author: Sib dal portatile

text:
"Rosi Asperti" <
rosia...@libero.it
> ha scritto nel messaggio > Sono alle
prese da poco tempo con ACCESS e ho già riscontrato delle
> difficolta' che bene o male ho risolto. Adesso mi trovo in questa
situazione
> disastrosa:
> il data base che ho creato con micorsoft access è stato condiviso in una
> rete locale e solo dopo due giorni di condivisione e' apparso questo
> messaggio:
> "il data base c\: ... .mdb deve essere ripristinato o non e' un data base.
E
> ' possibile che microsft Access sia stato chiuso inaspettatamente mentre
un
> database era aperto.."
> Non sono riuscita a ripristinare il database. I dati che erano inseriti in
> questo database sono recuperabili in qualche modo? E' possibile
condividere
> un file .mdb senza avere di nuovo questo problema?
Come ho detto in un recente messaggio su questo ng, casi come questo
succedono raramente in realta' e solitamente per colpa delle schede di rete
(Realtek?) o per colpa di errori dell'operatore (conosco persone che
spengono il pc cosi' con tutti i programmi aperti) o per errori presenti nel
codice (hai fatto un compila tutti i moduli?).
Per recuperare questi dati (backup a parte) puoi provare a creare un db
nuovo e a importare gli oggetti del db danneggiato.
Saluti
Sib


title: A97 non parte con più di 512 MB Ram

author: Guido Rifesser

text:
Salve a tutti,
qualcuno conosce questo problema ? Ho installato Access97 su una
macchina nuova con 1.024 MB di Ram pero non vuole partire e dice che non
c'é memoria sufficiente. Con 512 MB invece Access97 non da problemi. Ho
provato a cambiare le memorie, pensando che siano difettose, ma risulta
lo stesso problema. Si tratta di SD-Ram da 333 Mhz.
Qualcuno conosce questo problema ???
Saluti
gigi
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: A97 non parte con più di 512 MB Ram

author: Alepetomane

text:
"Guido Rifesser" <
info.c...@tin.it
> ha scritto nel messaggio
news:eba5fac8e66509d57eb...@mygate.mailgate.org...
> Salve a tutti,
>
> qualcuno conosce questo problema ? Ho installato Access97 su una
> macchina nuova con 1.024 MB di Ram pero non vuole partire e dice che non
> c'é memoria sufficiente. Con 512 MB invece Access97 non da problemi. Ho
> provato a cambiare le memorie, pensando che siano difettose, ma risulta
> lo stesso problema. Si tratta di SD-Ram da 333 Mhz.
>
> Qualcuno conosce questo problema ???
>
dilla tutta, windows?
Ale.


title: A97 non parte con più di 512 MB Ram

author: Simone Calligaris

text:
"Guido Rifesser" <
> Qualcuno conosce questo problema ???
E' documentato: devi installare i Service packs (o semplicemente patchare il
motore JET 3.5 al Service pack 3)
Ciao.


title: Campi e tabelle

author: Giorgio A.

text:
Un aiuto grazie
2 richieste
1 richiesta:
Ho un campo "Cognome" in una maschera primaria, e quello che inserisco in
questo campo mi deve comparire in un campo chiamato "Nome" collocato in un
altra maschera. Si può fare?
Se si mi indicate il modo?
2 richiesta:
Ho tre tabelle, di cui una master,  una secondary1, e una secondary2
Le due tabelle secondarie sono collegate alla Master con una relazione del
tipo:
Il campo Cognome della Master al campo Cognome della secondary1, e il campo
Cognome di quest'ultima al campo Cognome della  secondary2. Queste maschere
secondarie hanno una maschera di inserimento e tabelle specifiche.
Quando apro la Tabella Master vedo le tabelle secondarie ma non mi vengono
aggiornate rispetto agli inserimenti fatti nelle loro tabelle( nelle loro
tabelle tutto procede bene)
Come fare per aggiornare la loro parte anche nella tabella Master?
Forse è un pò complicato a dirsi e a farsi ma non riesco ad andarne a capo.
Molte grazie
Giorgio


title: Campi e tabelle

author: sv

text:
Giorgio A. ha scritto:

> 1 richiesta:

> 2 richiesta:


Ti consiglio di porre un quesito alla volta con un subject significativo.
Tra l'altro il primo quesito è poco chiaro. (Due maschere con quale
origine?? La stessa? diversa? sono aperte? Una aperta e l'altra chiusa??)
Per il secondo poi il collegamento maschera-sottomaschera fatto su il
campo Cognome è improponibile. E se hai cognomi uguali che fai??
--
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: Come creare report per bilancio contabile?

author: RobertoA

text:
Sto cercando di realizzare un report tipo bilancio contabile con una sezione
di sinistra Attivita' ed una sezione di destra Passivita'
Poi sotto ci saranno Costi a sinistra e Ricavi a destra
Il punto e' che ognuna delle 4 sezioni ha un numero di record variabile, i
conti definiti dall'operatore
Vorrei in sostanza ottenere un effetto di questo tipo
http://www.studiamo.it/dispense/contabilit%E0-generale/bilancio-di-esercizio.html
Penso si indichi generalmente come 'bilancio a sezioni contrapposte'
Ma con un report Access, come lo fo' ?
Ciao e grazie
RobertoA


author: Oscar Manfredini

text:
"RobertoA"

Io ho implementato i Bilanci (oltre all'ordinario, c'è il bilancio UE)
utilizzando tabelle d'appoggio locali.
IMHO impossibile farne a meno in queste casistiche.


text:

Si, anch'io ricalcolo al volo i dati da visualizzare e li piazzo ben
ordinati sulle tabelle del caso
Quello che non riesco a fare e' la visualizzazione sezione sinistra / destra
indipendenti tra di loro
Ciao
RobertoA


text:
"RobertoA" <
> Si, anch'io ricalcolo al volo i dati da visualizzare e li piazzo ben
> ordinati sulle tabelle del caso
> Quello che non riesco a fare e' la visualizzazione sezione sinistra /
> destra indipendenti tra di loro
Ahemmm, pardon: ho capito ora ciň che chiedi   ;-)
Nella "mia" procedura il bilancio non viene presentato in quel modo, ma con
le sezioni in fila una dietro l'altra.
Ciao: Oscar


author: giovanni

text:

io farei con due sottoreport affiancati...
uno per le attività ed uno per le passività
e nel report principale (che ovviamente contiene i due sottoreport) il campo
calcolato per il saldo.
che te ne pare?
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


text:


Grazie comunque
Ciao
RobertoA


text:
>> Sto cercando di realizzare un report tipo bilancio contabile con una
> sezione
>> di sinistra Attivita' ed una sezione di destra Passivita'
>> Poi sotto ci saranno Costi a sinistra e Ricavi a destra
>> Il punto e' che ognuna delle 4 sezioni ha un numero di record variabile,
>> i
>> conti definiti dall'operatore
>> Vorrei in sostanza ottenere un effetto di questo tipo
>>
>
http://www.studiamo.it/dispense/contabilit%E0-generale/bilancio-di-esercizio.html
>> Penso si indichi generalmente come 'bilancio a sezioni contrapposte'
>> Ma con un report Access, come lo fo' ?
>> Ciao e grazie
>> RobertoA
>>
>
> io farei con due sottoreport affiancati...
> uno per le attivitą ed uno per le passivitą
> e nel report principale (che ovviamente contiene i due sottoreport) il
> campo
> calcolato per il saldo.
E come fai a farli 'crescere' in senso verticale i due sottoreport ?
Ciao
RobertoA


text:
"RobertoA" <
>>
>> io farei con due sottoreport affiancati...
>> uno per le attività ed uno per le passività
>> e nel report principale (che ovviamente contiene i due sottoreport) il
>> campo
>> calcolato per il saldo.
> E come fai a farli 'crescere' in senso verticale i due sottoreport ?
Non è da scartare la sua idea.
Posto che per avere le idee chiare e sviluppare la cosa ci si deve lavorare,
un metodo di lavoro 'potrebbe' essere:
4 Tabelle temporanee locali:
Attività
Passività
Costi
Ricavi
Le suddette vengono popolate (probabilmente con 4 elaborazioni successive)
con i corretti saldi di bilancio e gli importi a pareggio.
Quindi, crei un Report principale con 4 sottoreport (e un salto pagina tra
Patrimoniali ed Economici): uno per ogni temporaneo.
Così facendo lo sviluppo verticale di ogni sottoreport dovrebbe essere
gestito automaticamente da Access..
In realtà forse potrebbe bastare un solo temporaneo con i campi
affiancati/ripetuti in orizzontale e un marcatore che separi la sezione
patrimoniale da quella economica...
Comunque non riesco a visualizzare l'esempio di bilancio che hai postato:
funziona il link?
Ciao.


text:

Non so perche' ma cercando 'bilancio sezioni contrapposte' su google salta
fuori il primo link che e' quello che ho spedito
Pero' cliccandoci sopra non tira giu' niente
Comunque, una roba tipo questa
http://www.fondazione.novara.it/oggetti/221.pdf
Ciao
RobertoA


author: M C

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:49d1c128$1...@newsgate.x-privat.org...
>>> Sto cercando di realizzare un report tipo bilancio contabile con una
>> sezione
>>> di sinistra Attivita' ed una sezione di destra Passivita'
>>> Poi sotto ci saranno Costi a sinistra e Ricavi a destra
>>> Il punto e' che ognuna delle 4 sezioni ha un numero di record variabile,
>>> i
>>> conti definiti dall'operatore
>>> Vorrei in sostanza ottenere un effetto di questo tipo
>>>
>>
http://www.studiamo.it/dispense/contabilit%E0-generale/bilancio-di-esercizio.html
>>> Penso si indichi generalmente come 'bilancio a sezioni contrapposte'
>>> Ma con un report Access, come lo fo' ?
>>> Ciao e grazie
>>> RobertoA
>>>
>>
>> io farei con due sottoreport affiancati...
>> uno per le attività ed uno per le passività
>> e nel report principale (che ovviamente contiene i due sottoreport) il
>> campo
>> calcolato per il saldo.
>
> E come fai a farli 'crescere' in senso verticale i due sottoreport ?
> Ciao
> RobertoA
>
Ciao,
Crescono da soli in base al risultato della query (per default)


title: Stop alle "Elaborazioni in corso...."

author: Pasquale Antonacci

text:
Cari amici,
ho una maschera con la quale filtro i dati da passare ad una query di
selezione che opera su una tabella di notevole dimensioni (circa 500.000
records).
Per non operare nel "buio" e per avere il senso di una attivita in corso,
ho pensato, all'avvio della query, di far partire una maschera che riporti
la dicitura "Elaborazione in corso..." e che mi dia la possibilita,
attraverso un tasto di stop, di interrompere l'elaborazione in un qualsiasi
momento, evitando il classico "Alt+Ctrl+Canc" sul task Access attivo. C'e
qualcuno che puo aiutarmi a risolvere questo problema?
Un saluto a tutti.
  Lino
--
Posted from
IDENT:ro...@sirio.tno.it
 [138.66.200.5]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Stop alle "Elaborazioni in corso...."

author: Oscar Metelli

text:
"Pasquale Antonacci" <
p.ant...@tno.it
> ha scritto nel messaggio
news:01C102EE.7C85C...@tno.it...
> Cari amici,
> ho una maschera con la quale filtro i dati da passare ad una query di
> selezione che opera su una tabella di notevole dimensioni (circa 500.000
> records).
> Per non operare nel "buio" e per avere il senso di una attivita in corso,
> ho pensato, all'avvio della query, di far partire una maschera che riporti
> la dicitura "Elaborazione in corso..." e che mi dia la possibilita,
> attraverso un tasto di stop, di interrompere l'elaborazione in un
qualsiasi
> momento, evitando il classico "Alt+Ctrl+Canc" sul task Access attivo. C'e
> qualcuno che puo aiutarmi a risolvere questo problema?
> Un saluto a tutti.
Sul sito comune ho notato che un visualizzatore d'immagini (proprio bello)
ricorre a un API per interrompere l'elaborazione in corso.
L'autore č Silvio Savoldi.
Ciao, Oscar


title: CISA.Net 2008 - Updating

author: MA

text:
Ciao a tutti,
stiamo mettendo a punto gli ultimi particolari per questa edizione.
Microsoft ci sta supportando in pieno e tra l'altro ci ha inserito sulla newsletter di MSDN,
su blog di TecnNet e presto sulla pagina Office di Microsoft.it
Vi aspettiamo numerosi
INFO:
www.accessgroup.it
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Ricerca in tabella con relazione Molti a Uno

author: tracker

text:
Quesito forse non troppo difficile (lo è però per me):
Ho due tabelle: Rubrica e NumeriRubrica relazionate Uno-Molti. Tramite
una maschera (dati Rubrica) che incorpora una sottomaschera (dati
NumeriRubrica) collegata ad una query di selezione parametrica, posso
cercare ad. es un dato cognome e vedermi visualizzare tutti i numeri
della rubrica che a quel cognome fanno riferimento.
La query fa cioè una interrogazione sul lato "Uno" della relazione e i
"molti" vengono di conseguenza.
La faccenda si complica se tento di fare la cosa opposta: se introduco
cioè un numero di telefono (lato "molti") vorrei che mi venisse
visualizzato il nominativo corrispondente contenuto nella tabella lato
"uno", eventualmente insieme agli altri record del lato molti
associati, come quello ricercato, a quel dato cognome.
Quali modalità esistono per ottenere questo risultato?
Grazie a tutti quelli in ascolto.


author: Alessandro Cara

text:
tracker wrote:
> Quesito forse non troppo difficile (lo è però per me):
>
> Ho due tabelle: Rubrica e NumeriRubrica relazionate Uno-Molti. Tramite
> una maschera (dati Rubrica) che incorpora una sottomaschera (dati
> NumeriRubrica) collegata ad una query di selezione parametrica, posso
che vuol dire "collegata ad una query di selezione parametrica". Questa
cosa si ottiene impostando semplicemente le proprieta "linkmaster e
linkchild". Messa come hai scritto sembra che la query piloti la
sottomaschera.
> cercare ad. es un dato cognome e vedermi visualizzare tutti i numeri
> della rubrica che a quel cognome fanno riferimento.
> La query fa cioè una interrogazione sul lato "Uno" della relazione e i
> "molti" vengono di conseguenza.
> La faccenda si complica se tento di fare la cosa opposta: se introduco
> cioè un numero di telefono (lato "molti") vorrei che mi venisse
> visualizzato il nominativo corrispondente contenuto nella tabella lato
> "uno", eventualmente insieme agli altri record del lato molti
> associati, come quello ricercato, a quel dato cognome.
In qualsiasi relazione 1-->n faccio cosi'
1) Form1 con sorgente tabella (o quello che e')
2) form2 (subform) con sorgente tabella (o quello che e')
3) Imposto proprieta' linkmaster e linkchild
se devo "filtrare" con un dato di submask tale dato ha sicuramente il
riferimento alla chiave del main form. Presa questa chiave faccio
semplicemente una findfirst sul recordet della main form.
Il resto e' automatico.
--
ac
y-1=x


title: File .DAT

author: Luigi

text:
Buongiorno al NG
č possibile lavorare su archivi .DAT con Access ?
Non so la provenienza del file e quindi con che programma č stato creato.
So solo che č un Archivio dati.
Grazie
Luigi


title: File .DAT

author: Antonio Biso

text:
"Luigi" <
maur...@porta-spa.com
> ha scritto nel messaggio
news:vWjH9.55630$2B1.1...@twister2.libero.it...
> Buongiorno al NG
> è possibile lavorare su archivi .DAT con Access ?
> Non so la provenienza del file e quindi con che programma è stato creato.
> So solo che è un Archivio dati.
Mah...
Non è che l'estensione di un file individui con sicurezza il tipo di file.
Se un pippo.doc word lo cambi in pippo.xls non è che diventa un foglio excel
Comunque normalmente un file dat è un semplice file di testo, formattato in
una certa maniera...
Antonio


title: File .DAT

text:
Ti ringrazio
Luigi


title: File .DAT

author: Karl Donaubauer

text:
Luigi schrieb:
> è possibile lavorare su archivi .DAT con Access ?
> Non so la provenienza del file e quindi con che programma è stato
> creato. So solo che è un Archivio dati.
Come Antonio ha gia detto .DAT spesso significa un semplice
file di testo. Guarda se puoi leggere il contento del file come
un testo normale con notepad di Windows. Se no è si tratta
di un file di un database .DAT normalmente è l'estensione
del sistema BTrieve.
--
HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ:
http://www.donkarl.com
+ Info zu AR4 - aktuelle Ausgabe der Zeitschrift für Access-Entwickler


title: File .DAT

text:
Effettivamente ho provato ad aprirlo ma mi da solo tanti simboli
illeggibili.
Come posso fare altrimenti ? So che è un file di un database che archivia
gli ingressi di dipendenti in azienda.
Si può leggere e poi trasfportare in Access ?
Grazie
Luigi


title: File .DAT

author: Emyr

text:
On Thu, 05 Dec 2002 07:03:31 GMT, "Luigi" <
maur...@porta-spa.com
>
wrote:

contatta chi l'ha prodotto e fatti spiegare cos'è
Saluti.
Emanuele.


title: File .DAT

author: Luca

text:
potrebbe anche essere un file di access, basta rinominare e provare oppure
aprirlo direttamente in access.
Ciao
Luca
"Luigi" <
maur...@porta-spa.com
> ha scritto nel messaggio
news:vWjH9.55630$2B1.1...@twister2.libero.it...



title: Come trovare righe 'orfane' ?

text:
Tabelle DOCUMENTITESTATE e DOCUMENTIRIGHE
Collegamento tra testate e righe col classico campo id_testata
C'e' modo, con un sol colpo di sql, di visualizzare righe documenti
orfane della testata?
E viceversa, visualizzare testate che non abbiano neanche una riga
collegata?
Ciao e grazie
RobertoA


title: Come trovare righe 'orfane' ?

text:

Con query che non trovano le corrispondenze.
SQL delle righe che non trovano corrispondenza in testata:SELECT DocumentiRighe.IdRighe, DocumentiRighe.Idtestata, DocumentiRighe.DocumentiRighe
FROM DocumentiRighe LEFT JOIN DocumentiTestata ON DocumentiRighe.[Idtestata] = DocumentiTestata.Idtestata
WHERE (((DocumentiTestata.Idtestata) Is Null));
 E viceversa: SELECT DocumentiTestata.Idtestata, DocumentiTestata.Documentotestata
FROM DocumentiTestata LEFT JOIN DocumentiRighe ON DocumentiTestata.[Idtestata] = DocumentiRighe.[Idtestata]
WHERE (((DocumentiRighe.Idtestata) Is Null));

--
sv


title: Come trovare righe 'orfane' ?

text:

Molte grazie, funge perfettamente


title: Ma come controllare due campi anzichè uno?!

author: Marco

text:
Mi viene un dubbio:
Premessa:
Tabella CLIENTI ([Nome], [Professione])
Maschera CLIENTI
Se immetto il nome di un cliente nella maschera collegata alla tabella
CLIENTI , la seguente routine mi controlla se quel nome è già stato immesso
nel databse.
E fin qui ci siamo!:
Private Sub Nome_BeforeUpdate(Cancel As Integer)
    If Not (IsNull(DLookup("[Nome]", "Clienti", "[Nome]='" & _
        Me!Nome.Text & "'"))) Then
        MsgBox "Il Nome è già stato immesso nel database !"
        Cancel = True
        Me!Nome.Undo
    End If
End Sub
Ma se volessi effettuare un controllo doppio? ...cerco di spiegarmi meglio:
1) Inserisco il [Nome]
2) Inserisco la [Professione]
3) Nel campo [Professione] voglio inserire una routine che mi controlli se
il [Nome] con quella [Professione] è stato già immesso.
In sostanza, invece di controllare soltanto il campo [Nome] voglio
considerare [Nome] e [Professione] insieme.
Suppongo che la routine sopra citata vada modificata in qualche modo.
Ma in che modo??
Ciao ciao a tutti voi e a presto!!!!!!!
N.B.: Vi ringrazio infinitamente per quanto mi avete dato e per quanto
continuate a darmi !!!!


author: Graziano Franchi (Dal Portatile)

text:
> Private Sub Nome_BeforeUpdate(Cancel As Integer)
>     If Not (IsNull(DLookup("[Nome]", "Clienti", "[Nome]='" & _
>         Me!Nome.Text & "'"))) Then
>         MsgBox "Il Nome è già stato immesso nel database !"
>         Cancel = True
>         Me!Nome.Undo
>     End If
> End Sub
Dim Trovato as Byte
Qui controlli il nome e se esiste imposti Trovato=true
Con la stessa funzione di sopra con le opportune modifiche controlli la
professione.
Se esiste la professione e se trovato=true then...
Saluti
Pensa un poco.
Ciao
Graziano


author: Matteo Fortini

text:
Puoi sempre usare gli indici nella tabella CLIENTI, e mettere Duplicati=No
Gli indici si possono fare anche su due campi contemporaneamente.
Ciao,
    Matteo


text:
Grazie mille, credo di esserci arrivato che ne dici ?
__________________________________________
Option Compare Database
Dim Trovato As Byte
__________________________________________
Private Sub Nome_BeforeUpdate(Cancel As Integer)
    If Not (IsNull(DLookup("[Nome]", "Clienti", "[Nome]='" & Me!Nome.Text &
"'"))) Then
        Trovato = True
    End If
End Sub
__________________________________________
Private Sub Professione_BeforeUpdate(Cancel As Integer)
    If Not (IsNull(DLookup("[Professione]", "Clienti", "[Professione]='" & _
        Me!Professione.Text & "'"))) And Trovato = True Then
        MsgBox "Il cliente è già stato immesso nel database!"
        Cancel = True
        Me!Professione.Undo
        Trovato = False
    End If
End Sub
________________________________________________
E possibile però, una volta trovato il cliente, ripulire in qualche modo i
campi [Nome] e [Professione] per rieseguire le due routine da capo ????
Grazie mille ancora!
Marco
Graziano Franchi (Dal Portatile) <
franchi...@centoservizi.it
> wrote in
message 8jrqjq$13q$1...@news.IT.net...



author: lbo dal portatile

text:
>If Not (IsNull(DLookup("[Nome]", "Clienti", "[Nome]='" & _
>        Me!Nome.Text & "'"))) Then
>In sostanza, invece di controllare soltanto il campo [Nome] voglio
>considerare [Nome] e [Professione] insieme.
>Suppongo che la routine sopra citata vada modificata in qualche modo.
>Ma in che modo??
proprio cosi': [Nome] e [Professione]...
soltanto che non lo devi scrivere in italiano, bensi' secondo le
regole dell'sql:
If Not (IsNull(DLookup("[Nome]", "Clienti", "[Nome]='" & _
        Me!Nome.Text & "' AND [Professione]='" & _
        me.professione & "'"))) Then
ecc. ecc.
personalmente, quando la parte filtro di una dlookup comincia a
contenere piu' di un campo, preferisco scriverla preventivamente in
una variabile stringa ed "impaginare" la sua composizione in questo
modo:
dim sFiltro as string
sFiltro = "campo1 = " & me.qualcosa & " AND " & _
              "campo2 = '" & me.qualcos'altro & "' AND & _
              "campo3 = 'pippo'"
x=dlookup("nomecampo", "tabella", sFiltro)
diventa piu' facile da leggere e se ci sono casini hai sempre una
variabile sFiltro che puoi leggere in debug.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Inviare report via fax con la funzione scaricate da Sito comune sez. general 6.131

author: Perego Roberto

text:
Ciao a tutti!
Ho scaricato l'esempio in oggetto ed ho copiato tutto in un modulo ma non so
come usarlo
Qualcuno mi può spiegare come utilizzarlo?
Grazie


author: Sergio MAZZA

text:

Cosa non ti è chiaro?
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:d071nj$jtg$1...@canarie.caspur.it...
> Perego Roberto wrote:
> > Ciao a tutti!
> >
> > Ho scaricato l'esempio in oggetto ed ho copiato tutto in un modulo ma
non
> > so
> > come usarlo
> > Qualcuno mi puň spiegare come utilizzarlo?
> >
> > Grazie
>
> Cosa non ti č chiaro?
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
In primo luogo ho fatto il copia / incolla in un modulo, ma mi manca
l'inizio, mi spiego meglio:
la funzione inizia cosě:
On Error GoTo inviaFax_err
'--> creo il file di log
non sň cosa mettere prima es:
Function inviafax()
secondo quesito:
Come richiamo la funzione sull'evento click di un pulsante?
terzo e per il momento ultimo
Il numero di Fax lo ricava dal nome del file creato :
    posInizio = InStr(1, oDoc.Name, "_") + 1 '<-- posizione carattere
underscore
    numeroFaxDaComporre = Mid(oDoc.Name, posInizio) '<-- tolgo i numeri
prima del carattere underscore
    numeroFaxDaComporre = Left(numeroFaxDaComporre,
Len(numeroFaxDaComporre) - 4) '<-- tolgo l'estensione del file e il punto
a me servirebbe usare come numero di telefono il contenuto di una casella di
testo che ho sulla maschera, come posso modificare la funzione in modo che
il percorso del numero di fax lo passo come criterio alla funzione, visto
che mi serve richiamarla da 2 maschere diverse.
Grazie Mille


text:
Perego Roberto wrote:
>
> In primo luogo ho fatto il copia / incolla in un modulo, ma mi manca
> l'inizio, mi spiego meglio:
>
> la funzione inizia cosě:
>
> On Error GoTo inviaFax_err
>
> '--> creo il file di log
>
> non sň cosa mettere prima es:
> Function inviafax()
Se vuoi creare una funzione; se vuoi creare una subroutine
Sub inviaFax()
... codice
End Sub
la funzioni la richiami:
dim valoreRitorno as variant
valoreRitorno = inviaFax()
la subroutine la chiami:
inviafax
> secondo quesito:
>
> Come richiamo la funzione sull'evento click di un pulsante?
vedi sopra;
> terzo e per il momento ultimo
>
> Il numero di Fax lo ricava dal nome del file creato :
>
>    posInizio = InStr(1, oDoc.Name, "_") + 1 '<-- posizione carattere
> underscore
>    numeroFaxDaComporre = Mid(oDoc.Name, posInizio) '<-- tolgo i numeri
> prima del carattere underscore
>    numeroFaxDaComporre = Left(numeroFaxDaComporre,
> Len(numeroFaxDaComporre) - 4) '<-- tolgo l'estensione del file e il punto
>
> a me servirebbe usare come numero di telefono il contenuto di una casella
> di
> testo che ho sulla maschera, come posso modificare la funzione in modo che
> il percorso del numero di fax lo passo come criterio alla funzione, visto
> che mi serve richiamarla da 2 maschere diverse.
>
> Grazie Mille
puoi fare anche una sub routine:
Sub inviaFax(numeroFax as string)
... codice
'--> inizio impostazione e invio documento fax
    numeroFaxDaComporre = Me!numeroFaxDaInviare
occhio che questa riga aggiunge (prima) un zero, rimuovi lo zero
 .FaxNumber = "0" & numeroFaxDaComporre '<-- numero del fax
...codice
End Sub
e la richiami nel "clic" di un bottone cosě:
if not isnull(me!numeroFaxDaInviare) then
    inviaFax me!numeroFaxDaInviare
end if
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:d07cvj$p3j$1...@canarie.caspur.it...

Grazie mille, sei stato molto gentile, domani mattina la provo poi ti faccio
sapere.
Grazie mille ancora
Ciao!


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:d07cvj$p3j$1...@canarie.caspur.it...

Ho modificato in sub inviafax come mi hai spiegato, ma quando premo il
pulsante mi da errore alla riga:
Dim oFso As Scripting.FileSystemObject, oDoc As Object
Con questo messaggio:
errore di compilazione:
Tipo definito dall'utente non definito
come lo devo definire??
Grazie ancora per la pazienza


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:OfUVd.616113$b5.28...@news3.tin.it...
> Ho modificato in sub inviafax come mi hai spiegato, ma quando premo il
> pulsante mi da errore alla riga:
>
> Dim oFso As Scripting.FileSystemObject, oDoc As Object
> Con questo messaggio:
> errore di compilazione:
> Tipo definito dall'utente non definito
>
> come lo devo definire??
>
> Grazie ancora per la pazienza
>
Due possibilità;
1 - indica nei riferimenti (menù: Strumenti - riferimenti) l'utilizzo della
libreria: Windows Script Host Object Model;
2 - dichiara l'oggetto oFso in modo generico (Dim oFso As Object), solo che
in questo modo (forse) c'è un leggero decadimento delle prestazioni e non
vedresti i metodi/proprietà associati a quell'oggetto il che è puo' scomodo.
Ciao.
--
Sergio MAZZA


author: fidirico (lavoro)

text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:OfUVd.616113$b5.28...@news3.tin.it...
>
> "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> news:d07cvj$p3j$1...@canarie.caspur.it...
> > Perego Roberto wrote:
> > >
[CUT]
> Ho modificato in sub inviafax come mi hai spiegato, ma quando premo il
> pulsante mi da errore alla riga:
>
> Dim oFso As Scripting.FileSystemObject, oDoc As Object
> Con questo messaggio:
> errore di compilazione:
> Tipo definito dall'utente non definito
>
> come lo devo definire??
>
> Grazie ancora per la pazienza
Per far girare quel codice, ho dovuto aggiungere al progetto i riferimenti a
queste due librerie:
1) "faxcom 1.0 Type Library"
2) "Microsoft Scripting Runtime"
Il tutto riferito a Windows 2000, non so se in Win XP cambia qualcosa.
--
Ciao
Galliano.


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:d09dkh$o7u$1...@canarie.caspur.it...

Portate pazienza, ma con il codice sono abbastanza negato,
Ho provato la soluzione 1 ma si blocca e mi restituisce il seguente
messaggio:
Errore di compilazione:
Impossibile trovare il metodo o il membro dei dati
e mi evidenzia la riga:
.ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory dove
posizionare i fax inviati
qualche idea?
Grazie mille


text:
"fidirico (lavoro)" <
oma-togl...@libero.it
> ha scritto nel messaggio
news:7nXVd.61471$QG6.1...@twister2.libero.it...




text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:D0ZVd.617192$b5.28...@news3.tin.it...
>
> Portate pazienza, ma con il codice sono abbastanza negato,
> Ho provato la soluzione 1 ma si blocca e mi restituisce il seguente
> messaggio:
>
> Errore di compilazione:
> Impossibile trovare il metodo o il membro dei dati
>
> e mi evidenzia la riga:
> .ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory dove
> posizionare i fax inviati
>
> qualche idea?
>
> Grazie mille
>
Hai seguito il suggerimento di Firidico?
Invia il codice, a occhi chiusi è un po' difficile capire che succede...
Ciao.
--
Sergio MAZZA


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:F9ZVd.617212$b5.28...@news3.tin.it...

Ho provato tutti i metodi, ma si blocca sempre a quel punto.
ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory dove
Aiuto!


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:xv_Vd.617672$b5.28...@news3.tin.it...
>
> "Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
> news:F9ZVd.617212$b5.28...@news3.tin.it...
> >
> > "fidirico (lavoro)" <
oma-togl...@libero.it
> ha scritto nel
messaggio
> > news:7nXVd.61471$QG6.1...@twister2.libero.it...
> > >
> > > "Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
> > > news:OfUVd.616113$b5.28...@news3.tin.it...
> > > >
> > > > "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> > > > news:d07cvj$p3j$1...@canarie.caspur.it...
> > > > > Perego Roberto wrote:
[CUT]
> > Portate pazienza, ma con il codice sono abbastanza negato,
> > Ho provato la soluzione 1 ma si blocca e mi restituisce il seguente
> > messaggio:
> >
> > Errore di compilazione:
> > Impossibile trovare il metodo o il membro dei dati
> >
> > e mi evidenzia la riga:
> > .ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory
dove
> > posizionare i fax inviati
> >
> > qualche idea?
> >
> > Grazie mille
> >
> >
> Ho provato tutti i metodi, ma si blocca sempre a quel punto.
>
> ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory dove
>
> Aiuto!
Quali riferimenti hai impostato esattamente? ArchiveDirectory è una
proprietà dell'oggetto faxserver e DEVE essere
disponibile se hai impostato il riferimento alla libreria faxcom. Verifica
col visualizzatore oggetti (dalla finestra di Visual Basic) che l'oggetto
faxserver con tutte le sue proprietà sia effettivamente disponibile. Ti
avverto che non potrò continuare il thread
prima di lunedì perchè sto andando fuori.
--
Ciao
Galliano.


text:
"fidirico (lavoro)" <
oma-togl...@libero.it
> ha scritto nel messaggio
news:S9%Vd.61837$QG6.1...@twister2.libero.it...
>
> "Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
> news:xv_Vd.617672$b5.28...@news3.tin.it...
> >
> > "Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
> > news:F9ZVd.617212$b5.28...@news3.tin.it...
> > >
> > > "fidirico (lavoro)" <
oma-togl...@libero.it
> ha scritto nel
> messaggio
> > > news:7nXVd.61471$QG6.1...@twister2.libero.it...
> > > >
> > > > "Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
> > > > news:OfUVd.616113$b5.28...@news3.tin.it...
> > > > >
> > > > > "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> > > > > news:d07cvj$p3j$1...@canarie.caspur.it...
> > > > > > Perego Roberto wrote:
>
> [CUT]
> > Ho provato tutti i metodi, ma si blocca sempre a quel punto.
> >
> > ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory dove
> >
> > Aiuto!
>
> Quali riferimenti hai impostato esattamente? ArchiveDirectory è una
> proprietà dell'oggetto faxserver e DEVE essere
> disponibile se hai impostato il riferimento alla libreria faxcom. Verifica
> col visualizzatore oggetti (dalla finestra di Visual Basic) che l'oggetto
> faxserver con tutte le sue proprietà sia effettivamente disponibile. Ti
> avverto che non potrò continuare il thread
> prima di lunedì perchè sto andando fuori.
>
> --
> Ciao
>
> Galliano.
>
>
Faxserver è disponibile nel visualizzatore oggetti, quindi non capisco dove
sia l'inghippo.
Provo a postare il codice:
Sub inviafax(nfax As String)
On Error GoTo inviaFax_err
'--> creo il file di log
Dim nomeFileLog As String
nomeFileLog = "C:\bowling\log\logFaxInvio_" & Format(Date, "ddmmyyyy") &
".txt"
Open nomeFileLog For Output As #1
'--> dichiarazione oggetti
Dim oFso As Scripting.FileSystemObject, oDoc As Object
Dim oFax As FaxServer, oFaxDoc As FaxDoc, JobId As Variant
'--> dichiarazione variabili
Dim posInizio As Integer
'--> creazione oggetti
Set oFso = CreateObject("Scripting.FileSystemObject")
Set oFax = CreateObject("FaxServer.FaxServer")
'--> inizio impostazione server fax
Print #1, "'--> inizio impostazione server fax"
With oFax
    .Connect "" '<-- creo una connessione (al pc), se stringa nulla é il pc
locale
    .ArchiveDirectory = "C:\programmi\bowling\faxInviati" '<-- directory
dove posizionare i fax inviati
    .ArchiveOutboundFaxes = 1 '<-- salvataggio di una copia del fax nella
cartella
    .Branding = 1 '<-- scrivi intestazione del fax nel documento
    .DirtyDays = 5 '<-- giorni per ritentare l'invio se non riuscito
    .Retries = 1 '<-- numero ore per ritentare l'invio (del fax) non
riuscito
    .RetryDelay = 5 '<-- numero minuti per ritentare l'invio (del fax) non
riuscito
    .ServerCoverpage = 0 '<-- non invio la pagina di informazioni
    .UseDeviceTsid = 1 '<-- invio l'identificativo del fax che trasmette
End With
Print #1, "'--> fine impostazione server fax" '<-- fine impostazione server
fax
'--> ciclo per ogni documento nella cartella dei fax
Print #1, "'--> ciclo per ogni documento nella cartella dei fax"
For Each oDoc In oFso.GetFolder("C:\programmi\bowling\faxdainviare\").Files
'--> inizio creazione documento fax
'--> creazione documento fax
    Set oFaxDoc = oFax.CreateDocument("C:\programmi\bowling\faxdainviare\" &
oDoc.Name)
'--> inizio impostazione e invio documento fax
    posInizio = InStr(1, oDoc.Name, "_") + 1 '<-- posizione carattere
underscore
    numeroFaxDaComporre = nfax '<-- tolgo i numeri prima del carattere
underscore
    'nfax = Left(numeroFaxDaComporre, Len(numeroFaxDaComporre) - 4) '<--
tolgo l'estensione del file e il punto
    With oFaxDoc
        .FaxNumber = numeroFaxDaComporre '<-- numero del fax
        Print #1, nfax & "'<-- numero del fax da comporre"
        On Error Resume Next '<-- verifica errore invio fax
        JobId = .Send '<-- invio fax
        Print #1, "'<-- invio fax: " & oDoc.Name
        If Err.Number <> 0 Then '<-- se si é verificato un errore
            Print #1, "Errore: " & Application.AccessError(Err.Number) & "
su invio fax: " & oDoc.Name & ", JobId: " & JobId
        Else
            Print #1, "Fax: " & oDoc.Name & ", JobId: " & JobId &
"...Inviato."
        End If
    End With
'--> fine impostazione documento fax
    On Error GoTo 0 '<-- ripristino la gestione degli errori
'--> fine creazione documento fax
    Set oFaxDoc = Nothing
Next
On Error GoTo 0 '<-- reimposto la gestione degli errori
inviaFax_exit:
    Print #1, "Disconnessione dal server fax."
    oFax.Disconnect '<-- disconnetto il server fax
    Print #1, "'--> distruggo gli oggetti"
'--> distruggo gli oggetti
    Set oFso = Nothing
    Set oFax = Nothing
    Print #1, "Invio fax terminato."
    Close #1
    Exit Sub
inviaFax_err:
    Print #1, "Disconnessione dal server fax."
    Print #1, "'--> distruggo gli oggetti"
'--> distruggo gli oggetti
    Set oFso = Nothing
    Set oDoc = Nothing
    Set oFax = Nothing
    Set oFaxDoc = Nothing
    Set JobId = Nothing
    Print #1, Application.AccessError(Err.Number), vbCritical + vbOKOnly,
"Routine InviaFax - Errore"
    Close #1
End Sub


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:Yg%Vd.617908$b5.28...@news3.tin.it...

La cartella "C:\programmi\bowling\faxInviati" esite?
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:d0a3r4$5cr$1...@canarie.caspur.it...

Si esiste è la prima cosa che ho controllato


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:9W0Wd.618345$b5.28...@news3.tin.it...

Questa l'ho risolta, Avevo 2 serverfax nella finestra oggetti
quello giusto ed un altro che ho tolto togliendo la spunta a: "Faxcontrol
1.0 Type Library
ora il codice mi si blocca alla riga :
inviaFax_err:
    Print #1, "Disconnessione dal server fax."
con il seguente messaggio:
Errore:
numero o nome di file non valido
Continua l'odissea
Grazie Mille per la pazienza


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:f81Wd.618402$b5.28...@news3.tin.it...
> Questa l'ho risolta, Avevo 2 serverfax nella finestra oggetti
> quello giusto ed un altro che ho tolto togliendo la spunta a: "Faxcontrol
> 1.0 Type Library
> ora il codice mi si blocca alla riga :
>
> inviaFax_err:
>    Print #1, "Disconnessione dal server fax."
> con il seguente messaggio:
> Errore:
> numero o nome di file non valido
>
> Continua l'odissea
>
> Grazie Mille per la pazienza
Cerchiamo di tagliare parte del testo dei messaggi precedenti, specie quelli
non necessari; ok?
E' probabile che ti è rimasto aperto il canale al file #1, non chiuso (Close
#1) per un errore precedente; oppure, ma mi sembra strano, il file non
esiste/non creato...
Ciao.
--
Sergio MAZZA


text:
"Perego Roberto" <
pere...@tin.it
> ha scritto nel messaggio
news:f81Wd.618402$b5.28...@news3.tin.it...

TUTTO RISOLTO!!!
Il problema era nel percorso del file di log che era sbagliato.
Devo ringraziare Tantissimo Tutti Senza il vostro aiuto non sarei mai
riuscito a risolvere il problema.
GRAZIE MILLE
Roberto


title: Aggiornare ID in automatico

author: Paolo

text:
Visualizzo un form_Testa; con un pulsante apro la form_Righe filtrata dall'
IDTesta; Non riesco però ad aggiornare L'idTesta nei vari record della
FormRighe ho fatto dei tentativi con Recordset ma senza successo; come posso
superare l'ostacolo?
Spero di essere stato chiaro e Grazie a tutti quelli che vorranno aiutarmi!


title: Aggiornare ID in automatico

text:
"Paolo" <
paolo...@tiscalinet.it
> ha scritto nel messaggio
news:y6EU9.701$YG2....@twister1.libero.it...

No.
Che cos'è id testa? Che relazione concettuale c'è tra l'id testa e le righe.
Che intendi per aggiornare l'id?
Antonio


title: Casella di riepilogo modificare il campo di scelta

author: vf

text:
Ho una maschera per le varie stampe di un programmino. Con la funzione
"opzioni" gestisco le varie stampe, una di queste, opzioni, ha agganciato un
passaggio per la scelta, su due caselle di riepilogo (ognuna con una query)
dove vengono , sulla prima scelto l'anno di arrivo del documento e sulla la
seconda il tipo di documento.
Adesso vorrei poter inserire una opzione, sulla stessa maschera dove sia
possibile al posto, nella casella riepilogo, del tipo di documento far
comparire l'ufficio di competenza del documento. Cioe cambiare la query,
della seconda casella riepilogo, con la query dell'ufficio.
Grazie a chi potrŕ darmi una dritta
Valter


author: MA

text:
Il 06 Mag 2003, 06:23, "vf"
<
ma_chi_vuole_posta_indesid...@tin.it
> ha scritto:

> Grazie a chi potrà darmi una dritta
> Valter
Ci hai detto un pò pochino. Ci sono diversi modi in cui possa avvenire il
doppio filtro. In buona sostanza però su una copia del tuo db elimina il
vecchio 2° controllo, inserisci il controllo che ti serve (associato o meno,
questo non lo dici), che ha come origine dati la tabella (o un elenco valori
- neanche questo lo dici). Su enter di questo nuovo conrollo ci metti il
requery del controllo e modifichi la query del report con
forms!tuamaschera!tuonuovocontrollo.
Cerca d'essere + preciso x farti aiutare.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


text:
"vf" <
ma_chi_vuole_posta_indesid...@tin.it
> ha
scritto nel messaggio news:7NGta.82092$K35.2...@news2.tin.it...

> Grazie a chi potrà darmi una dritta
> Valter
Da codice è possibile modificare la proprietà rowsource della casella di
riepilogo assegnandogli il nome di una tabella, di una query salvata e una
stringa SQL valida.
Antonio


text:
"vf" <
ma_chi_vuole_posta_indesid...@tin.it
> ha
scritto nel messaggio news:7NGta.82092$K35.2...@news2.tin.it...

> Grazie a chi potrà darmi una dritta
> Valter
Innanzitutto Grazie  a "MA" e "Antonio Biso" per la cortesia di avermi
risposto
Il codice dove faccio le scelte è sotto riportato
La scelta del cambio di tipo tra tipo di documento e Ufficio la desidererei
farla nella casella di riepilogo nominata "tipo_documento" dove è impostata
la query di selezione. Il report puo restare il solito.
****************************
Sub StampaReport(PrintMode As Integer)
On Error GoTo Err_Anteprima_Click
    Dim strTrovaCategoria As String
    strTrovaCategoria = "[anno] =
Forms![M_STAMPA_TIPO_DOCUMENTO]!SelezionaCategoria And [tipo_documento] =
Forms![M_STAMPA_TIPO_DOCUMENTO]!scelta_documento"
    Select Case Me!ReportDaStampare
               Case 1
               'attualmente non in uso
               Case 2
                    If
IsNull(Forms![M_STAMPA_TIPO_DOCUMENTO]!SelezionaCategoria) Then
                            MsgBox "***********ATTENZIONE SELEZIONA UN
ANNO*********"
                       Else
                    If
IsNull(Forms![M_STAMPA_TIPO_DOCUMENTO]!Scelta_documento) Then
                            MsgBox "***********ATTENZIONE SELEZIONA UN TIPO
DI DOCUMENTO *********"
                    Else
                            DoCmd.OpenReport "R_POSTA", PrintMode, ,
strTrovaCategoria
                    End If
                    End If
        End Select
Esci_Anteprima_Click:
    Exit Sub
Err_Anteprima_Click:
    Resume Esci_Anteprima_Click
End Sub
***********************************
Private Sub ReportDaStampare_AfterUpdate()
 Const conR_POSTA = 2
    If Me!ReportDaStampare.Value = conR_POSTA Then
                Me!SelezionaCategoria.Enabled = True
        Else
                Me!SelezionaCategoria.Enabled = False
                Me!Scelta_documento.Enabled = False
    End If
  End Sub
*************************
Private Sub SelezionaCategoria_AfterUpdate()
    Me!Scelta_documento.Requery
    Me!Scelta_documento.Enabled = True
    Me!Scelta_documento.SetFocus
End Sub
************************
Private Sub Anteprima_Click()
    StampaReport acPreview
End Sub
******************
Private Sub Stampa_Click()
    StampaReport acNormal
End Sub
*********
Grazie dell'attenzione  Valter


title: Leggere e reimpostare la stampante specifica di un Report

text:
Ho bisogno di creare un elenco dei reports e delle relative stampanti
che sono configurate in modo specifico nel DataBase ADP.
Ho fatto qualche prova a leggere la stampante specifica (cioè non
quella predefinita di sistema), ma non riesco a leggerla in chiaro.
Allo stesso  modo, devo poter modificare la configurazione dei report,
attribuendo nuove stampanti.
Vorrei sapere anche se è possibile stabilire se il report ha una
stampante specifica o quella predefinita dal sistema.
Grazie.


author: Gaspare Calia

text:
[CUT]
Ciao,
per leggere (o scrivere...) le stampanti devi accedere al "win.ini" tramite
le api di windows -> prova a vedere sul sito comune  o quelli ad esso
collegati.
C'č qualche riga di codice da buttare giů...
Per legare un report ad una stampante (che io sappia) basta scegliere
imposta pagina con il report aperto e seguire la procedura.
Buona giornata :-)


text:
Io sto parlando della stampante settata in modo specifico nel Report.
Nel file Win.ini si trova la stampante di default.
Le modofiche o le letture da fare, devono essere fatte da codice.
Grazie


text:

www.sitocomune.com
6.66 Gestire la stampante predefinita del buon Carlo Costarella
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:

Come decisamente hai la versione attuale di Access puoi usare
l'oggetto Printer. Vedi:
www.donkarl.com/it
FAQ 5.1 Cambiare la stampante o le impostazioni stampante/pagina
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


text:
Grazie. Era quello che cercavo.
Visto che ci troviamo in tema di stampanti. Se volessi avere l'elenco
dei cassetti disponibili per una specifica stampante e/o i tipi di
carta gestiti, come potrei fare ?
Ciao.


title: Maschera e totali

author: Fabio

text:
Salve, sia la tabella Entrate che la tabella Uscite hanno un campo
Importo, logicamente del tipo valuta, Non essendoci alcuna relazione tra
le 2 tabelle, la creazione guidata di una maschera o di una query  non mi
aiuta nel creare una maschera che debba contenere i totali dei 2 campi,
come posso ottenere questo? Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Maschera e totali

author: Alessandro Baraldi

text:
"Fabio" <
fid...@katamail.com
> wrote in message
news:bgtk0s$hq2$
1...@news.newsland.it
> Salve, sia la tabella Entrate che la tabella Uscite hanno un campo
> Importo, logicamente del tipo valuta, Non essendoci alcuna relazione tra
> le 2 tabelle, la creazione guidata di una maschera o di una query  non mi
> aiuta nel creare una maschera che debba contenere i totali dei 2 campi,
> come posso ottenere questo? Grazie
Perchè hai creato 2 tabelle...???
Per complicarti la vita sicuramente.
Io gestisco entrate e uscite con una stessa tabella,
ma forse occorre capire meglio il tuo problema.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Maschera e totali

text:
Il problema l'hai centrato, mi sono complicato la vita! Purtroppo non
pensandoci ho creato una tabella clienti con i relativi pagamenti e una
tabella fornitori con la propria tabella pagamenti, e tutto filava liscio
fino alla mitica domanda" non si potrebbe ottenere i due totali e la
situazione di cassa?"
Ciao e grazie



title: Maschera e totali

author: ALESSANDRO Baraldi

text:
"Fabio" <
fid...@katamail.com
> ha scritto nel messaggio
news:bgtooj$k34$1...@news.newsland.it...
> Il problema l'hai centrato, mi sono complicato la vita! Purtroppo non
> pensandoci ho creato una tabella clienti con i relativi pagamenti e una
> tabella fornitori con la propria tabella pagamenti, e tutto filava liscio
> fino alla mitica domanda" non si potrebbe ottenere i due totali e la
> situazione di cassa?"
> Ciao e grazie
>
La base dei Database e proprio la Normalizzazione.
Se non usi i criteri adeguati non risolvi nulla.
Io ti consiglierei di rivedere la struttura del tuo DB
ti accorgerai come č semplice e flessibile la gestione.
Purtroppo non saprei come aiutarti dato il compromesso
di partenza.
@Alex.


title: Maschera e totali

author: Roberto dalla campagna

text:
Fabio <
fid...@katamail.com
> wrote in message
bgtooj$k34$1...@news.newsland.it...
> Il problema l'hai centrato, mi sono complicato la vita! Purtroppo non
> pensandoci ho creato una tabella clienti con i relativi pagamenti e una
> tabella fornitori con la propria tabella pagamenti, e tutto filava liscio
> fino alla mitica domanda" non si potrebbe ottenere i due totali e la
> situazione di cassa?"
> Ciao e grazie
>
Se ti servono i due totali (quello delle entrate e quello delle uscite)
ricavateli con due funzioni DSum (vedi help).
Se poi vuoi fondere i dati delle due tabelle, creati una query unione basata
sulle due tabelle; quando opererai su tale query sarà come se i dati delle
due tabelle siano contenuti in un'unica tabella.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Maschera e totali

text:
ALESSANDRO Baraldi ha scritto:
> Io ti consiglierei di rivedere la struttura del tuo DB
> ti accorgerai come è semplice e flessibile la gestione.
> Purtroppo non saprei come aiutarti dato il compromesso
> di partenza.
Chiedo venia! Credevo che avendo una tabella Soci e Pagamento soci, tra
loro relazionati, e una tabella Fornitori e Pagfornitori sempre
relazionato, fosse la via migliore. Non si finisce mai d'imparare
Comunque sempre 1000 grazie a tutti



title: Maschera e totali

text:
"Fabio" <
fid...@katamail.com
> ha scritto nel messaggio
news:bh01k0$dfb$1...@news.newsland.it...
> ALESSANDRO Baraldi ha scritto:
>
>
> > Io ti consiglierei di rivedere la struttura del tuo DB
> > ti accorgerai come è semplice e flessibile la gestione.
> > Purtroppo non saprei come aiutarti dato il compromesso
> > di partenza.
>
> Chiedo venia! Credevo che avendo una tabella Soci e Pagamento soci, tra
> loro relazionati, e una tabella Fornitori e Pagfornitori sempre
> relazionato, fosse la via migliore. Non si finisce mai d'imparare
>
> Comunque sempre 1000 grazie a tutti
>
In realtà non è sempre vero, la cosa va analizzata in base alle esigenze.
Nel tuo caso a meno di complessisimi Gestionali Finanziari di Aziende
credo possa essere meglio.
@Alex.


title: evento formattazione ed evento stampa in report danno risultati diversi

author: tmtube

text:
mi spiego meglio ho un report che visualizza degli articoli suddivisi per
categorie, ho messo del codice su evento formattazione per salvare la
categoria e la pagina e creare quindi un indice dell'elenco prodotti
in questo caso se apro il report e vado direttamente alla pagina 10 il db mi
crea un indice completo di tutte e 10 le pagine ma i dati contenuti non sono
corretti.

se invece metto quel codice su evento stampa del medesimo report i dati sono
"corretti" ma se vado direttamente alla pagina 10 mi crea solo i dati
dell'indice di quella pagina e non di tutte le pagine fino a 10
quindi per creare l'indice fino a   pagina 10 sono costretto a cliccare
sulle freccette sotto e scorrere una pagina per volta

esiste un modo con ciclo for per simulare la stampa di un certo numero di
pagine di un report senza per� stamparlo e riuscendo cosi a creare l'indice
completo fino a quella pagina?

altra domanda, perch� su formattazione e su stampa ottengo 2 risultati
diversi anche se il codice � lo stesso?

grazie a tutti.


title: API mciSendString

author: Sandro

text:
Buona serata a tutti,
sto testando questa API che consente di aprire e chiudere lo sportellino del
CD-ROM.
Cosa succede ?
che il DB di pianta sia con A03, richiedendomi di inviare l'errore alla MS,
che con il A00.
Se avete voglia di fare un test e verificare il BUG, ve ne sono grato.
Grazie per l'attezione ed ecco il codice, prelevato da un sito, non ricordo
quale :
Option Compare Database
Private Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long
Private Sub Comando0_Click()
retvalue = mciSendString("set CDAudio door open", _
returnstring, 127, 0)
End Sub
Private Sub Comando0_DblClick(Cancel As Integer)
retvalue = mciSendString("set CDAudio door closed", _
returnstring, 127, 0)
End Sub
Buona serata a tutti.
Sandro


title: API mciSendString

author: Gaspare

text:
[CUT]
Option Compare Database
Private Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long
Private Sub cmdApri_Click()
    Call mciSendString("Set CDAudio Door Open Wait", 0&, 0&, 0&)
End Sub
Private Sub cmdChiudi_Click()
      Call mciSendString("Set CDAudio Door Closed Wait", 0&, 0&, 0&)
End Sub
Ciao
Gaspare


title: API mciSendString

text:
Sandro perchè non usi Option Explicit....?
Ho letto l'SDK ma non mi pare ci sia molto da dire:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/htm/_win32_mcisendstring.asp
Nella tua chiamata c'è parecchio che non và:
1) returnstring deve essere un Buffer
    Dim returnstring as String*255
2) 127 che significa hai messo il numero al Lotto...?
    Questo dato è la lunghezza del Buffer della stringa
    precedente se non Nulla.
    quindi al limite andava 255 con la mia correzione.
L'Ultimo parametro è l'abilitazione al CallBack per la notifica,
lascia perdere questo è da gestire con WindowProc ed intercettare
il Notify.
Riassumendo:
mciSendString("open cdaudio alias cd1", 0&, 0, 0)
Prova così da me non si pianta, ma non funziona nemmeno...!
Il fatto che si pianta è dovuto al tipo di Esecuzione asincrona,
pertanto
cerca di eseguirla e solo al limite del TimeOut dovrebbe ritornare.
Non saprei aiutarti maggiormente per fallito funzionamento.
Ciao
@Alex


title: API mciSendString

text:
[CUT]
Ciao Alex,
io stacco che sono cotto di "caldo"  e nel cervello!
Buona serata a te e famiglia :-)


title: API mciSendString

text:
 [cut]
Ciao @Alex,
ma come l'ho prelevata da una tua demo !!!! :-).
Scherzi a parte ho appena iniziato a fare qualche esperimento con le API,
quindi credo che tu possa capire le difficoltà che si incontrano, visto che
le conosci decisamente bene.
Cerco di documentarmi con MSDN, ma capisco molto poco (ma vedrò di
approfondire un po' alla volta) e quando parli di WindowProc, esecuzione
asincrona,Call back e TIME OUT capisco ancora meno, da qui l'esigenze di
postare questa mia empasse.
Purtroppo ho provato a fare una ricerca per postare il link da cui ho tratto
quel codice, ma non l'ho trovato,(era un sito quotato, domani riprovo) e per
oggi dico stop.
Ho comunque risolto con la soluzione proposta da Gaspare.
Il lotto ? non sono molto fortunato, ma ci penserò :-)
Ciao, grazie, notte.


title: API mciSendString

text:
"Sandro" <
sandro_...@tin.it
> ha scritto nel messaggio
news:7yKme.1466563$35.54...@news4.tin.it...

ooops in extermis ecco il link :
http://www.mentalis.org/tips/tip026.shtml


title: API mciSendString

text:
"Sandro" <
sandro_...@tin.it
> ha scritto nel messaggio
news:KAKme.1466574$35.54...@news4.tin.it...

intendevo ... extremis, scusa.
ps. notte per davvero stavolta.


title: API mciSendString

text:
"Sandro" <
sandro_...@tin.it
> ha scritto nel messaggio
news:7yKme.1466563$35.54...@news4.tin.it...
> [cut]
> Ciao @Alex,
>
> ma come l'ho prelevata da una tua demo !!!! :-).
>
> Scherzi a parte ho appena iniziato a fare qualche esperimento con le API,
> quindi credo che tu possa capire le difficoltà che si incontrano, visto
che
> le conosci decisamente bene.
> Cerco di documentarmi con MSDN, ma capisco molto poco (ma vedrò di
> approfondire un po' alla volta) e quando parli di WindowProc, esecuzione
> asincrona,Call back e TIME OUT capisco ancora meno, da qui l'esigenze di
> postare questa mia empasse.
> Purtroppo ho provato a fare una ricerca per postare il link da cui ho
tratto
> quel codice, ma non l'ho trovato,(era un sito quotato, domani riprovo) e
per
> oggi dico stop.
> Ho comunque risolto con la soluzione proposta da Gaspare.
>
> Il lotto ? non sono molto fortunato, ma ci penserò :-)
>
> Ciao, grazie, notte.
La conoscenza di come lavorano le API è decisamente complessa,
ma complessi sono i riferimenti iniziali che spesso su SDK aiutano solo
a perdersi.
Poi quando si inizia a capire un pò di più si apprezza SDK.
Io devo ancora arrivarci...!
P.S. da me non funziona in nessun modo.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: API mciSendString

text:
Dai un'occhiata a questo Demo nel mio sito:
Sezione GENERAL
1.34 Classi ed Eventi Public di Classi
;-)



title: aprire maschera su record precedentemente selezionato

text:
Maschera TORD
Campo NUMORD
da Control Panel Iniziale ho una select box chiamata testo0 che filtra gli
ordini inseriti e premendo su un pulsante chiamato comando3 il sistema
dovrebbe aprirmi la maschera TORD posizionandosi nel record che abbia il
valore NUMORD selezionato in testo0
Questo è il codice utilizzato ... non funzica!
Se non seleziono mi segnala l'errore, altrimenti se seleziono ... va in
errore ... uffa!!!
Dov'è l'errore?
Grazie anticipatamente!!
On Error GoTo Err_Comando3_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "tord"
    stLinkCriteria = "[numord]=" & Me![testo0]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Comando3_Click:
    Exit Sub
Err_Comando3_Click:
    MsgBox "Selezionare un ordine prima!!!"
    Resume Exit_Comando3_Click
--
strano...mavero
la vita è un dono prezioso, apprezzala per quello che potrà offrirti
www.spammer.it


author: Pablitomf

text:
strano....mavero ha scritto:
>     Dim stDocName As String
>     Dim stLinkCriteria As String
>     stDocName = "tord"
>     stLinkCriteria = "[numord]=" & Me![testo0]
>     DoCmd.OpenForm stDocName, , , stLinkCriteria
Numord č un numero? testo0 č un numero?
stLinkCriteria = "[numord]= '" & Me![testo0]&"'"
PS.
Falle pure le autocomposizioni dei codici, ma comprendi anche che sono un
po prolisse... il tutto lo si puň riassumere cosě :
DoCmd.OpenForm "tord", , , "[numord]= '" & Me![testo0]&"'"
Fammi sapere
--
Pablitomf
Chi la dura la vince ;-)
Voglia di lavorar Saltame addosso, lavora babbo mio che io non posso.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"Pablitomf" <
pabl...@virgilio.it
> ha scritto nel messaggio
news:c7vh75$pnb$1...@news.newsland.it...
> strano....mavero ha scritto:
>
> >     Dim stDocName As String
> >     Dim stLinkCriteria As String
> >     stDocName = "tord"
> >     stLinkCriteria = "[numord]=" & Me![testo0]
> >     DoCmd.OpenForm stDocName, , , stLinkCriteria
>
>
> Numord è un numero? testo0 è un numero?
>
> stLinkCriteria = "[numord]= '" & Me![testo0]&"'"
>
> PS.
> Falle pure le autocomposizioni dei codici, ma comprendi anche che sono un
> po prolisse... il tutto lo si può riassumere così :
>
> DoCmd.OpenForm "tord", , , "[numord]= '" & Me![testo0]&"'"
>
> Fammi sapere
>
>
>
>
> --
> Pablitomf
>
> Chi la dura la vince ;-)
> Voglia di lavorar Saltame addosso, lavora babbo mio che io non posso.
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Funziona!
Porca miseria, 6 il mio personal access trainer!!!!!
Grazie !



text:
strano....mavero ha scritto:
> Funziona!
Temevi il contrario? Scherzo..., Funziona? meglio cosě.



text:
"strano....mavero" <
ma...@atbitrattinoelle.it
> ha scritto nel messaggio
news:c7vgjn$6if$1...@lacerta.tiscalinet.it...

Dopo tutto il tempo che frequenti il NG non hai ancora imparato ad
utilizzare le convenzioni per Chiamare i Controlli......!!!!!!!!!!!
Quì si che servirebbe un Cazziatone......alla BISO. ;-)
@Alex.


title: Allineamento del testo. Semplice?

author: Mary Giammarresi

text:
Ho inserito (per motivi che č troppo lungo spiegare) una casella di
riepilogo in un report. Ha una sola colonna. Per vedere il testo
centrato nella casella pensavo (Sigh!) fosse sufficiente indicare
"centrato" nella proprietą "allineamento". Non funziona!
Qualcuno sa dirmi perchč?
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Allineamento del testo. Semplice?

author: Alessandro

text:
"Mary Giammarresi" <
mary.gia...@neomedia.it
> wrote in message
news:ffad9107b994b5adde0...@mygate.mailgate.org
> Ho inserito (per motivi che è troppo lungo spiegare) una casella di
> riepilogo in un report. Ha una sola colonna. Per vedere il testo
> centrato nella casella pensavo (Sigh!) fosse sufficiente indicare
> "centrato" nella proprietà "allineamento". Non funziona!
> Qualcuno sa dirmi perchè?
Si, perchè la casella di riepilogo in TEORIA non è Formattabile.
Dico in teoria perchè in realtà si può, ma richiede una CARIOLATA,
in gergo EDILE senza toglire nulla alla categoria, di Funzioni
API.....!!!
Io troverei una soluzione alternativa....!!!
Trovi se potesse servirti qualcosa sul sito di Lebans, mi pare...!
E' linkato da
www.mvps.org
 sezione Access--->Link
Ciao.
Alessandro.



title: aggiornare il listino access da excel

text:
Salve a tutti
uso access per raccogliere tutti i listini dei miei fornitori, che
generalmente sono in formato excel
posso aggiornare da excel solo gli articoli di quel fornitore e lasciare
invariatti gli altri.
avevo pensato di copiarte i record in una tabella aggiornamento e poi
sincronizzarla con quella Listino ma la sincronizzazione mi cancella tutti i
dati vecchi e inserissce solo quelli nuovi.
Come posso fare?
Grazie a tutti
Giuseppe


title: aggiornare il listino access da excel

author: almorel

text:

Ciao, se aggiornare vuole dire sostituire i record attuali con i
nuovi,
non basta cancellare tutti i record del fornitore da listino e poi
importare i nuovi ?
O mi sfugge qualcosa ?
Ciao
Alberto


title: aggiornare il listino access da excel

author: Giuseppe Marchese

text:
il fatto e he vorrei sostituire solo gli articoli cambia il prezzo se
cancello e ri-incollo mi salta il collegamento a eventuali ordini o
preventivi dei clienti.
"almorel" <
alm...@gmail.com
> ha scritto nel messaggio
news:4ea6a75e-f279-4ae4...@35g2000yqa.googlegroups.com...



title: aggiornare il listino access da excel

text:
On 12 Gen, 15:28, "Giuseppe Marchese" <
lug...@alice.it
> wrote:
> il fatto e he vorrei sostituire solo gli articoli cambia il prezzo se
> cancello e ri-incollo mi salta il collegamento a eventuali ordini o
> preventivi dei clienti.
>
> "almorel" <
almo...@gmail.com
> ha scritto nel messaggionews:4ea6a75e-f279-4ae4...@35g2000yqa.googlegroups.com...
>
> > On 11 Gen, 16:22, "2MProf" <
i...@2mprof.it
> wrote:
> >> Salve a tutti
> >> uso access per raccogliere tutti i listini dei miei fornitori, che
> >> generalmente sono in formato excel
> >> posso aggiornare da excel solo gli articoli di quel fornitore e lasciare
> >> invariatti gli altri.
>
> >> avevo pensato di copiarte i record in una tabella aggiornamento e poi
> >> sincronizzarla con quella Listino ma la sincronizzazione mi cancella
> >> tutti i
> >> dati vecchi e inserissce solo quelli nuovi.
>
> >> Come posso fare?
>
> >> Grazie a tutti
> >> Giuseppe
>
> > Ciao, se aggiornare vuole dire sostituire i record attuali con i
> > nuovi,
> > non basta cancellare tutti i record del fornitore da listino e poi
> > importare i nuovi ?
> > O mi sfugge qualcosa ?
>
> > Ciao
> > Alberto
>
Ciao,
non puoi fare una query di aggiornamento (per il solo prezzo) legando
il tuo listino con il foglio di excel,
ed una di accodamento per eventuali codici aggiunti ?
Alberto


title: Pc senza Access

author: Maicol

text:
Esiste un modo per usare un database fatto con Access senza la presenza di
quest'ultimo nel computer ??? Grazie