mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo Versione programmi...

Ciao,
ho un programma che e' composto da un centinaio di moduli .exe. Avrei
bisogno di una utility che vada a verificare la versione di ogni singolo
modulo e mi produca un report.
Esiste qualcosa del genere?
Ciao e grazie 1000 a chi mi risponde.
---
grenzo

 Esiste qualcosa del genere?
Un *centinaio* ??!
alla faccia ;-)
Cerca "versione file" sul Sito Comune, ci sono un paio di esempi che puoi
facilmente adattare... ti avviso pero' che le funzioni dell'API dedicate a
questa cosa sono intrinsecamente lente (devono accedere al file di risorse
contenuto nell'EXE, per quanto ne so) per cui con quel numero di file la
procedura non sara' particolarmente rapida
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Dr. Emmett L. Brown
Ok, grazie, vado e cerco ... se non capisco ( probabile.. ) ritorno a
chiedere...
ciao
grenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Scusate se ci riprovo

Scusate se vi ripongo la domanda ma pur avendo avuto un suggerimento non
riesco ad utilizzarlo
Come faccio ad inserire in una textbox  il contenuto di un file di testo
tipo .txt o .doc  .
Es.
Ho il file Cosedafare.txt voglio visualizzare il suo contenuto nella
textbox ??
Come faccio ??
Ho provato cosě ma visualizza solo l'ultima riga del file di testo:
         Open strpercorso For Input As #1
            Do Until EOF(1)
            Input #1, pausa
           Text1.text = pausa
            Loop
          Close #1
Un amico mi ha consiglkiato di utilizzare Get ma come funziona
Devo forse utilizzare gli OLE ? e come funzionano ?
.sono consapevole di essere una chiavica non c'č bisogno che me lo
ricordiate
Ciao Max

         Open strpercorso For Binary As #1
                  Text1.Text=input(Lof(1),1)
         Close #1
Gianni Moretti

Newsgroup: it.comp.lang.visual-basic
Titolo: [SITO COMUNE] Nuovamente online

Il Sito Comune è nuovamente raggiungibile all'indirizzo ufficiale!
Alcuni scripts per invio materiale, posta e registrazione utenti non
funzionano ancora!
Fateci un giro e segnalatemi all'indirizzo "webmaster Chiocciola
it-lang-vb Punto net" eventuali pagine mancanti (404) o problemi.

 Il Sito Comune č nuovamente raggiungibile all'indirizzo ufficiale!


 errori Server object error 'ASP 0177 : 800401f3'
Infatti, come scrittto anche in homepage, gli script collegati alla posta
non funzionano ancora... questa sera se riesco ci do un'occhiata! ;-)
Grazie della segnalazione comunque.
Newsgroup: it.comp.lang.visual-basic
Titolo: Codice Errore da passare ad un batch DOS

Salve.
Ho realizzato un programma VB per lo scarico su file sequenziale di
alcune tabelle Access.
Tale programma viene chiamato da un batch DOS che al suo interno
contiene anche la gestione dell'errore; io a questo punto devo, nel caso
in cui si verifichi qualche anomalia durante il programma, far ritornare
un codice errore e farlo vedere al batch DOS.
Qualcuno ha qualche suggerimento?
Grazie.
-- 
Posted from [195.250.226.3] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:415FBAC362BBD211B7060008C75C4ADE0969B4@DSWNT6B...

Non per fare il curioso, ma perché usare un file batch e non fare tutto daVB
?
Ciao
VB

Newsgroup: it.comp.lang.visual-basic
Titolo: TextToSpeech

Qualcuno può gentilmente illuminarmi sull'uso del componente TextToSpeech?
Anche con un semplice link.
Grazie
Enzo Franchini

 ha scritto nel messaggio
news:aNv3a.185634$0v.51...@news1.tin.it...

devi inserire il controllo nella form poi crei una casella di testo di nome
VOCALE
e su click richiami quanto segue
            CtlActiveX218.Speak VOCALE
fine. facile no?

a cosa serve?? è un ocx?


è una parte di alcune librerie chiamate SAPI
ovvero Speech API cioè le librerie per far parlare il computer
e per permettergli di riconoscere il parlato.
in particolare il TTS (Text to Speech)
permette di sentire pronunciata una stringa di testo.
Se sei curioso di vederlo in azione leggi quanto contenuto in
www.cerretosoft.it/ita/software/multimediali/sayit
e scaricalo da 
www.cerretosoft.it/ita/download/software
se sei interessato al funzionamento riparliamone ...
--
Mauro Cerreto

Newsgroup: it.comp.lang.visual-basic
Titolo: Att. Virus da hurricane4e-ha@libero.it

C'e' un tizio che all'indirizzo sopra che invia virus on aprite il file che
vi invia.

 vi invia.
senza scandirli con mcafee, non apro neanche i file che mi inviano i miei
fratellini.
immagina con quelli di ignoti.

 ha scritto nel messaggio
news:95hjap$hfhcf$1...@ID-51318.news.dfncis.de...


 wrote in message
95i0fd$6i1$1...@lacerta.tiscalinet.it...


 disassemblarli anche.
::::))))


 ::::))))
Ho passato a un disassembler un programma in Vb semplicissimo, tipo tre
righe di codice (private sub picture1_click - msgbox "ciao mondo" - end
sub):
300.000 linee di disassemblato.
Dite che devo preoccuparmi che disassemblino i miei programmini da 3klinee
vb? Ai poster l'ardua sentenza :)))
Ciaotutti,
Alessandro

 300.000 linee di disassemblato.
[...]
Meno male!
Credevo fossero di più! ;)

disassemblarli anche.
Io li decompilerei... Magari sono fatti in Visual Basic...
Saluti ;)
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD
Newsgroup: it.comp.lang.visual-basic
Titolo: vb4 Aiuto prime armi !!!!!!!!!!!!!!!!!!!!!!!!!!!!

Ciao da Roberto!
Sono davvero alle primissime armi, al punto che non riesco a capire il 99%
delle problematiche esposte in questo NG.
Avrei bisogno di un po d'aiuto, non ho disponibile con me il manuale e
debbo aiutarmi con la guida in linea.
Se qualcuno si muove a compassione, avrei bisogno di sapere come fare o/e
quale stinga utilizzare nel codice per fare aprire ad un tasto della form1
la successiva form2.
Capisco che puň essere grave porre una domanda del genere ma ho preso
finalmente coraggio dopo due giorni e sono qui a porvi il problema.
Ringrazio anticipatamente tutti coloro che mi aiuteranno a percorrere
questa (per me) nuova via.
ciao e GRAZIE ;-)>
 

 scritto nell'articolo
