mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Errore di applicazione

Ho un'applicazione scritta in VB5 SP3. L'ho installato su PC con Win95,
Win98, WinNT Server e tutto è sempre andato bene, se lo installo su PC con
WinNT workstation ho questo errore:
Errore di applicazione
L'istruzione a "0x0f01c6ea" ha fatto riferimento alla memoria a
"0x21d72718". La memoria non poteva essere "read".
Fare click su OK per terminare l'applicazione
Fare click su Annulla per eseguire il debug dell'applicazione
Qualcuno ha qualche suggerimento da darmi?
Grazie in anticipo!!



Bisognerebbe capire cosa fa l'applicazione.......
Ciao
Aran

 ha scritto nel messaggio
news:0lp8ktktmmi5621sv...@4ax.com...


Aran

 wrote:

Non credo che serva capire cosa fa l'applicazione, ti spiego:


 ha scritto nel messaggio
news:3b459232...@news.galactica.it...

nota bene, anche un "peccato di omissione" può generare un crash ;))
in altre parole potrebbe essere un semplice (si fa per dire) problema di
cleanup; tieni presente un paio di punti:
1) rimuovi correttamente eventuali subclassing, hook, ecc. ecc.
eventualmente utilizzati dalla tua applicazione (o da componenti utilizzati
dalla tua applicazione)
2) disinstanzia correttamente tutti gli oggetti (classi, form, usercontrol,
e quanto altro) in maniera corretta (attenzione all'istruzione END.... non
usarla!)
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiornamento ADO 2.6

Sul sito microsoft ho trovato l'aggiornamento di ADO alla versione 2.6, ma
quale devo scaricare?
l'SDK (solo in inglese) o la versione ridistribuibile (in italiano)?
grazie
Epoch

 l'SDK (solo in inglese) o la versione ridistribuibile (in italiano)?
La seconda che hai detto!
        Ciao
                Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic e Word2000 - utilizzo di un form

Ciao a tutti!
Ho questa necessità: devo fare in modo che ad un testo selezionato in
Microsoft Word 2000 vengano aggiunti i tag HTML per un'àncora e un indirizzo
inserito tramite un form.
Poiché le Macro di Word non mi sono sufficienti a quello che mi serve, ho
imparato un pochino di Visual Basic e ho costruito un Form con l'editor
inserito in Word 2000.
Sono riuscito nel mio intento, e quando compilo il codice (semplice
semplice) tutto funziona.
Ora il mio problema è questo: come posso fare un pulsante nella barra degli
strumenti di Word, che esegua quella piccola applicazione che ho fatto in
VB? Non ha senso passare ogni volta nell'Editor di Visual Basic e compilare.
Vorrei poter aggiugnere un pulsante come se aggiungessi una macro, soltanto
che anziché eseguire una macro mi mostri il form che ho preparato.
Sapete aiutarmi?
--
--
Giampaolo Bellavite
// webmaster Motonline.com
Internet: 
http://www.motonline.com
E-mail: 
gbell...@motonline.com
Tel.: 02.3070.2334
--------------
MOTONLINE.COM
 - Born to be netbikers
    Il primo portale verticale dedicato
    agli appassionati di motociclismo

 inserito tramite un form.
[...]
Rettifico!! Ci sono riuscito!! bastava fare una macro con form.show.
Che stupido :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Algoritmo MD5

Gentili sognori.
Vi disturbo ancora per avere altre utili informazioni.
Vorrei sapere se qualcuno di Voi conosce l'esistenza di codice Vb che
implementi l'algoritmo MD5, per il criptaggio dei dati in internet.
Grazie a tutti.
p.s.
Ringrazio "Saba" per le informazioni che mi ha dato fino ad oggi.

 Ringrazio "Saba" per le informazioni che mi ha dato fino ad oggi.
Mi tolgo tanto di cappello..... ma sono io o Paolo Sabatini??
Se sono io il mio nome è Sab<b>a ;-)
----------
Ciao
Sabba

Newsgroup: it.comp.lang.visual-basic
Titolo: ActiveX e Internet Explorer

Salve a tutti,
ho realizzato un ActiveX, che gira perfettamente in Internet Explorer
6, fino a che non viene installato il service pack 3 di windows 2000.
Qualcuno di voi ha avuto problemi analoghi, o sa dirmi come aggirare
il probela?
Potrebbe trattarsi di un problema, tipo la necessità di una firma
elettronica o qualcosa del genere?
Vi ringrazio anticipatamente
Davide

 elettronica o qualcosa del genere?
La cosa più probabile è che SP3 ti abbia reimpostato la sicurezza originale.
Ti consiglio di inserire il tuo sito di test fra i siti attendibili, ed
abbassarne la sicurezza su "Low".
Ciao
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: compattazione db

ma un applicativo fatto in VB con tabelle varie, necessita della
compattazione ogni tanto?
e se si, come si fa a valutare quando va fatta; considerando che chi usa
l'applicativo puo' non essere
chi l'ha creato e quindi non riesce a capire eventuali problemi di
lentezza o similari a cosa sono dovuti
grazie

 e se si, come si fa a valutare quando va fatta;
Intendi fatta automativamente da VB immagino vero?
Beh fallo a scadenze regolari tu senza preoccuparti troppo se è il caso o
meno...
Tipo ogni 30gg...e al massimo metti un tasto che lo fa fare al bisogno dal
tuo utente...
Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: Puntatori colorati in VB5

Salve a tutti
Come faccio per visualizzare, attraverso l'impostazione
personalizzata dei cursori, un puntatore colorato,
VB5 mi permette di visualizzare solo quelli in bianco e
nero, potete aiutarmi?
Grazie mille
--------------------------------------------
             ASSA
http://web.tiscalinet.it/Assatarram
--------------------------------------------

 nero, potete aiutarmi?
mah, mi sembra strano...
hai impostato la proprietà MouseIcon con la tua icona e MousePointer a 99
(Custom) ?
Faber

 ha scritto nel messaggio
news:8vhvhi$o79$1...@nread1.inwind.it...


 in bianco e nero. > VB5 professional
