mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Area sensibile per mouse ...... come si può fare ?

Avrei bisogno di disegnare su una form un'area dove, quando il 
puntatore del mouse entra, mi dia la posizione come se l'area fosse 
uno schermo 1024x768.
Secondo voi è possibile ?
Cosa posso usare per delimitare l'area ?
Come posso gestire la cosa ?
Grazie, Alverman

 ha scritto nel messaggio
news:200710211...@mynewsgate.net...

Usa una PictureBox, e su MouseMove recuperi X/Y del Mouse.
Per delimitare l'area di movimento usa la chiamata API:
    Dim client As rect
    Call GetWindowRect(PicBox.hwnd, client)
    ClipCursor client
Ricordati di impostare anche un metodo per ripristinarla altrimenti non esci
più... e non affidarti ad un button
esterno all'area altrimenti quando l'hai limitata non è raggiungibile...!
Per ripristinarla si fà così:
    ClipCursor ByVal 0&
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Grazie Alewssandro, domani ci provo :)
Alverman

Non ho resistito :)
Ho provato subito e .........
FUNZIA ALLA GRANDE !!
Grazie, Alverman
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema non risolto Scroll Bar

Non ho risolto ancora il mio problema,
ricapitolando ho la seguente form , composta da 3 frame, nel frame3 ci sono
diversi oggetti.
Quando mando in Run il progr. gli oggetti contenuti nel FRM3 non sono
completamente visualizzabili:
come fare per far comparire una scroll bar verticale?
    Form1
|------------------------------------------|
|  |---------------|          |---------------|   |
|  |_____Frame1 |          |__Frame2___|   |
|                                                               |
|    |------------------------------------|    |
|    |                                                      |    |
|    |                  Form3                          |    |
|    |___________________________|    |
|________________________________|
Grazie anticipatamente

Non puoi, mi sa (se scopri come fare fammi sapere)
Crea una form con dentro form mdi.


Non ricordo bene, ma guarda l'api SetWindowLong().
Questo è il codice per mettere la scrollbar orizzontale a una listbox.
Credo che per un form la soluzione non sia molto differente.
Fammi sapere se funziona.
Ciao.
        Dim wl As Long
        Dim ScrollWidth As Long
        ' add scrollbar (before you add items)
        wl = GetWindowLong(List1.hWnd, GWL_STYLE)
        Call SetWindowLong(List1.hWnd, GWL_STYLE, wl Or WS_HSCROLL)
        ScrollWidth = 100 'Total width
        ' compute ScrollWidth in pixel and add the width of vert. scrollbar
        ScrollWidth = ScaleX(ScrollWidth, ScaleMode, vbPixels) +
GetSystemMetrics(SM_CXVSCROLL)
        ' set the scrollable width
        Call SendMessage(List1.hWnd, LB_SETHORIZONTALEXTENT, ScrollWidth,
0&)


1.
inserisci il frame3 in un altro contenitore, che ne mostra una parte;
2.
affianchi una vertical scrollbar (windows common control);
3.
sull' evento change (o qualcosa di simile) della scrollbar modifichi
la proprieta' Top del frame 3, facendola cosi' scorrere verticalmente.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione gradi/radianti

Come si convertono gli angoli in radianti?
Grazie.
O meglio sto utilizzando questa  formula, il risultato del coseno non è in
radianti e quindi sballa il risultato. Grazie
Risultato = Sqr(((lato1 ^ 2) + (lato2 ^ 2)) - (2 * lato1 * lato2 *
(Cos(Angolo))))

 Grazie.
Dall'Help:
Per convertire i gradi in radianti, moltiplicarli per PiGreco/180. 
Per convertire i radianti in gradi moltiplicarli per 180/PiGreco.
-- 
News2000 1.5ß Version 
http://socket2000.8m.com

 wrote in message
VrzY5.8475$x_2.6...@twister1.tin.it...


 wrote in message
VrzY5.8475$x_2.6...@twister1.tin.it...


 ha scritto nel messaggio
news:ztAY5.116031$DG3.2...@news2.giganews.com...


 wrote in message 90vmai$l7h$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Calcolo giorni della settimana

Buongiorno a tutti,
in vb6, ho due controlli dtpicker ai quali vorrei far
visualizzare i valori della settimana in corso, partendo dal
lunedi. In sostanza, se oggi è 01/03/13 ed è venerdì,
vorrei che i due controlli restituissero
25/02/13 e l'altro 02/03/13
e così ogni volta che apro il form indipendentemente dal giorno.
 
Qualcuno potrebbe aiutarmi?
 
Grazie

Ciao Marco,
il tuo problema si puo' facilmente risolvere utilizzando la funzione WeekDay 
che restituisce il numero del giorno della settimana.
Partendo da quello, puoi usare la funzione DateAdd per scorrere i giorni.
Ti posto un esempio, considerando che ho calcolato la settimana fino alla 
domenica, cioe' se eseguo il software oggi, 1 Marzo 2013 (venerdi), il 
codice mi restituisce la settimana che va da lunedi 25/02 fino a domenica 
03/03 e non fino a sabato 02/03 come hai scritto tu.
Tieni conto che se esegui il software di lunedi, ad esempio lunedi 04/03, la 
settimana sara' quindi dallo stesso lunedi fino a domenica 10
Il codice e':
Dim WkDay As Integer
    WkDay = Weekday(Date, vbMonday)
    Dim StartingDate As Date
    StartingDate = DateAdd("d", -(WkDay - 1), Date)
    Dim EndingDate As Date
    EndingDate = DateAdd("d", 6, StartingDate)
 
    Debug.Print ("Giornata di inizio: " & Format(StartingDate, "long date"))
    Debug.Print ("Giornata di fine: " & Format(EndingDate, "long date"))
 
Dovrebbe essere abbastanza chiaro, se hai dubbi, chiedi pure :)
 
 
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 8064 (20130301) __________
 
Il messaggio è stato controllato da ESET NOD32 Antivirus.
 
www.nod32.it
 
 
 
 

"Marco"  ha scritto nel messaggio news:kgpp41$tnj$1...@speranza.aioe.org...
in vb6, ho due controlli dtpicker ai quali vorrei far
visualizzare i valori della settimana in corso, partendo dal
lunedi. In sostanza, se oggi è 01/03/13 ed è venerdì,
vorrei che i due controlli restituissero
25/02/13 e l'altro 02/03/13
e così ogni volta che apro il form indipendentemente dal giorno.
 
Ciao Marco,
un esempio:
 