<01bc638b$f36640e0$085e49c2@BF101291>...


 > Capisco che può essere grave porre una domanda del genere ma ho preso


 
Anchio come te č da poco che seguo questo Ng vorrei chiarire subito
una cosa, se non sbaglio su questo Ng non c'č scritto
it.comp.esperti.visual-basic, perciň e spero ! di parlare a nome di
molti (se cosě non fosse me ne rammarico):
I gruppi come questo servono a tutti e sono per tutti perciň lancio un
appello a chiunque abbia remore come la tua a scrivere senza problemi
e ad esporre il proprio problema, il  massimo che ti puň succedere č
che nessuno ti risponda, 
Dopo tutto siamo quě per aiutarci a vicenda
P.s. Non esistono Domanda Stupide, ma solo risposte stupide 
Ciao a tutti.

 ciao e GRAZIE ;-)>
  La risposta e' semplicissima e la trovi anche nell'help in linea...
Usa il comando Show : Nome form.Show aggiugendo 1 se vuoi una finestra
modale (NomeForm.show 1)
Usa Hide per nasconderla NomeForm.Hide e Unload Nomeform per scaricarla
dalla memoria.
Comunque, ripeto, nell'help in linea trovi tutte le informazioni che
vuoi.
Ciao

   La risposta e' semplicissima e la trovi anche nell'help in linea...
E' molto ben nascosta anche io ho perso la speranza il secondo giorno di
ricerca.
Newsgroup: it.comp.lang.visual-basic
Titolo: COLLEGAMENTO APPLICAZIONE VB a JAVA

Con collegamento tra applicazione VB e JAVA intendevo dire che io vorrei
sviluppare un'applicazione che colleghi un programma che si chiama wzebra
2.21 ad una applet java che comunica con il server yahoo! games. Ogni volta
che viene effettuata una mossa dall'avversario il programma deve
intercettare la mossa e rispondere. Una volta trovata la mossa da compiere
il programma deve inviare all'applet il messaggio di muovere nella posizione
corrispondente a quella del programma (se il computer ha mosso in a7
all'applet deve essere inviato l'impulso di muovere in a7 senza cliccare con
il mouse). Penso di essere stato meno vago questa volta e spero che qualcuno
gentilmente possa replicare al mio messaggio. Grazie.
Sign: RC

 ha scritto

Puoi cominciare dall'API Sendmessage, ma se in futuro cambieranno l'applet Java farai una fatica
inutile adesso...

Newsgroup: it.comp.lang.visual-basic
Titolo: Salvare file di testo

Salve a tutti. ho bisogno una mano per un progr in VB.
Come si fa a salvare su un file di testo il contenuto di una label?
La label può avere lunghezza variabile.
Grazie in anticipo.
--
=> Fabio883 <=
fab...@net-one.it
ICQ UIN: 5320334
IRC NICKNAME: Fabio883
Webmaster of:
883 English Site: 
http://883.hypermart.net
DarkMoon BBS: 
http://darkmoon.hypermart.net

open "C:\testo.txt" for Output as #1
print #1, label1.caption
close #1
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

se ho capito bene...
nomfile$=[percorso\nome del file]
num%=freefile
open Nomefile$ for output as num%
print #num%,label1.caption
close num%
Davide


Newsgroup: it.comp.lang.visual-basic
Titolo: Se word non manda i fax

Salve!
Ho la necessità di inviare fax da visualbasic 6 su un sistema winzozz 98.
Leggendo il newsgroup mi sono indirizzato sull'uso di word 3 la relativa sendfax.
Ovviamente, non vorrei vedere ogni volta l'odioso wizard microsoft.
Quando nel mio programma viene eseguita la seguente riga di codice:
wordapplication.ActiveDocument.SendFax "348xxxxxxxx", "Important Fax"
simapaticamente visual basic mi propone  qusto errore:
Errore di runtime:'5663'
Fax locale di microsoft mail non installato
Ovviamente prima di quella riga ho caricato un file nel document di word.
Che cosa sto sbagliando?
Esiste qualche altro modo per mandare fax da vb?
grazie a tutti
Ciao
Marco

Esiste qualche altro modo per mandare fax da vb?
Purtroppo non ho una gran esperienza al riguardo, quello che ho visto
e' stato l' impiego, in ambito aziendale, di fax server 
(tipo ZetaFax o Lotus Notes qualcosa).
ciao, hal

 ciao, hal
Ciao!
Marco

essere una procedura automatica!
Passo la palla, io uso OpenOffice ;-)
ciao, hal

 essere una procedura automatica!
Word i fax li manda se c' č una stampante fax.
Normalmente Microsoft Fax o Symantec winfax, che sono entrambi client
exchange.
Oppure qualche altro software di rendering e invio.
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: DataEnviroment, aggiungere record....

Salve a tutti...
Ho appena iniziato a "giocare" con il DE di Visual Basic 6.0 SP5 e volevo
sapere come posso aggiungere record ad un database con questa struttura.
Io ho un oggetto connection1, un cmd1 e un "sotto" cmd2 (relazionato con
cmd1).
Trasportato il tutto su un form mi ritrovo del cmd1 tutte textbox e di cmd2
una MsHFlexGrid.
Come posso aggiungere record sia da una parte che dall'altra?
Qualcuno puo' consigliarmi qualche sito inoltre, dove si approfondisca
l'utilizzo di D.E. o pensate che non ne valga la pena ed imparare il tutto a
codice?
Grazie a Voi!
Ciao



Per quanto riguarda cmd2, forse la FlexGrid ha la possibilita' di
aggiungere alla fine la riga di inserimento, per le Text di cmd1 non
saprei.
Consiglio:usa il codice e non gli automatismi dei controlli.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ProgressBar "continua" e %

Dove trovo la ProgressBar che visualizza lo stato di avanzamento in modo
continuo (senza i "blocchi", per intenderci) e la percentuale (o altri dati,
come numero rcd,...) ?
E' forse la combinazione di piů oggetti ?
Ringrazio & saluto. Maurizio.
--
Please reply to 
compig...@conecta.it
, thanks.

 Ringrazio & saluto. Maurizio.
Prova con quella fatta dai ragazzi del CCRP, permette di fare tutto quello che ti serve  (
www.mvps.org/ccrp
).
Colgo l'occasione per fare i complimenti a Domenico Statuto per il suo lavoro nei CCRP (continua cosi'!!)
Ciao
Riccardo

Riccardo
Grazie Riccardo, era proprio ciň che cercavo !
Faccio anch'io i miei complimenti ai boys del CCRP per la cura dei loro
"prodotti" e del loro sito.
Un' altra question:
immaginando di usare suddetta ProgressBar per un controllo di tempo (in
unione ad un timer), c'č una maniera per far eseguire il codice di controllo
della barra IN CONTEMPORANEA ad altre istruzioni, e fermare la PrgBar
controllando il valore di una variabile bool ?
Spero di sě... :-)
Saluti, Maurizio.