non ho provato col 6, ma allora mi sa che e' un bug del 5 tipo quello delle
icone nelle toolbar. vb5pro a un certo punto cominciava a farle vedere a
sfondo nero. la soluzione stava nel cambiare i common control con quelli di
vb6 (sempre che poi te li lasci usare...)

 ha scritto nel messaggio
news:8vp2pn$5a4nt$1...@ID-51318.news.dfncis.de...


 ha scritto nel messaggio


 be', sempre meglio che per un collimatore...
Cos' e' ?

 Cos' e' ?
difficile definirlo esattamente, specie se gli si capita davanti e si e'
piu' lenti del bip-bip-bip che di solito gli e' collegato (es. firefox,
topgun, starwars).
si potrebbe forse dire che e' quel sofisticato congegno (|gadget|) che tende
a far coincidere -- stavo per dire collimare -- una persona fisica
(|target|) con una persona giuridica (il testatore). si ha cosi' un notevole
mutamento di stato: il |target| diventa il |source|, con un tag <body>
tendenzialmente piu' |open| di prima).




 tendenzialmente piu' |open| di prima).
veramente qui di |open| c'e' il mio <brain>
;-)

 un'esperienza alquanto deprimente...
confermo :(((
--
Fibia "Sakamoto" FBI
URL: 
www.geocities.com/fibiafbi
E-Mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Membro #25 delle BT Sez. Sud

 poi me la spieghi? :)
ssssubito: visto che qualcuno ha innescato un metodo (che parola, in un ng
su vb...) di citazioni velate, cercavo di adeguarmi scarlancando come potevo
(ma in effetti, dalle tue parti potrebbe essere frainteso :)) :
ANTONIO: Amici, Romani, compatrioti, prestatemi orecchio; io vengo a
seppellire Cesare, non a lodarlo. Il male che gli uomini fanno sopravvive
loro; il bene è spesso sepolto con le loro ossa; e così sia di Cesare. Il
nobile Bruto v'ha detto che Cesare era ambizioso: se così era, fu un ben
grave difetto: e gravemente Cesare ne ha pagato il fio. Qui, col permesso di
Bruto e degli altri - ché Bruto è uomo d'onore;

 Bruto e degli altri - ché Bruto è uomo d'onore;
di tal genere?
paragonarmi a Bruto? ma sei cattivo!!! :)


 paragonarmi a Bruto? ma sei cattivo!!! :)
ho sempre amato cesare, specie per come scrive,
ma bruto agiva in nome di ideali alti.
la storia la scrive chi vince. per sicurezza,
i perdenti vengono spennati anche delle biro :)


Per ottenere i puntatori colorati devi caricarli da un file di risorsa
(*.res) e anche cosi facendo li vedrai colorati solo nel programma compilato
e non quando gira nell' IDE.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Programma per chat...

Sto cercando di sviluppare un programma per chat, in grado di collegarsi con
gli abituali server IRC.
Qualcuno ha qualche esperienza in merito?
A me servirebbero delle instruzioni (o dove reperirle) dei vari dati che il
server mi manda e con quali dati devo rispondere per connettermi a tutti gli
effetti e condurre una normale conversazione via chat (usando Winsock)
Grazie
Maurizio

...

A me servirebbe la stessa roba ma anche per chat indipendenti da irc, cioe'
per conto loro......
Grazie!
Mad Hatters

Fai un salto su
http://www.irchelp.org/
C'e' di tutto.... ti consiglio soprattutto la  RFC1459.


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ricerche record con FindFirst - FindNext .....

Ho un problemino......
Nel software che ho scritto (VB6 su db Access 97), gli utenti (30
simultanei) devono poter fare delle ricerche su vari campi del db (tutti i
campi di ricerca sono indicizzati)....
Ora il db ha raggiunto quota 8.000 record (circa 6 Mb compattato).....
Il tempo di attesa è *ALLUCINANTE* - anche 15-20 secondi......
Qualcuno ha consigli?????
AIUTOOOOOO  ^___^
Grazie fin d'ora!
Tommaso

 Il tempo di attesa è *ALLUCINANTE* - anche 15-20 secondi......
si davvero allucinante
Spero di esserti stato di aiuto ciao... e se ho dettto cazzate ditemelo
cosi' correggo anche il mio modo di fare...Ciao

 cosi' correggo anche il mio modo di fare...Ciao
Lo spero anche io!!!   ^___^
Grazie infinite
Tommy

 


Newsgroup: it.comp.lang.visual-basic
Titolo: ?select su campo data

 Dim db As Connection
  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data  Source=C:\clienti.mdb;"
  Set adoPrimaryRS = New Recordset
  Dim chiave As Date
  chiave = Date
  adoPrimaryRS.Open "Select * From schede  where proxcontatto<chiave  order
by ragionesociale", db,   adOpenStatic, adLockOptimistic
proxcontatto è un campo della tabella di tipo data
Purtroppo la risposta è "nessun valore specificato per uno dei parametri
obbligatori"
Io non riesco a trovare la soluzione....qualcuno può aiutarmi?
grazie mille
Paolo

 Io non riesco a trovare la soluzione....qualcuno puň aiutarmi?
adoPrimaryRS.Open "SELECT * FROM Schede WHERE ProxContatto = #" & _
    Format$(Chiave) & "# ORDER BY RagioneSociale", ....
cosě magari funziona...
Ciao
Faber

 wrote in message
news:Clav5.4379$Sm1....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Eliminare items da due Listbox

Salve,
Spero che qualcuno mi possa aiutare a risolvere questo problemino:
Ho 2 listbox: List1 e List2. 
List2 mi serve solo per numerare la riga degli item di List1.
Ora pero' viene il difficile (almeno per me)
Se devo eliminare un articolo da List1, come devo fare per rimuovere il 
numero di riga corretta in List2 eventualmente cambiando il numero di 
riga? Ad esempio:
List2					List1
1					Item 1    <------- *
2					Item 2
* Se devo eliminare Item 1, come faccio a cambiare il numero di riga in 
list2?
Adesso ottengo questo risultato:
List2              			List1
2                                 Item 2
Grazie per l'aiuto
Roberto. 