Public Sub a()
Dim dtmToD  As Date
Dim dtmMon  As Date
Dim dtmSat  As Date
 
    dtmToD = Date
    dtmMon = dtmToD - Weekday(dtmToD, vbMonday) + 1
    dtmSat = dtmMon + 5
    Debug.Print Format$(dtmMon, "Long Date") _
              , Format$(dtmSat, "Long Date")
End Sub
-- 
Ciao!
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: API: ancora sulla ReadFile

Dopo aver utilizzato l'api ReadFile ottengo un arry di byte 
che contiene i dati letti dal file,diciamo 1024 bytes.
Ogni elemento del mio array contiene 1 byte quindi l'array è di 1024 elementi.
Se voglio che il suo contenuto venga messo in una textbox devo
scorrerlo tutto ed il tempo necessario è decisamente alto. 
Se invece il contenuto lo scrivo in un altro file con la
rispettiva API WriteFile ho un tempo irrisorio, questo 
sicuramente perchè lavora internamente con un sistema di puntatori.
La mia domanda è: come posso usare la ReadFile per leggere 
dati in maniera veloce? 
Scusate se sono stato un pò prolisso, ma spero di essere stato
abbastanza chiaro.
Grazie a tutti.
Jolly

 scorrerlo tutto ed il tempo necessario è decisamente alto.
[SNIP]
Se, a quanto ho capito, il tuo array di byte contiene una stringa di testo da
visualizzare prova a dare un'occhiata alla funzione StrConv sulla guida
Ciao
--
Luca Dormio
luca....@tin.it

Hai provato a dichiarare nella API il puntatore al buffer come String
(passata by val) anzichč come any ?
In questo modo, dimensionando chiaramente la stringa es. con una space(n)
dove n č la dimensione del buffer, avrai i dati letti in una stringa che
potrai passare al text box.

...


(passata by val) anzichè come any ?
Adesso sì che funziona come voglio io...sei un grande,grazie.
Anche prima gli passavo una stringa ma non cambiavo la 
dichiarazione anzi non sapevo prorpio che si potesse fare 
mandando in crash VB6!!
Ora però mi domando: come faccio a sapere quando ho la 
necessità di cambiare il tipo di dati da passare, in via generale, anche su altre API? Posso farlo se sono dichiarate 
as Any?
E per quanto rigurda byVal e byRef? Sulla base di cosa posso
impostare una o l'altra?
Queste domande troverebbero risposta nel Win32Api di Dan 
Appleman?
Grazie mille di nuovo
Jolly.

impostare una o l'altra?
Se è richiesto un passaggio ByRef vuol dire che la funzione chiamata
interpreta tale parametro come un puntatore (cioe' un l'indirizzo in memoria
di un dato e non il dato stesso) e che, presumibilmente, operera' sul
contenuto e proprio questo sara' cambiato.
Una var Stringa VB e' gia' un puntatore, dunque non c'e' bisogno di passarla
ByRef a meno che la funz. chiamata non richieda un puntatore di puntatore .
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB & C (sisi, insieme...)

Domanda strana... Qualcuno sa quali siano gli switch di C2?
Volevo provare a far girare un programma ormai in fase finale nell'IDE di
VC++, ma per compilarlo dovrei usare il C2, non il CL.
Se qualcuno sa come integrare l'IDE di VB a quella di VC  io sono tutto
orecchi :)
Mi serve per alcuni casi di errore sul compilato, vorrei debuggare
l'eseguibile vero e non la versione semi interpretata dell'IDE, ma per
alcune cose (come il bsc) ci sono dei problemi (VB non crea un browse file,
solo il pdb)...
Oddio, se qualcuno sa come spiegare a VC che tipo di strano file sia un .bas
o un .frm, ben venga :)
Ciaotutti,
Alessandro

 solo il pdb)...
Ma non puoi fare una domanda più facile ?non so, del tipo ..."come faccio a
fare un decompilatore per VB6 ?"
Bah ...
Saluti ironici

ahecco... mi sembrava :)
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--

 sia un .bas o un .frm, ben venga :)
Visual C++ importa le form come dialog. Almeno la versione di cui hanno 
parlato a me

 parlato a me
Mmm... Interessante... C'e' una procedura particolare per  fargliele vedere?
I .frm in realta' sono file .bas con un paio di righe in piu' per i dati del
form...
Grazzzie :)
Ciaotutti,
Alessandro

piu' per i dati del form...
allora, dalla regia mi dicono di provare, dall'interno dell'editor 
risorse, ad usare il comando apri, o importa, o roba simile. Tra i 
formati supportati dovrebbe esserci seminascosto "*.frm (Visual Basic 
Form)". Ovviamente il codice non lo prende, ma la finestra la traduce

 Form)". Ovviamente il codice non lo prende, ma la finestra la traduce
Mmm... Speravo pigliasse pure il codice :P
Il problema e' che il C2 (cci sua) quando compila VB legge un IL, che VC non
ha alcuna speranza di generare...
Pekkato, gia' sognavo di ricompilare l'exe on the fly :P
Ciaotutti,
Alessandro
Newsgroup: it.comp.lang.visual-basic
Titolo: Ci riprovo... Da VB5 a VB6 "Automaticamente"... Sogno o realtà?

