title: Indirizzo IP e UserName

author: sib

text:
<
p.ant...@tno.it
> wrote in message
200006141708...@sirio.tno.it...
Ho la necessitą di creare una funzione che intercetti l'indirizzo IP e
lo UserName di un pc che č in rete.
C'č qualcuno che gentilmente puņ aiutarmi a risolvere questo
problema?
e che c'entra con access?
Se vuoi sapere chi sono gli utenti connessi a un db guardati il file .ldb
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Indirizzo IP e UserName

text:
Ho bisogno di intercettare automaticamente questi due dati ogni
qualvolta che un utente effettua una operazione di scrittura su un
database Access e poterli quindi inserire in un campo di una
tabella Access.



title: Indirizzo IP e UserName

author: Nicola Ardito

text:
Per quanto riguarda lo Username intendi quello di collegamento in rete
oppure al file MDW?
Per l'Ip credo che dovresti scrivere qualcosa del genere
Dim MioNome as string,MioIp as string
Carica
MioNome=myhostname
MioIp=Namelookup (mionome)
Poi in un modulo metti quanto scritto sotto (anche se credo che non tutto
quanto ti serva...)
Option Compare Database
Option Explicit
Private Type ICMPReqOpt
  TTL As Byte ' time-to-live
  tos As Byte ' type-of-service
  flags As Byte ' see below
  optsize As Byte ' length of options string
  options As String ' use empty string (haven't figured this yet)
End Type
Private Type ICMPEchoReply
  Address(1 To 4) As Byte ' address of system responding
  status As Long ' error code
  triptime As Long ' time in milliseconds
  datasize As Integer ' buffer size
  reserved As Integer ' not used
  replydata As String ' buffer returned
  ipoptions As ICMPReqOpt ' options structure
End Type
' ICMP API calls
Private Declare Function IcmpCreateFile Lib "ICMP.DLL" () As Long
Private Declare Function IcmpCloseHandle Lib "ICMP.DLL" _
  (ByVal lngHandle As Long) As Integer
Private Declare Function IcmpSendEcho Lib "ICMP.DLL" _
  (ByVal lngHandle As Long, ByVal lIP As Long, _
  strData As String, ByVal intDataLen As Integer, _
  usrOpt As ICMPReqOpt, bytBuff As Byte, _
  ByVal lngRepLen As Long, ByVal lTimeOut As Long) As Long
Private Declare Function IcmpGetLastError Lib "wsock32.dll" _
  Alias "WSAGetLastError" () As Long
' ICMP error codes
Private Const ICMP_SUCCESS = 0
Private Const ICMP_BUFFER_TOO_SMALL = 11001
Private Const ICMP_NET_UNREACHABLE = 11002
Private Const ICMP_HOST_UNREACHABLE = 11003
Private Const ICMP_DEST_PROT_UNREACHABLE = 11004
Private Const ICMP_DEST_PORT_UNREACHABLE = 11005
Private Const ICMP_NO_RESOURCES = 11006
Private Const ICMP_BAD_OPTION = 11007
Private Const ICMP_HW_ERROR = 11008
Private Const ICMP_PACKET_TOO_BIG = 11009
Private Const ICMP_REQ_TIMED_OUT = 11010
Private Const ICMP_BAD_REQ = 11011
Private Const ICMP_BAD_ROUTE = 11012
Private Const ICMP_TTL_EXPIRED_TRANSMIT = 11013
Private Const ICMP_TTL_EXPIRED_REASSEM = 11014
Private Const ICMP_PARAM_PROBLEM = 11015
Private Const ICMP_SOURCE_QUENCH = 11016
Private Const ICMP_OPTION_TOO_BIG = 11017
Private Const ICMP_BAD_DESTINATION = 11018
Private Const ICMP_ADDRESS_DELETED = 11019
Private Const ICMP_SPEC_MTU_CHANGE = 11020
Private Const ICMP_MTU_CHANGE = 11021
Private Const ICMP_UNLOAD = 11022
Private Const ICMP_GENERAL_FAILURE = 11050
Private Const ICMP_PENDING = 11255
' ICMP flags
Private Const ICMP_FLAG_NO_FRAGMENT = 2
' ICMP type-of-service options
Private Const ICMP_ECHO_REQUEST = 7
Private Const ICMP_END_OF_LIST = 0
Private Const ICMP_SECURITY = 1
Private Const ICMP_LOOSE_SOURCE_ROUTE = &H82
Private Const ICMP_STRICT_SOURCE_ROUTE = &H83
Private Const ICMP_RECORD_ROUTE = &H89
Private Const ICMP_TIMESTAMP = 7
Private Const ICMP_STREAM_id = &H44
Private Const ICMP_NOOP = &H88
' we also need some basic Winsock stuff
Private Const WSADescription_Len = 256
Private Const WSASYS_Status_Len = 128
Private Const AF_INET = 2
Private Type WSADATA
  wversion As Integer
  whighversion As Integer
  szDescription(0 To WSADescription_Len) As Byte
  szSystemStatus(0 To WSASYS_Status_Len) As Byte
  imaxsockets As Integer
  imaxudp As Integer
  lpszvenderinfo As Long
End Type
Private Declare Function gethostname Lib "wsock32.dll" _
  (ByVal hostname As String, ByVal nbytes As Long) As Long
Private Declare Function gethostbyname Lib "wsock32.dll" _
  (ByVal hostname As String) As Long
Private Declare Function gethostbyaddr Lib "wsock32.dll" _
  (haddr As Long, ByVal hnlen As Long, ByVal addrtype As Long) As Long
Private Declare Function WSAStartup Lib "wsock32.dll" _
  (ByVal VersionReq As Long, WSADataReturn As WSADATA) As Long
Private Declare Function WSACleanup Lib "wsock32.dll" () As Long
' and a way to copy memory directly...
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (xDest
As Any, xSource As Any, ByVal nbytes As Long)
Private Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" _
  (lpString As Any) As Long
' finally, we need a handle for ICMP
Private hICMP As Long
Private Function TextToIP(ByVal IPAddress As String) As Long
Dim x As Integer ' scratch
Dim iOctet As Integer ' octet value
Dim bytIP(1 To 4) As Byte ' temp IP storage
Dim lIP As Long ' IP value
Dim iDots As Integer ' count of dots found
lIP = 0
iOctet = 0
iDots = 0
For x = 1 To Len(IPAddress)
  If Mid$(IPAddress, x, 1) = "." Then
    iDots = iDots + 1
    If iDots > 3 Then Exit For ' bad format!
    bytIP(iDots) = iOctet
    iOctet = 0
  Else
    ' add digit but restrict to 8 bits
    iOctet = (iOctet * 10 + Val("0" & Mid$(IPAddress, x, 1))) And 255
  End If
Next 'x
bytIP(4) = iOctet ' save last one
CopyMemory lIP, bytIP(1), 4 ' copy to LONG value
TextToIP = lIP ' copy to return value
End Function
Private Function IPToText(ByVal IPAddress As String) As String
IPToText = CStr(Asc(IPAddress)) & "." & _
    CStr(Asc(Mid$(IPAddress, 2, 1))) & "." & _
    CStr(Asc(Mid$(IPAddress, 3, 1))) & "." & _
    CStr(Asc(Mid$(IPAddress, 4, 1)))
End Function
Private Function MyHostName() As String
Dim sTemp As String
Dim x As Long
sTemp = Space$(256)
x = gethostname(sTemp, Len(sTemp))
x = InStr(sTemp, vbNullChar)
If x > 0 Then sTemp = Left$(sTemp, x - 1)
MyHostName = sTemp
End Function
Function NameLookup(ByVal LookupName As String) As String
' routine to convert hostname to IP
' this routine actually gets all known aliases
' and IP addresses but only returns the first IP
Dim x As Long ' scratch
Dim nbytes As Long
Dim sTarget As String ' null-delimited hostname
Dim lHostent As Long ' address of hostent structure
Dim lHEName As Long ' address of name pointer
Dim lHEAlias As Long ' address of alias pointer
Dim lHEAddress As Long ' address of address pointer
Dim lIPPointer As Long ' address of IP address
Dim lAPointer As Long ' address of Alias
Dim iAliasCount As Long
Dim iAddressCount As Long
Dim sIP() As String
Dim sAlias() As String
Dim sAddress() As String
'default values
iAliasCount = 0
iAddressCount = 0
NameLookup = ""
' lookup by IP or name
If IsNumeric(Left$(LookupName, 1)) Then
  lHostent = gethostbyaddr(TextToIP(LookupName), 4, AF_INET)
Else
  sTarget = LookupName & vbNullChar
  lHostent = gethostbyname(sTarget) ' do actual winsock call
End If
If lHostent = 0 Then
  NameLookup = 0
  Exit Function ' failed!
End If
lHEName = lHostent ' set pointer addresses
lHEAlias = lHostent + 4
lHEAddress = lHostent + 12
' convert addresses of pointers to the pointers...
CopyMemory lHEName, ByVal lHEName, 4
CopyMemory lHEAlias, ByVal lHEAlias, 4
CopyMemory lHEAddress, ByVal lHEAddress, 4
' Get resolved hostname
nbytes = lstrlen(ByVal lHEName)
If nbytes > 0 Then
  LookupName = Space$(nbytes)
  CopyMemory ByVal LookupName, ByVal lHEName, nbytes
End If
' get all IP addresses
CopyMemory lIPPointer, ByVal lHEAddress, 4
Do While lIPPointer ' end-of-list is null pointer
  ReDim Preserve sAddress(iAddressCount + 1)
  sAddress(iAddressCount) = Space$(4)
  CopyMemory ByVal sAddress(iAddressCount), ByVal lIPPointer, 4
  CopyMemory ByVal lHEAddress, 0&, 4 ' null for next call
  iAddressCount = iAddressCount + 1
  ' move to next IP
  lHEAddress = lHEAddress + 4
  CopyMemory lIPPointer, ByVal lHEAddress, 4
Loop
' get any/all aliases
CopyMemory lAPointer, ByVal lHEAlias, 4
Do While lAPointer ' end-of-list is a null
  ReDim Preserve sAlias(iAliasCount + 1)
  nbytes = lstrlen(ByVal lAPointer)
  sAlias(iAliasCount) = Space$(nbytes)
  CopyMemory ByVal sAlias(iAliasCount), ByVal lAPointer, nbytes
  CopyMemory ByVal lHEAlias, 0&, 4
  iAliasCount = iAliasCount + 1
  ' move to next IP
  lHEAlias = lHEAlias + 4
  CopyMemory lAPointer, ByVal lHEAlias, 4
Loop
If iAddressCount > 0 Then
  ' success
  NameLookup = IPToText(sAddress(0))
Else
  NameLookup = "" ' weird!
End If
End Function
Private Sub Resolve(txtip)
Dim LookupName As String
Dim sIP As String
LookupName = txtip
sIP = NameLookup(LookupName)
txtip = sIP
End Sub
Function PING(txtip, txtTimeToLive, txtTimeOut) As Boolean
Dim lAddress As Long ' IP address to ping
Dim lTimeOut As Long ' Timeout in milliseconds
Dim udtIRO As ICMPReqOpt ' ICMP Request Options
Dim udtIER As ICMPEchoReply ' ICMP Response
Dim bytResponse(1 To 4096) As Byte ' response buffer
Dim x As Long ' scratch
PING = True
' convert IP Address
lAddress = TextToIP(Trim$(txtip))
' build request packet
udtIRO.TTL = Val("0" & txtTimeToLive)
udtIRO.tos = ICMP_ECHO_REQUEST ' we want a simple PING
udtIRO.options = "" ' no options...
udtIRO.optsize = Len(udtIRO.options)
udtIRO.flags = ICMP_FLAG_NO_FRAGMENT
' do it
lTimeOut = Val("0" & txtTimeOut)
x = IcmpSendEcho(hICMP, lAddress, Space$(32), 32, _
  udtIRO, bytResponse(1), UBound(bytResponse), _
  lTimeOut)
If x = 0 Then
  ' call failed
  'lblAddress.Caption = "ICMP ERROR"
  'MsgBox CStr(IcmpGetLastError())
  PING = False
Else
  ' copy buffer to structure to make it easier
    PING = True
End If
End Function
Public Sub Carica()
Dim udtWSAData As WSADATA
If WSAStartup(257, udtWSAData) <> 0 Then
  MsgBox "Unable to initialize Winsock", vbOKOnly, "Winsock Error"
 ' Unload Me
  Exit Sub
End If
hICMP = IcmpCreateFile()
If hICMP = 0 Then
  MsgBox "Unable to initialize ICMP", vbOKOnly, "ICMP Error"
  'Unload Me
  Exit Sub
End If
'txtIp.Text = MyHostName
End Sub
Ciao Nicola
p.ant...@tno.it
 ha scritto nel messaggio
<
200006150852...@sirio.tno.it
>...



title: Indirizzo IP e UserName

author: livio

text:
Io vorrei sapere una cosa simile...
Come si fa a far rilevare da Access l'indirizzo IP utilizzato dal
computer su cui sta girando (supposto che sia già connesso
ad Internet) per magari visualizzarlo in una casella di testo?
sib ha scritto nel messaggio
<8dT15.196765$
VM3.1...@news.infostrada.it
>...



title: Bug nel Calcolo Codice Fiscale 6.74 di sitocomune

author: gnews