Ho risolto.
Sbagliavo ad assegnare una variabile.

 
Ma non ti conviene usare la proprieta' ItemData?
-- 
Samuele Battarra
mail server: 
libero.it
, indirizzo: battarsa@(mail server)
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/leggiminews.html

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

Ciao a tutti.
Avrei bisogno di Aiuto, grazie.
Ho una Tabella (Access2000) dove memorizzo delle stringhe piu o meno lunghe
( sono delle Query che mi servono per la mia applicazione), come potrei (se
fattibile) ricercare queste stringhe digitando una piccola parte di testo
( o meglio solo una frase della stringa)  in una TextBox posizionata sul
Form.
 Io conosco il modo di ricercare Record ma solo se sono Univoci, adesso
purtroppo devo scorrere tutti i Record per trovare quello che in quel
momento mi serve.
Grazie veramente di cuore a chi mi puņ aiutare
Saluti a tutti
Ciao Pippo

 ha scritto nel messaggio
news:xlx98.54883$3J1.1...@news2.tin.it...


Grazie mille
Ciao
"FrDN" <fdellinoci@NOSPAM_libero.it> ha scritto nel messaggio
news:a4atjp$k8t$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: recupero etichetta di un CD

Ciao a tutti.
Volevo sapere se esiste un modo in VB.NETi di recuperare l'etichetta che
compare come descrizione dell'unità CD , quando se ne inserisce uno.
La classe directoryinfo resistuisce solo il nome il codice del volume
(H:,F:, ecc..) , mentre invece io vorrei ad esempio "Pluto (H:)".
grazie in anticipo.


wrote:

Potresti usare WMI tramite System.Management, come in questo codice di
Marco Bellinaso:
' Retrieve the drive name (label) of the specified drive
' Note: requires a reference to the System.Management assembly
' Example: MessageBox.Show(GetDriveLabel("D"c))
Function GetDriveLabel(ByVal driveLetter As Char) As String
    Dim driveFilter As String = "Win32_LogicalDisk=""" &
driveLetter.ToString & _
        ":"""
    Dim drive As New System.Management.ManagementObject(driveFilter)
    Return drive("VolumeName")
End Function
-- 
ciao,
hal

 ha scritto nel messaggio
news:u0jt20t0u0pj2u34n...@4ax.com...


Se hai 1 gb di spazio installatela tutta, eviti continui messaggi di
inserire il cd x....
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: API SHFileOperation problem

>>>    MsgBox (FileOp.fAnyOperationsAborted)
'       Riesco ad intercettare gli errori se FileMove e' <> da 0
'       ma se annullo l'operazione filemove e' uguale a 0 
'       e io non riesco a saper con fAnyOperationsAborted se
'       l'operazione e' stata abortita
End Function
Sbaglio da qualche parte?
Grazie

 wrote in message
379CA116...@vastocom1.clio.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Catturare una porzione di schermo

ciao a tutti,
il mio quesito è questo:
tramite API GetDesktopWindows(), CreateDC(), BitBlt() riesco a
recuperare lo sfondo del desktop e a sbatterlo su di un form ma non
riesco a fare le seguenti modifiche
1) Inserirlo in una PictureBox
2) Visualizzare nella Picture solo la porzione di schermo da essa
coperta.
Mi aiutate??
grazie

grazie
[Risposta]
La cosa č abbastanza complessa da affrontare, e ritengo che Access non sia
lo strumento adatto
a queste manipolazioni.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Porta pazienza ero convinto di essere in ICAA...
questo è il 2° messaggio toppato...!
In VB le considerazioni che ti ho fatto non c'entrano una fava...


Infatti non ci capivo un ca@@o.......
mi stavo domandando cosa c'entrasse Access.
Cmq ho risolto facendo tutt'altra cosa.
grazie



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

Il mio problema è il seguente...
devo usare api ChooseFont per recuperare la struttura LOGFONT da passare
successivamente ad un'altro programma ma non mi riesce a fare apparire la
finestra di dialogo, e il codice di errore che ritorna e sempre 1 cioè che
sbaglio ad inizializzare la struttura CHOOSEFONT che tra l'altro copiando la
definizione dal visualizzatore api e sbagliata perchè la variabile lpLogFont
la dichiara come long e non come di tipo LOGFONT come e invece dichiarata
dalla MSDN Library.
Un grazie anticipato a chi sa darmi una mano a risolvere il problema


Se vuoi ti mando un modulo di classe che sostituisce (quasi completamente)
l'OCX CommonDialog, usando le API (quindi anche ChooseFont()).
Rispondimi via e-mail.
P.S. Se qualcuno si sta chiedendo perche' non lo mando sul Sito Comune, il
problema e' chela classe non e' ancora completa e testata a fondo.
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Come usare l'oggetto form?

Ciao mi chiamo Alberto ed ho un problema che non riesco a risolvere, voi
sareste in grado di darmi una mano?
Dalla guida di VB ho trovato una interessante routine che attiva/disattiva
tutti i controlli di un dato form, per eseguirla basta richiamarla
specificando il nome del form interessato, come di seguito:
Private Sub Form_Load()
    'Richiamo la routine attiva/disattiva controllo specificando il nome del
form,
    'con 0 distattivo e con 1 attivo
    EnableControlsOn (NomeDelForm), (0)
End Sub
Sub EnableControlsOn(frm As Form, State As Integer)
    'Attiva o disattiva i vari controlli
    Dim I   ' Dichiara la variabile.
    For I = 0 To frm.Controls.Count - 1
        If Not TypeOf frm.Controls(I) Is Menu Then
            frm.Controls(I).Enabled = State
        End If
    Next I
End Sub
Il problema è quando vado ad eseguire a richiamare la procedura ed il VB mi
visualizza il seguente errore:
Errore di compilazione. Variabile non definita.
Perché questo? E come faccio ad utilizzare gli oggetti definito con Form?
E-Mail:trt...@tin.it


Se la form di cui vuoi attivare/disattivare i controlli è quella che
stai caricando,
 Private Sub Form_Load()
     'Richiamo la routine attiva/disattiva controllo specificando il