Se ti serve per visualizzare lo stato di una transazione (con possibilità
di annullare l'operazione)  forse questo può servirti (riporto solo la
parte principale del codice).
Nell'ipotesi di voler copiare i dati da una TabellaA ad una TabellaB
(vuota)
in un evento cmdclick:
......
Annullaflag=false
myWorkSpace.begintrans
i=0
progbar.min=0
progbar.max=numero_record_TabA
progbar.visible=true
do while (i<=numero_record_TabA)  and not(Annullaflag)
 aggiungi il record di A in B
 progbar.value=i
 i=i+1
 doevents '<- serve per passare il controllo ad un tasto annulla che
imposti Annullaflag=true
loop
progbar.visible=false
progbar.value=progbar.min
if (i=numero_record_TabA) and not (Annullaflag) then
   myWorkSpace.committrans
   myWorkSpace.close
   ........
 else
   myWorkSpace.rollback
   msgbox "operazione Annullata"
endif
........
Attenzione che durante la transazione l'unica operazione consentita deve
essere un click su un eventuale tasto Annulla: va quindi intercettato anche
un ipotetico unload del form.
Ciao Marco.
-- 
Remove xxx from E-mail.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con recordset

Ciao a tutti
Ho un problema: ho fatto una query in ACCESS specificando pure un parametro.
Con Data Environment ho assegnato ad un command  questa query e fin qui va
tutto bene. Il problema stà quando voglio aggiungere un record su questo
command, più precisamente quando voglio salvare.
Mi dice che gli mancano dei parametri e che ne vorrebbe almeno 1. Mi dite
che cosa devo fare, se quello che ho pensato di fare è una grandissima
cavolata, se è possibile o meno, ecc
Grazie
Ciao

 ha scritto nel messaggio
news:8glede$qgf$1...@oldforst.unisource.it...

Devi postare la Stringa SQL che hai scritto. L'errore è molto
probabilmente li.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 wrote in message
news:8glf6q$hs9$1...@fe1.cs.interbusiness.it...

La stringa SQL  della query di access è:
PARAMETERS lngCampo1 Long;
SELECT campo1,campo2,campo3
FROM tabella1
WHERE (((campo1)=[lngCampo1]))
Invece la stringa SQL del command di Data Environment non c'è, visto che lo
ho collegato tramite le due combobox che ci sono nella finestra proprietà
del command.

 wrote in message
8glijd$rf1$1...@oldforst.unisource.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo calendario

ciao a tuuti sapreste dirmi se in visual basic c'č un controllo calendario?
no quello "microsoft calendar control" ma uno come ho visto in diverse
applicazioni fatto da un combo che quando si apre appare il calendario dal
quale scegliere la date...
credo che dovrebbe esserci ma non so proprio qual'č
vi ringrazio in anticipo per l'aiuto

 vi ringrazio in anticipo per l'aiuto
COmponente Microsoft Windows Common Control 2-6.0(SP 3)
il controllo è il DTPicker
Ciao,
Mattia
Newsgroup: it.comp.lang.visual-basic
Titolo: ODBC

Ciao,
come posso creare da codice un odbc in locale per una connessione ad Acces?
grazie!!!
Aiutatemi
-- 
Posted from 
ppp25-144.caltanet.it
 [151.17.144.25] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

> come posso creare da codice un odbc in locale per una connessione ad
Acces?
Con DAO puoi usare il metodo "DBEngine.RegisterDatabase",
guarda sulla guida di VB.
Ma... perchè usi questi sistemi obsoleti?????

 ha scritto nel messaggio
news:OviW7.365385$sq5.17...@news.infostrada.it...


Altro metodo:
Creare e rimuovere in DSN direttamente dal VB
di Danilo Priore
Usando la versione a 32-bit del VB è possibile fare una connessione ODBC
attraverso la definizione del DSN. E' possibile creare dinamicamente e
rimuovere un Data Source Name (DSN) direttamente da codice VB usando la
funzione SQLConfigDataSource delle API-ODBC.
Per prima cosa si dovrà dichiarare la funzione SQLConfigDataSource nel modo
seguente:
Declare Function SQLConfigDataSource Lib "ODBCCP32.DLL" (ByVal hwndParent As
Long, ByVal fRequest As Long, ByVal lpszDriver As String, ByVal
lpszAttributes As String) As Long
Il parametro hwndParent corrisponde all'handle della finestra padre (es.
Form1.hwnd)
Il paramtero fRequest indica l'operazione da compiere:
ODBC_ADD_DSN 1 Aggiunge un DSN
ODBC_CONFIG_DSN 2 Modifica un DSN esistente
ODBC_REMOVE_DSN 3 Rimuove un DSN
Il parametro lpszDriver specifica il driver da utilizzare per il database
per esempio "SQL Server".
Il parametro lpszAttributes definisce il collegamento DSN dove ogni
parametro deve essere separato da un carattere NULL, per esempio :
lpszAttributes = "DSN=dbTemp" & Chr$(0) & "DATABASE=pubs" & Chr$(0) &
"UID=sa" & Chr$(0) & "PWD=" & Chr$(0)
La funzione restituisce 0 se non è avvenuto nessun errore e l'operazione ha
avuto successo.
Se si utilizza il VB a 16-bit l'utilizzo della funzione rimangono uguali ma
si dovrà dichiarare la funzione nel modo seguente:
Declare Function SQLConfigDataSource Lib "ODBCINST.DLL" (ByVal hwndParent As
Integer, ByVal fRequest As Integer, ByVal lpszDriver As String, ByVal
lpszAttributes As String)
Oppure puoi usare un DSN su file e includerlo nel pacchetto installazione!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: System Tray con VB ???