Ho diversi progetti scritti in VB5, nei quali faccio uso molto spesso dei
controlli cosiddetti "standard"... come treeview, listview, toolbar ecc ecc.
Vorrei passare questi progetti a VB6, ridando magari una ritoccatina sia
grafica che funzionale ai vecchi controlli. Su MSDN ho letto che quando si
apre un progetto VB5 con VB6, automaticamente dovrebbe essere proposto di
aggiornare i controlli alla nuova versione.... bene, io ho provato in ogni
modo, ma non c'è verso di ottenere questa conversione "automatica".... Il
modo l'avrei trovato "smanettando" all'interno dei files .vbp e .frm,
cambiando cioè manualmente tutti i riferimenti ai nuovi nomi di ocx (con le
rispettive classid e quant'altro)... ma è un lavoro a dir poco estenuante
per progetti di una certa grandezza con moltissimi form. Possibile che non
esista un modo per poterli aggiornare automaticamente??

 esista un modo per poterli aggiornare automaticamente??
Non saprei, pero' se i files sono tanti potresti scrivere un programmino che
provveda a sostituire le occorrenze desiderate.
Ciao
Aldo

esista un modo per poterli aggiornare automaticamente??
non dovrebbe essere difficile farsi un programma che apre tutti i file in 
una cartella e sostituisce i vecchi CLSID con i nuovi. Il problema č che i 
common controls versione 5 sono cosě diffusi che Microsoft non poteva 
permettersi di sostituirli. Sai cos'hanno fatto? hanno cambiato non solo i 
CLSID, ma anche i ProgId, in modo che tu possa scegliere che versione 
usare, o addirittura usare entrambe le versioni contemporaneamente. 
Diciamo che agli occhi di Visual Basic i controlli versione 5 e quelli 
versione 6 sembrano delle cose totalmente diverse. Non lamentarti chč 
Microsoft mi sembra che in questo caso abbia fatto qualcosa di giusto... a 
non tutti serve la "potenza di fuoco" della versione 6... trovi in giro 
vecchi programmi ancora basati sulla 4...

 grafica che funzionale ai vecchi controlli.
[SNIP]
Se parliamo dei Common Controls, esiste sul sito MS un piccolo programmino che,
dato un progetto, converte automaticamente i riferimenti nel .vbp e in tutti i
.frm passando da COMCTL32.OCX al nuovo MSCOMCTL.OCX (ed eventualmente converte
anche COMCT232.OCX e COMCT332.OCX)
Quando e' stato il momento lo abbiamo usato su una dozzina di progetti, anche
grossi, senza alcun problema, lo trovi qui:
http://msdn.microsoft.com/vbasic/downloads/download.asp?ID=088
Ciao
--
Luca Dormio
luca....@tin.it

"Luca Dormio" <lucaFAV...@tinFAVA.it> ha scritto nel messaggio
news:9341ba$6tf$1...@fe1.cs.interbusiness.it...

Grazie mille... lo provo subito....
Newsgroup: it.comp.lang.visual-basic
Titolo: Incollare

Salve ragazzi, chiedo aiuto a voi perchè tutte le persone a cui ho chiesto
aiuto non sono state in grado di darmi una mano. Ho creato un programma di
grafica a multipla finestra (con un madre ed un figlio) che fa varie cose.
Ora avrei bisogno di fare in modo che alla pressione di un tasto sul menù
(del form madre) una immagine (sempre la stessa che è presente nella
cartella del programma in formato .bmp) venga incollata sopra all'immagine
correntemente aperta in una precisa posizione. Spero di essermi spiegato
bene. L'immagine correntemente aperta è in un form figlio all'interno di una
image. Mi avevano detto di usare la funzione paintpicture ma propio non ci
riesco. Potete almeno dirmi se si può fare?
Vi prego di aiutarmi se ne avete la possibilità.
--
Ramses
http://evilzone.tsx.org
ICQ: 39860665
"La prima volta che ho preso l'alcole ho visto Dio"
by Claudio Zanon
Il  reggiseno e'  un ideale  di democrazia:  divide la  destra dalla
sinistra, sostiene le masse e attira a se' il popolo.

 correntemente aperta in una precisa posizione.
paintpicture
picture1.picture,x,y,width,height,originex,originey,larghezza_origine,altezz
a_origine
naturalmente prima devi aprire il bmp e caricartelo in una picture anche
nascosta
Set Picture1.Picture = LoadPicture("c:\windows\bollicine.BMP")
Ciao stefano

 ha scritto nel messaggio
news:8odimm$rok$3...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: dao => ado help

http://www.vbsquare.com
http://www.vbsquare.com/databases/begado/index.html
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT]Sircam

ok.. sembra uno dei soliti messaggi di allarmismo...
dove lavoro ho una serie di pc infetti
ora lo conoscete tutti... si espande via maill
ecco... ora perché ce l'ho trovato su persone che non hanno e-mail attive?
che sia mutato... non so dateci un occhio


Perchè una volta infettato un pc via email si diffonde direttamente sulla
rete.
Se lo sono già beccati 4 miei clienti, con esiti vari ma sempre poco
piacevoli.
Se cerchi sui post passati, troverai un'ottima procedura di eliminazione
elaborata dal buon Paperino.
ciao
ugo

 ha scritto nel messaggio
news:9n2b4u$1se$2...@lacerta.tiscalinet.it...



Già fatto.
Solo che in caso di pc infettatisi PRIMA dell'aggiornamento i problemi non
sono indifferenti...
ciao
ugo

peggio...
ho sia il tool automatico (
www.antivirus.com
)
ho nun pc infetto in win2000 mi sa che devo formattare
e ho circa 500 pc in rete... ora....
vero che stai scherzando?? vero che non si diffonde in rete... in
alternativa... non ho trovato la procedura per la rete... che devo fare...
down di tutti iserver????
chiudo la rete e passo la procedura?
nessun'altra soluzione praticabile??'
mi sento un po' con l'acqua alla gola sai...
Strahd
a01b02_...@iol.it

 chiudo la rete e passo la procedura?
Sarebbe meglio, ma se sono 500...  :(((
In bocca al lupo...
ciao
ugo

 wrote in message
news:3b94...@pc31.fauser.it...

Fai attenzione si diffonde in una rete locale molto velocemente
se le macchine hanno una condivisione di rete (in scrittura) a livello
di root
del disco.
Ciao Daniele 
-- 
Posted from  [217.57.245.130] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:9n2iak$476$1...@lacerta.tiscalinet.it...


In bocca al lupo...
Grazie
ciao...
P.S.
    sono stato tra i primi a individuare bloccare e debellare il sircam a
luglio.. ho mandato quintali di mail agli utenti dicendo di non aprire gli
allegati.... guarda il risultato

 --
W32.Sircam.Worm@mm
ciao
ugo

 livello di root del disco.
eheh.. e se si tratta di win9x non ci vuole molto ad averlo :))
--
Fibia "sfondaporte" FBI
Newsgroup: it.comp.lang.visual-basic
Titolo: Intercettare l'avvio di un programma ...

Salve a tutti,
sto realizzando un "contascatti" in VB5 e sto cercando qualcuno che mi possa
aiutare ad "intercettare" l'avvio e la chiusura dell'accesso remoto...
In pratica la mia idea (non cosě originale :-)) č quella di far partire il
programma all'avvio di Windows95 in modo da essere attivato
(automaticamente) solo all'avvio della connessione ad Internet e di stoppare
il timer nel momento in cui ci si disconnette...
E' possibile? C'č qualcuno che mi puň aiutare...?
Ringrazio anticipatamente tutti coloro che vorranno aiutarmi...
Alessio - 
Ale...@isa.it
 - 
www.emma97.com/hardwaresite

E se invece fai un programma che si sostituisce al programma di connessione
e che lo chiama con una shell, conserva il momento di lancio del programma
e quando termina l'esecuzione della shell ti restituisce il controllo per
calcolare
il tempo di connessione?
Ciao, spero di esserti stato d'aiuto. Gianluca.