text:
Siccome voglio aggiungere la funzionalità del calcolo codice fiscale nel mio
programma, ho fatto una ricerca sul sitocomune ed ho trovato un intressante
programmino, 6.74 del Sitocomune.
Nella versione scaricabile dal sito eseguita in modalità Access 97 tutto
funziona bene.
Convertendo il database nella versione Access 2000 ho riscontrato un bug,
compilando tutti i campi ed inserendo infine la città di nascita ho visto
che se inserisco un comune con l'apostrofo, ad esempio "Sant'Elpidio a
Mare", quando scrivo l'apostrofo compare una msgbox che mi dice che il
comune non è in elenco. In realtà il comune è in elenco ed eseguendolo in
modalità Access 97 tutto funziona correttamente.
Qualcuno di voi riuscirebbe a migliorare il codice per risolvere questo
problema? Io ci ho provato, per adesso non sono arrivato a nessuna
soluzione.
Grazie in anticipo per le risposte.
Ciao!


author: Gaspare

text:
"gnews" <
gnewsR...@katamail.com
> ha scritto nel messaggio
news:GQmeh.17659$P04....@tornado.fastwebnet.it...

Ciao,
può darsi che sia causato dall'apice che viene letto come interruzione di
stringa sql: prova un pò a raddoppiare gli apici ed usando la funzione
Replace nomecitta=Replace (nomecitta,"'","''")...vedi se funge
Gaspare


text:
> Ciao,
> può darsi che sia causato dall'apice che viene letto come interruzione di
> stringa sql: prova un pò a raddoppiare gli apici ed usando la funzione
> Replace nomecitta=Replace (nomecitta,"'","''")...vedi se funge
Spero di aver fatto le modifiche giuste però per adesso non sono riuscito a
farlo funzionare.
Domani mattina quando sarò più lucido e riposato potrò anche combinare
qualcosa di buono.
Altre idee?
Ciao!


author: eSQueL

text:
"gnews" <
gnewsR...@katamail.com
> ha scritto nel messaggio
news:GQmeh.17659$P04....@tornado.fastwebnet.it...

E' vero. Ma ho notato che se, invece di digitare il nome, incolli l'intera
stringa SANT'ELPIDIO A MARE non dà alcun errore. Per quel che visto io, il
problema forse è dato dal carattere "'" sull'evento txtComune_Change e
dall'istruzione
     COMUNI1.Seek ">=", T 'dove T = "SANT'"
sembra che il record non sia trovato, tanto che la
      If UCase(T) = UCase(Mid(COMUNI1!COMU_DESCR, 1, Len(T))) Then
genera l'errore.
eSQueL


text:
> E' vero. Ma ho notato che se, invece di digitare il nome, incolli l'intera
> stringa SANT'ELPIDIO A MARE non dà alcun errore. Per quel che visto io, il
> problema forse è dato dal carattere "'" sull'evento txtComune_Change e
> dall'istruzione
>
>     COMUNI1.Seek ">=", T 'dove T = "SANT'"
>
> sembra che il record non sia trovato, tanto che la
>
>      If UCase(T) = UCase(Mid(COMUNI1!COMU_DESCR, 1, Len(T))) Then
>
> genera l'errore.
>
> eSQueL
Da quello che sono riuscito a capire il problema è il metodo Seek ma non so
con cosa sostituirlo senza stravolgere troppo il codice, qualcuno di voi
riuscirebbe a darmi una mano? Magari possiamo poi postare la modifica sul
sitocomune.
Grazie


author: Alessandro Baraldi

text:
gnews ha scritto:

Se usi il metodo SEEK su LinkedTable il problema è quello...!
Nel Demo del SC le tabelle sono in Locale quindi tutto OK, in questo
caso il BUG non è
del Demo in questione, ma tuo che come utente passivo può accadere.
Verifica se quanto ti ho detto corrisponde alla tua situazione, nel
caso si può usare SEEK solo
aprendo una connessione ODBC diretta con il BE.
@Alex


text:
Se usi il metodo SEEK su LinkedTable il problema è quello...!
Nel Demo del SC le tabelle sono in Locale quindi tutto OK, in questo
caso il BUG non è
del Demo in questione, ma tuo che come utente passivo può accadere.
Verifica se quanto ti ho detto corrisponde alla tua situazione, nel
caso si può usare SEEK solo
aprendo una connessione ODBC diretta con il BE.
@Alex
La tabella non è linkata, ma residente (almeno nel mio caso). Ma, in caso di
tabella linkata, il problema non dovrebbe presentarsi sempre e non solo
quando nella stringa c'è un apice? Magari mi sbaglio io :|
Ciao
eSQueL


author: Bruno Campanini

text:
"gnews" <
gnewsR...@katamail.com
> wrote in message
news:8BVeh.19181$P04....@tornado.fastwebnet.it...
> Da quello che sono riuscito a capire il problema è il metodo Seek ma non
> so con cosa sostituirlo senza stravolgere troppo il codice, qualcuno di
> voi riuscirebbe a darmi una mano? Magari possiamo poi postare la modifica
> sul sitocomune.
> Grazie
Per farla breve, sposta tutto il codice da On Change a After Update.
Bruno


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:457c33ab$0$16155$4faf...@reader3.news.tin.it...

Non funge.


text:
"eSQueL" <
eSQ...@virgilio.it
> wrote in message
news:457c350e$0$19090$4faf...@reader4.news.tin.it...

Da me funziona..
Credo sia una questione di grammatica...
Bruno


text:
> >
> > Non funge.
>
> Da me funziona..
> Credo sia una questione di grammatica...
>
> Bruno
>
Se con grammatica intendi sintassi, non ho fatto altro che tagliare il corpo
della sub e incollarlo nell'evento After_Update (forse non basta, non so).
Else ... no flame, no stress  :)
Ciao.
eSQueL


text:
eSQueL ha scritto:
[CUT]
> La tabella non è linkata, ma residente (almeno nel mio caso). Ma, in caso di
> tabella linkata, il problema non dovrebbe presentarsi sempre e non solo
> quando nella stringa c'è un apice? Magari mi sbaglio io :|
>
> Ciao
>
> eSQueL
Si sbagli, il metodo Seek non funziona, ripeto NON FUNZIONA con le
Linked Table, per
questo facevo riferimento all'uso di ODBC per aprire un RS diretto sul
DB(Remoto) in quel
modo funziona.
@Alex


text:
> Da me funziona..
> Credo sia una questione di grammatica...
>
> Bruno
Si, anche da me ma non è proprio il funzionamento originale. Nel senso che
prima ad ogni lettera inserita veniva aggiornata la città con quelle pescate
dal database, adesso l'aggiornamento avviene solo quando esco dalla casella
di testo, non è proprio la stessa cosa. Il problema rimane sempre
quell'apice che non viene visto.
Ciao


author: Carlo Costarella

text:
"gnews" <
gnewsR...@katamail.com
> ha scritto nel messaggio
news:GQmeh.17659$P04....@tornado.fastwebnet.it...

 Ho messo in linea il db in formato AXP (2002) con le opportune correzioni.
Può essere liberamente scaricato da qui:
http://www.frantoiogestione.com/CodFiscXP.zip
Prego Roberto, se lo ritiene opportuno, di volerlo inserire nel sitocomune.
In pratica ho tolto un po' di robetta e sostituito la casella di testo dei
comuni con una combobox che dava problemi nella versione corvertita (2000 o
2002).
Eliminato anche il Seek.
Ora funziona alla grande.
Ciao, Carlo


text:
"gnews" <
gnewsR...@katamail.com
> ha scritto nel messaggio
news:B2Zeh.19571$P04....@tornado.fastwebnet.it...

Leggiti la mia risposta che ho messo in linea il db aggiornato.
Ciao, Carlo


text:
> Ho messo in linea il db in formato AXP (2002) con le opportune correzioni.
> Può essere liberamente scaricato da qui:
>
http://www.frantoiogestione.com/CodFiscXP.zip
>
> Prego Roberto, se lo ritiene opportuno, di volerlo inserire nel
> sitocomune.
>
> In pratica ho tolto un po' di robetta e sostituito la casella di testo dei
> comuni con una combobox che dava problemi nella versione corvertita (2000
> o 2002).
> Eliminato anche il Seek.
> Ora funziona alla grande.
>
> Ciao, Carlo
In effetti, funziona egregiamente.
Tnx :)
Ciao.
eSQueL


text:
> Leggiti la mia risposta che ho messo in linea il db aggiornato.
>
> Ciao, Carlo
Si, l'ho provato e funziona proprio alla grande! Lo sto già integrando nel
mio programma.
Grazie!!


text:
"eSQueL" <
eSQ...@libero.it
> wrote in message
news:jwXeh.75403$Fk1.2...@twister2.libero.it...

No, la grammatica si riferiva a "funge"...
Per il resto con la semplice operazione di trasferire il
codice da On Change ad After Update da me (A2003)
funziona perfettamente, naturalmente non più in modalità
On Change bensì in quella After Update; e questo è più
che ovvio.
Bruno


text:
"gnews" <
gnewsR...@katamail.com
> wrote in message
news:B2Zeh.19571$P04....@tornado.fastwebnet.it...
>> Da me funziona..
>> Credo sia una questione di grammatica...
>>
>> Bruno
>
> Si, anche da me ma non è proprio il funzionamento originale.
[...]
Bella scoperta!
Pensavi che il funzionamento del codice After Update fosse
uguale a quello On Change?
Avevo ben premesso "per farla breve", ché per farla invece
come si deve ha provveduto mi pare egregiamente l'Autore.
Bruno


text:
> Bella scoperta!
> Pensavi che il funzionamento del codice After Update fosse
> uguale a quello On Change?
>
> Avevo ben premesso "per farla breve", ché per farla invece
> come si deve ha provveduto mi pare egregiamente l'Autore.
>
> Bruno
Scusami se quello che ho scritto poteva sembrare una polemica, non era
affatto mia intenzione.
Si, devo dire che la soluzione di Carlo è davvero buona, ha anche snellito e
semplificato il codice.
Ciao!


text:
"Carlo Costarella" <
carloco...@libero.it
> wrote in message
news:elj8s0$bd1$1...@tdi.cu.mi.it...
> Ho messo in linea il db in formato AXP (2002) con le opportune correzioni.
> Può essere liberamente scaricato da qui:
>
http://www.frantoiogestione.com/CodFiscXP.zip
>
> Prego Roberto, se lo ritiene opportuno, di volerlo inserire nel
> sitocomune.
>
> In pratica ho tolto un po' di robetta e sostituito la casella di testo dei
> comuni con una combobox che dava problemi nella versione corvertita (2000
> o 2002).
> Eliminato anche il Seek.
> Ora funziona alla grande.
Già che ci sei spazza via anche i residui del Recordset COMUNI:
nella versione attuale non servono più.
Ciao
Bruno


text:
> No, la grammatica si riferiva a "funge"...
> Per il resto con la semplice operazione di trasferire il
> codice da On Change ad After Update da me (A2003)
> funziona perfettamente, naturalmente non più in modalità
> On Change bensì in quella After Update; e questo è più
> che ovvio.
>
> Bruno
Perdonerai, ma "funge" è il presente (terza persona singolare) dell'infinito
fungere che, in senso di operare, fare, adempiere, esercitare è usato
tranqullamente in luogo di funzionare :)
Ciao.
eSQueL


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:457d9c22$0$16141$4faf...@reader3.news.tin.it...
cut
>> In pratica ho tolto un po' di robetta e sostituito la casella di testo
>> dei comuni con una combobox che dava problemi nella versione corvertita
>> (2000 o 2002).
>> Eliminato anche il Seek.
>> Ora funziona alla grande.
>
> Già che ci sei spazza via anche i residui del Recordset COMUNI:
> nella versione attuale non servono più.
>
> Ciao
> Bruno
Ovviamente è stato fatto insieme a tanta altra robetta valida per la
versione 97 e nemmeno!
Piuttosto consiglierei di aggiornare i comuni anche se quelli presenti sono
validi al 98%.
Ciao, Carlo


text:
"eSQueL" <
eSQ...@virgilio.it
> wrote in message
news:457e628f$0$19092$4faf...@reader4.news.tin.it...
> Perdonerai, ma "funge" č il presente (terza persona singolare)
> dell'infinito fungere che, in senso di operare, fare, adempiere,
> esercitare č usato tranqullamente in luogo di funzionare :)
Ne avevo perfettamente inteso il senso.
Gli č che son troppo attento ai canoni estetici e strutturali della nostra
lingua per passare sopra senza commenti alle piů assurde
contaminazioni.
Bruno


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:457e6e14$0$22397$4faf...@reader2.news.tin.it...
> "eSQueL" <
eSQ...@virgilio.it
> wrote in message
> news:457e628f$0$19092$4faf...@reader4.news.tin.it...
>
>> Perdonerai, ma "funge" è il presente (terza persona singolare)
>> dell'infinito fungere che, in senso di operare, fare, adempiere,
>> esercitare è usato tranqullamente in luogo di funzionare :)
>
> Ne avevo perfettamente inteso il senso.
> Gli è che son troppo attento ai canoni estetici e strutturali della nostra
> lingua per passare sopra senza commenti alle più assurde
> contaminazioni.
>
> Bruno
>
E' interessante codesto tuo modo d'intendere un normale (e piuttosto
elegante) uso della lingua come "assurda contaminazione". Mi parla di una
mente forse un tantino rigida, forse tendenzialmente conservatrice rispetto
ad uno strumento, il linguaggio, in costante evoluzione.
Ma dimmi, il tuo profondo estetismo non fa nessuna fatica, non sperimenta
alcuna sottile sofferenza nello scrivere ciò che segue?
"Per il resto con la semplice operazione di trasferire il
codice da On Change ad After Update da me (A2003)
funziona perfettamente, naturalmente non più in modalità
On Change bensì in quella After Update; e questo è più
che ovvio."
Infine, è sin troppo evidente che, in fatto di linguaggio contaminato, hai
ben poco d'apprendere. Insomma, perché "On Change" e "After Update" in luogo
di "su modifica" e "dopo aggiornamento"? :))
Per non parlare di cadute di stile quali "... ;e questo è più che ovvio",
nonché dell'intera architettura del periodo (un tantino approssimata), così
come della punteggiatura diremmo ... casuale.
Mi torna alla mente la parabola della pagliuzza e della trave (posto che, in
ogni caso, non ritengo affatto un errore né, tantomeno, un abominio, l'uso
di "funge" in luogo di "funziona").
Ciao.
eSQueL