Windows 95 (dove c'=E8 l'icona dell'orologio)?
	Non so' per VB5, per VB4 ci sono degli ocx in giro per la rete
(alcuni dei quali, comunque, sono shareware). Sempre per VB4 Io
utilizzo una classe costruita da Stefano (
gl...@eponet.it
) che la
rende disponibile gratuitamente.=20
	La classe, ovviamente, utilizza delle Api. =09
	Non ricordo da dopo l'ho prelevata ma se ti interessa te la
invio in e-mail.
	Fammi sapere.
	Bye.
Enzo Marinacci- Roma   (Italy)=20
E-MAIL: 
E.Mar...@flashnet.it
http://www.pulsar.it/windows95
 Il Club dedicato a Win95!
http://www.bns.it/EMware
       Freeware=20

 Grazie a chiunque mi risponda.
Si è possibile ma ci sono degli inconvenienti.
Il problema più grande da risolvere è la comunicazione tra la TNA ed il
programma VB, o meglio la notifica della pressione di un tasto del mouse
sull'icona del programma presente nella TNA.
Un metodo è usare una controllo che dispogna di un handle capace di
generare eventi, come ad esempio il controllo PictureBox standard, ma
non è il metodo migliore.
Questo metodo prevede l'installazione dell'icona tramite la funzione
Shell_NotifyIcon delle API. Prima di utilizzarla è necessario definire i
dati della struttura NOTIFYICONDATA:
Dim Dati as NOTIFYICONDATA
With Dati
    .cbSize = len(Dati)
    .hwnd = Picture1.hwnd
    .uID = 0
    .uFlags = NIF_TIP + NIF_MESSAGE + NIF_ICON
    .uCallbackMessage = WM_MOUSEMOVE
    .hIcon = Picture1.Picture
    .szTip = "Tips che deve comparire" & Chr(0)
End With
l = Shell_NotifyIcon(NIM_ADD, Dati)
NIF_TIP, NIF_MESSAGE. NIF_ICON, NIM_ADD. WM_MOUSEMOVE sono costanti il
cui valore puo essere recuperato tramite il Visualizzatore di testo API,
come la dichiarazione della funzione Shell_NotifyIcon e la struttura del
tipo NOTIFYICONDATA.
Quando il mouse si troverà sull'icona presente nella TNA relativa al
programma, viene generato un messaggio WM_MOUSEMOVE che, intercettato
dall Picture, genera l'evento omonimo. In questo modo, però non è
possibile individuare la pressione dei pulsanti del mouse nè
discriminare tra icone con diverso ID.
Per poter individuare quale pulsante del mouse è premuto, nell'evento
della Picture si dovrebbe usare un'altra funzione delle API della quale
però non ricordo il nome.
--
Centro Studi Informatica di Danilo Priore
Via Pio VII, 9 - 00163 - Rome - Italy
Phone: (06) 66.40.052
Mobile Phone: (0335) 63.87.643
P.IVA 10149810581 Iscr. CCIAA 841531
e-mail: 
pri...@infocenter.it
URL: 
http://www.infocenter.it/priore
Newsgroup: it.comp.lang.visual-basic
Titolo: Unire files MDB

Ciao a tutti,
io ho due diversi files MDB contententi le stesse tabelle.
Le tabelle hanno lo stesso nome in entrambi i database, ma i dati che
contengono sono diversi.
E' possibile generare un terzo MDB che sia la "somma" dei miei due?
Quindi con all'interno le stesse tabelle che, però, contengono l'unione dei
dati dei miei due database??


se mi dici qualcosina di piů forse.
cioč ti serve una funzione da lanciare a richiesta o č solo per una volta?
in vb o access?

Usa una UNION in Query, cosě avrai due tabelle in una


Come sopra... come riesce più semplice!!
Grazie mille


ehm... dove? non sono espertissimo...

 ha scritto nel messaggio
news:Pkl5a.140378$YG2.4...@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Apici non bilanciati

Salve,
sto utilizzando il metodo find per effettuare la ricerca di un record il
cui campo codice (campo chiave) soddisfi una certa condizione.
Il problema e' che questo campo codice contiene qualsiasi carattere,
compresi gli apici. Quando scrivo:
StrConfrontaCodici= "Codice= ' " & stringadacercare & " ' "
Data2.Recordset.FindFirst StrConfrontaCodici
dove stringadacercare = dafgs4dgd%jfghg7"
essendoci un doppio apice alla fine, VB da errore perche' effettivamente
gli apici non sono bilanciati!!! Vorrei fare in modo che VB considerasse
la stringadacercare come un blocco unico, ignorando i caratteri di cui
e' costituito!!
Qualcuno puo' aiutarmi?
Grazie
Donatella :)

 wrote in message
3B1F96EB...@cmns.mnegri.it...


 ha scritto nel messaggio
news:3B1F96EB...@cmns.mnegri.it...


.. la soluzione di sotituire i singoli apici con il raddoppio degli stessi
l'avevo letta tra i messaggi arrivati tempo fa. Il mio problema e' che nella
stringa e' presente un DOPPIO apice. Facendo:
b=replace(b,""","""")
gli apici non sono bilanciati nemmeno nella funzione replace!!!!!!!
Help me PLEASE!!!!!
Ciao
Donatella :)

 wrote in message
news:3B20887E...@cmns.mnegri.it...

Ho il sospetto che ti stia sfuggendo qualcosa, e che per proprieta'
transitiva qualcosa sfugga a noi...
Allora, ecco il tuo codice:
StrConfrontaCodici= "Codice= ' " & stringadacercare & " ' "
Data2.Recordset.FindFirst StrConfrontaCodici
Ora, posto che Codice sia un campo di tipo testo e che stringadacercare sia
una variabile, non vedo per quale motivo dovresti avere un errore.
Posta il codice reale, comprensivo del caricamento di stringadacercare.
Ti ricordo infine che per una ricerca SQL il modo corretto di organizzare la
stringa di ricerca e' (e' formattato giusto anche se non sembra, usa un
carattere non proporzionale):
' Costanti stringa
Const STR_SQUOT = "'"           ' Apice singolo
Const STR_DBD_SQUOT =  _
        STR_SQUOT & STR_SQUOT   ' Apice singolo raddoppiato
sRicerca=Replace(txtRicerca.Text, STR_SQUOT, STR_DBD_SQUOT)
sStringaRicerca=FLD_CODICE & "='" & sRicerca & "'"
Dove FLD_CODICE e' una costante contenente il nome del campo, se domani
cambiassi idea e decidessi che "Codice" non e' abbastanza esplicativo...
Ciaotutti,
Asterix

 ha scritto nel messaggio
news:3B20887E...@cmns.mnegri.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Amici: adesso ho bisgno di voi !

Come si fa un a CheckBox in una
dbGrid standard ?
Quali parametri esatti bisogna impostare in
proprietà o da codice o personalizate
grazie a tutti
Noseda
 

 alcune celle nella Flex.
Forse, piu' che delle checkbox, ti converrebbe lavorare sulla proprieta'
CellPicture, assegnandogli l' immagine di una checkbox checkata oppure no a
seconda delle necessita'.
Imposta anche CellPictureAlignment = flexAlignCenterCenter.
In questo modo, anche se non fa lo stretch dell' immagine, ma non dovrebbe
farlo, perche' non credo che avrebbe senso ingrandire la checkbox, tale
immagine rimane sempre centrata nella cella.
Gia' che ci sei, a questo punto ti puoi personalizzare anche il checkbox
all' interno della cella ...

 ha scritto