Newsgroup: it.comp.lang.visual-basic
Titolo: [2?]Problema ASP-Html con Vb!

Il mio Problema:
Dopo aver caricato per una prima volta una pagina asp collegata a dei DB
Access dovrei salvare il sorgente html della pagina in un file!
Sapete come fare?
Vi ringrazio per i vostri suggerimenti!
Ciao Luca!

Scusate ma dopo aver postato mi č venuto in mente che fornirvi info su
che versione di vb utilizzo!
-VB5-
Luca Napolitano ha scritto:


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] evitare troppi "Change()"

Per questa ci deve essere una soluzione....
ho una form com molte caselle di testo, ad ogni cambiameto di uno qualunque
delle "text" devo compiere una serie di calcoli che interessa tutte le text.
per ora l'unica soluzione che sono riuscito a pensare è mettere su Change()
di ogni casella un richiamo alla funzione Calcola() e così ho il risultato.
ma la cosa mi sembra un pò lunga e poco ortodossa.
per ora sto usando un pulsante che mi attiva la funzione Calcola(), ma mi
servirebbe toglierlo ed avere il risultato ad ogni cambiamento.
Esiste qualcosa che mifaccia avere lo stesso risultato senza questo casino ?
Grazie 1'000

ma la cosa mi sembra un pň lunga e poco ortodossa.


>ma la cosa mi sembra un pò lunga e poco ortodossa.


anche "invio" ?
Basta che controlli il valore keyascii nell'evento keypress della text.
Es:
Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
If KeyAscii = 13 Then
    If Index = Text1.Count - 1 Then
        Text1(0).SetFocus
    Else
        Text1(Index + 1).SetFocus
    End If
End If
End Sub
Ciao
Daniele
Newsgroup: it.comp.lang.visual-basic
Titolo: Api window

Ciao a tutti mi chiedevo se c'era qualcuno che sapeva come fare ad
inviare ad un altra finestra esterna al progetto una sequenza di tasti
come per esempio il tasto Enter o il tasto F1... Ho provato Con la API
Send Message scrivendo na roba simile
PUblic function xSend() as long
xSend = SendMessage(handle, VK_LEFT, 0&, 0&)
End function
handle ----> è l'handle di finestra recuperato con la funzione
FindWindow
VK_LEFT----> costante pubblica con il valore esagesimale del valore asci
del tasto FRECCIA SINISTRA
Tuttavia nn sembra funzionare ...perchè?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Send Message scrivendo na roba simile
allora in modo + semplice ci sono le function :
AppActivate e SendKeys
Ecco un esempio che manda un testo in una finestra di Mirc per esempio :
  AppActivate "Mirc"
  SendKeys ("Ciao" & vbCrLf), True
in pratica e' semplice perche' AppActivate attiva la finestra con tale nome
e poi il sendKeys manda i caratteri alla finestra attiva ^_^
Semplice no ?
puoi gestire anche un errore cosi :
========
Private Sub Command3_Click()
On Error GoTo Err
  AppActivate "Mirc"
  SendKeys ("Ciao" & vbCrLf), True
Exit Sub
Err:
    MsgBox ("Se prima apri Mirc e' meglio !")
End Sub
=========

 =========
Allora per prima cosa ti ringrazio perchè mi hai dato un buono spunto...
l'idea
della finestra attiva mi ha fatto venire in mente che esistono anche le
chiamate
API SetWindowPosition e KeybdEvent che vanno usate proprio come
AppActivate e Sendkeys
tra l'altro non so perchè le uso dal momento che il tuo metodo è più
facile da
utilizzare...sarà che me piacciono sempre le cose difficili...
Tuttavia m'è venuto in mente n'altro quesito...Se sono su una finestra
esterna al mio
progetto come cavolo faccio a gestire la pressione dei tasti...o meglio
come faccio
a rispondere con il codice a una pressione di un tasto se sono la
finestra attiva
è esterna al mio programma? 
Spero qualcuno di voi abbia la risposta 
GRAZIE 1000 Simone

Newsgroup: it.comp.lang.visual-basic
Titolo: Numero spazi in stringa

Ciao.
Come faccio a sapere se una stringa contiene solo spazi non sapendo il
numero degli spazi che ci possono essere ?
Cioč puň essere per esempio "    ", ma anche "             ".
Grazie !
CiAo :-)
--- --- --- --- --- --- --- --- --- --- --- --- --- --- ---
UIN: 50254876
http://www.danteworkshop.f2s.com
--- --- --- --- --- --- --- --- --- --- --- --- --- --- ---

 ha scritto nel messaggio
news:dyLHKhJ...@newsmst.mcis.galactica.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Programma base e exstension

Salve a tutti,
Come si puň fare per far sě che aggiungendo delle dll o form ecc...(upgrade)
il programma abbia dei menů ghost che diventano visibili oppure che sia
"standard version" oppure "Pro version".
Che tipo di controlli dvo aggiungere nel codice??
Grazie
Maxdibbe


Non so se puo' aiutarti, ma magari inserisci una CHIAVE di ATTIVAZIONE
calcolata da te e passate al cliente( via dll o txt o semplice codice da
inserire), poi nel codice rielabori la chiave e se rispetta i requisiti
voluti visualizzi o meno i menu.
Ex Chiave ( non la sblinderete MAI :-)) ) : ABCDE   Chiave rielaborata  :
123245 ( lettere alfabeto)
Menu' disponibili 12345 oppure se chiave = 12345 then menu 1= visibile menu
2 = non visibile.....

Newsgroup: it.comp.lang.visual-basic
Titolo: Access e visualBasic

Allora ho un piccolo problemino con Vb
ho postato da tutte le parti chiesto alle persone che ritengo più esperte
ma non arrivo mai a concludere niente
ho un database con dei campi già definiti
e ho delle checkBox (circa 170) in un form
in base alla selezione di una di queste devo aggiungere un record con due
o più valori sotto sue diverse colonne
qualcuno ha consigli da darmi?
io volevo fare una funzione che riducesse al massimo la scrittura del
codice ma è opzionale se devo scrivere If e EndIf per ogni Check Box lo
faccio.
grazie
-- 
/****************************************/
/HomePage: 
http://accessdenied85.cjb.net
 /
/E-mail: .....access_denied[at]
libero.it
 /              *AccessDenied*
/****************************************/

 qualcuno ha consigli da darmi?
Crea una matrice di controlli.
Davide
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con grafica e mappe