text:
"eSQueL" <
eSQ...@virgilio.it
> wrote in message
news:457e784e$0$19091$4faf...@reader4.news.tin.it...
> E' interessante codesto tuo modo d'intendere un normale (e piuttosto
> elegante) uso della lingua come "assurda contaminazione". Mi parla di una
> mente forse un tantino rigida, forse tendenzialmente conservatrice
> rispetto ad uno strumento, il linguaggio, in costante evoluzione.
> Ma dimmi, il tuo profondo estetismo non fa nessuna fatica, non sperimenta
> alcuna sottile sofferenza nello scrivere ciň che segue?
>
> "Per il resto con la semplice operazione di trasferire il
> codice da On Change ad After Update da me (A2003)
> funziona perfettamente, naturalmente non piů in modalitŕ
> On Change bensě in quella After Update; e questo č piů
> che ovvio."
>
> Infine, č sin troppo evidente che, in fatto di linguaggio contaminato, hai
> ben poco d'apprendere. Insomma, perché "On Change" e "After Update" in
> luogo di "su modifica" e "dopo aggiornamento"? :))
Perché io uso la versione inglese di Access e gli eventi in questione sono
esattamente definiti come li ho scritti.
Poi come fai a definire "contaminazione" l'uso corretto di termini
espressi in un'altra lingua? Fra l'altro nella lingua originale dalla
quale sono derivati "su modifica" e "dopo aggiornamento"?
Sě, forse in senso lato č anch'essa contaminazione, ma io ho parlato di
"assurda contaminazione" del tipo di "funge o funzia" per "funziona".
> Per non parlare di cadute di stile quali "... ;e questo č piů che ovvio",
> nonché dell'intera architettura del periodo (un tantino approssimata),
> cosě come della punteggiatura diremmo ... casuale.
Beh, qui siamo negli apprezzamenti stilistici, per loro natura personalmente
variabili: dipendendo dal grado di cultura, dalle consuetudini espressive,
dal modo di sentire e di interpretare le costruzioni formali del linguaggio.
In pratica dovresti parlare di cadute di stile solo in presenza di errori
sintattico-grammaticali o di esposizioni gratuitamente volgari.
Né gli uni né le altre mi pare possano rilevarsi in quel che ho scritto.
Se cosě non fosse dovresti essere piů esplicito nelle tue eccezioni.
> Mi torna alla mente la parabola della pagliuzza e della trave (posto che,
> in ogni caso, "non ritengo affatto un errore né, tantomeno, un abominio,
> l'uso di "funge" in luogo di "funziona").
La pagliuzza e la trave te le potevi anche risparmiare... roba da Google!
La frase:
<< (posto che, in ogni caso, "non ritengo affatto un errore né, tantomeno,
un abominio, l'uso di "funge" in luogo di "funziona"). >>
la vado a pubblicare in it.cultura.linguistica.italiano.
Sono curioso di sentire il parere di quegli Illustri.
Bruno


text:
Pubblica quel che ti pare. Siamo in un paese libero, di talché ciascuno è
libero d'incaponirsi come e quanto crede su qualunque stupidaggine lo faccia
sentir meglio.
Addio :)
eSQueL


title: FORMATTAZIONE CAMPO TESTO SU QUERY ACCESS 2021

author: Leonardo Esposito

text:
Buongiorno a tutti,
ho necessità di formattare un campo testo su una query;
il campo "PRODOTTO" deve essere formattato con allineamento a sinistra e
di dimensione deve diventare 30 (la dimensione campo della tabella è di 80).
Grazie mille!


title: eliminare un file solo se esiste

author: Arold

text:
eseguire kill(file) dopo aver controllato se esiste altrimenti no.
sapete aiutarmi?


title: eliminare un file solo se esiste

author: Ivan

text:
"Arold" <
simb...@libero.it
> ha scritto nel messaggio
news:bi8a82$fsr$2...@lacerta.tiscalinet.it...
> eseguire kill(file) dopo aver controllato se esiste altrimenti no.
>
> sapete aiutarmi?
>
>
io ho risolto cosě :
'   nella sezione GENERALE  di un qualsiasi modulo:
Global Const gstrDirIni = "QUI CI DEVI METTERE UN PERCORSO
PREDEFINITO\SEC'E'"
'   tipo : "C:\Documents and Settings\Ivan
Benedetti\Documenti\Immagini\Attori\"
'  la funzione da chiamare
Public Function fgbooEsisteFile(strFile As String) As Boolean
    fgbooEsisteFile = False
    If dir(gstrDirIni & strFile) <> "" Then fgbooEsisteFile = True
End Function
' .... e dove ti serve : la chiamata
IF fgbooEsisteFile("NOME DEL MIO FILE.ESTENSIONE") THEN
    KILL gstrDirIni & "NOME DEL MIO FILE.ESTENSIONE"
ELSE
    MSGBOX "MESSAGGIO DI ERRORE : IL FILE NON ESISTE"
END IF
.... o qualcosa del genere
Guarda anche la guida alla voce DIR
ivan


title: eliminare un file solo se esiste

author: AEOM

text:
"Arold" <
simb...@libero.it
> ha scritto nel messaggio
news:bi8a82$fsr$2...@lacerta.tiscalinet.it...
> eseguire kill(file) dopo aver controllato se esiste altrimenti no.
>
> sapete aiutarmi?
>
>
usa la funzione dir()
es devi eliminare c:\pippo.txt
if dir(c:\pippo.txt)="pippo.txt" then
    kill (c:\pippo.txt)
endif
ciao, AEOM


title: Maschere e sottomaschere

author: Mastrobuoni Mauro

text:
Ciao,
in una maschera che rappresenta le caratteristiche di alcuni pezzi sono
contenute tre sottomaschere di cui una è subordinata alle altre due.
Mi spiego:
nella sottomaschera1 inserisco la data ed i pezzi acquistati;
nella sottomaschera2 inserisco la data ed i pezzi venduti;
nella sottomaschera3 mi viene visualizzato il saldo dei pezzi in magazzino.
Il problema è questo:
quando apro la maschera principale e vado ad inserire un dato nella
sottomaschera1 o 2 non vengono aggiornati i dati nella sottomaschera3.
L'aggiornamento avviene solamente se chiudo e riapro la maschera. Ho provato
a fare alcune prove con una macro in cui do il comando d'aggiornare la
maschera 3, ma mi viene dato errore perché mi viene indicato che non è
aperta...
Come posso risolvere il problema???
Ringrazio d'anticipo
Ciao
Mauro


title: Maschere e sottomaschere

author: Paolo P

text:
"Mastrobuoni Mauro" <
mas...@tin.it
> ha scritto nel messaggio
news:ahjus5$318$1...@serv1.albacom.net...

Forse hai fatto riferimento alla subform come se fosse una form principale.
Se la maschera principale si chiama Form e la sottomaschera SubForm, per
aggiornare la sottomaschera dovresti scrivere (sull'evento dopo
aggiornamento di subform 1 e 2)
forms!Form!SubForm.requery
Dovrebbe andare
Paolo


title: Ole-db  o ODBC

text:
Con il passaggio ad Access 2007 ho notato un ritardo nelle connessioni
ai db di Sql sia da Xp che da Vista o da W7 a 32 o 64. Leggendo sui
vari post ho appreso del collegamento Ole-Db
da quello che ho letto è preferibile a ODBC. Ho problemi nel collegare
le tabelle ho sostituito la stringa di connessione da :
stringa="ODBC;Driver={SQL Server};Server=" & Server & ";Database=" &
Database & ";Uid=" & Utent & ";Pwd=" & psw & ";LANGUAGE=Italiano"
a:
stringa="Provider=SQLOLEDB; Data Source=" & Server & "; DATABASE=" &
Database & "; User Id=" & Utent & "; Password=" & psw
ma non riesco a connetere le tabelle potete aiutarmi ?


title: Ole-db  o ODBC

text:
Arta_Sas ha scritto:
>Con il passaggio ad Access 2007 ho notato un ritardo nelle connessioni
>ai db di Sql sia da Xp che da Vista o da W7 a 32 o 64. Leggendo sui
>vari post ho appreso del collegamento Ole-Db
>da quello che ho letto =E8 preferibile a ODBC. Ho problemi nel collegare
>le tabelle ho sostituito la stringa di connessione da :
>stringa=3D"ODBC;Driver=3D{SQL Server};Server=3D" & Server & ";Database=3D" =
>&
>Database & ";Uid=3D" & Utent & ";Pwd=3D" & psw & ";LANGUAGE=3DItaliano"
>
>a:
>stringa=3D"Provider=3DSQLOLEDB; Data Source=3D" & Server & "; DATABASE=3D" =
>&
>Database & "; User Id=3D" & Utent & "; Password=3D" & psw
>
>ma non riesco a connetere le tabelle potete aiutarmi ?
Io non ho avuto problemi a dialogare con SQL Express 2008 su XP, Vista, Seven
(32 e 64 bit) usando Access 2003 e il runtime 2007 (tranne in un UNICO caso,
su un portatile con XP, SQL 2008 e A2003 dove mi negozia per ogni tabella 30
sec....e nn ne sono ancora uscito...) tramite ODBC...anzi mi pare proprio che
mamma M$ consigli questa al posto dell'OLE-DB......
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: Ole-db  o ODBC

text:

Un ingegnere che la vora da mamma MS e mi ha assolutissimamente di
fare le connessioni con Ole-DB molto + veloci ma non ci riesco


title: PROBLEMA DIFFICILE, CHI MI DA UNA MANO

author: LUCA

text:
E' difficile pure spiegare ma proverň.
Ho una sottomaschera su una
struttura a schede e da una casella di testo che si trova sulla
sottomaschera faccio un evento clic scrivendo un codice
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Private Sub
COD_MASTRO_Click()
'Variabili
'****************************************************************************************************
Dim DB As Database
Dim Tabella As Recordset
Set DB = CurrentDb
'Corpo
'****************************************************************************************************
Forms![Inserimento Modifica Macrovariabili]!SEGNO_E.Locked = False
Set
Tabella = DB.OpenRecordset("GRIGLIA_ANA_PIANO_CONTI_MACROVARIABILI",
dbOpenDynaset)
Tabella.FindFirst ("COD_PARTITARIO = '" & Me!COD_PARTITARIO
& "' AND COD_MASTRO ='" & Me!COD_MASTRO & "' AND COD_MACROVARIABILE =" &
"'" & Forms![Inserimento Modifica Macrovariabili]!COD_MACROVARIABILE_E & "'
AND COD_REPORT = " & "'" & Forms![Inserimento Modifica
Macrovariabili]!COD_REPORT_E & "'")
'Stop
    Forms![Inserimento
Modifica Macrovariabili]!COD_MASTRO_E = Tabella!COD_MASTRO
Forms![Inserimento Modifica Macrovariabili]!COD_PARTITARIO_E =
Tabella!COD_PARTITARIO
    Forms![Inserimento Modifica
Macrovariabili]!DESCRIZIONE_E = Tabella!DESCRIZIONE
    Forms![Inserimento
Modifica Macrovariabili]!SEGNO_E = Tabella!SEGNO

End Sub
@@@@@@@@@@@@@@@@@@@@@@@@@@@@
che mi va a leggere un'altra casella di
testo
che si trova fuori dalla sottomaschera.
Il problema č che non
riesco a
leggere le variabili COD_MACROVARIABILE_E e COD_REPORT_E
Tabella.FindFirst ("COD_PARTITARIO = '" & Me!COD_PARTITARIO
& "' AND
COD_MASTRO ='" & Me!COD_MASTRO & "' AND COD_MACROVARIABILE =" &
"'" &
Forms![Inserimento Modifica Macrovariabili]!COD_MACROVARIABILE_E & "'
AND
COD_REPORT = " & "'" & Forms![Inserimento Modifica
Macrovariabili]!COD_REPORT_E & "'")
Come posso risolvere
questo
problema
Vi ringrazio
Ciao
amici
--------------------------------
Inviato via
http://usenet.iol.it


title: Report-maschera

author: cerco

text:
Ciao!
Ho una difficoltà con Access, premetto che non sono un esperto.
In pratica ho una tabella con vari campi, vorrei stampare un report
che applicasse un filtro all'avvio. In pratica ho 8 campi, di cui uno
(es cliente) mi interessa filtrare cosi' da stampare solo i record con
il cliente che mi interessa, senza dover fare sempre io il filtro e
poi fare il report volta volta per ogni cliente!
GRAZIE!!!!!!!!!


title: Report-maschera

author: Roberto da casa

text:
"cerco" <
gg...@email.it
> ha scritto nel messaggio
news:5153bc41.05031...@posting.google.com...

Non so se ho capito bene il tuo problema, ma mi sembra di capire che è
sufficiente raggruppare il report per cliente ed andare a foglio nuovo al
cambio di cliente.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Report-maschera