Appurato che non si comprende a che serva
il button in una dbgrid, posto il codice per inserire
una Combo in una dbgrid per il Sito Comune.
Questa indicazione vale anche per una CheckBox.
ciao
Noseda
--------------------------------------------------------
'  La colonna interessata è la 2
'  Il Form_Load bisogna posizionare
'      per ultimo il richiamo all'aggiornamento della Combo.
'  Il prg non utilizza l'Adodc ma tutto viene
'      generato da codice
'  La DbGrid non ha intestazione altrimenti
'      leggere commento in Private Sub PosizionaCombo()
' Per mia natura utilizzo meno OCX possibili, per cui
      c'è una ComboBox al posto di una DBComboBox:
      funge allo stesso modo
Private Sub Form_Load()
  Call PosizionaCombo
End Sub
Private Sub DbGrid1_RowColChange(LastRow As Variant, _
 ByVal LastCol As Integer)
  'Label1.Caption = DbGrid1.Row
  Call PosizionaCombo
End Sub
Private Sub PosizionaCombo()
  Combo1.Text = DbGrid1.Columns(2).Text
  Combo1.Width = DbGrid1.Columns(2).Width
  Combo1.Left = DbGrid1.Left + DbGrid1.Columns(2).Left
  Combo1.Top = DbGrid1.Top - 100 + DbGrid1.RowHeight _
    + (DbGrid1.Row * DbGrid1.RowHeight) + ((DbGrid1.Row + 1) * 10)
   '  ((DbGrid1.Row + 1) * 10) = valore da cambiare
   ' se si ha una intestazione
  DbGrid1.RowHeight = Combo1.Height
'  Combo1.SetFocus
End Sub
Private Sub DbGrid1_Scroll(Cancel As Integer)
  If DbGrid1.Row < 0 Then DbGrid1.Row = 0
  Call PosizionaCombo
End Sub
Private Sub Combo1_Click()
  DbGrid1.Text = Combo1.Text
End Sub
------------------------------------------------------------

per curiosita', hai usato la dll di faccin ?
 
  Il codice, pur interessante, mi è sembrato troppo
pastoso e come detto su l'ho riscritto:
  d'altra parte sono solo 4 linee di codice

Newsgroup: it.comp.lang.visual-basic
Titolo: 3 Aggiornamento tabella in rete


Se mi hai dato una risposta così dettagliata presumo che tu risolvi in
questo modo il problema, quindi volevo chiederti dei chiarimenti.
Intanto cosa intendi per Postazione?
Poi se il primo utente che cerca di inserire i dati, annulla l'inserimento,
il secondo utente si trova al punto di partenza con il numero incrementato.
Poi ancora tu la routine di incremento la metteresti dopo aver chiamato
AddNew o prima di Update
Carmelo

 AddNew o prima di Update
C'è una terza alternativa: prima di AddNew ;-) ma, come detto, solo se
l'AddNew verrà fatto. Tieni presente che lavoro esclusivamente da codice e
non uso controlli Data-eccetera.

[*Lupo* : 
LupoOrmaiR...@libero.it
] ha scritto:
PS: Si continua nello stesso topic...

Newsgroup: it.comp.lang.visual-basic
Titolo: di nuovo path di rete e api netsharecheck....

Ho usato il seguente metodo per verificare l'esistenza di una cartella sul
server
Private Declare Function NetShareCheck Lib "netapi32.dll" _
                (ByVal ServerName As String, _
                 ByVal Device As String, _
                 ByRef ShareType As Long) As Long
Private Sub Command1_Click()
 Dim SName As String
     Dim SHName As String
     Dim DevType As Long
     Dim Ans As Long
    SName = Text1.Text     -->\\nome server
    SHName = Text2.Text    -->directory da cercare
    DevType = -1
    Ans = NetShareCheck(StrConv(SName, vbUnicode), StrConv(UCase(SHName),
vbUnicode), DevType)
    MsgBox Ans, , DevType
End Sub
devtype mi ritorna 0, quindi credo abbia trovato il pc, ma Ans mi ritorna
2311...che secondo gli errori dovrebbe essere: NetShareCheck fails with
error 2311 (NERR_DeviceNotShared) when remoted to OS/2.
Come posso risolvere?
Grazie millle.

 fails with error 2311 (NERR_DeviceNotShared) when remoted to OS/2.
Se l'errore restituito dalla funzione è diverso da 0 (NERR_Success) non
puoi prendere assolutamente in considerazione il valore di DevType.
Ho appena provato sia con uno share del file system, sia con una stampante
ed ha funzionanto in entrambi i casi restituendomi, rispettivamente,
STYPE_DISKTREE e STYPE_PRINTQ
Se metto un nome diverso da quello di uno share esistente, la funzione
restituisce NERR_DeviceNotShared
Nello specifico ho utilizzato come client un Windows 2000 Server SP4,
"interrogando" un NT 4 Server SP6a.
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://italy.mvps.org

 ha scritto
nel messaggio news:2nchkvF...@uni-berlin.de...


 NIente da fare, su windows2000 mi da errore 5
L'unica modifica che ho apportato la codice da te mostrato, è stata quella
di toglie l'UCase.


 ha scritto
nel messaggio news:2ncqe3F...@uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: db Access danneggiato ?

Ho un problema con db in access 97.
Il db è pieno ma non più nessuna tabella e query.
Ho cercato di fare il ripristino e la compattazione ma non succede nulla.
Cosa posso fare ?
Ciao
Simona

 nulla. Cosa posso fare ?
Poco, tranne buttare il file i ripristinarlo da una copia.

 Poco, tranne buttare il file i ripristinarlo da una copia.
Da un trhead di pochi giorni fa mi è venuta un'idea malsana che proverò 
appena mi si verificherà il caso.
Dato che Access va sempre in append sul file si può provare a prendere 
l'mdb con la sola struttura e sovrascriverlo per la sua intierezza alla 
prima parte del file danneggiato.
Questo dovrebbe sovrascrivere la struttura originale, ma probabilmente 
anche qualche dato all'inizio del file :( ma meglio di niente nel caso 
non si avessero backups.
Ciao

...


 Ciao


Prova con questi
http://www.cimaware.com/
http://www.accessdatabaserepair.com/
Ciao, Fabrizio

 richieresti di riprtare anche cose che dati non sono...
Sì, è un dubbio che era venuto anche a me...

Newsgroup: it.comp.lang.visual-basic
Titolo: Matrici di controlli