Ciao a tutti fanciulli....sto cercando di fare un'applicazione che mi
visualizzi una mappa e cliccandoci sopra con il mouse e selezionando una
certa zona mi dice quali sono i comuni nella zona selezionata....Ora
arrivano i problemi:
1) Trovarsi un database vettoriale dei comuni (c'č ne č uno della CIA....ma
logicamente non č molto dettagliato ricordo che a me servono TUTTI I COMUNI)
2) Trovare un database con le caratteristiche dei comuni in particolare mi
servirebbe il numero di famiglie in ogni comune (per questo mi sa che mi puo
aiutare l'ISTAT ma non ne sono sicuro....se avete idee sono ben accette)
3) Trovare un OCX che mi faccia lavorare su mappe....ho trovato un OCX che
si chiama "Mapx" (o qualcosa di simile non mi ricordo bene a dire il vero)
ma questo OCX ha un difetto grosso ....NON E' FREE ....e la mia applicazione
dovrebbe esserla.
Se qualcuno mi puň da una mano gli prometto una bottiglia di Vinsanto....
:-))
Grazie sono disperato non so piů come farla questa applicazione, non ho piů
idee :-((


ciao
anche io pensavo di fare una cosa simile, pero' piu' legata
alla mappa stradale.
prova a guardare qui:
http://freegis.org/
e se fai una ricerca con google prova a cercare
la parola GIS (Geographic Information Systems)
ciao
d.
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Access 2003 va in CRASH con query alla terza volta

Ciao,
ho un problema che non riesco proprio a risolvere.
Sto realizzando una applicazione in Access (che conosco poco) che
dovrebbe consentirmi di gestire una anagrafica utenti. Ad ogni utente
sono associati dei dati che potranno essere stampati tramite template
WORD.
Allego il file e i template word (
http://www.netbuilder.it/
esempio.zip)
C'è una maschera principale con 2 sottomaschere: Diagnosi e Diagnosi2
La maschera principale contiene le informazioni sull'utente, mentre
DIAGNOSI può contenere record di informazioni inerenti l'utente.
Cliccando sull'occhiale accanto ad ognuno di questi record si apre la
sottomaschera DIAGNOSI2 che mi servirebbe solo per dare la possibilità
all'utilizzatore di inserire un bel testo descrittivo.
Bene: alla terza volta che clicco sugli occhiali (primo record, poi
secondo, poi terzo occhiale, ...) Access 2003 va in crash
Ogni volta che clicco sull'occhiale viene eseguito questo codice:
...
   If IsNull(Forms!Contacts!Diagnosi!ID) Then
      ' If the combo is Null, use the whole table as the RecordSource.
      Me.RecordSource = ""
      Me.Requery
   Else
    strSQL = "SELECT DISTINCTROW qDiagnosi.* FROM qDiagnosi " & _
    "WHERE ID = " & strDir2 & ";"
      ' La terza volta va in CRASH
      ' Third time Access Crashes
    Me.RecordSource = strSQL
   End If
...
Sono ormai 5/ 6 giorni che sto cercando una soluzione, ma proprio non
so più che fare.
Grazie

 Grazie
Va in errore sul recordsource.
Non � che ti rimane roba caricata (la form, il recordset) e ti da errore?

 Non è che ti rimane roba caricata (la form, il recordset) e ti da errore?
mhh.. è possibile che rimanga roba caricata.... però va in crash..
Nell'eventualità che rimanga roba caricata esiste una qualche
istruzione per resettare il recordset?
Grazie

 istruzione per resettare il recordset?
Purtroppo non ho mai lavorato col VBA di access, se non per cose
semplicissime.
Non saprei. Prova a chiedere sul NG di access che sicuramente � pi� adatto.
Newsgroup: it.comp.lang.visual-basic
Titolo: Tastiera: come conoscere il __vero__ stato dei tasti? (il messaggio di prima l'ho inviato per sbaglio!!!)

Raga non riesco proprio a riuscirci!!
All'evento Click di un pulsante vorrei conoscere lo stato di un tasto (in
particolare dello Shift).
Leggendo della documentazione "KeyboardApi by Claudio Gucchierato © 1999" ho
implementato questo moduletto di prova:
Option Explicit
'La funzione GetKeyState serve per determinare lo stato attuale (o anche
precedente), di uno specifico tasto (passato come argomento nVirtKey).
'La funzione GetKeyState è anche in grado di determinare se un tasto è stato
premuto, almeno una volta, prima della sua ultima chiamata. Tendo conto di
ciò, se è necessario sapere con assoluta precisione se un tasto è premuto in
un preciso istante, è preferibile usare la funzione: GetAsyncKeyState
Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As
Integer
'La funzione GetAsyncKeyState verifica lo stato corrente del tasto (passato
come argomento vKey) nel momento preciso in cui viene richiamata.
'GetAsyncKeyState restituisce un valore inferiore allo zero (<0) (True) se
il tasto passato come argomento è premuto, oppure zero (0) (false) in caso
contrario.
'L'esempio di codice seguente, mostra un possibile utilizzo della funzione:
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As
Integer
Public Function IsKeyPressed(ByVal vbKeyCode As Long) As Boolean
  IsKeyPressed = CBool(GetAsyncKeyState(vbKeyCode))
End Function
Function IsKeyPressed2(VirtualKey As Long) As Boolean
    IsKeyPressed2 = GetKeyState(VirtualKey)
End Function
Ma quando all'evento Click del mio pulsante testo lo stato dello Shift:
Private Sub Command2_Click()
  MsgBox IsKeyPressed2(vbKeyShift)
End Sub
Il valore ritornato è quello dello stato precedente, non di quello attuale.
Come posso fare?

 [SNIP]
Modifica le funzioni come segue:
Option Explicit
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As
Long) As Integer
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As
Long) As Integer
'Da usare per sapere se il tasto e' premuto in un determinato istante
Public Function IsKeyPressed(ByVal vbKeyCode As Long) As Boolean
   IsKeyPressed = GetAsyncKeyState(vbKeyCode) < 0
End Function
'Da usare per sapere se il tasto e' stato premuto
'(la pressione ripetuta attiva/disattiva) il pulsante
Function IsKeyPressed2(VirtualKey As Long) As Boolean
    IsKeyPressed2 = (GetKeyState(VirtualKey) <= 0)
End Function
Private Sub Form_Click()
   MsgBox IsKeyPressed(vbKeyShift)
End Sub
hth
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 particolare dello Shift).
Per Shift, Ctrl, Alt puoi usare l'evento MouseUp (o MouseDown, a tua scelta)
del pulsante e valutare l'argomento Shift.
Newsgroup: it.comp.lang.visual-basic
Titolo: Distributing New Entry into TNSNames ....