text:
"Roberto da casa" <
r.masso...@libero.it
> wrote in message news:<FlzZd.13208$
Tm5.2...@twister2.libero.it
>...
> "cerco" <
gg...@email.it
> ha scritto nel messaggio
> news:5153bc41.05031...@posting.google.com...
> > Ciao!
> > Ho una difficoltà con Access, premetto che non sono un esperto.
> > In pratica ho una tabella con vari campi, vorrei stampare un report
> > che applicasse un filtro all'avvio. In pratica ho 8 campi, di cui uno
> > (es cliente) mi interessa filtrare cosi' da stampare solo i record con
> > il cliente che mi interessa, senza dover fare sempre io il filtro e
> > poi fare il report volta volta per ogni cliente!
> >
> > GRAZIE!!!!!!!!!
>
> Non so se ho capito bene il tuo problema, ma mi sembra di capire che è
> sufficiente raggruppare il report per cliente ed andare a foglio nuovo al
> cambio di cliente.
Prima di tutto grazie per l'aiuto!
In pratica a me interessa vedere un solo cliente su 20 ad es.
come se applicassi un filtro in tabella, se applico un filtro in base
a selezione nella tabella io vedo solo il cliente che mi interessa e
lo stesso vorrei fare con il report, in modo da non dover creare un
report ogni volta che applico un filtro(e non dover creare sempre una
tabella nuova).
Quindi se il report all'avvio mi chiedesse "immettere cliente" io
dovrei solo digitare il nome e vedere i record che corrispondono.Gli
altri clienti non li devo vedere.


title: Report-maschera

text:

Se il tuo problema è quello di filtrare "al volo" un report alla sua
apertura.
Se il codice cliente è contenuto nel campo numerico chiamato [CodCli] e
presente in tutti i record.
A fronte dell'evento "Su apertura" del report genera il seguente codice VBA:
Dim DepCli As Long
DepCli = InputBox ("Immettere cliente")
Me.Filter = "CodCli=" & DepCli
Me.FilterOn = True



title: Maschera principale inserimento

author: Marco

text:
Ciao a tutti
Ho creato un db che serve per fare le statistiche annuali del personale.
Vi elenco le tabelle:
-  tbl_reparto con i campi : idreparto-contatore e reparto-testo;
 - tbl_ufficio con i campi: idreparto-numerico,
idufficio-contatore,ufficio-testo;
 - tbl_impiegati con i campi: idimpiegato-contatore , cognome-testo,
 nome-testo , idreparto-numerico , iduffici-numerico;
 - tbl_straordinario con i campi: idimpiegato-numerico , anno-numerico ,
 tipostraordinario-testo, Anno precedente-numerico, gennaio-numerico ,
febbraio-numerico fino a
dicembre.
Poi ho creato due query:
la prima inserendo le tabelle tbl_reparto, tbl_ufficio,
tlb_impiegati.(qryimpiegati)
la seconda con la tabella tbl_straordinario(qrystraordinario)
Creando poi  una maschera mettendola collegata con qryimpiegati e una
sottomaschera
collegata a qrystraordinari.
Tramite questa tabella inserisco le ore di straordinario mensili per ogni
dipendente in questo modo:
nome reparto
nome ufficio
nome impiegato
anno straordinario, tipo straordinario, mese di gennaio, febbario e via
seguendo.
Logicamente la prima volta vedo inserito solamente le ore dell'anno in
corso, ma il
successivo anno vedrò anche le ore dell'anno precedente.
A questo punto volevo inserire un filtro dove posso vedere solamente l'anno
in corso e poi tramite
una selezione vedere tutte le ore di tutti gli anni oppure scegliere un
determinato anno.
Come posso fare? Potete darmi dei consigli?
Oppure ho creato male la maschera principale di inserimento?
grazie 1000


title: tipo dati sql access

author: Riccardo M.

text:
Ciao a tutti, volevo sapere se esiste da qualche parte un elenco di tutte le
tipologie di dati che si possono assegnare ai campi di una tabella
direttamente da codice.
Esempio se volessi creare una tabella Pippo con il campo pluto come intero
si usa:
CREATE TABLE Pippo Pluto INT
Ma se il campo dovesse essere Si/No come lo creo?
Come si imposta un valore predefinito?
Su un libro di sql c' scritto con DEFAULT 0 (per esempio e quindi nel primo
esempio:
CREATE TABLE Pippo (Pluto INT DEFAULT '0' not null )   (questa è la stringa
che genera MySQL)
ma su access viene restituito un errore di sintassi nell'istruzione CREATE
TABLE.
Quindi, dove è possibile aggiornarsi sulle modalità di creazione, modifica,
cancellazione tabelle e colonne, con
la possibilità di usare tutte le tipologie di dati che si possono usare
nella struttura di una tabella?
grazie
Riccardo


title: tipo dati sql access

text:
"Riccardo M." <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:csnoqa$lmp$1...@news.panservice.it...

Le parole riservate che puoi usare nelle istruzioni CREATE TABLE e ALTER
TABLE le puoi usare nell'elenco inserito nell'help nell'argomento Parole
riservate SQL del modulo di gestione di database Microsoft Jet.
In alternativa puoi usare i metodi DAO CreateTAbleDef, CreateField e
CreateIndex (vedi help). Un esempio dell'uso di questi metodi lo trovi sul
Sito Comune (link qui sotto) nella Sezione Tables, nella FAQ di Enrico Oemi
intitolata "Modificare la struttura dati del BE via codice, direttamente dal
FE".
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
>
> grazie
>
> Riccardo
>
>


title: tipo dati sql access

text:
> Le parole riservate che puoi usare nelle istruzioni CREATE TABLE e ALTER
> TABLE le puoi usare nell'elenco inserito nell'help nell'argomento Parole
> riservate SQL del modulo di gestione di database Microsoft Jet.
>
> In alternativa puoi usare i metodi DAO CreateTAbleDef, CreateField e
> CreateIndex (vedi help). Un esempio dell'uso di questi metodi lo trovi sul
> Sito Comune (link qui sotto) nella Sezione Tables, nella FAQ di Enrico
> Oemi
> intitolata "Modificare la struttura dati del BE via codice, direttamente
> dal
> FE".
>
> --
> Roberto
______________________________________________
grazie mille
un'ultima cosa....
quale metodo conviene usare e quale puo' essere più veloce?
Riccardo


title: tipo dati sql access

text:
"Riccardo M." <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:cso18t$pqn$1...@news.panservice.it...

A me piace di più usare il secondo metodo, però è preferibile usare il primo
per due motivi:
1) Non fa riferimento alla libreria Microsoft DAO Object Library, quindi
anche se usi una versione di Access successiva ad Access 97 non sarai
costretto ad aggiungere ai riferimenti del database tale libreria.
2) Scrivi sicuramente molto di meno.
>
> Riccardo



title: query strana....

author: Eros Genellini

text:
č possible fare in modo di avere una casella combinata con all'interno
dei valori dati da una query? CERTO... ma che la query abbia come
condizione un valore ricavato da un campo nella stessa maschera?
cioč: nella maschera ho 2 campi uno semplice text e un'altro combinato,
inserendo un valore nel primo campo, devo utilizzarlo per filtrare i
dati per il secondo campo...
SELECT [nome] FROM <squadre> where Categoria=<?>;
grazie mille.
genellini Eros.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: query strana....

author: Arilolo

text:
"Eros Genellini" <
gene...@libero.it
> ha scritto nel messaggio
news:8ccbc7860f21112df78...@mygate.mailgate.org...

Per me era stata una rivelazione!
SELECT [nome] FROM <squadre> where Categoria=Forms![maschera]![controllo];
E' importante inoltre assegnare all'evento "su attivato" della casella
combinata in questione la riga >Docmd.requery "casella combinata" < in modo
che dopo aver immesso il valore che ti serve per filtrare la query della
casella combinata, venga rieseguita non appena la attivi.
Ciao!


title: query strana....

author: Antonio Biso

text:
Arilolo <
ari...@inwind.it
> wrote in message
1HT68.7803$nI1.2...@twister1.libero.it...
> Per me era stata una rivelazione!
>
> SELECT [nome] FROM <squadre> where Categoria=Forms![maschera]![controllo];
>
> E' importante inoltre assegnare all'evento "su attivato" della casella
> combinata in questione la riga >Docmd.requery "casella combinata" < in
modo
> che dopo aver immesso il valore che ti serve per filtrare la query della
> casella combinata, venga rieseguita non appena la attivi.
No! E' inutile e puň rallentare l'elaborazione.
La requery deve essere fatta sull'evento dopo aggioramento dei controlli che
contribuiscono a modificare i valori della combo, quindi in questo caso il
solo [controllo]
Antonio


title: query strana....

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:WFr78.15338$5M4.5...@twister2.libero.it...

Sinceramente me l'hanno insegnato cosě e l'ho sempre fatto cosě senza
pensarci molto. In effetti č vero.
Ciao e grazie!


title: query strana....

text:
Arilolo <
ari...@inwind.it
> wrote in message
Q7w78.16644$5M4.5...@twister2.libero.it...
>
> > No! E' inutile e puň rallentare l'elaborazione.
> > La requery deve essere fatta sull'evento dopo aggioramento dei controlli
> che
> > contribuiscono a modificare i valori della combo, quindi in questo caso
il
> > solo [controllo]
> >
> > Antonio
> >
> >
> Sinceramente me l'hanno insegnato cosě e l'ho sempre fatto cosě senza
> pensarci molto. In effetti č vero.
> Ciao e grazie!
Oh, perň se vuoi metterlo sul mouse move dello sfondo e di ogni controllo
puoi anche farlo eh! ;-PP
Antonio


title: query strana....

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:9px78.17266$5M4.5...@twister2.libero.it...

Non esageriamo!
',-P


title: invio sms

text: qualcuno di voi conosce il modo in access di inviare messaggi sms.


title: invio sms

author: AntoGal

text:
"Tosto73" <
tos...@libero.it
> ha scritto...
> qualcuno di voi conosce il modo in access di inviare messaggi sms.
Sii più preciso sull'hardware GSM che hai a disposizione, se ti appoggi a
qualche sito, se chiami un numero diretto, se vuoi utilizzare la porta a
infrarossi con un cellulare ecc..
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


title: invio sms

text:
> Sii più preciso sull'hardware GSM che hai a disposizione, se ti appoggi a
> qualche sito, se chiami un numero diretto, se vuoi utilizzare la porta a
> infrarossi con un cellulare ecc..
>
La mia idea sarebbe: quando apro il database apro una query di utenti e
questa filtando i dati in
bbase al compo datadinascita, se la query non è vuota significa che oggi
qualcuno compie gli anni
e allora utilizzando la connessione ad internet vorrei (magari appoggiandomi
ad un sito  e non conosco quale)
inviare a quegli utenti  selezionando il campo cellulare un sms di auguri.
Una bella idea mi pare ma non so da che parte girarmi anche se access per il
resto lo conosco abbastanza bene.
attendo tuoi o vostri chiarimenti in merito.
Grazie in anticipo. Tosto73                        ;O)


title: invio sms

text:
"Tosto73" <
tos...@libero.it
> ha scritto...
> La mia idea sarebbe: quando apro il database apro una query di utenti e
> questa filtando i dati in
> bbase al compo datadinascita, se la query non è vuota significa che oggi
> qualcuno compie gli anni
> e allora utilizzando la connessione ad internet vorrei (magari
appoggiandomi
> ad un sito  e non conosco quale)
> inviare a quegli utenti  selezionando il campo cellulare un sms di auguri.
Potresti procedere in almeno 2 modi:
1) trovi su Internet uno dei tanti siti che ti permette di spedire sms
gratis (ad esempio Kataweb).
Ti studi la stringa che il tuo browser invia al server nel momento in cui
premi "Invia".
Di solito è l'indirizzo,i dati, il messaggio, con dei simboli come ?, %20,
ecc. Tutto questo ha un significato ben preciso e cambia da sito a sito.
Il tuo compito è di capire la sintassi, e dire ad Access di aprire IE e
mettere sulla barra dell'indirizzo questa stringa. Non posso essere più
preciso perchè dipende dal sito su cui ti appoggerai.
2) Esiste il numero TIM 03359609600 al quale se ti colleghi con un modem
analogico ed un programma di emulazione terminale puoi spedire sms.
Ovviamente per automatizzare il tutto devi crearti uno script.
Il costo equivale ad una normale chiamata ad un cellulare TIM (0335).
Il seguente è l' indirizzo ufficiale della TIM che pubblicizza il servizio
www.scriptim.it/SitoScripTIM/ServiziAggiuntivi/Servizi_Aggiuntivi.html#pc
Esempio di esecuzione MANUALE:
1) Apri Avvio-Programmi-Accessori-HyperTerminal;
2) Avvia HyperTerminal;
3) Dai un nome qualsiasi alla connessione;
4) Nel campo "Connetti" della successiva maschera seleziona la porta com
alla quale è collegato il modem;
5) Aumenta poi la velocità a 9600 bps e come controllo di flusso seleziona
nessuno e dai OK;
6) Digita "AT&F" , premi invio (resetta temporaneamente la configurazione
del modem ai valori di fabbrica) ed attendi un "OK" come risposta;
7) Digita "ATDT03359609600". Attendi la connessione e la comparsa di una
maschera di richiesta del tipo di terminale.
8) Seleziona 1 e dai invio
9) Segui le istruzioni a video.
Di solito 2-3 secondi dopo aver compilato la maschera, il messaggio arriva
puntuale a destinazione.
Queste sono le istruzioni che ti permettono in maniera MANUALE di spedire un
messaggio.
Si possono automatizzare con un programma diverso da HyperTerminal, che
permetta di gestire degli script ( praticamente una lista di comandi
eseguiti in automatico ).
Un'ultima cosa: tutto questo è Off Topic su questo NG, dovresti chiedere ad
esempio su it.tlc.cellulari. Access entra in gioco solo per esportare un
query su un file che utilizzerà il tuo script.



title: Doppio click listbox