Salve mi interessa sapere come dichiarare dinamicamente una matrice di textbox.
Avevo usato " global nome(1 to 30, 1 to 5) as textbox
ma in fase di utilizzo degli elementi mi dava "Variabile del blocco with non impostata"
Non so cosa fare.
Grazie
_________________________________________________________________________
la tua email gratuita e per sempre su 
http://www.freemail.it
 (anche POP3)
-- 
Posted from 
qma...@hermes.evo.it
 [194.184.29.10] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Salve mi interessa sapere come dichiarare dinamicamente una matrice di textbox.
non è possibile creare a runtime una matrice di controlli. E' necessario disegnare il controllo con
indice 0 e poi, a runtime, aggiungere quanti elementi si vuole all'array.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 Grazie
nel frm qui sotto in design ho messo un lbl e un txtbox, tutti e due a
indice 0.
piu' o meno come nel dataform wizard di vb, dovrebbe venire caricata una
coppia lbl + txt per ogni campo del recordset.
Private Sub Form_Load()
    Dim fld As Field
    For j = 1 To frmMail.DB1.Recordset.Fields.Count - 1 'J=1 : 0 gia'
caricata
        Load lblFields(j)
            lblFields(j).Top = lblFields(j - 1).Top + 360
            lblFields(j).Visible = True
        Load txtFields(j)
            txtFields(j).Top = txtFields(j - 1).Top + 360
            txtFields(j).Visible = True
    Next
    For j = 0 To frmMail.DB1.Recordset.Fields.Count - 1
        lblFields(j) = frmMail.DB1.Recordset.Fields(j).Name & ": "
        txtFields(j) = IIf(IsNull(frmMail.DB1.Recordset.Fields(j)), "",
frmMail.DB1.Recordset.Fields(j))
    Next
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Il futuro di Visual Basic 6

Presto Microsoft smetterà di supportare Visual Basic 6..
Qualcuno può darmi le sue considerazioni pensando anche a tutte le
applicazioni in Visual Basic che ancora esistono ed al proprio futuro
professionale??
Grazie

Presto Microsoft cesserà di supportare Visual Basic 6..
Quali sono i progetti attivi per mantenere viva la fiaccola di questa
tecnologia?
Che realistica futuro hanno gli sviluppatori certificati??
E la manutenzione delle applicazione..
Scambiamoci le idee...

 ha scritto nel messaggio 
news:1136591810....@f14g2000cwb.googlegroups.com...


avviene oggi con tutti i sistemi operativi windows (beta escluse).
Me lo spieghi?
Grazie
Aran Banjo
-- 
web: 
http://www.ponchio.it
Replay to: *[[banjo]]spamdim..@**
ponchio.it
**
"E' un vero peccato che tutte le persone che sanno come far
funzionare il paese siano troppo occupate a guidare taxi o
a tagliare capelli" - George Burns

 kernel basato su .NET
Io ho il dubbio che, per sua stessa concezione, un kernel basato su .NET 
non potrà mai esistere. Occorrerà sempre qualcosa che possa comunicare 
con l'hardware a basso livello.
Per quanto riguarda Vista, da quanto de so, le API native saranno 
completamente basate su .NET (WinFX). Quindi immagino si possa dire che 
su Vista le applicazioni .NET gireranno in modo nativo, e non su una 
macchina virtuale (CLI) come succede ora.
-- 
Saluti
VITRIOL

beh, vb6 si potrà continuare ad utilizzare ma per quanto mi riguarda
è già finito: per chi lo usa è giunta l'ora di aggiornarsi, di
passare a qualcosa di più impegnativo come 
vb.net
 o magari c++ (queste
sono proprio le vie che ho scelto io).
Per chi invece comincia dal mio punto di vista è sconsigliabile
avvicinarsi a vb6.
Per quel riguarda i vecchi progetti in 
vs.net
 c'è una utilità di
aggiornamento ma non funziona molto bene, soprattutto se i progetti
sono piuttosto vasti.

macchina virtuale (CLI) come succede ora.
Secondo me, avranno integrato in qualche modo la CLI, che comunque
dovrà esserci. Non oso pensare alle penose prestazioni in avvio di
applicazioni .NET....
Bye
AranBanjo


Beh saranno migliori di quelle attuali. E poi dato che non useranno
funzioni intermedie non penso che la differenza sarà poi così
evidente.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Recordset gerarchici e resync command

Ho un recordset gerarchico creato dalla seguente query:
SHAPE {SELECT (PersCogn & " " & PersNome) AS Matricola, PersMatr FROM
Personale}  AS Consuntivo APPEND ({SELECT Commesse.CommDesc AS Commessa,
Consuntivo.ConsOreO AS [Ore Ordinarie], Consuntivo.ConsOreS AS [Ore
Straordinarie], Consuntivo.ConsPers, Consuntivo.ConsAnno,
Consuntivo.ConsMese, Consuntivo.ConsComm FROM Consuntivo, Commesse WHERE
Consuntivo.ConsComm = Commesse.CommCod AND (Consuntivo.ConsAnno = 1999) AND
(Consuntivo.ConsMese = 1)}  AS Ore RELATE 'PersMatr' TO 'ConsPers') AS Ore
Uso il recordset principale per la sola visualizzazione in una hierarchical
flexgrid, e un secondo recordset (rstore) per l'inserimento, la modifica e
l'eliminazione dei dati, utilizzando i metodi di ado.
Non riesco a creare la giusta query da passare alla proprietà dinamica
resync command.
Qualcuno ha mai avuto questo problema? Come l'ha risolto?

 ha scritto nel messaggio
news:949j7d$p2b$1...@serv1.iunet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: OT per la maiella che rabbia...soluzioni settimana enigmistica

Capita che la compri al mare ...o nei periodi che mi va....poi 
rimangono sotto un mobile....poi una sera vai a letto non hai 
sonno....e ti metti a farla!
E "Stai per una definizione" nelle cornici concentriche....e ci diventi 
matto "a non sapere come va a finire"!
 
....il brutto è che NON ESISTE un sito web che riporti le soluzioni 
della settimana enigmnistica!...che scannerizzi la pagina delle 
soluzioni!...
C'avete la pagina delle soluzioni dell settimana numero 4053 ???
Non c'ha pensato nessuno a fare un sito web simile?
 
-- 
----- Italliaaaaa 3227! -----
Guerrieriii....giochiamo a fare la guerraaa!.... 
Guerrieriii....giochiamo a fare la guerraaa!.... 
Guerrieriii....giochiamo a fare la guerraaa!....
 
I guerrieri della notte (1987)
 
 

 Non c'ha pensato nessuno a fare un sito web simile?
 
Scanna la paGGina che ti concentro le cornici in quattroequattrosette.
 
-- 
-> G.Chiappori
www.chiappori.it
 