Hi, I need to see if I can get some advice on the best way to do this,
I am not a DBA so bear with me please..
I have a VB app that the exe runs from a network drive.. We just added
a new Oracle back end and I need to have all the current users be able
to use the new Oracle features..
I really dont want to have to go into each users TNSNames file and
insert the new entry for the Oracle DB..
TNSNames Entry:
JIDB_ORACLE =
  (DESCRIPTION =
    (ADDRESS_LIST =
      (ADDRESS = (PROTOCOL = TCP)(HOST = 
mickey.mouse.mil
)(PORT =
1111))
    )
    (CONNECT_DATA =
      (SERVICE_NAME = devel)
    )
  )
VB Connection String:
 With gOCnn
        .CursorLocation = adUseClient
        .ConnectionString = "Driver={Oracle ODBC Driver};" & _
           "Dbq=JIDB_ORACLE;Uid=" & uid & ";Pwd=" & pw
        .Open
    End With
I found a posting that said to put a TNSNames file on the network
where the VB app is with only the New DB entry (JIDB_ORACLE)..
Ok, But I am not getting how this works.. How does my machine know to
look there instead of the local TNSNames.. And if I run another app
that uses the local TNSNames services will it know to look in the
network one and if it does not find the service name to look in the
local one??
I am researching if in my VB connection string I can give it a path
for the TNSNames file, but I dont remember seeing anything like that..
Help....
Thanks Alley

...

Solution:
If you put your TNSNames file where your Exe resides the vb app will
check there first.. So we just included that file in our build and put
both the exe and the TNSNames on a shared network so when we need to
change it we simply replace the shared TNSNames file on the network..
Each user has a shortcut for the vb app pointing to the vb exe on the
network..
Works great for having to update these files and not re-distribute
them on each persons PC.
Hope this helps anyone else..
Alley

Newsgroup: it.comp.lang.visual-basic
Titolo: Generazione codice a barrre.

Mi servirebbero informazioni per la stampa di codici Ean 13 e Code 39.
Dovrei inserire questa funzione un un programma che preso il codice ean 13
del prodotto genera un'etichetta da applicare sul prodotto da esperre oppure
se il prodotto viene inpacchettato dall'azzienda e non ha il codice ean 13
stampa una codice 39 scelto dal produttore. Grazie



Sito Comune
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: query con parametri

Salve a tutti,
(
ADO.NET
)
come mai la seguente query non funziona? Mentre se effettuo la query con uno 
dei due parametri soltanto funziona perfettamente.
Me.OleDbSelectCommand1.CommandText = "SELECT colore, data, materiale, peso, 
codice, id FROM Prodotti WHERE cliente = ? AND materiale like ?"
Me.OleDbSelectCommand1.Parameters.Add(New 
System.Data.OleDb.OleDbParameter("materiale", 
System.Data.OleDb.OleDbType.VarWChar, 0, "materiale"))
Me.OleDbSelectCommand1.Parameters("materiale").Value = "%" & 
txtMateriale.Text & "%"
Me.OleDbSelectCommand1.Parameters.Add(New 
System.Data.OleDb.OleDbParameter("cliente", 
System.Data.OleDb.OleDbType.Integer, 0, "cliente"))
Me.OleDbSelectCommand1.Parameters("cliente").Value = sCliente
Saluti
alberto

alberto ha scritto:






Mi sembra che tu debba generare i parametri nello stesso ordine con cui li
hai scritti sulla select, a differenza di sql gli ole sono parametri
posizionali il fatto che tu abbia scritto il nome al parametro è solo per
tua convenienza
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 tua convenienza
Ti ringrazio ma la posizione dei paramentri non c'entra.
saluti
alberto 

 alberto
Invece sono andato a guardare ed č proprio cosě:
Se utilizzi come parametro ? i parametri sono posizionali per cui devi
creare l'oggetto parameters con lo stesso ordine in cui vuoi venga scritto
sul comando.
Guardati la pagina: 
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon/html/vbconparametersindataadaptercommands.asp


 
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon/html/vbconparametersindataadaptercommands.asp
Ti ringrazio per questo ulteriore post che mi ha dato la possibilità di 
risolvere il problema.
In definitiva.. da quanto provato:
- utilizzando ? come parametro indipendentemente dalla posizione dei 
parametri (con due o + paramentri) la query non funziona ( ho provato a 
cambiare posizione)
- utilizzando la sintassi " @qualchecosa" invece funziona perfettamente.
Grazie di nuovo e saluti
alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto su Datareport

Ciao a tutti!
sto impazzendo con il datareport. :-/
Quello che vorrei ottenere è una stampa che mostri il contenuto di una
tabella raggruppata però per un determinato campo.
(Nel caso specifico un elenco di fornitori raggruppati per CAP)
Ho inserito la sezione "Intestazione di gruppo".
In questa sezione ho messo il campo "CAP".
Nella corpo del report ho messo il campo "nominativo"
Nella dichiarazione del recordset ho utilizzato la seguente istruzione
(presa da un esempio trovato):
"SHAPE {SELECT CAP FROM FORNITORI GROUP BY CAP} APPEND ({SELECT * FROM
FORNITORI} RELATE CAP TO CAP}"
Non riesco a far funzionare il tutto.
Ho provato anche a rigirare l'istruzioen SHAPE ma nisba! (VB6 mi da un bel
"errore generico"...)
Grazie per l'aiuto!
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Magari con ORDERBY va meglio...
Ciao, Luca.

Lapsus!!!
GROUPBY
Ciao, Luca.

 Ciao, Luca.


La sintassi è semplice:
SELECT <campi da estrarre> FROM <tabella> WHERE <condizioni> GROUP BY <campo
che raggruppa>
Scusa se nei post precedenti sono stato frettoloso...
Ciao, Luca.

 Ciao, Luca.

Newsgroup: it.comp.lang.visual-basic
Titolo: Datagrid e selezione multipla - v. 2003

Ciao a tutti.
c'e' un modo piu' efficiente e veloce per sapere quale sono le righe 
selezionate in un datagrid abilitato alla selezione multipla, senza dover 
ciclare su ognuna e testare la proprieta' isSelected ?
Saluti e grazie
Dav 

"Dade" <dr.cr...@CUT-tiscalinet.it> ha scritto nel messaggio 
news:yopHg.31348$ZJ6....@tornado.fastwebnet.it...

Monitorare gli eventi scatenati dall'utente?
Ciao,
    diego 