author: Pino

text:
E' possibile aprire un file con il doppio click di un record di una
listbox?


title: Doppio click listbox

author: Karl Donaubauer

text:
Pino wrote:
> E' possibile aprire un file con il doppio click di un record di una
> listbox?
Suppongo che intendi di avere percorso e nome del file
nella casella di riepilogo. In questo caso puoi usare
ShellExecute
http://www.mvps.org/access/api/api0018.htm

o
<F1> FollowHyperlink
passando il valore dalla casella al commando.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Come conoscere TIPO oggetto dal suo nome?

author: RobertoA

text:
Ho una listbox riempita col nome di form, report, moduli, ecc..
Cliccando su una riga della listbox vorrei visualizzare il contenuto
dell'oggetto, il codice della form, del modulo, ecc..
Per la visualizzazione pensavo di esportare il contenuto dell'oggetto
via SaveAsText e poi caricarlo al volo in una textbox
Sulla SaveAsText bisogna pero' dare il tipo di oggetto che si sta salvando
La domanda e': come fare (senza ciclare fra tutti gli oggetti presenti
nel file mdb) per riconoscere il tipo di oggetto avendo solamente il suo
nome?
Ciao e grazie


text:
La ListBox con cosa la Popoli...?
Immagino con una Tabella... aggiungi un campo ObjectType

Ti basta ciclare le Varie Collection, come vedi in questi esempi, e riempire la Tabella anche con il Type:
http://www.consultdmw.com/access-VBA-list-objects.html

Fai attenzione che il SaveAsText esporta TUTTO il codice dell'oggetto anche quello per la Formattazione ed i controlli entrocontenuti.
Se vuoi esportare solo il Modulo puoi usare una cosa simile:

Public Sub ExportFormModule(ByVal strFormName As String, _
                           ByVal strTargetDir As String)

    Dim lngFile As Long
    lngFile = FreeFile()
    Open strTargetDir & "\" & strFormName & ".bas" For Append As lngFile

    DoCmd.OpenForm strFormName, acDesign

    With Forms(strFormName).Module
        Print #lngFile, .Lines(1, .CountOfLines)
    End With

    DoCmd.Close acForm, strFormName
    Close lngFile

End Sub

Ciao
@Alex


text:

La popolo col nome dell'oggetto
No, non scrivo in tabella, aggiungo direttamente sulla listbox
Ho parzialmente risolto aggiungendo in lista un prefisso+nome_oggetto
Il prefisso mi permette di distinguere tra i vari tipi di oggetti
Il problema contingente non c'e' in realta', ma visto che mi era
capitato il problema e non sono riuscito a risolverlo in modo elegante
ho pensato di chiedere, sperando esistesse una qualche istruzione simile
alla 'Typeof Is' anche per questa evenienza
Molto interessante invece l'apertura form in acDesign e la lettura delle
righe Forms(nome_form).Module.Lines non conoscevo
Ciao


text:

Allora definisci la ListBox con più colonne... la popoli con ADDITEM dividendo i valori di Colonna con [;] e passando il Type in una Colonna magari Nascosta.

Ad esempio io uso questoin caso debba assegnare un Oggetto in EarlyBinding:

    Private WithEvents mF  As Access.Form
    Private WithEvents mR  As Access.Report

    ActFrmRptType = Application.CurrentObjectType

    If ActFrmRptType = acForm Then
        Set mf=Application.CodeContextObject
    ElseIf ActFrmRptType = acReport Then
        Set mR=Application.CodeContextObject
    End If

Ovviamente se fosse LateBinding non servirebbe... ma non potrei ereditare gli Eventi...

Per il resto vedi tu...

@Alex


author: Bruno Campanini

text:
After serious thinking RobertoA wrote :

[...]
> Sulla SaveAsText bisogna pero' dare il tipo di oggetto che si sta salvando
> La domanda e': come fare (senza ciclare fra tutti gli oggetti presenti nel
> file mdb) per riconoscere il tipo di oggetto avendo solamente il suo nome?
> Ciao e grazie

Poiché i nomi degli oggetti sono unici solo nell'ambito di ciascun
ObjectType (Table, Form, Report, etc), Access non ha alcuna funzione
che ne deduca il tipo.

Prova così:
========================================
Private Sub Command1_Click()
Dim SQL As String, OT(1 To 8, 1 To 2)
Dim i As Integer, RS As Recordset

OT(1, 1) = 1:       OT(1, 2) = "Local Table"
OT(2, 1) = 4:       OT(2, 2) = "ODBC Linked Table"
OT(3, 1) = 6:       OT(3, 2) = "Linked Table"
OT(4, 1) = 5:       OT(4, 2) = "Query"
OT(5, 1) = -32768:  OT(5, 2) = "Form"
OT(6, 1) = -32764:  OT(6, 2) = "Report"
OT(7, 1) = -32766:  OT(7, 2) = "Macro"
OT(8, 1) = -32761:  OT(8, 2) = "Module"

For i = 1 To 8
 SQL = "SELECT MsysObjects.Name, MsysObjects.Type FROM MsysObjects "
 SQL = SQL & "WHERE MsysObjects.Name Not Like '~' And MsysObjects.Name
"
 SQL = SQL & "Not Like 'MSys*' AND MsysObjects.Type=" & OT(i, 1)

    Set RS = CurrentDb.OpenRecordset(SQL, dbOpenDynaset)
    Do Until RS.EOF
        If RS![Name] = "bc" Then
            MsgBox OT(i, 2)
            Exit Sub
        End If
        RS.MoveNext
    Loop
Next

End Sub
=====================================

Bruno


text:

Si, credo il problema posto non sia risolvibile
Nel senso che potrei avere una form dal nome pippo ed una query dal nome
pippo, bastava pensare a questo per capire che non sia possibile dal
nome oggetto capire di cosa stiamo parlando (senza ciclare dentro ad
ogni categoria di oggetti)


title: Info ocx Kodak

author: Carmelo Di Rosa

text:
Ciao a tutti, volevo chiedervi un'informazione tecnica riguarda gli ocx
codak. Ho scaricato dal sito comune l'esempio in questione, ho registrato
gli ocx ed installato le dll, ma nella fase di esecuzione del database se
visualizzo delle bmp non ci sono problemi, se visualizzo dei jpg mi risulta
un errore per l'esattezza errorre di run-time 1182: informazioni
compressione non valide, impossibile visualizzare l'immagine.
Ho provato a convertire il DB di esempio in access 2000, ma l'errore rimane.
L'immagine in jpg a 16 milioni di colori convertita in BMP viene letta,
mentre la stessa immagine jpg a 16 milioni di colore convertita in 256
colori in formato bmp e poi risalvate in jpg non viene letta.
Navigando su internet ho letto che forse gli ocx Kodak non sono compatibili
con WXP. Io ho installato sul mio pc WXP. Se questo è l'errore, è possibile
e dove reccuperare gli ocx aggiornati?
Ciao e grazie.


title: Info ocx Kodak

author: Roberto dalla campagna

text:
"Carmelo Di Rosa" <
dir...@elet.polimi.it
> ha scritto nel messaggio
news:cdlbei$h3u$1...@newsserver.cilea.it...

Fermo restando che non ho avuto mai la possibilità di usare gli ActiveX
Kodak con Windows XP, penso che il tuo problema dipenda dal fatto che tu, al
momento di installare sul tuo computer Access, non abbia chiesto
esplicitamente di installare ANCHE i filtri immagine, così che Access riesce
a trattare correttamente i file .bmp, che Access considera appunto il suo
standard nativo per i file immagine.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Info ocx Kodak

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:MzqLc.4226$1V3....@twister2.libero.it...

Io per questioni di lavoro ho installato access versione 2, access 97 ed
accessXP sul mio pc. Per i primi 2 ho fatto naturalmente un'installazione
minima per avere la sola possibilità di far partire file di access relativi
alla versione, ma per la versione XP ho fatto un'installazione completa.
Provo a ricontrollare come mi suggerisci tu i filtri immagine della versione
Xp con la speranza che convertendo l'esempio in xp risolva il problema.
Ti faccio sapere.
Ciao e grazie.


title: Info ocx Kodak

author: ALESSANDRO Baraldi

text:
"Carmelo Di Rosa" <
dir...@elet.polimi.it
> ha scritto nel messaggio
news:cdle7a$jk3$1...@newsserver.cilea.it...

Non sono sicuro ma non vorrei fosse dovuto alla nuova Dll(GDI+) di Win
per la conversione delle immagini.
Dai un'occhiata se trovi qualche FAQ sul sito MS.
@Alex.


title: Copiare specifiche di importazione

text:
Ciao a tutto il NG
Problemino semplice semplice, al 14 di agosto.
Ho creato un db su cui sto lavorando.
Questo db servirà soprattutto per analizzare dei dati che importerà da varie
fonti diverse.
Ho creato le prime specifiche di importazione e tutto OK.
Per non rischiare di compromettere il tutto, il resto del lavoro di
importazione lo ho creato su un diverso DB con l'intenzione di trasferirlo
quando pronto.
Il problema è che non riesco a trasferire le specifiche contenute nelle
tabelle MSysIMEXColumns e MSysIMEXSpecs poiché se gli dico di importarle lui
mi chiede di sostituire quelle già esistenti.
La domanda allora è questa:
esiste un modo di accodare le specifiche di import. del db temporaneo a
quelle del db principale o devo costruire le specifiche "a manella" di
nuovo" nel db principale???
Ciao a tutti
Marco
mar...@TOGLIPIPPO.yahoo.it


title: Copiare specifiche di importazione

author: Setec Astronomy

text:
Marco wrote:
> Ciao a tutto il NG
>
> Problemino semplice semplice, al 14 di agosto.
[cut]
> La domanda allora h questa:
> esiste un modo di accodare le specifiche di import. del db temporaneo
> a quelle del db principale o devo costruire le specifiche "a manella"
> di nuovo" nel db principale???
Menu Strumenti -> Opzioni -> Visualizzazione -> Mostra -> Oggetti di
sistema
Le tabelle MSysIMEXSpecs e MSysIMEXColumns (master e detail) correlate
tramite il campo SpecID contendgono i dati delle importazioni. Esporta
i record che ti interessa e reimportali nel DB che ti serve.
Saluti.


title: Copiare specifiche di importazione

text:


Non so se non mi sono spiegato bene o non sono riuscito a capire.
Se faccio l'importazione lui mi sovrascrive le tabelle MSysIMEXSpecs e
MSysIMEXColumns esistenti.
Fai una prova:
Database1.mdb con specifica di imp. pippo
Database2.mdb con specifica di imp. pluto
Prova ad importare la specifica pluto in Database1.mdb e vedi che se lo fai
ti cancella pippo.
Cmq. Ho rifatto a mano...
Ciao
 Saluti.


title: Copiare specifiche di importazione

text:
Marco wrote:
>
[cut]
> Non so se non mi sono spiegato bene o non sono riuscito a capire.
>
> Se faccio l'importazione lui mi sovrascrive le tabelle MSysIMEXSpecs e
> MSysIMEXColumns esistenti.
Mi spiace contraddirti, ma devi LEGGERE quello che ti viene scritto.
Ho scritto "Esporta i record", non "Esporta le tabelle". Normalmente
utilizzo una serie di funzioni basate su ADO/XML per fare
l'esportazione di record master/detail e la reimportazione.


title: Copiare specifiche di importazione

text:
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:OMI_a.242286$lK4.7...@twister1.libero.it...

Hai ragione, non avevo letto bene.
Ma come sarebbe la tua soluzione?
Fare tipo una query di accodamento sulle tabelle nascoste?
O c'è un altro modo??
CIao
Marco


title: Copiare specifiche di importazione

text:
Marco wrote:

> O c'h un altro modo??
Il problema riguarda la relazione master/detail presente.
Ti suggerisco di utilizzare VBA ed ADO per esportare in formato XML
(per es.) le specifiche con le relative colonne e creare una procedura
per reimportarle.
Se non ha conoscenza medio/alta di VBA questa soluzione e' fuori dalla
tua portato. Cerca su google come utilizzare l'oggetto XMDom delll' SDK
MSXML di Microsoft.
Saluti.


title: Copiare specifiche di importazione

text:
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:2FK_a.242457$lK4.7...@twister1.libero.it...

No, decisamente fuori dalla mia portata, ma grazie lo stesso
Marco
> Saluti.


title: E' sparito il NG da Google????

author: marco

text:
Ho provato a collegarmi a google per fare una ricerca su post vecchi ma non
mi trova più
IT.comp.appl.access
Confermate???


title: E' sparito il NG da Google????

author: SunRex

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:bl3h6g$a4h$1...@lacerta.tiscalinet.it...

..azzo è vero.!!!!!!!
SunRex


title: E' sparito il NG da Google????

author: cidi

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:Njcdb.128861$hE5.4...@news1.tin.it...

No. ho appena fatto, per prova, una ricerca e non è sparito niente
http://groups.google.com/groups?ie=UTF-8&oe=UTF-8&as_ugroup=IT.comp.appl.acc
ess&as_uauthors=sunrex&lr=&hl=it
Daniele


title: E' sparito il NG da Google????

author: Flavio Pinto

text:
NEWSLAND ha perso molte pagine
forse successo un blackout?
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:F2ndb.131859$hE5.4...@news1.tin.it...



title: E' sparito il NG da Google????

author: Roberto da casa

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:bl3h6g$a4h$1...@lacerta.tiscalinet.it...

Non mi risulta.
Prova con questo link
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&group=it.comp.appl.access
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Giustificare il testo in Access 2000 (non ripartirlo)

text:
Salve a tutti
conoscete un metoto per giustificare (non ripartirlo) un testo con Access
2000.
Grazie
Bruno