nome del
 form,
     'con 0 distattivo e con 1 attivo
     EnableControlsOn (Me), (0)
 End Sub
per quanto riguarda 'Me' cerca nell'Help di Vb 'Me keyword'.

Newsgroup: it.comp.lang.visual-basic
Titolo: [API] Copiare 1 File con barra progressione in Automatico

Come si chiama l'Api che fa ciň in Automatico?
Ho usato CopyFile ma non visualizza la barra progressione...
Ciao e Grazie
Oz

SHFileOperation
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--

Newsgroup: it.comp.lang.visual-basic
Titolo: WEBCAM e Vb

Qualcuno ha idea di come si possa utilizzare una webcam in Visual Basic per
catturare delle immagini senza passare dal software predefinito? in che
formato arrivano dalla webcam? jpg?
thx,
Olivier.

Puoi leggere l'immagine dalla porta twain che tutte le webcam
installano.
Puoi farlo con I4W o con un componente specifico.
---
GbC
http://gbc.homeip.net
---

hai ragione! non ci avevo pensato.
quindi devo usare una dll che installa il software della webcam?
hai idea di quale sia? tu hai fatto qcs del genere? non sai dove trovare
qualche tutorial?
thx,
Olivier.
"GbC" <-...@O-O.OOO> ha scritto nel messaggio
news:5j9M5.74157$3K3.2...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione Sql

Ciao a tutti.
Volevo chiedervi qual'è secondo voi il modo migliore per connettersi a mySql 
tramite Vb6.
Esistono componenti già fatti?
Grazie,
Alessandro 

 Esistono componenti già fatti?
Non vuoi il mio mouse
Logitech ?


bye,
Max
Newsgroup: it.comp.lang.visual-basic
Titolo: format di una griglia sheridane

ho un problema con una griglia sheridan.
ho impostato un formato numerico per una colonna che dovra' contenere
dati numerici: "#,###", ovvero metti il separatore delle migliaia.  
funziona, pero' quando clicco sulla casella che contiene il numero
formattato, esso si "sformatta", ovvero invece che 100.000.000 appare
100000000.
se setto allowupdate a false questo non succede, ma non posso farlo
perche' in una delle colonne l'utente deve inserire dati.
ho provato a cincischiare qualcosa con gli eventi mouse up e mouse
down per cambiare dinamicamente la proprieta' allowupdate, gli ci si
avvicina ma il feel non e' dei migliori.
un'idea che avrei sarebbe quella di scrivermi una mia funzione di
formattazione numerica, e preformattare il numero (che tanto e'
trattato come stringa) prima di passarlo alla griglia, ma non mi ci
vogliono far perdere tempo.
qualcuno ha altre idee?
======================================================
my opinions do not necessarily have to be true.
======================================================
per rispondermi rimuovere NOSPAM. dall'indirizzo email
to answer me remove NOSPAM. from email address
======================================================

 qualcuno ha altre idee?
Se non sbaglio quella griglia permette (via codice) di definiore Updatable le colonne
singolarmente. Se e' cosi', limiti il difetto sulla colonna da aggiornare.
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes



Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere su XLS - gestione accesso

Salve a tutti.
Scrivo una piccola applicazione che apre, aggiunge e chiude un file di
excel.
Il tempo che il programma impiega per questa azione può variare dai 2 ai 5
secondi circa a seconda della quantità di dati.
Il programma è usato in uffcio da 10 persone. Il programma e l'XLS risiedono
sul server.
Trovo un piccolo esempio in rete che mi dice come evitare che due utenti
tentino di scrivere l'XLS negli stessi secondi? Una specie di coda di
accesso regolata dalla programma che solo al raggiungimento del proprio
turno, da la conferma della avvenuta esecuzione.
Grazie Signori.
*frankyz

 del proprio turno, da la conferma della avvenuta esecuzione.
se posso dire la mia: non usare excel.
appoggiati ad un database access, e ti sarai tolto i problemi dell'accesso
contemporaneo.
--
Salutoni
Sergio

son d'accordo, per numerosi motivi:
- access è infinitamente più veloce di excel
- puoi usare un mdb anche senza aver installato access vero e proprio
(mentre con excel no)
- puoi sempre importare il tutto da access ad excel
- con access, che è un db vero e proprio, puoi usare sql per fare ricerche e
filtrare i dati....
good coding!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

 - con access, che è un db vero e proprio
però questa cosa diciamola sottovoce: c'è un sacco di gente, da queste parti,
che lo considera solo la versione evoluta del pallottoliere. :-)
--
Salutoni
Sergio

 ricerche e filtrare i dati....
    In linea di massima concordo con voi ma... anche con excel puoi
usare sql... :-)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Cattura schermo