www.chiappori.com
 
 
 

 Scanna la paGGina che ti concentro le cornici in quattroequattrosette.
 
http://www.martek.it/dd/corniciconcentriche1.jpg
 
 
per risolvere la riga con la freccia rossa piena...probabilmente ho 
sputtanato quella sotto....son quasi sicuro che è "acetone"...ma se 
metto quello..."una faccia del foglio" che diventa...MAH!
 
WodkaEnigmistaDaStrapazzo!
 
-- 
----- Italliaaaaa 3227! -----
Pasquà...Pasquale Zagaria...u'fighh'Riccard
[Vieni avanti cretino (1982)
c'ho pure il video! 
http://www.martek.it/public/dblog/banfi1.swf
 ]
 
 

 WodkaEnigmistaDaStrapazzo!
 
 
Ahh  ubriacone .....
 
Basta una ricerca  su google
 
La settimana enigmistica .pdf   download   e trovi il file scannato
 
 

 WodkaEnigmistaDaStrapazzo!
 
spaccare eduli
 
 
 
G.Chiappori
www.chiappori.it
 
www.chiappori.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con MsComm

Ho un problema con il controllo MsComm.
Dopo 5 secondi che ho trasmesso dei dati nel buffer di trasmissione tramite
MsComm.Output,
il buffer si pulisce automaticamente, non trasmettendo più.
Non capisco se c'è un parametro di tipo timeout da variare, o qualcos'altro.

 ha scritto nel messaggio
news:a5hq9.25987$RO.6...@twister1.libero.it...

Non capisco il problema.
Presumo che i dati siano già stati inviati, in 5 secondi....
Altrimenti, dammi qualche altro indizio...
Ciao
Alberto

 ha scritto nel messaggio
news:zbuq9.27947$%M1.7...@twister2.libero.it...


 sulla trasmissione, non sulla ricezione.
Interessante....
Giuro che non lo sapevo.
A prima vista, avrei giurato che si trattasse di qualcosa dalla parte di chi
riceve, ma se hai fatto prove con hardware e software diversi, e il problema
è lo stesso, allora è sull'invio....
Adesso guardo un po' di doc, poi se trovo qualcosa lo posto.
Ciao
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Monitorare

Sto cercando di realizzare un programma che scriva in una richtextbox la
monitorizzazione della tastiera.
Se ad esempio sto usando Word, vorrei che tutte le parole che scrivo vadano
sia dentro ad Word che nel mio programma.
Come ci posso riuscire?
Grazie

 wrote in message
dLDl5.62695$dF5.1...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: trasferire un dato da access a word in automatico

Buon giorno,
vorrei chiedere il vs aiuto: non sono un informatico, ma per il mio lavoro
di ricercatore chimico, mi costruisco spesso dei db in access....roba senza
pretese, s'intende, ma funzionali.
Ora il problema è il seguente: ho un db di archivio di documenti tecnici.
Un ID di una certa tabella è un numero progressivo specifico di un certo
documento.
In word scrivo dei rapporti tecnici in cui nell'header vorrei inserire un
campo (o un segnalibro?) con quell'ID.
Vorrei però che una volta avviato access, tramite un comando mi inserisse
nel campo di word quel numero.
Questo perchè con access farei la gestione dell'archivio dei doc e vorrei
sfruttare il db stesso per assegnare un numero progressivo ai doc creati con
word, cosicchè chiunque scriva i rapporti di lavoro non possa mai sbagliare
il progressivo del doc.
Scusate per la banalità, ma coi miei "mezzi" artigianali, questa non riesco
a risolverla.
Speranzoso,
Andrea

 Speranzoso,
Vediamo se ho capito,
ho un vecchio esempio ma in 
VB.NET
, speriamo si adatti.
1- Ho costruito un file.dot
- Una tabella con dei segnalibri
- costruzione di una macro utilizzando vb,
in
Private Sub Document_New()
 legge il valore id, dal db o file.txt o file.xml, da passare ad una 
procedura.
End Sub
La procedura riceve l'identificativo e, utilizzando un recordset, popola i 
segnalibri con i valori del recordset.
2- da VB attivi il file.dot
Ave
giuseppeD
---
L'esperienza è il tipo d'insegnamento più difficile.
Prima ti fa la l'esame e poi ti spiega la lezione.
Anonimo
 

 ha scritto nel messaggio
news:jpIRd.55210$2h5....@tornado.fastwebnet.it...

Temo che questo NG sia un pò OT sull'argomento Access.
In ogni caso non esiste una soluzione con un Pulsante che fa
tutto quello che chiedi sensa Codice, e quanto devi fare necessita
di un pò di conoscenza dell'Automazione di Office.
Trovi un buon esempio di partenza su questo sito alla
sezione [GENERAL]
    FAQ=Esempio di automazione per l'invio e la formattazione di dati da
Access a Word usando i bookmarks
    realizzato da Marco Pizzamiglio
http://www.sitocomune.com/
Ritengo che potresti usufruire del NG it.comp.appl.access decisamente più
consono.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 giuseppeD
Grazie, proverò e vedremo cosa esce fuori...
Andrea


ho già provato il db di Pizzamiglio, ma non mi è stato utile, anche se fa
più o meno ciò che serve a me, anzi molto di più perchè a me basterebbe
riempire un solo campo di word con una parola sola!
Provo a postare la stessa domanda sul ng di dedicato ad access.
Grazie a tutti,
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: Applicazione che moltiplica le connessioni al DB

Ho un'applicazione che quando esegue delle INSERT/UPDATE sul DB crea
una seconda connessione e non capisco il perchč. La connessione al DB
di passa tramite ODBC ed  č creata cosě:
   Set db = Workspaces(0).OpenDatabase("", False, False, s)
e poi la INSERT/UPDATE:
   db.Execute s, dbSQLPassThrough
all'esecuzione di questa istruzione viene creata una seconda
connessione al DB Oracle (vista dalla sessioni aperte). Dato che gli
utenti dell'applicazione sono piů di 100 il raddoppio della
connessione si fa sentire.
Ciao
-- 
Fritz
Togli *ERASE* per rispondere in e-mail.

connessione si fa sentire.
Boh, a me capitava con myoledb (connettendomi a un DBMS MySQL). Ho
risolto cambiando il provider dati passando a MyODBC. Oltre a
risolvere il problema, il retrive dei dati ora č 4 volte piů veloce :P
ciao
AranBanjo
-- 
web: 
http://www.ponchio.it
"E' un vero peccato che tutte le persone che sanno come far
funzionare il paese siano troppo occupate a guidare taxi o
a tagliare capelli" - George Burns
"Vorrei avere un crocifisso di kryptonite, cosi' potrei 
tenere lontani Dracula e Superman" - Jack Handey