author: ciroteo

text:
"Bruno-s95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:5swGd.414405$b5.20...@news3.tin.it...

Ricordo che da access direttamente non era possibile, se guardi tramite
google nei vecchi post probabilmente qualcuno ha trovato qualche soluzione
tramite tools esterni.
Immagino che ti serva per campi blob/memo?
xè allora non usare il controllo .rtf di microsoft?


author: Alessandro Baraldi

text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:5swGd.414405$
b5.20...@news3.tin.it

dai un'occhiata sul sito di Lebans.
Questo è per un Report:
http://www.lebans.com/justidirect.htm
Ciao
@ALex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"ciroteo" <
cir...@libero.it
> ha scritto nel messaggio
news:zZwGd.6974$GU.2...@twister1.libero.it...

----------------------------------
Come usi il controllo.rtf di microsoft ?
Puoi aiutarmi a capire come fare. Grazie
Ho provato a fare un report, cercando di capire il funzionamento report del
db "Class justidirectver17.mdb", indicato da Alessandro Baraldi, ma non ho
capito nulla e non riesco a far giustificare una semplice casella memo.
Ciao da Bruno


text:
[CUT]
Ciao e grazie Alessandro.
Vedi il messaggio dell'altro pst
Bruno


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:rwzGd.415360$
b5.20...@news3.tin.it
[CUT]
> Come usi il controllo.rtf di microsoft ?
>
> Puoi aiutarmi a capire come fare. Grazie
>
>
> Ho provato a fare un report, cercando di capire il funzionamento report del
> db "Class justidirectver17.mdb", indicato da Alessandro Baraldi, ma non ho
> capito nulla e non riesco a far giustificare una semplice casella memo.
>
> Ciao da Bruno
Ciao Bruno, avevo intuito bene allora che poteva essere un Report..!!
Il controllo RichText di MS ho provato anch'io ma non consente
di estrarre la dimensione del Testo RTF, con la consegunete
impossibilità
di ridimensionarlo Runtime nel Report.(Questo a quanto mi risulta spero
di essere smentito).
Io ho usato con successo e ottime soddisfazioni l'OCX di Lebans
RTF2 che espone le proprietà utili al ridimensionamento nel Report.
Ci sono alcuni accorgimenti da osservare quando lo si posiziona
altrimenti non funziona, ma conoscenone le peculiarità ne esce un ottimo
strumento.
L'ho usato nel DEMO Mail_Sender che trovi nel mio sito per
stampare le Mail in formato(HTML, in realtà RTF) ed è perfetto.
Se scarichi i Demo nel Sito di Lebans ti mostra benissimo come
usarlo.
Per giustificare il testo credo però sia un pò più complesso.
Se non sbaglio devi riucire a selezionarlo tutto, quindi fare
il Giustificato, il tutto però da codice.....!
Non l'ho provato, ma deve essere fattibile.
Ciao
@Alex



author: Rick - Pipino

text:
"Alessandro Baraldi" ha scritto
> Io ho usato con successo e ottime soddisfazioni l'OCX di Lebans
> RTF2 che espone le proprietà utili al ridimensionamento nel Report.
> Ci sono alcuni accorgimenti da osservare quando lo si posiziona
> altrimenti non funziona, ma conoscenone le peculiarità ne esce un ottimo
> strumento.
>
> L'ho usato nel DEMO Mail_Sender che trovi nel mio sito per
> stampare le Mail in formato(HTML, in realtà RTF) ed è perfetto.
>
> Se scarichi i Demo nel Sito di Lebans ti mostra benissimo come
> usarlo.
> Per giustificare il testo credo però sia un pò più complesso.
> Se non sbaglio devi riucire a selezionarlo tutto, quindi fare
> il Giustificato, il tutto però da codice.....!
> Non l'ho provato, ma deve essere fattibile.
L'ho usato anch'io e funziona bene, tra l'altro è anche semplice, ma c'e' un
però ...
ho riscontrato che qualche elimina delle parole che vengono mandate a capo.
Problema che cessa semplicemento editanto la stringa e inserendo per esempio
uno spazio.
Senbra quasi che con stringhe di una lunghezza x ci sia un problema che
taglia via una parola.
Succede anche a voi o io sbaglio qualcosa ?
Rick


author: sv

text:
Rick - Pipino ha scritto:
> "Alessandro Baraldi" ha scritto



> Rick
Sì confermo. Bisogna stare molto attenti quando il documento è molto
lungo. Leggere attentamente la stampa perchè qualche volta, andando a
capo, taglia delle frasi. Ho notato che questo succede maggiormente se si
utilizza un carattere diverso dal Times New Roman con ampiezza superiore a
9.
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
[CUT]
> Ciao Bruno, avevo intuito bene allora che poteva essere un Report..!!
>
> Il controllo RichText di MS ho provato anch'io ma non consente
> di estrarre la dimensione del Testo RTF, con la consegunete
> impossibilità
> di ridimensionarlo Runtime nel Report.(Questo a quanto mi risulta spero
> di essere smentito).
>
> Io ho usato con successo e ottime soddisfazioni l'OCX di Lebans
> RTF2 che espone le proprietà utili al ridimensionamento nel Report.
> Ci sono alcuni accorgimenti da osservare quando lo si posiziona
> altrimenti non funziona, ma conoscenone le peculiarità ne esce un ottimo
> strumento.
>
> L'ho usato nel DEMO Mail_Sender che trovi nel mio sito per
> stampare le Mail in formato(HTML, in realtà RTF) ed è perfetto.
>
> Se scarichi i Demo nel Sito di Lebans ti mostra benissimo come
> usarlo.
> Per giustificare il testo credo però sia un pò più complesso.
> Se non sbaglio devi riucire a selezionarlo tutto, quindi fare
> il Giustificato, il tutto però da codice.....!
> Non l'ho provato, ma deve essere fattibile.
>
> Ciao
> @Alex
>
----------------------------------------------------------
Ciao Alessandro,
        ho scaricato "DEMO Mail_Sender" da tuo sito (complimenti per il
sito, mi è piacciuto molto ed è interessante per il contenuto), ho avviato
l'installazione e devo dire che il tuo progetto mi ha colpito tanto, ancora
complimenti e grazie per gli innumerevoli aiuti che mi ha dato in passato.
 Vista la mia ignoranza in materia, se mi consenti, vorrei chiederti: come
si effettua un'autoestraente tipo l'applicazione da te creata? Puoi
illuminarmi in merito.
Mille grazie
            Bruno


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:JcQGd.705239$
35.28...@news4.tin.it
[CUT]
> Ciao Alessandro,
>
>         ho scaricato "DEMO Mail_Sender" da tuo sito (complimenti per il
> sito, mi è piacciuto molto ed è interessante per il contenuto), ho avviato
> l'installazione e devo dire che il tuo progetto mi ha colpito tanto, ancora
> complimenti e grazie per gli innumerevoli aiuti che mi ha dato in passato.
>
>  Vista la mia ignoranza in materia, se mi consenti, vorrei chiederti: come
> si effettua un'autoestraente tipo l'applicazione da te creata? Puoi
> illuminarmi in merito.
>
> Mille grazie
>             Bruno
Speriamo che oltre essere bello funzioni anche...!!
Non è un autoestraente, ma un pacchetto d'intallazione
con tutti i crismi.
E' stato generato con InnoSetup e ISTOOL(molto più agevole)
i link li dovresti trovare nella sezione Link.
Ciao
@ALex



text:
> [CUT]
>
> Speriamo che oltre essere bello funzioni anche...!!
>
> Non è un autoestraente, ma un pacchetto d'intallazione
> con tutti i crismi.
> E' stato generato con InnoSetup e ISTOOL(molto più agevole)
> i link li dovresti trovare nella sezione Link.
>
> Ciao
> @ALex
>
--------------------------------------
Oè, non essere negativo, sicuramente funzionerà alla grande, anche se c'è il
detto che la fortuna e cieca ma la sfiga ci vede bene.
Bruno
P.S.... Ho qualche altro problemino da risolvere, guarda nei post.


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:qQQGd.705476$
35.28...@news4.tin.it
>
> [CUT]
> Oè, non essere negativo, sicuramente funzionerà alla grande, anche se c'è il
> detto che la fortuna e cieca ma la sfiga ci vede bene.
>
> Bruno
>
> P.S.... Ho qualche altro problemino da risolvere, guarda nei post.
Perchè invece di scaricare OCX e DLL non usi questo
http://www.lebans.com/justidirect.htm
E sviluppato per A97 non serve altro che il Modulo di Classe
con pochissime manciate di Codice, funziona bene.....!!
Lascia perdere gli OCX.
Queste sono mie opinioni, sei liberissimo di fare come
meglio credi.
INFO:
In ogni caso un OCX è una Libreria esterna al DB, pertanto lo puoi
mettere in 2 posti, a seconda della filosofia.
1)Nella SystemFolder(dopo averlo registrato)
2)Nella Path del DB o giu di li...!
Poi essendo un Componente Oggetto Access non supporta
la dichiarazione esplicita, pertanto lo devi INSERIRE
nella Maschera come Controllo, a quel punto il Demo
di Lebans conterrà tutto il codice necessario.
IMPORTANTE è che quando distribuisci sia incluso, e che venga
registrato...!
Il programma che ti ho suggerito per il SETUP è in grado di
fare tutte queste operazioni.
@Alex



text:
[CUT]
>
> Perchè invece di scaricare OCX e DLL non usi questo
>
http://www.lebans.com/justidirect.htm
> E sviluppato per A97 non serve altro che il Modulo di Classe
> con pochissime manciate di Codice, funziona bene.....!!
>
> Lascia perdere gli OCX.
> Queste sono mie opinioni, sei liberissimo di fare come
> meglio credi.
>
> INFO:
> In ogni caso un OCX è una Libreria esterna al DB, pertanto lo puoi
> mettere in 2 posti, a seconda della filosofia.
>
> 1)Nella SystemFolder(dopo averlo registrato)
> 2)Nella Path del DB o giu di li...!
>
> Poi essendo un Componente Oggetto Access non supporta
> la dichiarazione esplicita, pertanto lo devi INSERIRE
> nella Maschera come Controllo, a quel punto il Demo
> di Lebans conterrà tutto il codice necessario.
>
> IMPORTANTE è che quando distribuisci sia incluso, e che venga
> registrato...!
>
> Il programma che ti ho suggerito per il SETUP è in grado di
> fare tutte queste operazioni.
>
>
> @Alex
>
------------------------------
Alessandro,
            ho già provato a farlo seguendo il demo di Lebans con
cinquantamila esempi di report, senza riuscire nell'intento. Eppure si
tratta di un controllo o due contenenti testo memo. Sicuramente ho sbagliato
qualcosa, anche se mi rimane il dubbio perchè mi pare giustificasse il
testo, troncando però le parole a destra. Bho, Bho. Forse sono un pò di
legno per capire il funzionamento. Condivido la tua opinione per gli OCX che
sono esterni, ma tento perchè in un modo o nell'altro devo risolvere il
problema, salvo che tu non possa aiutarmi mettendomi in un post il codice e
i passaggi per il controllo, ovviamente se non è lunga e faticoso per te.
Ciao e grazie comunque
                                            Bruno


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:iXUGd.707758$
35.28...@news4.tin.it
> [CUT]
> Alessandro,
>
>             ho già provato a farlo seguendo il demo di Lebans con
> cinquantamila esempi di report, senza riuscire nell'intento. Eppure si
> tratta di un controllo o due contenenti testo memo. Sicuramente ho sbagliato
> qualcosa, anche se mi rimane il dubbio perchè mi pare giustificasse il
> testo, troncando però le parole a destra. Bho, Bho. Forse sono un pò di
> legno per capire il funzionamento. Condivido la tua opinione per gli OCX che
> sono esterni, ma tento perchè in un modo o nell'altro devo risolvere il
> problema, salvo che tu non possa aiutarmi mettendomi in un post il codice e
> i passaggi per il controllo, ovviamente se non è lunga e faticoso per te.
>
> Ciao e grazie comunque
>
>                                             Bruno
Sinceramente ho aperto il Demo di Lebans che ti ho seganalto
e non vedo nessuna complicazione.
Di fatto non ho nulla da aggiungere a quanto fatto da Lebans
in merito a chiarezza.
Da me funziona regolarmente.
Hai provato il Demo in A97...?
Ti funziona oppure anche quello ha problemi...?
Ciao



text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fd7c3e8b693ea8e701...@mygate.mailgate.org...

//////////////////////////////////
Si Alessandro, ho scaricato il db di Lebans, poi in un db nuovo ho importato
il modulo, ho creato una tabella con due campi memo, un report con SQL
interno. Ho cercato di copiare passo passo il tutto, compreso le routine che
poi ho messo in formattazione ecc. ecc. A questo punto, non mi resta altro
da fare che rivedere il db di Lebans.
Per quanto riguarda l'OCX, l'ho registarto e importato nel report, poi ho
messo l'origine del controllo nell'OCX, ma non appare nulla nel report.
Peggio che mai.
Perchè ? manca qualche passaggio  ?
Bruno
Bruno


text:
>> [CUT]
Alessandro, sono riuscito a far funzionare l'OCX. Non avevo registrato la
DLL, ma solo il file con estensione "ocx".
Per ora mi accontento.
Gentilmente, pui dirmi quali problemi portano gli OCX, visto che li
sconsigliavi. Premesso che anche io preferirei avere tutto all'interno del
db e non oggetti esterni.
Ciao
            Bruno


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:lwVGd.708027$
35.28...@news4.tin.it