Salve a tutti volevo catturare lo schermo (mi spiego meglio,vorrei salvare
l'immagine dello schermo come si fa con il tasto Stamp) c'è qualche funzione
che lo fa?Magari qualche API?
Grazie mille


  Cerca info riguardo le funzioni ( dell' A.P.I. di window ) GetDC(),ReleaseDC
e BitBlt()
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

 Grazie mille
Sul CB di VB c'č una cartella chiamata,
se non ricordo male, usupported
all'interno trovi degli esempi pronti:
uno di questi č un salvaschermo
che crea una copia dello schermo
e vi va girare sopra dei logo di IE
se non sbaglio dovrebbe chiamarsi SSaver
scusa se non sono piů preciso ma ...
ero intenzionato a studiarmelo anni fa
e invece e sempre rimasto lě ...
--
Mauro Cerreto
www.cerretosoft.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [SEMIOT] cambio nome a ttf

Devo creare delle font "embedded".
Per far ciň utilizzo programma freeware di Microsoft (Weft).
Il programma funziona correttamente finché il nome del font non contiene
spazi; se li contiene segnala errore e non crea il font.
Domanda: qualcuno conosce un modo per cambiare nome al font (per rimuovere
gli spazi), oppure un altro programma che converte file .ttf in file .eot?
Il nome del font dovrebbe a logica essere scritto nell'header, non so se sia
cambiabile.
Grazie a tutti, scusate per l'OT.

"Cristiano Larghi" <C.La...@Micronix.it> ha scritto

(invece di "semi-ot" avevo pensato a "semiot[ica]" e mi chiedevo anche
perche'...)
ttf: credo che il nome sia alterabile. c'era un affare chiamato font
monster, share, io l'ho visto per w3x, ma credo l'abbiano fatto anche per
win 32. se lo cerchi con altavista, filez e simili (tipo fontmonst*)
dovreati trovarlo. faceva quasi di tutto, ai font.
unico punto: ho molti dubbi, se il font non e' pd, che l'operazione sia
lecita...
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: Uso del Timer per scatenare operazioni dopo un certo tempo

Ciao a tutti.
Se voglio che la mia applicazione, dopo che sono trascorsi, che so', 300
secondi, effettui un restore a certe condizioni iniziali, cosa debbo
utilizzare?
Io ho provato con
Time_before=Timer (caricato all'inizio)
Time_after=Timer (caricato ad ogni re-paint della form)
Time_diff=int(abs(Time_after-Time_before)
if Time_diff > 300 then .....
ma non mi funziona. Se io intercetto con una msgbox il valore attuale di
Time_diff lui e' effettivamente un intero con valore ora inferiore ora
superiore a 300, ma.....
Ogni help in merito sara' estremamente gradito.
Ciao.
Alessandro

 wrote in message
7knhqr$gkk$1...@fe2.cs.interbusiness.it...


Talmente semplice che non funziona.. (l'intervallo max impostabile é 65535.)
Prova ad impostare 1000 e usa questo codice
Private Sub Timer1_Timer()
Static lSec As Long
lSec = lSec + 1
If lSec = 300 Then
   lSec = 0
   MsgBox "Tempo Scaduto!"
End If
End Sub
Ciao,
Corrado

Grazie a tutti. Era effettivamente molto piu` semplice di quanto pensassi.
Ora funziona.
Ciao a tutti.
Alessandro



Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta password Admin

Dopo aver protetto un solo database Access con una password che
successivamente ho annullato, qualsiasi database tento di aprire con
Crystal Report mi viene sempre richiesta la password dell'utente
Admin. Questo mi impedisce di usarli perché non conosco tale password
in quanto io sicuramente non la ho inserita. Aprendo gli  stessi
database direttamente con Access non c'é richiesta di password.
Chi sa spiegarmi cosa è successo e come posso rimuovere il blocco su
Crystal Report ?

bo.........
Dal menu di CR prova a fare "DataBase", "Verifica"
Io ho un programma per ottenere la password di un db access senza
conoscerla, se ti può servire.....
Alberto Robustelli ha scritto:

--
By matteo(olè)
Mail to: 
ori...@libero.it
 
vuoiunscinquant...@yahoo.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Database remoti... VI PREGO!

 Io darei un'occhiata ai nuovi metodi di ADO 2.5.
Mi sai dire dove potrei trovarli?
Ciao
Renzo

 ha scritto nel messaggio
news:OQxnInx...@news1.galactica.it...


Nell'ultimo service pack infatti č contenuta la versione 2.5 di ADO.
ciao
--
    Giuseppe Saffioti
-------------------------------------
pino.s...@tiscalinet.it
pino.s...@asl1.to.it



anche IE3.2 ma non ci giurerei);
L'ASP restituisce un file di testo html che quindi puo' essere
visualizzato da QUALUNQUE browser.
Tutti i comandi per la connessione, l'apertura, recupero dei dati e
quant'altro rimangono sul lato server; all'utente ritorna una tabella
di testo.

 ha scritto nel messaggio
news:86derscpbhbl7h0ge...@4ax.com...

giustissimo, ho fatto un po di confusione con ASP "puro" (che funziona anche
con Netscape) e script lato client magari affiancato da qualche OCX;
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Form con Image

Ho un form che contiene unicamente una control Image. Come faccio per
far sě che quando viene inserita un'immagine nella control Image, il
form assuma le dimensioni dell'immagine?
Grazie,
   Roberto
email: 
ro...@ctonline.it
icq:   47933273 

 form assuma le dimensioni dell'immagine?
Potresti scrivere del codice simile a questo:
-----------------------------
Private Sub Form_Load()
   Image1.Picture = LoadPicture("C:\WINDOWS\Nuvole.bmp")
   Image1.Left = 0
   Image1.Top = 0
   Width = Image1.Width + (Width - ScaleWidth)
   Height = Image1.Height + (Height - ScaleHeight)
End Sub
------------------------------
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale Minerva
mine...@libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Priorità applicazione

Salve a tutti!!
Come faccio, se esiste un modo, di regolare la priorità
di esecuzione della mia applicazione in VB 5.0???
O più semplicemente facendola apparire per ultima
nel task manager (sono messe in ordine di priorità
vero??? Se no, ho sbagliato domanda).
GRAZIE MILLE
--------------------------------------------
             ASSA
http://web.tiscalinet.it/Assatarram
--------------------------------------------

vero??? Se no, ho sbagliato domanda).
No, sono in ordine di attivazione. Quelle attivate più di recente sono in testa (per attivate
intendo che hanno ricevuto il fuoco).
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
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:52ao0ts104mum3b6q...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: [sito comune] non siate timidi

Ciao a tutti,
Questa solo per incitarvi a candidarvi come prossimo WebMaster del Sito
Comune.
La vita del sito è strettamente legata ai sui WebMasters, che vengono eletti
qui su sul NG.
Attualmente non ci sono ancora candidati, ma la settimana a disposizione per
raccogliere lecandidature passa in fretta.
Io avrei in mente qualche nome qui in NG che vorri vedere WebMaster del Sito
Comune per i prossimi 6 mesi; i nomi? heheee.. li sapete anche voi, sono
quelli che generalmente rispondono alle domande qui in  NG.
Il Sito Comune necessita di un WebMaster, e deve essere uno di noi,
candidatevi!
Dai, non fatemi fare i nomi.. .  fateli proma voi. ^__^
Ciao a tutti
Ettore Maronese
W Il SITO COMUNE DI QUESTO NG
http://wwwmurialdo.it/it_lang_vb

 Dai, non fatemi fare i nomi.. .  fateli proma voi. ^__^
Ettore Maronese ??? :-)
Scusa, ma non sono riuscito a trattenermi , pero' so che sei bravo perche'
non ti candidi ?
Ciao stefano

 non ti candidi ?
Ancora?
Basta, l'ho già fatto 2 volte!
Ma la motivazione è che non riuscirei +, sono molto + incasinato di una
volta :-(
ORA TOCCA A VOI  ^_^
Ettore Maronese

Basta, l'ho già fatto 2 volte!
Come si dice... "Non c'è 2 senza 3..." ;-)))
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
---------------------------------------------------------------------------

Visto che Ettore Maronese per la terza volta non vuole prendere questo
impegno, personalmente
proporrei...
Moreno Sirri.
Cosa ne pensate ?
Io credo che sia la persona ideale per questo incarico...
Forza Morenoooooooo
hehe
Ciao
Daniele P.
www.vbtips.it

 ha scritto nel messaggio
news:XbXO5.30430$BF.10...@news.infostrada.it...


 =))))))))))))
Sono d'accordo anch'io.
MORENO MORENO MORENO!!!
--
Fibia "Sakamoto" FBI
URL: 
www.geocities.com/fibiafbi
E-Mail: 
fibi...@hotmail.com
ICQ UIN 63586057

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore avvio applicazione

Ciao a tutti...
Il mio problema è questo:
ho creato un piccolo programma che appena avviato lancia tramite la funzione
Shell un'altra applicazione (Winamp). Se questo mio programmino lo metto
nell'esecuzione automatica di Win2000, spesso e volentieri non riesce ad
avviare WinAmp e va in errore...se invece lo eseguo io manualmente tutto va
alla perfezione, quasi come se dovesse attendere che Win2000 finisca di
caricare tutto ciò che deve caricare...
Come posso fare?Ho provato a fare un ritardo di 2 secondi prima di lanciare
WinAmp ma non funziona lo stesso...Se qualcuno può suggerirmi una soluzione
lo ringrazio tantissimo!
--------------------------------
Inviato via 
http://usenet.libero.it

 lo ringrazio tantissimo!
winamp non lancia l'agente ( winampa ) in automatico ?
prova a lanciarlo a mano nello stesso modo in cui lo lancia il tuo programma
e vedi se l'errore e' legato a winamp o al prg
oppure fai una prova col solitario ...
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO - Registrazione OutlookBar98 OCX

Sul mio computer ha sempre funzionato. Soprattutto ora che ho imparato a
usarlo. Quando però lo sposto su un altro PC e cerco di registrarlo, ottengo
un messaggio che dice che devo avre un'utilità di installazione separata per
poterlo installare. In realtà ho notato che manca il file .dep che il
regsvr32 usa per la registrazione degli ActiveX. Perchè allora sul mio PC
posso registrarlo e *sregistrarlo*?
Come posso registrarlo anche sull'altro PC?
Grazie.
--
********************************************
Giorgio B. - P.S. elettronica srl - Udine
email: 
giorgio....@ps-elettronica.it

 ha scritto nel messaggio
news:8aq98d$37e$1...@pinco.nettuno.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP! RECORDSET

Ciao a tutti!
Qualcuno saprebbe dirmi come fare a creare un recordset con ADO e jet 4 in
VB6?
Devo filtrare i dati da più tabelle...
grazie!

 ha scritto nel messaggio
news:9sojin$2rh$1...@fe2.cs.interbusiness.it...


Come risolvere un problema? Dove trovare informazioni?
1) Per prima cosa consultate la guida in linea.
*  Premere il tasto [F1] in alto a sinistra sulla vostra tastiera.
2) Seconda fonte di informazione: l'MSDN online.
*  
http://msdn.microsoft.com/vbasic/
3) Terza fonte di informazione: cercate tra i vecchi post di questo
newsgroup: quasi tutti i temi sono stati già ampiamente trattati e risolti.
*  
http://groups.google.com/groups?group=it.comp.lang.visual-basic
4) Quarta fonte di informazione: il Sito Comune(SC) di questo NewsGroup.
*  
http://www.it-lang-vb.net/
5) Quinta fonte di informazione: cercate tra i sorgenti già scritti e pronti che al 99%
risolvono quello su cui state lavorando e con minime modifiche.
*  
http://www.it-lang-vb.net/
  (Sezione sorgenti)
*  
http://www.planet-source-code.com/vb/
6) Per ultima, se non avete ancora trovato nulla: chiedete al newsgroup.
*  Ricordatevi di leggere il Manifesto di questo Gruppo di Discussione:
 
http://www.it-lang-vb.net/docs/Manifesto.txt
--- Links per approfondire... -------------------------------------------
Sommario:
¯¯¯¯¯¯¯¯
[API]
[SOCKET]
[DATABASE]
Contenuto:
¯¯¯¯¯¯¯¯¯
[API]
*  
http://www.allapi.net/
[SOCKET]
*  
http://www.vbip.com
*  
http://www.socketwrench.com
[DATABASE]
*  
http://www.microsoft.com/data/download.htm

Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini: come memorizzarle in un database di SQL Server

Ho letto attentamente la guida su come memorizzare le immagini in una
tabella
con l'utilizzo della chiave UPDATE TEXT ma non riesco a farla funzionare
correttamente. Mi dice che vi è un errore di sinstassi vicino alla chiave
TEXTPTR. Qualcuno può darmi una mano?
Ciao
Grazie

Ho letto attentamente la guida su come memorizzare le immagini in una
Posso sapere che guida hai letto? Mi interessa la stessa cosa, ma su
un altro tipo di database, e non ho trovato un gran che' in MSDN: li',
comunque, non trovo mai niente perche' sono tonto :) Non ci fare
caso...
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: Avere un elenco delle directory

Ciao a Tutti !!
Vorrei avere un array con l'elenco di tutte le sottodirectory partendo da
una data directory
AIUTATEMI

Mi pare ci sia qualcosa nel sito comune
Stefano

Puoi usare l'istruzione Dir.
Crei una funzione ricorsiva con un Do...Loop che aggiunge all'array tutte le
directory che restituisce l'istruzione Dir:
Usa: If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then...
La funzione, ogni volta che incontra una directory, deve aggiungerla
all'array e ciamare se stessa.
Il loop deve finire quando non ci sono piu' file.
Ciao
Marco Rossi

 wrote

Newsgroup: it.comp.lang.visual-basic
Titolo: Riduzione a icona nella system tray

Sapete, per caso, come si può fare per visualizzare l'icona di un programma
VB in esecuzione nell'area chiamata system tray (quella dell'orologio, per
intenderci)?
Grazie
--
Marco Anelli
==================================
"Great spirits have always encountered
violent opposition from mediocre minds"
(A. Einstein)
==================================

 
Guarda sul sito comune:
http://members.xoom.com/it_lang_vb
Ciao
Riccardo



Newsgroup: it.comp.lang.visual-basic
Titolo: updown hscrollbar

Questi due controlli non mi permettono di di visualizzare in un text
valori dell'ordine di 0.0001 .
Come si puň fare ?
Grazie .

Come si può fare ?
Text1.Text = CStr(Valore_scrollbar / 10000)
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Automation and passwords?????

I've run into to instances recently were ole automation seems to be
constrained by not being able to deal with passwords.
The first instance is attempting to auto-email through vb and active
messaging. The problem is that the Exchange login screen appears and
requires a password before proceeding.
The second instance is using vb and automation to get a list of reports in
an Access 97 database. Again, if the database has a password set on it,
automation fails. I've checked the .OpenCurrentDatabase method for any
documentation on passing the database password and have found nothing.
Unless I am missing something (which I hope I am), passwords make automation
nearly useless. These are processes which are supposed to happen
'automatically'.
Appreciate any help!
Tarek Kamil
tka...@incigna.com



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] - Allineamento di Picture e Caption in Button

Esiste un modo per avere la Picture di un Button a Sx e la Caption a Dx
invece di sopra e sotto come da defautl! Ho già cercato nei vecchi post ma
non ho trovato!
Mi scuso x il disturbo.... ciao a tutti!!!

 ha scritto nel messaggio
news:tMXz7.51595$1H1.6...@news.infostrada.it...

Potresti utilizzare i pulsanti di Forms2.(Progetto > Componenti)
Potresti ; perchè, come da post precedenti la dll non è distribuibile.
giuseppeD

 ha scritto nel messaggio
news:Za%z7.1073$HT2....@news1.tin.it...

esatto...
altrimenti potrebbe fare tante immaginette e usarle nei pulsanti al
posto di testo + immagine
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Sapere se un numero e pari o disparo

Salve, qualcuno sa un metodo veloce e sicuro per sapere se un  dato numero e
pari o dispari ??
Grazie 1000
Riccardo

 pari o dispari ??
Se il numero è maggiore di 
2147483648
 è impossibile.
x:termoPilucco, ma davvero?

 numero e pari o dispari ??
1. Prima soluzione
if num=2 or num=4 or num=6 or num=8 or num=10 or num=12....then
    'E' pari
else
    'E' dispari
end if
2.Soluzione
    if num mod 2 =0 then
    'e' pari
else
    'e' dispari
end if
3.Soluzione
    if num & 1 then dispari else pari
MIk

 MIk
mhhh... provale con 2147448343465454343.
l'unica che funziona è la prima che hai detto.
Ovviamente va completata dove hai messo i puntini di sospensione.
x:termoPilucco

 Grazie 1000
NumeroPari(1000) => True
--
Giorgio
--------------------------------
Inviato via 
http://usenet.libero.it

 Ovviamente va completata dove hai messo i puntini di sospensione.
Hai ragione...
puoi sempre fare
if cint(right(cstr(num),1)) and 1 then dispari
MIk

 if cint(right(cstr(num),1)) and 1 then dispari
Esatto, ma solo se il num è già una stringa, altrimenti per numeri grandi
restituisce sempre pari
? cint(right(cstr("214744834455848958944767676765543464341"),1)) and 1
? cint(right(cstr(214744834455848958944767676765543464341),1)) and 1
dipende ancora una volta dalla rappresentazione IEEE
x:termoPilucco

 x:termoPilucco
If CInt(Right(Format(pippo, "0"), 1)) And 1 = 0 Then
    ' pari
else
    ' dispari
End If

 ha scritto nel messaggio
news:3f69ebc4$1@shknews01...

Che ne dite del:
if instr(num,",") then
    dispari
else
    pari
end if
Ciao
Fabio

 end if
Questa non l'ho capita...
MIk

 Questa non l'ho capita...
Idem!
Alex
°°° Posted from X-Privat Free NNTP server - 
www.x-privat.org
 °°°

 Questa non l'ho capita...
Non č presentabile?
Ciao
Fabio

 Non è presentabile?
Fa schifo :)
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 pari o dispari ??
Dato che sembra che a quasi tutti serva una ripassatina di matematica di
base...
Un numero è dispari se il resto della divisione per 2 è zero.
Non servono alchimie con stringhe, virgole, confronti, sottrazioni, radici
quadrate, arcotangenti, tangenti e avvisi di garanzia.
Basta un If (num Mod 2) = 0 Then Pari = True.
Se la vediamo dal punto di vista informatico (qualcuno qui si ricorda di
essere anche informatico, vero?) un numero è pari se ha il bit meno
significativo impostato a 0 (dato i bit vanno a potenze di due, l'unico che
può determinare la disparità è 2 ^ 0, cioè il primo).
Quindi If (num And 1) = 0 Then Pari = True.
Quest'ultima operazione è molto più performante perchè evita la divisione,
facendo solo un confronto di bit.


 Ciao

[CUT]
Ma li leggi i post già presenti prima di rispondere??
MIk
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO DAO API

scusa l'ignoranza, dove trovo le definizioni di queste sigle e relativa
CHIARA spiegazione?
ivan

 CHIARA spiegazione?
Sul sito msdn, sul'Help di VStudio, cercando con un motore di ricerca, ecc.
############################
Data Access Objects (DAO) provide a framework for using code to create and manipulate
databases. DAO supplies a hierarchical set of objects that use the Microsoft Jet database
engine to access data and database structure in:
- Microsoft Jet (.MDB) databases
- ODBC data sources, using an ODBC driver
- Installable ISAM databases, such as dBASE®, ParadoxT and Microsoft FoxPro which the
database engine can read directly
############################
ActiveX Data Objects (ADO) provides the means for you to perform the following sequence of
actions:
-Connect to a data source. Optionally, you can ensure that all changes to the data source
occur either successfully or not at all.
-Specify a command to gain access to the data source, optionally with variable parameters,
or optionally optimized for performance.
-Execute the command.
-If the command causes data to be returned in the form of rows in a table, store the rows
in a cache that you can easily examine, manipulate, or change.
-If appropriate, update the data source with changes from the cache of rows.
-Provide a general means to detect errors (usually as a result of making a connection or
executing a command).
Typically, you will employ all these steps in the programming model. However, it's worth
noting that ADO is flexible enough that you can do useful work by executing just part of
the model. For example, you could store data from a file directly into a cache of rows,
then use ADO resources merely to examine the data
############################
The Microsoft® Win32® Application Programming Interface (API) allows applications to
exploit the power of 32 bits on the Microsoft Windows® family of operating systems. The
Win32 functions, messages, and structures form a consistent and uniform API for all of
Microsoft's 32-bit platforms: Windows 95, Windows NTT 3.1, and Windows 3.1 with Win32sT.
Using the Win32 API, you can develop applications that run successfully on all platforms
while still being able to take advantage of unique features and capabilities of any given
platform.
The Win32 API consists of these general functional categories:
-Windows Management
-Graphics Device Interface (GDI)
-System Services
-Multimedia
-Remote Procedure Calls (RPC)
With a few minor exceptions, Microsoft ensures consistent and uniform behavior of the
Win32 APIs across all platforms. Differences in the implementation of the Win32 API depend
on the capabilities of the underlying features of the platform. The most notable
difference is that some Win32 APIs carry out their tasks only on the more powerful
platforms. For example, security functions are only available on the Windows NT operating
system. Most other differences are system limitations, such as restrictions on the range
of values or the number of items a given function can manage
Newsgroup: it.comp.lang.visual-basic
Titolo: Uso della finestra standard

Ciao,
sto lavorando a un progetto in Access e VBA.
Avrei bisogno di far apparire, cliccando su un pulsante, la finestra
standard di windows per selezionare i files.
Sapete qual'č il comando in VBA che realizza ciň?
Grazie e buona serata,
Fabio
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Sapete qual'è il comando in VBA che realizza ciò?
Ci sarebbe il modo per farlo utilizzando le API di Windows, un esempio per
VB6 (ma penso adattabile a VBA) lo trovi qui:
http://vbnet.mvps.org/code/comdlg/fileopendlg.htm
.
La via più semplice è però quella di utilizzare il controllo Microsoft
Common Dialog che puoi aggiungere alla maschera cliccando, nella casella
degli strumenti, su 'Altri controlli' e selezionando il controllo Microsoft
Common Dialog Control.
Fatto questo, selezioni in controllo e premi F1, la guida ti mostrerà tutto
quello che devi sapere per poter utilizzare il controllo per visualizzare la
finestra standard di apertura file.
Ciao!
-- 
Esteban
www.seber.it
Questo post è stato scritto con bit riciclati.
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] [?][SQL] Consenti Lunghezza zero && Sapere se una tabella esiste già!

 ha scritto nel messaggio
news:n6q27.1424$Wg4.2...@news.edisontel.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: List View

Ciao. Volevo chiedere se qualcuno poteva spiegami come posso gestire la
possibilità di cambiare l'ordine delle colonne della mia ListView. In
pratica devo sapere: Quando qualcuno sposta una colonna e dove la mette.
Grazie.
Andrea

Ciao Andrea.
Nelle Proprietą della ListView esiste una proprietą chiamata
AllowColumnReorder. e' sufficiente mettere quella proprietą a True ed il
Gioco č fatto. Non devi preoccuparti degli indici, VB mantiene quegli indici
anche se la Prima Colonna la sposti in ultima posizione(Essa avrą sempre
index=1).
Spero di Esserti stato d'aiuto.
Anzi colgo l'occasione di fare un'ulteriore domanda. Ho trovato il Modo di
Fare le Colonne in Stile Flat ma non hanno l'evento Click, c'č un modo per
farlo?

 farlo?
mi puoi postare un'esempio di codice di come eliminare gli elementi
selezionati (piů di 1 elemento) di una listview ? grazie.

mi puoi postare un'esempio di codice di come eliminare gli elementi
selezionati (più di 1 elemento) di una listview ? grazie.
Crea un Nuovo Form ed inserisci una ListView, gli carichi dentro un pò di
righe e schiaffi questo codice:
Option Explicit
Private Sub Form_Load()
Dim i As Integer
    ListView1.ColumnHeaders.Clear
    ListView1.ColumnHeaders.Add , , "colonna 1"
    For i = 1 To 30
        ListView1.ListItems.Add , , "Elemento " & i
    Next i
End Sub
Private Sub ListView1_KeyUp(KeyCode As Integer, Shift As Integer)
Dim i As Integer
Dim Tot As Integer
    If KeyCode = vbKeyDelete Then
        i = 1
        Tot = ListView1.ListItems.Count
        While i <= Tot
            If ListView1.ListItems(i).Selected = True Then
                ListView1.ListItems.Remove i
                i = i - 1
                Tot = ListView1.ListItems.Count
            End If
            i = i + 1
        Wend
    End If
End Sub
L'evento KeyUp è legato alla pressione del Tasto Canc.
Questo è quello che sono riuscito a fare in pochi minuti nonso se esiste un
modo più rapido e sicuro cmq funziona

 modo piů rapido e sicuro cmq funziona
Eccolo:
    Dim i As Integer
    For i = ListView1.ListItems.Count To 1 Step -1
        If ListView1.ListItems(i).Selected Then
            ListView1.ListItems.Remove i
        End If
    Next
    ListView1.Refresh
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)