Grazie del suggerimento ma cercavo qualcosa di automatizzato :-(
"Diego Mazzaro" <di...@mazzaroTOGLIMI.net> wrote in message 
news:9LyHg.32$sF5...@nntpserver.swip.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: Balena - "I trucchi di Visual Basic 6"

E' disponibile all'URL
http://www.codearchitects.com/trucchivb6/index.aspx
il codice relativo al libro di F.Balena "I trucchi di VB 6".
Mi sa un po' di canto del cigno (di VB6 non di Balena!!)
ma tant'č!!! ;-)
Bye,
Fabio

 Mi sa un po' di canto del cigno (di VB6 non di Balena!!)
anche perchè, una balena, come cigno, fa una magra figura. (forse meglio grassa)
--
Salutoni
Sergio

 anche perchč, una balena, come cigno, fa una magra figura. (forse meglio
grassa)
Sicuramente grassa!!
Anche perchč il buon Francesco Balena esile non
č di certo!!! :-)
Bye,
Fabio

 č di certo!!! :-)
:-)
A parte gli scherzi, come scrittore-divulgatore-insegnante č veramente grande
--
Salutoni
Sergio

 ha scritto

invece come programmatore e' cosi'-cosi' vero ? :P

 A parte gli scherzi, come scrittore-divulgatore-insegnante è veramente
grande
Concordo in pieno!!
Peccato che me lo son perso di recente a Roma
il 31 gennaio 2003 al Dev Days.
Sarà per la prossima volta!!
Per adesso acquisto ogni sua pubblicazione con
conseguente svuotamento delle mie tasche ed invece riempimento delle sue.
:-(
Bye,
Fabio

 invece come programmatore e' cosi'-cosi' vero ? :P
ehm.... molto probabilmente sě, solo che in quella veste non lo conosco.
--
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!!!!

Come posso inserire un'iimagine in un programma di scrittura scritto da
me?


?????? Che intendi ??? cerca di essere + chiaro !
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Due Domande...

1) VB6 si puo' installare su Windows XP??? Da problemi o incompatibilita'
con programmi  fatti su windows precedenti a xp???
2) dove posso trovare delle informazioni sull'uso delle OLE per VB6??? e
precisamente x importare immagini dallo scanner??? ma va bene anche in
generale!!!
Grazie.

Newsgroup: it.comp.lang.visual-basic
Titolo: ADO o DAO in ACCESS

Per utilizzare un Database ACCESS in multiutenza è preferibile utilizzare
ADO o è più efficiente DAO?
Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 record Update

Salve, ho riscontrato un errore stranissimo quando modifico dei dati in un
form.
Ora vi spiego tutto.
Ho un bel recordset con dataEnvironment, ho creato una form con i textbox
associati ai campi (non tutti)
Alcuni sono semplici texbox, altri hanno una formattazione per i numeri
percentuali.
Dalla form principale premo il pulsante aggiungi, si apre quersta form con
tutti i campi vuoti.
Li riempo tranquillamente, chiudo e il record nuovo viene creato.
Se ora premo sul pulsante modifica, naturalmente si apre il solito form ma
con tutti i campi riempiti.
Ecco il bello, se modifico un qualsiasi campo e premo fine, tutto bene, se
modifico un campo percentuale ecco l'errore:
Si sono verificati errori in un'operazione con più passaggi, controllare i
singoli valori di stato
Ecco, non capisco perchè mi da questo errore solo quando cambio i dati
percentuali.
È un problema che avevo riscontrato anche in precedenza con una griglia ma
in questo caso non riesco ad uscirne, ho cercato su google ma non ho trovato
casi simili al mio.
Qualcuno mi sa aiutare??

 singoli valori di stato
Un errore del genere può verificarsi (vado a memoria) quando tenti di
inserire in un campo più di quanto ci sta e/o quando non esiste un indice
con chiave univoca.


si, lo so.
Il bello è che la tabella ha una chiave primaria.
I campi che vado a modificare sono percentuali.
nella tabella infatti sono di tipo giusto, nel validate faccio il consueto
val/100
Ma l'errore non riesco a trovarlo.
Eppure l'inserimento funziona.

*Glauco Cucchiar* ha scritto:

Sicuro che il problema non si verifichi a causa di un separatore
interi/decimali diverso da quanto previsto dalle impostazioni del sistema o
da quanto (forzosamente) previsto da quell'aggeggio (che non conosco)?

Questo è il codice che uso:
Private Sub cmdFine_Click()
    Me.ValidateControls
    MsgBox Magazzino.rsArticoli("IVA").Value
    On Error Resume Next
    Magazzino.rsArticoli.Update
    If Err.Number <> 0 Then
        MsgBox "Articolo non aggiunto."
        txtCodice.SetFocus
    Else
        Unload Me
    End If
    On Error GoTo 0
End Sub
Come vedete non è nulla di particolare.
Infatti il msgbox mi fa vedere il valore di uno dei campi incriminati.
Ecco cosa ho fatto:
1 - modificato il nome dell'articolo
    Tutto bene, vedo 0,2 e il record viene salvato
2 - Modificata l'iva in 10%
    visualizza 0,1 ma restituisce l'errore
3 - Modificata l'iva in 20% (cioè ho riscirtto lo stesso valore)
    visualizza 0,2 ma da errore
Ci capite qualcosa voi??



*Glauco Cucchiar* ha scritto:

Non conosco, ripeto, il dataEvironment, ma (per non sbagliare mai) il
separatore interi/decimali quando si scrive su database deve essere sempre
il punto.
Non so se puoi intervenire prima dell'Update modificando i vari textbox con
Text1.Text=Replace(Text1.Text,",",".")
Newsgroup: it.comp.lang.visual-basic
Titolo: Comunicazione tra due programmi

Salve a tutti,
Si può comunicare una stringa (per e."22:34:00") tra due programmi VB senza
usare un file?
Grazie per l'Aiuto.
Salvo.



Savesetting e getsetting (usi il registro).

 ha scritto nel messaggio
news:9izI8.20064$8x3.4...@twister1.libero.it...


 ha scritto nel messaggio
news:pan.2002.05.28.05...@tin.it...

Scusa tanto ma non mi sembra proprio una buona soluzione, visto che è
l'equivalente di usare un file. E' sempre meglio evitare di usare il
registro di win se non per cose veramente necessarie, è un pò delicato...
Ciao
    Sharkman

 ha scritto nel messaggio
news:9izI8.20064$8x3.4...@twister1.libero.it...

Guarda i precedenti post su SendMessage
Ciao
    Sharkman

 Ciao
Penso che lui volesse comuniacare con due programmi aperti e funzionanti su
due o più macchine diverse (evidentemente per sincronizzare gli orologi)
Ciao
    Sharkman

 ha scritto