Non sò in che linguaggio è realizzato quello che stai usando
ma in qualunque modo(Delphi) a parte richiede la distribuzione
del Runtime.
In generale se funzionano vanno bene, se non danno problemi con
le Librerie(DLL) sulle quali si appoggiano...!!
In ogni caso non ho molta esperienza li skippo il più possibile.



text:
>> >> [CUT]
>>
>>
>> Alessandro, sono riuscito a far funzionare l'OCX. Non avevo registrato la
>> DLL, ma solo il file con estensione "ocx".
>>
>> Per ora mi accontento.
>>
>> Gentilmente, pui dirmi quali problemi portano gli OCX, visto che li
>> sconsigliavi. Premesso che anche io preferirei avere tutto all'interno
>> del
>> db e non oggetti esterni.
>>
>> Ciao
>>
>>             Bruno
>
>
> Non sň in che linguaggio č realizzato quello che stai usando
> ma in qualunque modo(Delphi) a parte richiede la distribuzione
> del Runtime.
> In generale se funzionano vanno bene, se non danno problemi con
> le Librerie(DLL) sulle quali si appoggiano...!!
> In ogni caso non ho molta esperienza li skippo il piů possibile.
>
> Ciao
> @Alex
>
---------------------------------
Mille grazie di tutto Alessandro.
Vogli chiederti solo un'ultima cosa.
InnoSetup e ISTOOL sono gratuiti ? se no, costano molto ?
Mi pare di aver capito che ISTOOL lo reputi migliore..
Ciao ..Bruno


text:
"Bruno-s95" <
mus...@virgilio.it
> wrote in message
news:t0WGd.708197$
35.28...@news4.tin.it
 [CUT]
> Mille grazie di tutto Alessandro.
>
> Vogli chiederti solo un'ultima cosa.
>
> InnoSetup e ISTOOL sono gratuiti ? se no, costano molto ?
Gratuiti, è gradita la donazione di un contributo.
> Mi pare di aver capito che ISTOOL lo reputi migliore..
Io uso entrambi, ma non sono 2 cose diverse.
INNO è il Papà, ISTOOL è solo un'interfaccia grafica verso
le librerie di INNO, a mio parere, più facilmente gestibile
da chi non ha molta pratica con il prodotto.
> Ciao ..Bruno
Ciao
@ALex



title: timeout connessione al server (ODBC)

author: Ammammata

text:
usando una vpn il cliente accede ai dati sul server remoto tramite ODBC

l'applicazione parte subito con questo codice:

' 20.07.2021 refresh ODBC
On Error Resume Next

Dim db As DAO.Database
    Dim tb As DAO.TableDef
    Set db = CurrentDb
    For Each tb In db.TableDefs
        If Left(tb.Connect, 4) = "ODBC" Then
            Debug.Print "Connessione " & tb.Connect
            tb.Connect = newConnectionString
            tb.RefreshLink
            Debug.Print "Refreshed ODBC table " & tb.Name
            Messaggio ("- " & Time() & " Refresh ODBC : " & tb.Name)
        End If
    Next tb
Set db = Nothing

lo avevo aggiunto in base ai vostri suggerimenti in un periodo in cui
non si capiva da cosa potessero dipendere strani errori (ovviamente
senza alcuna spiegazione) da parte di access

questo "trucco" ha funzionato e sta funzionando

ogni tanto però, suppongo per il traffico di rete per chi si collega da
fuori ufficio, l'applicazione access si ferma dopo una decina di
secondi con l'errore di connessione ODBC: è sufficiente chiudere e
riprovare che tutto torna a funzionare egregiamente

c'è modo di aumentare questa sorta di timeout?
oppure di dare un comando *prima*, che stabilista la connessione in
qualche modo, per evitare il timeout?

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: timeout connessione al server (ODBC)

author: Giorgio Rancati

text:

Ciao,
io avevo un problema simile che dipendeva dalla caduta temporanea della connessione ma nel mio caso Access si connetteva a Microsoft Sql server con driver "ODBC 18 driver for Sql server"

tu a quale server ti connetti ?
se a Sql server, con quale driver ?

Ciao
Giorgio Rancati


title: timeout connessione al server (ODBC)

text:
> Ciao
> Giorgio Rancati

Ciao Giorgio approfitto con piacere per un saluto.

@Alex


title: timeout connessione al server (ODBC)

text:
Il giorno Sun 16 Apr 2023 01:56:52p, *Giorgio Rancati* ha inviato su
it.comp.appl.access il messaggio news:c314ff59-3f6b-438a-943e-
2fd848...@googlegroups.com
. Vediamo cosa ha scritto:

> se a Sql server, con quale driver ?
>

18, più precisamente 2018.181.01.01



title: timeout connessione al server (ODBC)

text:

ok,  puoi aggiungere alla stringa di connessione il parametro ;ConnectRetryCount=2 a me ha risolto il problema della caduta temporanea della connessione
qui ulteriori dettagli
Connection resiliency in the ODBC driver
https://learn.microsoft.com/en-us/sql/connect/odbc/connection-resiliency?view=sql-server-ver16

Ciao
Giorgio Rancati


title: timeout connessione al server (ODBC)

text:

Ciao Alex :-)


title: timeout connessione al server (ODBC)

author: Simone Calligaris

text:
> Ciao,
> io avevo un problema simile che dipendeva dalla caduta temporanea della connessione ma nel mio caso Access si connetteva a Microsoft Sql server con driver "ODBC 18 driver for Sql server"
>
> tu a quale server ti connetti ?
> se a Sql server, con quale driver ?

Giorgio Rancati redivivo!

"Che hai fatto in tutti questi anni?"

1)   "sono andato a letto presto"

Oppure:

2) "Ho riscritto tutto da ADP ad AccDB/ODBC!"

Saluti da Simone  ;-)


title: timeout connessione al server (ODBC)

text:

Ciao Simone,

la 2 ma è bastato un annetto :-)
nel frattempo è riaffiorata una vecchia passione che ha portato via tempo alla presenza sui forum, però ogni tanto vengo con piacere a leggervi.
:-)
Giorgio Rancati


title: timeout connessione al server (ODBC)

author: RobertoA

text:

Fatemi sapere se ho capito bene
Avete delle postazioni di lavoro nella sede A
Il db server e' nella sede B, geograficamente distante da A
Le postazioni lavoro usano tabelle collegate via odbc al db server
E tra sede A e sede B c'e' internet di mezzo
Ho capito bene?

La domanda successiva sarebbe, e funziona tutto correttamente?, ma mi
sembra inutile farla visto che se non funzionasse avreste sicuramente
modificato il sistema
E quindi e' la connessione internet che si rivela piu' robusta del
previsto oppure e' il driver odbc che e' stato progettato per lavorare
anche su collegamenti non convenzionali come la classica lan?

Oppure c'e' qualche altro magheggio di mezzo tra postazioni lavoro e db
server remoto?
Scusate la domanda forse ingenua, ma pur avendolo provato per curiosita'
non mi sono mai azzardato ad utilizzare 'dal vero' un db remoto
solamente via suo driver odbc


title: timeout connessione al server (ODBC)

text:
RobertoA brought next idea :
> Avete delle postazioni di lavoro nella sede A
> Il db server e' nella sede B, geograficamente distante da A
> Le postazioni lavoro usano tabelle collegate via odbc al db server
> E tra sede A e sede B c'e' internet di mezzo
> Ho capito bene?

esatto: gli utenti attivano la VPN ed eseguono il software in locale
che va a pescare i dati dal server remoto
è una operazione una tantum, di solito giornaliera ma spesso passano
più giorni, che impiega un paio di minuti: il resto delle operazioni
(produzione di stampe statistiche) è fatto senza più la necessità di
collegarsi, in queso modo i venditori e i responsabili possono
controllare al volo la situazione/andamento di clienti e fornitori



title: timeout connessione al server (ODBC)

text:

Ciao Roberto,

nessun magheggio, nel mio caso gli utenti lavorano da remoto come se fossero in sede, nel loro computer c'è solo l'applicazione fatta con Access che si collega al Db server (nel mio caso Sql server)
La parte più lenta è in fase di apertura del programma quando collega le tabelle (circa 40 secondi per 120 tabelle) poi la velocità è di poco più lenta che in sede ma sempre più che accettabile.

Ciao
Giorgio Rancati


title: timeout connessione al server (ODBC)

text:
Il 17/04/2023 10:03, Ammammata ha scritto:
> RobertoA brought next idea :
>> Avete delle postazioni di lavoro nella sede A
>> Il db server e' nella sede B, geograficamente distante da A
>> Le postazioni lavoro usano tabelle collegate via odbc al db server
>> E tra sede A e sede B c'e' internet di mezzo
>> Ho capito bene?
>
> esatto: gli utenti attivano la VPN ed eseguono il software in locale che
> va a pescare i dati dal server remoto
> è una operazione una tantum, di solito giornaliera ma spesso passano più
> giorni, che impiega un paio di minuti: il resto delle operazioni
> (produzione di stampe statistiche) è fatto senza più la necessità di
> collegarsi, in queso modo i venditori e i responsabili possono
> controllare al volo la situazione/andamento di clienti e fornitori
>

Va beh, se e' qualche minuto di collegamento e' gia' piu' comprensibile,
invece collegamenti permanenti tipo classico gestionale mi sembrerebbero
gia' piu' delicati da mantenere
Ma Giorgio Rancati dice che e' piu' che accettabile

Personalmente ho fatto qualche esperimento ed ho visto che tutto
funzionava a dovere ma non mi sono mai sentito di proporre un
collegamento di questo tipo a qualcuno che lavora col gestionale in modo
costante durante tutto il giorno, magari sono solo miei timori infondati
Ho sempre preferito dirottare su collegamenti via rdp e quindi in
sostanza gestionale e db sempre sulla stessa lan


title: timeout connessione al server (ODBC)

text:

Si, ovviamente, do' per scontato che ricollegamenti tabelle siano piu'
lenti e le query debbano essere ottimizzate per lavorare lato db server
Ma anche cosi' lanciare qualche interrogazione che impieghi piu' di
qualche secondo per alimentare la form che hai sotto gli occhi, mi fa'
un po' venire i brividi, una roba del tipo 'io speriamo che me la cavo'

Da come scrivi sembra che ricolleghi le tabelle ad ogni apertura
programma, ma non basta farlo una volta sola?


title: timeout connessione al server (ODBC)

author: Xÿmox

text:
Il 17/04/23 11:06, RobertoA ha scritto:
> Da come scrivi sembra che ricolleghi le tabelle ad ogni apertura
> programma, ma non basta farlo una volta sola?

stessa domanda che mi stavo ponendo, ci sarà altro, aspettiamo la risposta.


title: timeout connessione al server (ODBC)

text:

Sì basterebbe una volta sola, nel mio caso il cliente può avere più di una azienda da gestire, ogni azienda è memorizzata in un db diverso e può avere tabelle o viste diverse come struttura, la scelta di avere una azienda per db è determinata dal fatto che il cliente può mandare una copia al commercialista per controllo bilanci ecc.  ho un commercialista che segue diversi miei clienti e un db solo con tutte le aziende memorizzate avrebbe complicato molto questo aspetto quindi la via più semplice e a mio parere sicura era ricollegare le tabelle.

Giorgio Rancati


title: timeout connessione al server (ODBC)

text:
Ciao Giorgio! Che piacere leggerti!
Allora è tempo di fare una nuova CISA!

un caloroso abbraccio!
Matteo



title: timeout connessione al server (ODBC)

text:

Ciao Matteo,
vedo che sei sempre brillante :-)
abbraccio ricambiato
Giorgio Rancati


title: tempo apertura query

text:
ciao a tutti

come si fa per vedere il tempo
d'apertura di una query?

Grazie


title: tempo apertura query

text:

Non si fa... quando lanci una Query, parte un processo ASINCRONO...

@Alex


title: tempo apertura query

text:

grazie Alex


title: tempo apertura query

text:
<
francode...@gmail.com
> ha scritto nel messaggio
news:4521e850-c914-479e...@googlegroups.com...

> come si fa per vedere il tempo
> d'apertura di una query?

Non esiste niente di nativo che ti possa restituire i tempi d'esecuzione,
però se in fase di design di un'applicazione hai bisogno di numeri per
operare scelte diverse, puoi misurare la velocità di una query con un pò di
VB:

- Memorizzi in variabile PincoPalla il Timer di sistema
- Esegui Query
- Visualizzi  Timer - PincoPalla

Saluti.


title: tempo apertura query

text:

grazie Simone
mi puoi far vedere eventualmente il codice
che scriveresti su apertura della maschera
con origine della "query" in questione


title: tempo apertura query

text:
> - Memorizzi in variabile PincoPalla il Timer di sistema
> - Esegui Query
> - Visualizzi  Timer - PincoPalla
>
> Saluti.

grazie Simone
mi puoi far vedere eventualmente il codice
che scriveresti su apertura della maschera
con origine della "query" in questione

>
>

Personalmente testo i tempi d'esecuzione delle queries prima d'inserirle
come origine dati di una Form/Report.
Il metodo è quello che ho descritto (eseguo la query in un Recordset).

Saluti.


title: tempo apertura query

text:

ciao Simone
su che basi fai la valutazione
una volta creato il recordset


title: tempo apertura query

text:
> Personalmente testo i tempi d'esecuzione delle queries prima d'inserirle
> come origine dati di una Form/Report.
> Il metodo è quello che ho descritto (eseguo la query in un Recordset).
>
> Saluti.

ciao Simone
su che basi fai la valutazione
una volta creato il recordset

>

>

1 - Memorizzo in variabile PincoPalla il Timer di sistema
2 - Eseguo Query
3 - Visualizzo  Timer - PincoPalla