che è sta roba? DAO ?
Penso di si, era già fatta così.


Penso di si, era già fatta così.
'azz, mi spiace.
L'ultima volta che ho usato DAO, avevo ancora tutti ma proprio tutti i
capelli.
Ciau


connessione si fa sentire.
Usando un tool di analisi della connessione al DB ho scoperto che
quando da codice viene creata la connessione passano questi comandi:
Successful logon attempt (session tag: 0xA053D04) 
username: 'USR'; database: 'DB'
SELECT VALUE FROM SYS.NLS_DATABASE_PARAMETERS WHERE PARAMETER =
'NLS_CHARACTERSET'
SELECT VALUE FROM SYS.NLS_DATABASE_PARAMETERS WHERE PARAMETER =
'NLS_NCHAR_CHARACTERSET'
e poi questo che tra l'altro và in errore:
SELECT Config, nValue FROM MSysConf
Oracle error occurred: 942 (ORA-00942: table or view does not exist)
Quando viene eseguita la prima query di INSERT/UPDATE passano questi
comandi:
Successful logon attempt (session tag: 0xA0866CC) 
username: 'USR'; database: 'DB'
SELECT VALUE FROM SYS.NLS_DATABASE_PARAMETERS WHERE PARAMETER =
'NLS_CHARACTERSET'
SELECT VALUE FROM SYS.NLS_DATABASE_PARAMETERS WHERE PARAMETER =
'NLS_NCHAR_CHARACTERSET'
che creano la seconda connessione ma non capisco chi cacchio li manda.
Alla chiusura della connessione da codice passano questi comandi:
Logoff (session tag: 0xA0866CC).
Logoff (session tag: 0xA053D04).


>una seconda connessione e non capisco il perchè. 
Aggiungo che anche una seconda applicazione diversa dalla precedente
si comporta allo stesso modo ma li gli utenti sono pochi e non ci si è
mai accorti del problema. A questo punto ritengo sia un
problema/particolarità dell'ODBC.

Newsgroup: it.comp.lang.visual-basic
Titolo: trovare oggetti aperti e varibili non usate

Volevo sapere se esiste per VB6 un applicativo che riesce a rilevare se nel
codice esistono degli oggetti dipo un recordset che non è stato chiuso
oppure se ci sono variabili non utilizzate. Questo per evitare che il
consumo di ram dell'applicazione cresca nel tempo.
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 consumo di ram dell'applicazione cresca nel tempo.
Per le variabili mztools e gli fai fare un'analisi di codice per ogni
modulo/form, ti dirà proprio questo (ma non ti dice il contrario, se hai
variabili che usi ma non dichiarate, ma per quello basta Option
Explicit).
Per i recset la vedo complessa, anche perchè magari per errore lo chiudi
in alcuni casi si e altri no, potresti provare al form_unload a
verificare se la .State = adStateOpen, ma non ti darebbe gli stessi
risultati.
In ogni caso questo tipo di errori non dovrebbe esserci. Se mi serve
sporadicamente un RecSet io creo, connetto, uso, chiudo, disconnetto e
distruggo, altrimenti so cosa posso usare e cosa è aperto.
Se ne usi qualcuno "globale" aperto all'inizio del programma saprai
quali sono, e con il cerca normale puoi verificare se esiste almeno una
.Close e Set = Nothing.
-- 
Freccia@Bulldozer63 :D

Il 20 Apr 2007, 21:42, "Freccia (VegetaSSj)"
<NIENTESPAMfre...@hotmail.invalid> ha scritto:

Grazie per la risposta.
Se la quantità di ram richiesta dal programma, mentre viene eseguito, col
passare del tempo crese, da che cosa può dipendere?


 passare del tempo crese, da che cosa può dipendere?
Che dipenda da VB6 è decisamente difficile.
VB6 quando una var esce dallo scope la distrugge e ne libera la memoria.
I recordset quando vengono distrutti vengono chiusi automticamente (non da 
VB ma dal motore degli oggetti COM).
Solitamente la ram non deallocata è data da componenti bacati di terze parti 
o dall'uso scorretto dell'API (es. risorse allocate e non disctrutte).
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Lettore di codice a barre in emulazione tastiera

ciao
ho a disposizione un lettore di codici a barre in emulazione da tastiera.
Mentre viene facile capire quando la lettura del codice a barre è terminata
(viene simulato un invio), risulta più difficile capire quando la lettura
comincia. Infatti essendo in emulazione di tastiera non posso distinguere se
l'evento viene generato dalla tastiera reale o dal dispositivo di lettura.
Per ora ho risolto costringendo l'utente a premere un tasto prima di
utilizzare la macchinetta, ad esempio F2. Vorrei fare in modo che il
programma capisca da solo se a generare l'evento è stata la tastiera o il
lettore di codici a barre.
Avete suggerimenti???
ciao e grazie

 ha scritto nel messaggio
news:Eicw9.56000$aL4.1...@news1.tin.it...

copiato pari pari da un post di Albe V°, che con un po' di buona volontà
potevi trovare da solo tramite san Google...
<inizio copia>
Soluzione semplicissima (sembra complessa, ma in realtà è talmente
funzionale che ti risolve tutti i problemi una volta per tutte):
Attivi il KeyPreview della form.
Quindi, si scatena l'evento KeyPress della form, subito prima di quello del
textbox, qualunque sia quello col fuoco.
Nell'evento Keypress, verifichi se il tasto premuto viene dal tastierino
numerico (i lettori barcode PS2 simulano il tastierino, almeno tutti quelli
che ho visto io). Se il tuo codice barcode prevede anche caratteri
alfanumerici, ignora questo punto.
Se così è, metti il carattere ricevuto in una stringa, e setta una variabile
Ora_Ricezione a Now.
Al tasto successivo, verifica se Now-Ora_Ricezione è inferiore ad un valore
molto basso (diciamo due decimi di secondo). Se così è, ripeti quanto sopra,
altrimenti vuota la stringa.
Quando arriva il VbKeyReturn (terminatore della lettura, lo puoi impostare
nella pistola), verifichi se la stringa è un codice valido, di lunghezza
corretta e con eventuali checksum giusti.
Se così è, vuoti il textbox corrente, che nel frattempo si è preso tutto il
codice anche se non era per lui, metti la stringa nel textbox del codice, e
dai il fuoco al textbox successivo (quantità, importo, ecc...).
<fine copia>
Ciao
Salutoni
Sergio

 potevi trovare da solo tramite san Google...
:-( stasera mi fustigo pregando San Google inginocchiato sui ceci
grazie mille sei stato gentilissimo, la prossima volta prometto di cercare
di più.
ciao