che non e' un file ?
ciao, j.
--
www.sundaysw.com

 messaggio da A per eseguire una certa operazione.
Esistono diversi metodi per scambiare informazioni tra programmi e per
sincronizzare tra di loro processi.
Tempo fa qualcuno scrisse un post in cui ne elencava parecchi.
Intanto puoi guardare su msdn la parte relativa alle api di windows.
In particolare nel tuo caso cercherei le funzioni per la
sincronizzazione (semafori, sezioni critiche, eventi).
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/

Newsgroup: it.comp.lang.visual-basic
Titolo: Come intercettare la posizione del cursore

Allora vorrei sapere come faccio a sapere dove si trova il cursore
(non il mouse ma proprio il cursore dove si scrive) in assoluto, cioč
rispetto allo screen e non all'altro programma???


Usa la funzione API GetCursorPos(), tutte le dichiarazioni e definizioni di
tipi le trovi nel Visualizzatore API di VB:
The GetCursorPos function retrieves the cursor's position, in screen
coordinates.
BOOL GetCursorPos(
    LPPOINT lpPoint  // address of structure for cursor position
   );
Parameters
lpPoint    Points to a POINT structure that receives the screen coordinates
of the cursor.
Return Values
If the function succeeds, the return value is nonzero.
If the function fails, the return value is zero. To get extended error
information, call GetLastError.
Remarks
The cursor position is always given in screen coordinates and is not
affected by the mapping mode of the window that contains the cursor.
The calling process must have WINSTA_READATTRIBUTES access to the window
station.
--
Roal Zanazzi
z...@iol.it

coordinates.
Guarda che l'API che hai nominato serve per sapere la posizione del puntatore
del mouse che, nel Win32 SDK, e' chiamato cursor point. Provare per credere.

...

Lo so benissimo, ma stavo tentando di far smettere Liga97 di fare le stesse
domande a raffica nel giro di poche ore (o uno/due giorni)...
Liga97 SEI VERAMENTE MASSACRANTE!!!!!!!!!!
Ho pensato: chissa' che a dargli in pasto un'API, la smette di fare domande
almeno per un paio di giorni :-(
Scusate, ma 'ste cose non le sopporto!
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Trojan Noob 4

Un Sw cercatore di Troyan (Swatit) mi avrebbe trovato un Trojan nella
cartella dell'Autocomposizione installazione di VB5:
Noob 4 - C:\Programmi\DevStudio\VB\setupkit\kitfil32\SETUP.EXE
Di che si tratta?E' un falso allarme?Il file mi sembra essere quello
originale...
Giorgio



Noi da qui non possiamo vedere il tuo file, inoltre questo e' un
newsgroup su visual basic e non su sicurezza o simili.
Per venirti comunque incontro, sarebbe utile conoscere dimensioni e
data del file e magari anche il suo hash calcolato con md5 per
confrontarlo con quello calcolato da qualcun altro che abbia vb5.
-- 
ciao, hal

 ciao, hal
Questo file ha la stessa data ed ora degli altri nella directory (7/3/97
5.00) e l'AntiTrojan(!) lo individua anche nel cd di installazione di VB5,
dunque viene da lě.
Allora il virus ce l'ha messo Microsoft o č l'antivirus in errore?
Qualcuno ha VB5 e puň verificare?
Per quanto riguarda l'hash calcolato con md5 non so nemmeno di cosa si
parli; dimmi cosa posso vedere...

dunque viene da lì.
Mi sa tanto che se il cd e' originale ti convenga buttare via
l'antitrojan ;-)
-- 
ciao, hal

 confrontarlo con quello calcolato da qualcun altro che abbia vb5.
Questo file ha la stessa data ed ora degli altri nella directory (7/3/97
5.00) e l'AntiTrojan(!) lo individua anche nel cd di installazione di VB5,
dunque viene da lì.
Allora il virus ce l'ha messo Microsoft o è l'antivirus in errore?
Qualcuno ha VB5 e può verificare?
Per quanto riguarda l'hash calcolato con md5 purtroppo non so nemmeno di
cosa si
parli; dimmi cosa posso vedere...
Giorgio

[*Giorgio* : 
Giorg...@tin.it
] ha scritto:

Penso proprio che VB5 sia esente da virus/trojan.
Comunque, vai qui e scarica AD-WARE 6.
Prova e dicci poi se anche questo ti trova anomalie in quel file
(già, perchè di altre "anomalie" te ne troverà un tot):
http://www.lavasoftusa.com/support/download/

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema a seguito di conversione Access-MySQL

Ciao a tutti
Ho convertito con MySQL-Front un database Access in uno MySQL, senza
incontrare problemi. Questi sono venuti quando ho interfacciato a
MySQL il programma scritto con VB4 per gestire il vecchio DB Access
(con le dovute modifiche alla connessione...), riguardo ai campi
'Sģ/No' (che sono stati convertiti in ENUM 'True','False'). I
controlli CheckBox non riconoscono questi campi e finché sono
collegati al database generano l'errore 'Tipo non corrispondente'.
Ho notato in effetti che in Access i valori dei campi 'Sģ/No' sono -1
e 0.
Come posso fare per risolvere questo problema?
---------
Stefano

 (con le dovute modifiche alla connessione...), riguardo ai campi
checkbox.value=valore_campo_mysql AND true;
oppure prova
checkbox.value=valore_campo_mysql AND 1;
ovviamente questo per ogni impostazione di .value di ogni checkbox.
-- 
Ciao,
        Fabrizio
<=- 
http://www.negusweb.it
 -=>
Newsgroup: it.comp.lang.visual-basic
Titolo: VB4->VB5: .ini->registry

Sto convertendo un a applicazione VB4 in VB5.
Qualcuno sa dove posso trovare documentazione sulla gestione dei file
.ini in VB4?
--
;-) Per replay su e-mail togliere .NOSPAM dall'indirizzo

...

Ciao,
forse non ho capito bene il problema.
Vuoi tradurre un programma da VB4 a VB5 (sarň stupido, ma non capisco
perchč), e vuoi informazioni sulla gestione dei file .INI da VB4.
Io personalmente, in VB4 usavo la funzione API GetPrivateProfile,
disponibile con l'API Reader. Mentre con VB5 ci sono Savesetting e
Getsetting.
Spero di esseti stato utile.

Getsetting.
  Occhio che in VB5 (ma anche in VB4/32) GetSetting e SaveSetting
operano sul Registry, non su un file INI, come invece fanno in VB4/16.
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

 Spero di esseti stato utile.
Sempre e comunque!