Può darsi che la query possa essere scritta in altri modi più o meno
efficienti, sarà il punto 3. ad aiutarmi a capire quale è la più veloce.

Saluti


title: tempo apertura query

text:

ciao Simone
su click di due pulsanti
ho inserito questi due codici,
ma non ho nessun risultato,
dove sbaglio?
grazie

pulsante 1
   Dim StartTime As Double, EndTime As Double
   Dim db As DAO.Database
   Dim Rs As DAO.Recordset
   'Stores start time in variable "StartTime"
   StartTime = Timer

    Set db = CurrentDb
    Set Rs = db.OpenRecordset("SELECT * from miaTb", dbOpenDynaset)

   'Stores end time in variable "EndTime"
   EndTime = Timer

   'Prints execution time in the debug window
   Debug.Print "Execution time in seconds: ", EndTime - StartTime

pulsante 2
   Dim StartTime As Double, EndTime As Double, stDocName As String

   'Stores start time in variable "StartTime"
   StartTime = Timer

    stDocName = "MiaqueryProva"
    DoCmd.OpenQuery stDocName

   'Stores end time in variable "EndTime"
   EndTime = Timer

   'Prints execution time in the debug window
   Debug.Print "Execution time in seconds: ", EndTime - StartTime


title: tempo apertura query

text:
ciao Simone
su click di due pulsanti
ho inserito questi due codici,
ma non ho nessun risultato,
dove sbaglio?
grazie

>
>

Nel senso che ti da zero? Probabilmente testi la faccenda su pochi dati e in
monoutenza.
Prova con queries su DB significativi (e magari in LAN) e restituirą
risultati utili sui tempi di esecuzione.

Saluti.


title: tempo apertura query

text:

l'errore è che il riusltato lo dovevo guardare nella finestra immediata
ma poi ho fatto
MsgBox EndTime - StartTime

cmq grazie


title: Per Giorgio Prix: potresti rispondere per favore al messaggio del 30/06/03?

author: OneEDP

text:
Non sono riuscito a risolvere il problema. Ti ringrazio fin d'ora se sai
dirmi che alternative ci sono. PLS anche in caso negativo dammi un cenno.
Saluti
Daniele


author: Giorgio Prx

text:
"OneEDP" <
one.emme...@tin.it
> ha scritto nel messaggio
news:OiwMa.139966$lK4.3...@twister1.libero.it...

Ciao OneEDP
Sono spiacente ma non vedo il messaggio del 30/06/03, ultimamente il mio
outlook fa le bizze (forse troppo intasato), provo a fare una ricerca su
google.
Se Biso non si inc.... portesti riformulare il post in coda a questo ?
Ciao Giorgio


text:
"Giorgio Prx" <
giorgio...@tiscali.it
> ha scritto nel messaggio
news:bdu7je$tod$1...@lacerta.tiscalinet.it...

Ti riscrivo:
La sintassi non va bene perché la query di selezione è interamente
Pass-Through e usa un linguaggio SQL diverso da quello di Access!
Non devo puntare ad una tabella mediante collegamento ODBC devo eseguire una
query di selezione (molto complessa) strutturata con quel particolare
linguaggio SQL (nel mio caso DB2/400).
Hai dei suggerimenti?
Grazie.
Daniele


author: MA

text:
> Sono spiacente ma non vedo il messaggio del 30/06/03, ultimamente il mio
> outlook fa le bizze (forse troppo intasato), provo a fare una ricerca su
> google.
> Se Biso non si inc.... portesti riformulare il post in coda a questo ?
>
> Ciao Giorgio
A proposito di server buoni e dalla memoria lunga. Rispondendo a non mi
ricordo chi che me la'veva chiesto, sto utilizzando come server di news
news.edisontel.com
 e vedo messaggi fino a ottobre 2002 via OE
Ve lo consiglio.
MAssimiliano


text:
"OneEDP" <
one.emme...@tin.it
> ha scritto nel messaggio
news:SlxMa.140141$lK4.3...@twister1.libero.it...

Ciao Daniele
La situazione è semplice, nel metodo che ti ho suggerito Access non può
eseguire query in linguaggio DB2 e una query Pass-Through lavorando
direttamente sul server non può aggiornare una tabella di Access.
A questo punto vedo una sola strada, che è quella di accodare i dati alla
tabella di access via codice VBA (codice che puoi proteggere) accedendo a
DB2 con un recordset Pass-Through ti faccio un esempio funzionante con
SqlServer2000.
Dim wrk As Workspace
Dim Conn As DAO.Connection
Dim RsSrc As DAO.Recordset 'Recordset sorgente
Dim RsDst As DAO.Recordset 'Recordset destinazione
Dim Sqltext As String
Set wrk = CreateWorkspace("", "Admin", "", dbUseODBC)
Set Conn = wrk.OpenConnection("Conn", dbDriverCompleteRequired, , _
           "ODBC;DRIVER=Sql
Server;Server=(local);DATABASE=Prova;UID=sa;PWD=sa;DSN=;")
' Creo la query in linguaggio TSQL
Sqltext = "SET NOCOUNT ON " & vbCrLf & _
          "CREATE TABLE #Pippo (Id int IDENTITY(1,1),Nome Varchar(100))" &
vbCrLf & _
          "INSERT #Pippo (Nome) VALUES('Daniele')" & vbCrLf & _
          "INSERT #Pippo (Nome) VALUES('Giorgio')" & vbCrLf & _
          "UPDATE #Pippo Set Nome='***'+Nome+'***'" & vbCrLf & _
          "SELECT Id,Nome FROM #Pippo" & vbCrLf & _
          "DROP TABLE #Pippo"
'Apro i recordset
Set RsSrc = Conn.OpenRecordset(Sqltext, , dbSQLPassThrough)
Set RsDst = CurrentDb.OpenRecordset("TbProva")
'Accodo i dati
Do
  If RsSrc.EOF Then Exit Do
  RsDst.AddNew
  RsDst!Nome = RsSrc!Nome
  RsDst.Update
  RsSrc.MoveNext
Loop
'Pulizia
RsSrc.Close
Set RsSrc = Nothing
RsDst.Close
Set RsDst = Nothing
Conn.Close
Set Conn = Nothing
Set wrk = Nothing
Ciao Giorgio


text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:i8yMa.8801$de....@news.edisontel.com...

Grazie per l'informazione, io utilizzo il server
news.tiscali.it
 e forse ha
risentito dello stesso problema avuto dal server Microsoft in data 30/06/03.
Ciao Giorgio


text:
"Giorgio Prx" <
giorgio...@tiscali.it
> ha scritto nel messaggio
news:bduc7f$j7$1...@lacerta.tiscalinet.it...

Purtroppo sul server rimarrebbe traccia dell'intero statement... comuque
risolve parte del problema.
Ti ringrazio.
Ciao
Daniele


text:
"OneEDP" <
one.emme...@tin.it
> ha scritto nel messaggio
news:gZyMa.140409$lK4.3...@twister1.libero.it...
>
> "Giorgio Prx" <
giorgio...@tiscali.it
> ha scritto nel messaggio
> news:bduc7f$j7$1...@lacerta.tiscalinet.it...
> >
> > "MA" <
keiko...@libero.it
> ha scritto nel messaggio
> > news:i8yMa.8801$de....@news.edisontel.com...
> > > > Sono spiacente ma non vedo il messaggio del 30/06/03, ultimamente il
> mio
> >
> Purtroppo sul server rimarrebbe traccia dell'intero statement... comuque
> risolve parte del problema.
> Ti ringrazio.
> Ciao
> Daniele
>
L'amministratore del server può intercettare qualsiasi comando inviato anche
quello della query Pass-Through.
Ciao Giorgio


text:
"Giorgio Prx" <
giorgio...@tiscali.it
> ha scritto nel messaggio
news:bdugph$2rd$1...@lacerta.tiscalinet.it...

In fact... per questo il problema rimane in parte... non sono io
l'amministratore.
Ciao
Daniele


title: Apertura maschera

author: comune

text:
Ho una maschera, se clicco su un campo apre un altra maschera e vorreri
aprirla in visualizzazione struttura CON
DoCmd.OpenQuery stDocName, acNormal, acEdit
 . Mi sapete indicare l'Istruzione per aprire in modalità struttura.
Grazie per le eventuali risposte


title: Apertura maschera

text:
> Ho una maschera, se clicco su un campo apre un altra maschera e vorreri
> aprirla in visualizzazione Foglio dati, utilizzo



title: Apertura maschera

author: ]SiLVieTTa[

text:
Thread ricco mi ci ficco: Il Wed, 17 Dec 2003 10:10:28 GMT, "comune"
<
ull...@ciaoweb.it
> dopo averci riflettuto a lungo, ha scritto:
DoCmd.OpenQuery stDocName, acdesign
Ciao
Silvia.
 --
www.silvietta.it
...everyone's invited!
Non Esiste Una Razza Bianca, Benche' Se Ne Parli Tanto: Ogni Uomo Bianco E' Solamente Un Uomo Scolorito


title: Apertura maschera

text:
"comune" <
ull...@ciaoweb.it
> ha scritto nel messaggio
news:oYVDb.191170$vO5.7...@twister1.libero.it...

Un po' difficile aprire una maschera con il Metodo OpenQuery. ;-)
Prova con:
DoCmd.OpenForm stDocName, acDesign
Per maggiori dettagli vedi cosa dice l'help circa il Metodo OpenForm.
Stai attento però quando chiudi ma maschera di richiedere che vengano
salvate le modifiche (vedi cosa dice l'help circa il Metodo Close).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Informazione

text:
Salve volevo sapere come posso fare ad aprire un  file di access con visual
basic ( ho realizzato un from in visual basic che ho 2 pulsanti di cui al
clic carica mi deve aprire il seguente file C:\Documents and
Settings\Macchia Donato\Desktop\Copia di Copia di Giugno9
Grazie


title: Informazione

author: Antonio Biso

text:
"D.M" <
dmac...@libero.it
> ha scritto nel messaggio
news:WL3Wa.215761$Ny5.6...@twister2.libero.it...
Te la do io un'informazione: scrivi un subject significativo!!!
Antonio


title: Informazione

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:dP3Wa.215772$Ny5.6...@twister2.libero.it...

> Mi serve sapere il codice basic per aprire il file di access descritto
nella prima e-mail
>


title: Informazione

text:
"D.M" <
dmac...@libero.it
> ha scritto nel messaggio
news:GX3Wa.215792$Ny5.6...@twister2.libero.it...

Riposta il tuo messaggio da capo con un titolo significativo del tuo
problema
Antonio


title: FormAction was canceled

text:
oh aiutoo!!!
ho un database così composto.
mde con fe
mdb con be
il tutto racchiuso in un file di installazione .exe insieme ai vari file
necessari al pgr.
il tutto viene installato e funziona correttamente sul mio pc e negli altri pc
dell'ufficio.
l'ho dato ad un cliente che alla prima installazione su un pc non ha avuto il
minimo problema.. se non erro lo ha installato anche su un portatile senza
problemi.
poi ha provato ad installarlo su altri 2 pc e sono nati i problemi!!
avendo tutti i loro pc office 2000, gli ho fatto installare il runtime del 2002
(nel quale ho creato il pgr).
l'installazione è ok.
il database con la prima mascherina si apre correttamente.
si apre e funziona correttamente anche la mascherina con l'anagrafica delle
persone inserite.
un'altra maschera apre un elenco di corsi correttamente, ma al momento in cui si
vogliono vedere i dettagli di ogni corso (prendendoli dalla stessa tabella dal
quale prelevavo l'elenco), nascono i problemi.
dà un errore come "formaction was canceled".
il tutto SOLO su 2 pc!
le sto provando tutte:
- file corrotti nel trasferimento non mi sembra: reinviandole a me si aprono
correttamente
- ho provato a far reinstallare il tutto
- ho provato a far cancellare office 2000 che aveva sotto (magari era
incompatibile con il runtime)
ma niente..
- file d'installazione importanti mancanti, no, in quanto lo stesso exe è stato
usato con successo su altri pc..
sapete mica cos'altro può impedire l'apertura?
se fosse un errore nel codice avrebbe dato problemi su tutti i pc..
se fosse un problema del pc, d'altro canto non avrebbe dato l'errore su 2 pc
diversi..
sapete consigliarmi qualche altra prova da fare?!?!?!?!
Ciao
Silvia.
--
www.silvietta.it
...everyone's invited!
Kann ein Herz aus Stein sein??


title: FormAction was canceled

text:
"]SiLVieTTa[" <wonderwomanL...@studiomarketing.it.invalid> ha
scritto nel messaggio news:0v5h019a8m1pq318r...@4ax.com...

Ciao Sivia,anzitutto dai un'occhiata ai SO.
Poi converti i db in mdb 2000 e vedi dove si ferma l'interruzione del codice
Oppure metti una procedura che quando vai in errore ti cattura il numero
dell'errore e poi te lo fai inviare.
MAssimiliano


title: FormAction was canceled

author: Carlo Costarella

text:
"]SiLVieTTa[" <wonderwomanL...@studiomarketing.it.invalid> ha
scritto nel messaggio news:0v5h019a8m1pq318r...@4ax.com...

Riferimenti mancanti a librerie o ocx non presenti sui due computer?
Ciao, Carlo


title: FormAction was canceled

text:
[cut]
ciao Silvia,
avrei bisogno di un tuo piacere, se possibile,
se e quando leggi questo post, mi contatti via mail per favore?
Ciao!
--
strano...mavero
mail: mauro . chiarello @ gmail . com
ICQ: 292-118-822
Se vuoi mettere al sicuro i tuoi dati, caricali su un server ed aspetta che
qualcuno ne faccia un mirror
Linus Torvalds