mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Qualcuno conosce la griglia SPREAD della FarPoint?

Salve,
come da subject, qualcuno ha mai usato questa griglia? Se si, come si
per ripulirla?
Grazie, saluti.



numRighe = nomeGriglia.MaxRows
nomeGriglia.MaxRows = 0
nomeGriglia.MaxRows = numRighe
E se non erro questo dovrebbe essere un modo ...

Newsgroup: it.comp.lang.visual-basic
Titolo: Enum in TypeLib e compatibilità

Ciao,
Un tempo ricordo di aver letto che è possibile, dopo aver compilato
una DLL Ax, modificarne le enumerazioni (aggiungere elementi) senza
cambiare il loro GUIID (e quindi mantenendo la compatibilità) andando
a modificare a mano la Type Library.
Qualcuno sa indicarmi la retta via?
Tnx.
Daniele.


Ti ci vorrebbe EditTLB, ma lo si trova sul CD allegato con questo libro (che
peraltro è un must):
http://www.powervb.com/
Downloadabile c'è solo una versione evaluation che non permette di salvare la
DLL, quindi di scarsa utilità, purtroppo.
Se ormai la tua DLL è in produzione, è l'unico modo, altrimenti avresti potuto
spostare in una type library esterna generata da IDL tutti gli enum (ed
eventualmente le interfacce, da implementare nella DLL).
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 Qualcuno sa indicarmi la retta via?
Ricompili in compatibilitą binaria.
Ciao

 eventualmente le interfacce, da implementare nella DLL).
Infatti è quello che sto facendo!
E' molto più comodo lavorare direttamente con le TypeLib!
Tnx!
Daniele.

Newsgroup: it.comp.lang.visual-basic
Titolo: Attivazione capslock sotto NT

Salve,
vorrei attivare il capslock sotto NT. Ho preso molti esempi sulla rete pero'
sotto win98 funziona mentre sotto NT si attiva solo nella mia form(con il
led della tastiera spento).
Sapreste dirmi come si puo' fare????
Grazie
xoooox
--------------------------------
Inviato via 
http://usenet.libero.it

 Sapreste dirmi come si puo' fare????
Non lo so, però per rendere maiuscolo il testo puoi usare la funzione UCase
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare bolletino postale

Ciao,
vorrei stampare da un programma visual basic su un bolletino postale.
Sapete, se esiste già qualcosa?
Grazie mille
manfred

 manfred
Ciao. io ho creato un progetto in Excel che soddisfa la tua richiesta. Il
file è scaricabile dal sito
http://volftp.mondadori.com/cgi/scheda?it/bollettino_fast4.zip
 oppure su
http://download.tiscali.it/j/scheda.jsp?id=161307
 
Fammi sapere se è adeguato alle tue esigenze.Ciao.
Maurizio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 schrieb im Newsbeitrag
news:3b99...@news.netsys.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] - Common Dialog Font

Salve ragazzi,
ho inserito nel mio applicativo una serie di funzioni che con le API 
aprono le varie common dialog.
Ho un problema con quella per la scelta dei font. Non riesco ad aprirla 
inserendo all'interno il carattere che un determinato controllo ha.
Il controllo (label o textbox) l'ho chiamato C e devo aprire la 
possibilità di scelta del font passandogli le caratteristiche del font 
impostato nel controllo. Ho provato in tute le salse.
Ecco il codice
Public Function DialogFont(hwnd As Long, c As Control) As Boolean
    Dim LF As LOGFONT, FS As FONTSTRUC
    Dim lLogFontAddress As Long, lMemHandle As Long
    If c.Font.Bold Then LF.lfWeight = FW_BOLD
    If c.Font.Italic = True Then LF.lfItalic = 1
    If c.Font.Underline = True Then LF.lfUnderline = 1
    FS.lStructSize = Len(FS)
    lMemHandle = GlobalAlloc(GHND, Len(LF))
    If lMemHandle = 0 Then
        DialogFont = False
        Exit Function
   End If
    lLogFontAddress = GlobalLock(lMemHandle)
    If lLogFontAddress = 0 Then
        DialogFont = False
        Exit Function
    End If
 
    CopyMemory ByVal lLogFontAddress, LF, Len(LF)
    FS.lpLogFont = lLogFontAddress
    FS.iPointSize = c.Font.Size * 10
    FS.Flags = CF_SCREENFONTS Or CF_EFFECTS
    If ChooseFont(FS) = 1 Then
        CopyMemory LF, ByVal lLogFontAddress, Len(LF)
        If LF.lfWeight >= FW_BOLD Then
            c.Font.Bold = True
        Else
            c.Font.Bold = False
        End If
        If LF.lfItalic = 1 Then
            c.Font.Italic = True
        Else
            c.Font.Italic = False
        End If
        If LF.lfUnderline = 1 Then
            c.Font.Underline = True
        Else
           c.Font.Underline = False
        End If
 
c.Font.Name
 = ByteToString(LF.lfFaceName())
        c.Font.Size = CLng(FS.iPointSize / 10)
        DialogFont = True
    Else
        DialogFont = False
    End If
End Function
Grazie
-- 
Vincenzo
VB6+SP5 Windows 2000 SP4
MSDE 8

    lLogFontAddress = GlobalLock(lMemHandle)
Pero' non hai provveduto a liberare la memoria con
GlobalFree(lMemHandle) e a sbloccarla con
GlobalUnlock(lLogFontAddress).
-- 
ciao, hal

 scritto in 
news:g95ckvoe2v7fttgci...@4ax.com
:

Grazie del suggerimento.
Tutto funziona benissimo, ma vorrei "caricare" la common dialog con i 
parametri attualemtne impostati (grassetto, nome carattere etc...)


Newsgroup: it.comp.lang.visual-basic
Titolo: Passare oggetti ad una DLL ActiveX

Buongiorno a tutti!
In una applicazione utilizziamo un oggetto ActiveX DLL che fornisce
funzionalità di stampa (sviluppato da noi).
A questo oggetto posso passare un riferimento ad un oggetto creato
nell'applicazione che istanzia la DLL ?
E' corretta la seguente sintassi:
Property Set TraceObject(ByRef tfObject as Object)
oppure deve essere passato ByVal ?
Nella Terminate deve essere impostato a Nothing il riferimento ottenuto in
questo modo ?
Grazie per la collaborazione!!
Roberto

 ha scritto nel messaggio
news:b8qp2i$kdj$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: TextBox Trasparente

E' possibile creare una textbox trasparente?
CIAO!
--------------------------------
Inviato via 
http://usenet.iol.it

 ha scritto nel messaggio
news:131Z175Z215Z2Y1...@usenet.iol.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] chiudere applicazione in esecuzione

il mio problema è il seguente.
avvio un file vb compilato (file1.exe). durante l'esecuzione di questo file,
devo fare in modo che, se l'utente compie un determinato atto, venga
richiamato un altro file vb compilato (file2.exe) che ha un compito:
cancellare o rinominare file1.exe. ma purtroppo quando lancio (con shell)
file2.exe, e questo prova ad eliminare file1.exe, quest'ultimo è ancora
"attivo" e quindi mi restituisce "errore di accesso al percorso/file".
come posso evitare tutto questo?
l'istruzione GetObject mi può servire? in pratica l'object sarebbe
file1.exe, e una volta "oggettizzato" lo chiuderei (non so ancora come). ho
fatto un paio di prove, ma per i file .EXE qual è la "classe"?
e posso utilizzare il Task Manager di Windows? cioè, da VB esiste un modo
per gestire il task manager? a me smbra strano che sia così difficile dare
da VB un'istruzione del tipo "chiudi l'applicazione X".
se fosse semplice, avrei risolto, no? chiuderei l'applicazione file1.exe, e
poi cancellerei/rinominerei il file medesimo.
grazie 1000.
Mario

 wrote in message 8lsp1k$42$1...@nslave1.tin.it...


ok ora vado a vedere, grazie.
Mario
Newsgroup: it.comp.lang.visual-basic
Titolo: Somme in FlexGrid

Con delle query estraggo dei record che vado a depositare in una FlexGrid.
E' possibile sommare tutti i campi di una colonna, senza dover eseguire una
nuova query SQL di somma, ma andando a prendere tutti i campi del recordset
che si trova nella griglia.
Spero di esser stato chiaro.
Grazie
Angelo

 ha scritto


Sě. No.

 wrote in message
news:qsRt9.70902$RO.17...@twister1.libero.it...


 le ho messi in visualizzazione nella  griglia, ora sommali).
Ma stai rispondendo a te stesso? Sgamato?! ;-)

 > query). (probabilmente č + facile di quel che pensi. Ho estratto dei


le ho messi in visualizzazione nella  griglia, ora sommali).
Avevo frainteso, sembra (particolarmente con l'imperativo finale) che ti
stai rivolgendo ad altri. ;-)
Credo proprio di sě, intanto che carichi la Flex (unbound), leggendo record
per record, puoi approfittare per fare le somme delle colonne desiderate.
Alla fine aggiungi una riga con i totali.

 ha scritto nel messaggio
news:ap8nn5$6h48$1...@stargate1.inet.it...

un metodo veloce che farà rizzare i capelli a parecchi...
Usa la flexGrid come una matrice!UNBOUND
Ossia con la query riempila....poi a tutti gli effetti è come una matrice in
memoria
Se fai una colonna in più(ad es. la 12)
grid.row=1
grid.col=4
dato1=clng(grid.text)
grid.col=7
dato2=clng(grid.text)
grid.col=12
grid.text=Cstr((dato1+dato2)) 'somma del dato di colonna 4 + quello di
colonna 7 della riga 1
ho scritto al volo correggi se ci sono  errori
ora se ci agganci un bel loop per quante righe ha la griglia......
Occhio che i dati non li scrivi nel database sono in memoria ....se va in
crash....o chiudi il form ...prrrrrrr
quando sei sicuro del tutto...
con un po di sql scrivi tutto nel DB
Bye man!

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

ho modificato un po' il codice,
e' cosi' che va scritto?
a$ = Inet1.OpenURL("
http://www.yahoo.it
", icString)
Do
b$ = Inet1.GetChunk(1024, icString)
a$ = a$ & b$
Loop Until b$ = ""
-- 
www.cyberplanet.it
Email con mittente personalizzabile,
mms fino a 5000 caratteri,
programmi, giochi, forum, tutto gratis!

 Loop Until b$ = ""
Ma di che stai parlando? E poi è dai tempi di gwbasic che non vedo $
-- 
Emanuele Torrenti, Registered Linux User #409659
http://torrenti.altervista.org
http://www.sitolecchino.com/Emanuele.html

 Loop Until b$ = ""
Hola.
A) Non aprire nuovi threads per la stessa richiesta.
B) La guida ha un esempio perefettamente funzionale, scritto in modo 
umano e comprensibile. Non hai la guida? Ah...
Ciao ciao
-> GbC
www.gbcweb.com
PS:
   Inet1.AccessType = icUseDefault
   Dim b() As Byte
   Dim strURL As String
   ' Si suppone che l'URL sia valido.
   strURL = "
ftp://ftp.microsoft.com/
" & _
       "developr/drg/Win32/Autorun.zip"
   ' Recupera il file come matrice di dati byte.
   b() = Inet1.OpenURL(strURL, icByteArray)
   Open "C:\Temp\Autorun.zip" For Binary Access _
     Write As #1
       Put #1, , b()
   Close #1
   MsgBox "Done"
Newsgroup: it.comp.lang.visual-basic
Titolo: Mille domande durante l'installazione...

Forse l'oggetto non è abbastanza esplicativo...
io ho UNA sola domanda da fare, la seguente:
durante l'installazione di un programma VB6 con l'installer classico c/o
ogni cliente sono soffocato da una pletora di domande del tipo:
1) la versione della dll presente nel sistema è più recente ... mantenere il
file?
2) il file xxxx.dll è già in uso ... (quindi è già presente) Ignora?
mi verrebbe da rispondere:
caso 1) se la versione presente nel sistema è più recente ti pare che la
vado a sovrascrivere con una più vecchia! non la copiare e stai zitto!
caso 2) insomma se il file è in uso significa che già c'è e allora non lo
copiare e stai zitto!
(vabbè che prima di installare devo uscire da tutte le applicazioni ma mica
posso terminare anche gli antivirus...)
insomma non c'è modo di impostare il setup in modo che non si lamenti? (so
che c'è l'opzione
SETUP.EXE /S
che non chiede la directory di installazione nè la posizione nel menu avvio
e comincia a copiare subito però le domande scritte sopra le chiede
sempre...
ho pure provato a vedere il file setup1.vbp che è il sorgente ma sembra
scritto da un programmatore di C frustrato che non sapeva che il VB è un pò
meno contorto...)
Grazie a chiunque abbia avuto voglia di leggere questo sfogo..
Vale

 wrote in message
96177899...@regulus.fastnet.it...


 ha scritto nel messaggio
news:96177899...@regulus.fastnet.it...


 ha scritto


Difatti io ho in programma di scrivermene uno tutto da me, di tool di
installazione.
In VB 4, cosě serve solo la vbrun400.dll, anche solo nella stessa dir
dell'eseguibile, e va senza problemi. Ovviamente, per la preinstallazione, uno
ZIP autoestraente basta e avanza


 In VB 4, così serve solo la vbrun400.dll, anche solo nella stessa dir


Newsgroup: it.comp.lang.visual-basic
Titolo: Qualche demo di .NET?

Non sono iscritto all'MSDN c'è quanlcuno che sa dirmi dove prendere una demo
di .NET?
Thank's

 di .NET?
Bč, allo SMAU se ci andavi nel padiglione M$ c'era lo stand .NET dove potevi
entrare a provare la piattaforma ed alla fine ti regalavano i CD della beta
(he he he facendo il marpione modello "buonasera..." con le tipe li sono
riuscito a farmene dare un po' anche per i colleghi).
Forse se vai a qualche conferenza di presentazione del prodotto ti danno i
CD (sono andato alla conferenza di presentazione di Office XP e mi hanno
regalato i cd con la demo di Office ^_^ peccato che i programmi li puoi
aprire solo 4 volte se non registri la demo... e se la registri ti dura solo
30 giorni... :( ).
CiaoZ
SebaMix

 ha scritto nel messaggio
news:a64tn1$bkrh7$1...@ID-66833.news.dfncis.de...


 Byez
Hei! Non ti incazzare!
Ti ho detto che io li ho avuti allo Smau e che probabilmente te li danno se
vai a uno dei loro "show". L'alternativa è comperarselo dal sito M$ ma credo
tu debba essere iscritto a MSDN.
CiaoZ
SebaMix
Newsgroup: it.comp.lang.visual-basic
Titolo: Report ...stampa Variabile??!!

Coe posso stampare una variabile nel report??
es: a="qwerty"
Grazie



Devi inserire una etichetta (Label1) e inizializzarla nel report
Private Sub DataReport_Initialize()
DR_Autoriz.Sections(NUmerodellasezione).Controls("Label1").Caption=a
End Sub
Ciao

On Sun, 03 Mar 2002 21:30:07 GMT, 
bun...@libero.it
 (Giovanni De Rosa)
wrote:

Ops "DR_Autori" e' una Mia Report, ovviamente devi sostituirla col
nome della tua Report!
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: VS Express 20xx per Desktop è gratuito?

Ciao a tutti,
di tanto in tanto realizzo qualche piccola applicazione in VB.
Tempo fa avevo usato VS Express 2013 per Desktop convinto che fosse 
gratuito.
Oggi a distanza di molto tempo l'ho riaperto e mi dice che la versione 
di valutazione è scaduta.
 
Poichè le applicazioni che realizzo sono molto banali e quasi 
esclusivamente per uso personale, esiste una versione di VS che sia 
gratuita?
 
Grazie


VS 2013 Express è gratuito, solo che devi registrarti sul sito MS.
 
A tal proposito ti segnalo la versione VS2013 Community Edition che 
equivale alla professional ma è del tutto gratuita anche per uso 
commerciale (eccezion fatta per lo sviluppo di applicazioni enterprise)
Anche in questo caso è necessario una registrazione sul sito Microsoft.
 
http://www.visualstudio.com/en-us/news/vs2013-community-vs.aspx
 
 
ciao
stefano
 
 
 
 


Perfetto grazie!
Ho inserito i miei dati dell'account di Win8.1 ed è tornata a funzionare.
Non avevo capito subito che gli servivano quei dati.
 
Grazie anche per la segnalazione della versione VS2013 Community Edition

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Inviare Esc alla Stampante

C'e' un modo per inviare dal VB5 il tasto ESC (27 ascii) a una
stampante?
Grazie in anticipo
Saluti
Fabio

 wrote in message
38591000...@paini.com...


Non ho provato, ma dovrebbe essere semplice:
Print #1, Chr$(27) ' Se hai aperto con LPT1:
Printer.Print Chr$(27) ' Se usi l'oggetto Printer
Prova.
--
---
Mirco Catalani
KATACLiSM
E-Mail: 
m.cat...@fastnet.it
E-Mail: 
m.cat...@libero.it
UIN ICQ: 8134571
Sito Comune Visual Basic: 
http://www.murialdo.it/it_lang_vb/
---








Newsgroup: it.comp.lang.visual-basic
Titolo: click e muovere il mouse con VB

Come fare ?
Grazie.
Please, chi vuole rispoda anche by mail.

"click e muovere il mouse con VB"
in che senso???
Sii + chiaro!
CiaoZ
SebaMix


Tendere, lentamente, i muscoli del braccio in direzioni varie, a seconda del
movimento del bulbo oculare.
A tratti, permettersi piccoli tic muscolari sul pulsante sinistro
(occasionalmente sul destro, senza abusare) del mouse stesso.
Et voilà: Mouse mosso e clickato...
:-)
ciao
ugo

Per muovere il puntatore del mouse da codice guarda sul sito comune. Credo tu abbia cmq
bisogno di chiamate ad API.

 ha scritto nel messaggio
news:GFDK6.1856$Rc5....@news2.tin.it...
| Per muovere il puntatore del mouse da codice guarda sul sito comune. Credo tu abbia cmq
| bisogno di chiamate ad API.
API GetCursorPos per risalire alla posizione x y del mouse sullo schermo;
API SetCursorPos per settare la posizione x y del mouse sullo schermo;
Newsgroup: it.comp.lang.visual-basic
Titolo: [NET] Dove posso trovare una beta da scaricare ?

Ciao
Qualcuno mi può indicare un sito dove scaricare una ver. beta di .net così
da inziare a vedere di che cosa si tratta e se mi conviene già fare
l'ggiornamento da vb6 a .net
JKLJKL :-)

 l'ggiornamento da vb6 a .net
Il framework di .NET è sul CD di IoProgrammo n.56.
Se vuoi... la prossima volta che ci vediamo te lo dò!
Ciao!

 ha scritto nel messaggio
news:a91oks$iot$1...@serv1.iunet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Generare un codice

Salve ragazzi!
Devo generare ad ogno pressione di un pulsante un codice casuale di 6
cifre che va da 111111 a 999999
qualcuno ha idea di come si possa fare?
By
Elia
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 qualcuno ha idea di come si possa fare?
randomize(timer)
do
    numero=fix(rnd*10^6)
    if numero>=111111 then exit do
loop

 loop
Perchè un loop?
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Perchč un loop?
Perchč lo vuole da 111111 a 999999

 Perchè lo vuole da 111111 a 999999
Ahhh, ho capito.
C'è quella formuletta col minimo e il massimo. Non me la ricordo, ma l'ho
sicuramente scritta.

 l'ho sicuramente scritta.
Eccola:
x = Int((limitesup - limiteinf + 1) * Rnd + limiteinf)

 x = Int((limitesup - limiteinf + 1) * Rnd + limiteinf)
Grazie ragazzi formula straordinaria!


 Grazie ragazzi formula straordinaria!
Non dimenticare il Randomize(Timer)

Newsgroup: it.comp.lang.visual-basic
Titolo: come includere un modulo in progetto web service

ho un progetto web service posizionato da qualche parte su
disco, poi ho un modulo .vb con alcune funzioni di uso
comune, come faccio a includere questo modulo.vb senza
copiarlo nella cartella del web service ?
(con i progetti windows form è possibile creare un
collegamento al modulo, ma con web service non ho questa
possibilità)
bye.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ho un progetto web service
scusate, dimenticavo, sto parlando di Vb.NET
bye


Newsgroup: it.comp.lang.visual-basic
Titolo: Cd Audio

Ciao a tutti.
Qualcuno sa come gestire lo spostamento fra le tracce di un CD Audio
senza utilizzare i comandi Next e Prev del controllo MCI?.
Grazie per la collaborazione
--
Posted from 
mta01-acc.tin.it
 [212.216.176.32]
via Mailgate.ORG Server - 
http://www.mailgate.org

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Problema MSFlexgrid

Carico la Flexgrid tramite il codice di seguito all'avvio
dell'applicazione e carica tutti i campi. In seguito ho fatto un tasto
di ricerca e ho impostato un filter sul criterio della ricerca. Tutto
ok, faccio un .clear sulla flexgrid e richiamo il codice di seguito.
Tutto sembra funzionare, non mi da errori .additem ma la flexgrid è
totalmente vuota
Please help me
Grazie in anticipo
With Flex
    .Cols = 5
    .TextMatrix(0, 0) = "Titolo"
    .TextMatrix(0, 1) = "Attori Principali"
    .TextMatrix(0, 2) = "Genere"
    .TextMatrix(0, 3) = "Anno"
    .TextMatrix(0, 4) = "Durata"
    .ColWidth(0) = 2000
    .ColWidth(1) = 4000
    .ColWidth(2) = 2000
    .ColWidth(3) = 500
    .ColWidth(4) = 660
End With
With ado.Adors
    .MoveFirst
    For i = 1 To .RecordCount
       Flex.AddItem .Fields("titolo") & vbTab & .Fields("AttoriP") &
vbTab & .Fields("Genere") & vbTab & .Fields("Anno") & vbTab &
.Fields("Durata")
       .MoveNext
    Next i
End With


Scordi di impostare in quale riga della griglia andranno
messi i tuoi dati, guardati .Row e Rows.
Ciao.
_____________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
Nato a Riverside, nello Iowa, USA, Terra
il 1277.1 (26/03/2233)

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 e Windows Media Player 9

Salve a tutti.
Sto cercando di implementare il controllo di wmp9 in una mia applicazione e
come letto in alcuni vecchi post ho installato l'sdk per avere tutte le info
a riguardo. Il problema è che per vb mostra solo come usarlo per fare un
lettore dvd.
Ora io sono riuscito a inserire il controllo e fargli eseguire un file.
Nella mia finestra del programma vedo l'interfaccina di windows media player
che io ho impostato in modo da far visualizzare solo il rettangolo del
video. Quando eseguo un file audio, nel rettangolo del video vedo le
animazioni create dall'effetto grafico. L'effetto grafico che vedo è lo
stesso che ho settato su windows media player e che uso di solito. Mi
piacerebbe poter cambiare effetto grafico come faccio di solito da windows
media player, ma non sono ancora riuscito a capire come farlo. Mi piacerebbe
inoltre poter vedere l'equalizzatore grafico, o comunque poter intervenire
anche su quei parametri.
Qualcuno di voi sa come aiutarmi?
Grazie.
Alberto

 Qualcuno di voi sa come aiutarmi?
Usa direttamente WindowsMediaPlayer9 :P
Lokar
P.S. Lancio il sasso: sono certo che sui vari siti M$ vi sia ricca
documentazione riguardo il controllo... e che su google ne potrai trovare
ancora di piu'!
-- 
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
Statuto: 
http://www.it-lang-vb.net/docs/Statuto.txt
UGIdotNET - 
http://www.ugidotnet.org
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT][?][ASP] maledetto

Ma voi come accidenti avete fatto ad installare ASP.exe?
Ho provato su Win NT (WS e server), Win 95, Win 98, con PWS e IIS ed č
sempre la stessa cosa: arriva al 5% dell'installazione e poi mi dice "Not
enough disk space".
Non gli basta 1.2 Gb? Che cavolo ci vuole per installarlo? Serve per caso
una versione in italiano? Possibile che se cerco "asp.exe" o "asp" nel sito
della M$ sembra che non sappiano nemmeno cosa sia "asp"?
Ciao e grazie ancora.

Guarda che asp.exe serve solo sun 95/98/98SE nt con l'option pack lo ha già!

Guarda che asp.exe serve solo sun 95/98/98SE nt con l'option pack lo ha
già!
Dico proprio su Win95/98.
Su NT server non mi si installa nemmeno l'option pack ("Cannot detect OS
type)! Che, può dipendere dal fatto che ho installato IE5 italiano anzichè
inglese?
Ciao

Non credo.....
L'option pack può essere di 2 tipi , se hai quello di msdn ci sono 2 dir 1 è
option.svr e l'altra è option.wks , forse te stai installando la versione
workstation.
Altrimenti se non è questo devi avere almeno sp4

Altrimenti se non č questo devi avere almeno sp4
A dire il vero ce ne sono 3, una per la ver. server, una per la WS e una per
Win9x, il problema non č quello.
A NT server gli ho messo SP5, che non mi risulta essere in versione WS o
SERVER, ma solo SP5 (ovviamente in inglese).
Tanto per confondere le acque ho rimesso Win95 con PWS e le ASP funzionano
perfettamente (o cosě sembra per ora) SENZA quell'accidenti di ASP.EXE che
continua a non volersi installare.
Non capisco, pensavo fosse un problema di configurazione ma ho provato su
tutti gli SO della M$ ed č sempre la stessa cosa, mi chiedo come cavolo ha
fatto ad installarlo chi ce l'ha fatta!
Ciao

 tutti gli SO della M$ ed è sempre la stessa cosa, mi chiedo come cavolo ha


Newsgroup: it.comp.lang.visual-basic
Titolo: Common Dialog

Salve a tutti!
Ho un problema con il controllo Common Dialog:
Facendo ShowPrinter mi viene fuori la finestra di
impostazione della stampante, ma come faccio io a
sapere se l'utente ha premuto ok o annulla in quella
finestra?
Grazie mille a chi mi aiuterą!
--------------------------------------------
             ASSA
http://assatarram.yohoo.it
Napster: Assatarram3
it.comp.lang.visual-basic: Assa
--------------------------------------------

 finestra?
prova a consultare la guida alla voce 'CancelError' (riferita al controllo
Common Dialog)
hth
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Isam Installabile

Se c'è ancora qualche matto (spero) che lavora...ho una piccola rognetta...
:-))
Apro un Mdb  cosi'
    'Set Db = OpenDatabase(App.Path + "\myDB.mdb", true,False,
     ';PWD=Pippo")
dopo avere imposatato precedentemente la password...e lui cosa mi risponde?
'IMPOSSIBILE TROVARE ISAM INSTALLABILE'
se lo apro con access ovviamente tutto regolare...
Mi dite qualcosa? :-(((
Cordialità
Giovanni

 ha scritto nel messaggio
news:qMj69.207997$Jj7.4...@news1.tin.it...


 > se lo apro con access ovviamente tutto regolare...
State usando DAO per database di tipo Access.
Avete dichiarato fra i riferimenti Microsoft DAO 3.x Object Library?
Avete installato tutte le librerie necessarie (DAO e Jet)?

Qui ci sono un po' di discussioni sul problema:
http://makeashorterlink.com/?I2CC32481

Newsgroup: it.comp.lang.visual-basic
Titolo: Forse un po' OT

Scusate se vi disturbo ma avrei un grosso
problema da risolvere :
Dispongo di VB6 e vorrei visualizzare una mappa
di ANDROUTE.
Nessuno saprebbe dirmi il formato del fila italia.and
contenuto in ANDROUTE 97', cioč come poterlo interpretare?
Oppure nessuno saprebbe dirmi dove potrei trovare qualche
informazione su tale formato??
Grazie 1000.
Ciao Afa.



...

Probabilmente esporta un controllo OLE.
Prova a controllare tra i componenti.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Reperire Password e Username

Come faccio a leggere l'Username e Password in Vb
Ho provato con GetUsername ma mi da l'user corrente.
--
Fulvio

 Ho provato con GetUsername ma mi da l'user corrente.
di che Username e Password hai bisogno? di quella di windows?
Faber

Di quelle per la connessione remota
Grazie

 ha scritto nel messaggio
news:9bk3md$pob$1...@lacerta.tiscalinet.it...




in windows 9x le password sono nel file .pwl
devi perň prima decriptarlo!
energyz
www.energyz.cjb.net

> Di quelle per la connessione remota
quale, quella del RAS?
e a che ti serve saperlo, se non è tua?  <g>
Faber

 ha scritto nel messaggio
news:3adda37f...@news.galactica.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] da SPA ad SRL + cambiali protestate

Salve,
ho lavorato per qualche anno con un'azienda software di Milano, una SPA. 
Aveva spesso problemi con i pagamenti cosě l'anno scorso mi feci dare delle 
cambiali che ho messo subito in banca, cambiali all'incasso alla scadenza.
Bene, pagano le prime 4 poi niente, proprio ieri mi sono ritrovato con 170 
euro addebitati e 2 cambiali insolute e protestate. Vado in banca, faccio 
fare delle visure e scopro che la SPA in questione, che aveva 800.000 euro 
di capitale sociale) ha cambiato nome (stessa partita iva) ed č ora una SRL 
con 90.000 euro di capitale sociale.
Ora, siccome ho ancora 6 cambiali in scadenza (fino a maggio 2007)...come 
devo compotarmi?
Un saluto,

 di capitale sociale) ha cambiato nome (stessa partita iva) ed è ora una 


Newsgroup: it.comp.lang.visual-basic
Titolo: aprire e chiudere il cassetto cd

Qualcuno mi puņ aiutare?
Ho provato ad usare la seguente dichiarazione:
Declare Function mciSendString _
        Lib "winmm.dll" Alias "mciSendStringA" _
        (ByVal lpstrCommand As String, _
        ByVal lpstrReturnString As Long, _
        ByVal uReturnLength As Long, _
        ByVal hwndCallback As Long) As Long
Ma sembra non funzionare in XP
Qualche consiglio?
Grazie infinite 

 ha scritto

http://groups.google.com/groups?as_q=cassetto%20cd&as_uauthors=javalab&lr=&hl=it
abbreviato, dovrebbe essere 
http://tinyurl.com/5b9v2
pero' al momento si incanta un po'
-- 
hth, ciao, j.
http://www.sundaysw.com

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

Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca CRC16

Salve amici programmatori,
Ho un problema (altrimenti che ci facevo qui sul NG:) )
questo che vedete è un pacchetto di un protocollo (MAP27):
22 16 2 1 11 1 1 16 3 70 9
gli ultimi 2 byte sono il CRC che da documentazione è un CRC16. Ho trovato
sulla rete diversi Ocx di CRC, ma nessuno corrisponde. sempre da manuale il
calcolo del CRC esclude i primi 3 byte, quindi il calcolo è della stringa:
1 11 1 1 16 3
e il CRC è:
70 9
Qualcuno mi può aiutare a capire che razza di che razza di CRC si tratta?
Grazie a tutti per l'attenzione!

 ha scritto nel messaggio
news:RZbG7.22100$zl4.6...@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Registrazione dll

ho fatto un  programma in visual fox. Ho la necessita di fare un prg in vb6
per installarlo.
ho indivuduato le dll e le oxc del mio prg in visual fox.
Sapete come fare da vb6 per registrare le dll senza usare il comando
regsvr32.
Grazie!!!
Poi se mi date un aiuto sul drag'n drop e ve sarei grato. ma questa e'
un'altra storia.

 regsvr32.
Fai un pacchetto d'installazione, ci piazzi dentro tutti i tuoi file e 
pensa a tutto lui.
Ciao
-- 
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 regsvr32.
Io creo direttamente i pacchetti di installazione con InnoSetup. Gratuito e
facile da usare:
http://www.jrsoftware.org/isinfo.php
--
Max Etere
meNOSPA...@maxetere.it
http://www.maxetere.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Consiglio su come impostare tabelle in un MDB

Ciao a tutti,
mi è stato richiesto un programma da uno studio di medici.
Maggior parte del programma è completo, mi manca soltanto gestire la
parte delle analisi.
Vorrei un consiglio su come gestire i dati; volevo creare
semplicemente una tabella analisi, ma poi diventa enorme perché ad
ogni singolo record corrisponderebbe una singola, per cui se ad una
visita il paziente ha fatto per esempio 10 analisi, devo andare a
leggerle tutte prima di visualizzarle.
Avevo poi pensato di creare una tabella con i campi così strutturati:
[IDpaziente] formato stringa o numerico
[Data] formato data
[Analisi 1] formato stringa
[Analisi 2]     "
....
[Analisi n]     "
dove nei campi vado a scrivere il tipo di analisi e il relativo
valore, magari tra parentesi, per esempio: Azotemia [3,5]
Questa seconda soluzione però ha l'inconveniente che se l'utente
inserisce lui stesso delle analisi che non sono in elenco, devo andare
a modificare la struttura della tabella.
Questo è il problema per sommi capi. qualcuno ha suggerimenti?
Grazie e ciao
Luca


Mi pare un tipico caso di relazione 1:N, ossia 1 paziente ha N analisi.
In questi casi si fa cosi':
TABELLA PAZIENTI
PK  ID_Paziente
...altri campi...
TABELLA ANALISI
PK  ID_Analisi
FK  ID_Paziente
...altri campi...
Con la relazione PAZIENTI.ID_Paziente  1---N  ANALISI.ID_Paziente
Se 1 paziente ha fatto 10 analisi, nella tabella ANALISI ci saranno 10
records con ID_Paziente = ID del suddetto paziente.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Modificare le intestazioni di colonna di un DBGrid

Salve,
è possibile modificare le le intestazioni di colonna di una dbgrid?
L'unica cosa che ho trovato è la proprietà ColumnHeaders
ma non fa al caso mio (nasconde le intestazioni di colonna).
Grazie 1k
ederico

 ha scritto nel messaggio
news:zRKM7.21915$4M2.5...@news2.tin.it...


 ricordati poi di far riferimento ai campi con l'alias
Giusto.
Oppure:
DBGrid.Columns(i).Caption --> intestazione della colonna i-esima.
Ciao,
Carlo.

 DBGrid.Columns(i).Caption --> intestazione della colonna i-esima.
Ma guarda!
Non ci sarei mai arrivato!
:)
Scusate, ma a volte divento cattivo vedendo richieste delle ovvietà.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Copiare Tabelle e Query da un filer mdb ad un altro mdb

Forse e' molto semplice, ma io non so proprio come fare!
Ho due DataBase e devo trasferire tabelle e query da uno all'altro
Nel dataBase di destinazione deve crearsi la Tabella del DataBase di Origine
scegliendo se copiare anche i dati.
A me basterebbe copiare almeno la struttura
GRAZIE
--
Stefano Bacchi
 
sba...@tin.it

 wrote in message
news:7q3qfs$pq2$1...@nslave1.tin.it...


...


Io lo faccio già .... acchiappa :-)
    Set dbABICAB = OpenDatabase(ArcDir & "\banche.mdb")
    dbABICAB.Execute "SELECT ABI.* INTO abi IN '" & 
db.name
 & "' FROM ABI"
    dbABICAB.Execute "SELECT CAB.* INTO cab IN '" & 
db.name
 & "' FROM cab"
    dbABICAB.Close
Newsgroup: it.comp.lang.visual-basic
Titolo: help semplice ricerca in vb4

Per fare una ricerca su un database ho letto che si usa la sintassi:
data1.recordset.findfirst "nome='francesco'"
fino quà tutto ok.... ma come faccio a ricercare il record che ha come nome
il contenuto di TxtNome.Text o qualunque altra variabile?
Vi prego aiutatemi!!!!!
-- 
----------------------------
Saluti da Francesco
email: 
ta00...@flashnet.it
----------------------------

 
data1.recordset.findfirst "nome=" & Text1.Text & "'" (<=devi completare con
l'apice)

 


data1.recordset.findfirst "nome '" & text1.text & "'"
Bye
						Emanuele
-- 
--------------------------------------------------------
Emanuele Dott. FAVARI
PCS - Produzione e Consulenza Software
Tel e Fax: 
(+39) 375-254350
e-mail: 
fav...@hotmail.com
e-mail2 (per attachments): 
e661...@quicknet.it
--------------------------------------------------------
Se fate esattamente ciò che il cliente chiede,
ma il risultato non soddisfa le esigenze del cliente,
sarete in qualche modo criticati.
--------------------------------------------------------


Vi prego aiutatemi!!!!!
Non so se hai gia' risolto il problema, ma volevo segnalarti che se
metti l'apice per delimitare la stringa, se questa contiene un
apostrofo viene generato un errore a run-time.
Ovviamente questo errore non dovrebbe verificarsi se ti interessa
cercare solo nomi (non mi vengono in mente nomi italiani con
l'apostrofo ;-)), ma se la ricerca la devi estendere anche al cognome
allora iniziano i problemi.
Esempio:
Se Cognome = D'ANDREA, inserendo l'apice avresti
data1.recordset.findfirst "cognome='" & text1.text & "'"
A run-time VB legge
data1.recordset.findfirst "cognome='D'ANDREA'"
e assume che la stringa che gli hai passato sia composta solo dalla D,
considerando il resto come "monnezza".
E' pacifico che avrai un errore, intercettabile quanto vuoi, ma sempre
un errore.
Se invece scrivi
data1.recordset.findfirst "cognome= " " " & text1.text & " " " "
(senza spazi tra le doppie virgolette, le ho messe solo per fartele
contare!!)
VB legge
data1.recordset.findfirst "cognome="D'ANDREA""
e non protesta.
In VB le doppie virgolette ripetute due volte (" "), senza spazi,
vengono sostituite con ".
Spero di essere stato chiaro e di averti evitato un po' di problemi
(gli stessi che ho dovuto affrontare io all'inizio :-)))))
Ciao
       _  _______________________________  _     
      / )|                               |( \    
     / / |      FERDINANDO CECCHINI      | \ \   
   _( (_ |  
fdnce...@mail.asianet.it
  | _) )_ 
  (((\ \>|_/->_______________________<-\_|</ /)))
  (\\\\ \_/ /                         \ \_/ ////)
   \       /                           \       / 
    \    _/                             \_    /  
    /   /                                 \   \  
   /___/                                   \___\
Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco estrapolatore di E-Mail

Cerco programma o procedura che permette di prelevare da una qualsiasi
pagina HTML, o file di testo, gli indirizzi E-mail e raggruparli
insieme.
Si precisa che tale procedura non verrà usata per fare Spamming.
Si prega di indirizzare le risposta a:
alu...@freemail.it

Si prega di indirizzare le risposta a:
Io la funzione descritta non l'ho eseguita quindi ....

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

Ho letto un po' sulla licenza di ghostscript ma non essendo molto
afferrato con la lingua inglese chiedo a voi delucidazioni.
Vorrei sapere se, in fase di installazione del mio programma, posso
includere ghostship e chiedere all'utente se vuole installarlo per
poter esportare le stampe in pdf.
grazie, alcau

 ha scritto nel messaggio
news:2689d58a.04022...@posting.google.com...

l'avevo letta un po' io ai tempi. Ghostscript viene distribuito in tre
release diverse:
AFPL Ghostscript, che non può essere distribuita con programmi commerciali
GNU Ghostscript di cui invece hai sorgente, e puoi distribuirla un po' come
vuoi
poi c'è anche un Ghostscript commerciale a tutti gli effetti, lo paghi, hai
la garanzia, assistenza
bla bla bla
Il link (sempre in inglese) che ho letto è questo:
http://www.cs.wisc.edu/~ghost/doc/cvs/New-user.htm
Io personalmente non lo installo insieme alla mia applicazione.
Semplicemente mi limito a metterlo su CD.
Il mio programma esporta in PDF usando ghostscript, ma è un optional,
diciamo. Se il cliente vuole questa funzionalità, gli dico di scaricarsi
Ghostscript, oppure di prenderlo su CD, ma non mi faccio pagare un bel
niente per questo.
Tieni presente che comunque io uso la versione GNU di Ghostscript, che viene
rilasciata subito dopo il rilascio della release AFPL successiva. Per dire
(come spiega l'url sopra), quando esce la versione x di AFPL Ghostscript,
viene rilasciata come GNU la versione x-1, e così via.
good coding!!!
-- 
Alletun
"Io lo so che accadrà. La voce sussurra nei miei pensieri di Jair, Rone,
Allanon e soprattutto nelle Mortombre.
Sussurra segreti che mi sono tenuti nascosti, nella grigia oppressione
di questo giorno e nell'oscurità caliginosa di quello che mi aspetta.
Saremo distrutti. Tutti."
Brin Ohmsford - La Canzone di Shannara - T. Brooks

Newsgroup: it.comp.lang.visual-basic
Titolo: Importazione file di testo in Access 2000

Buongiorno, devo importare con un 'applicazione VB6 un file di testo in un database Access 2000. Non posso usare DAO, altrimenti avrei usato senza dubbio l'istruzione 
DoCmd.TransferText acImportFixed, strSpecifica, strTabella..... 
Il file ha dimensioni fisse, ho creato una specifica di importazione (strSpecifica) che funziona perfettamente se eseguita in Access, ma io dovrei riuscire a eseguire l'importazione dall'applicazione VB, usando la tecnologia ADO.
Qualcuno potrebbe dirmi per favore come fare?
Grazie in anticipo,
P.
-- 
princepao 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-747574.html
Inviato via 
http://www.itsistemi.net

 ha scritto nel messaggio 
news:princepa...@no-mx.itsistemi.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: sono un dilettante

come faccio a far diventare
un programma con vb residente
(ad. es come un antivirus) e
l'icona del progetto che si
visualizza accanto all'ora
grazie a TUTTI
MASSIMO

visualizza accanto all'ora
Sito Comune
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
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: sostituire una

salve, usando ado di vb6 ho l'esigenza di sostituire il valore del metodo 
find con una variabile come nel esempio :
adodb.Recordset.find"campo" = #1/1/2008#"
                              in questo
adodb.Recordset.find"campo" = miavariab
come va riscritto il secondo blocco correttamente ?

 ha scritto

cosi' va?
var = 9
adodb.Recordset.find "campo=" & var
gli passi il numero
var="pippo"
adodb.Recordset.find "campo='" & var & "'"
gli passi apice-stringa-apice
ciao, a.

 gli passi apice-stringa-apice
spetta che provo

 gli passi apice-stringa-apice
ok cosi funziona,  ora pero' ho un altro problema, nel mio database ho 5 
campi, pero' non tutti i record riempono sempre tutti i campi, cioe' posso 
avere un record che riempe solo 3 o 4 campi, lasciando i rimanenti vuoti. e 
se' faccio una ricerca propio di quei record mi restituisce un errore : 
ERRORE DI RUN- TIME 94 UTILIZZO NON VALIDO DI NULL, so' che se studio un po' 
risolvo, solo che mi serviva questa applicazione subito, poi studiero' con 
calma :-)

 ha scritto nel messaggio 
news:48ad3686$0$1082$4faf...@reader1.news.tin.it...

Usa qualcosa tipo
If Not IsNull(CAMPO) Then
    'Fai quello che devi fare
End If
Ciao
Marco 

 End If
si ma il problema e' che io devo far in modo che quando cerco il record con 
qualche campo mancante, devo poter riuscire lo stesso a vederlo anche se 
incompleto.
quindi che istruzione devo mettere in caso il campo sia
Not IsNull  ?

 Not IsNull  ?
Consigliatami qui:
| Public Function NullDef(ByVal vntValue As Variant, Optional ByVal Default As Variant) As Variant
|     If IsNull(vntValue) Or IsEmpty(vntValue) Then
|         If IsMissing(Default) Then
|             NullDef = 0
|         Else
|             NullDef = Default
|         End If
|     Else
|         NullDef = vntValue
|     End If
|     
| End Function
Text1.Text= NullDef(Rs.fields("COGNOME").Value,"")
Ad ogni modo non ho mai usato il metodo Find dei recordset. Piuttosto il
.Filter, che ho anche trovato più veloce.

Newsgroup: it.comp.lang.visual-basic
Titolo: differenza tra date

Salve,
devo confrontare 2 date che sono in due campi di testo
devo vedere se:
10/03/00 > 10/03/99  
che funzione posso usare?? DateDiff?

sě.


e per pulizia di codice assicurati di fare la conversione in data con cdate
e di avere nelle general declaration
option compare text
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.Net] colorare una riga della listbox a condizione che...

Ho una sub che aggiunge ad una list box tante item quante ne trova
all'interno di un array di righe (preso da una relazione nel dataset).
Nella sub c'e' una struttura if che
se nella riga la scadenza e' diversa da "" allora vorrei che mi
colorasse la riga
altrimenti mi stampa la riga senza scadenza.
Non riesco a dirgli di colorare quella specifica riga. 
            Dim righe() As DataRow
            Dim i As Integer
            lbContatti.Items.Clear()
            lbContatti.BeginUpdate()
            righe = myDs.aziende.Rows(cMan.Position).GetChildRows("relContatti")
            For i = 0 To righe.GetUpperBound(0)
                If righe(i)("scadenza") <> "" Then
                    lbContatti.Items.Add(righe(i)("data") + "
Scadenza: " + righe(i)("scadenza") + " " + righe(i)("testocontatto"))
                Else
                    lbContatti.Items.Add(righe(i)("data") + " " +
righe(i)("testocontatto"))
                End If
            Next i
            lbContatti.EndUpdate()
Grazie
Saluti
Riccardo

magari postalo su un news di .net!


 magari postalo su un news di .net!
Magari impara a quotare e a pensare 2 (200?) volte prima di postare!
E, giusto per la cronaca, qui si parla pure di .NET, sebbene sia auspicato
un flag nel titolo (che nel caso di Riccardo, non mancava).
Lokar
P.S. Riccardo, mi risulta che la ListBox del Framework non permetta di
colorare _una sola riga_ con un colore diverso...
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

 colorare _una sola riga_ con un colore diverso...
a braccio, perchè non ho sottomano il libro.... mi sembra di aver letto
qualcosa, ieri sera, sulle ListBox OwnerDraw. Ti riferisci a quello quando parli
dell'impossibilità di colorare una sola riga?
Salutoni
Sergio

Una ListView ?
Ti permette di colorare sia il ForeColor che il BackColor senza problemi.
giuseppeD

si, dopo aver letto anche le altre risposte e una ricerca veloce qua e la ho
capito che la listbox non puo' colorare singole righe. La listview invece
puo' fare anche quello piu' altre cose molto interessanti e quindi credo
abbandonero' volentieri la listbox per la listview.
Grazie
Saluti
Riccardo


Newsgroup: it.comp.lang.visual-basic
Titolo: Codice Fiscale

Mi servirebbe una sub in VisualBasic (io uso il VB6, ma anche se è >=4 me la
aggiusto io se serve...) per il controllo della correttezza del Codice
Fiscale (italiano ovviamente...) di Persone Fisiche.
Non ho necessità di un prg per CALCOLARE il codice fiscale, bensì solo di
una routine per il CONTROLLO della sua correttezza, sempre che ne esista il
modo (l'ultimo carattere è un check come per la Partita IVA se non erro).
Chi mi helpa?!?!
Grazie in anticipo!
Gabriele

 ha scritto nel messaggio
news:fndX5.1012$x_2....@twister1.tin.it...


http://www.murialdo.it/it_lang_vb/
Nella sezione degli articoli.

Newsgroup: it.comp.lang.visual-basic
Titolo: Commondialog STAMPA

Ciao a tutti,
Con il Commondialog come si riesce a capire la stampante selezionata una
volta dato l' "OK"?
....esiste la proprieta' hDC, ma ritorna l'handle del Device Contest, da
qui' a capire che ho selezionato la mia "EPSON Stylus Color" c'e' un po' di
strada da fare....
Penso che la difficolta' sia capire che API devo interrogare per farmi
ritornare il nome del device in base all'handle recuperato dal commondialog.
QUALCUNO MI PUO' AIUTARE?  ....NON SO' PIU' DOVE SBATTERE LA TESTA!

...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: Suonare midi

Come fare per suonare una nota con lo standard midi?
Mi spiego meglio: voglio ad esempio suonare la nota 60 (che è un do) con lo
strumento 1 (che è il piano) a volume 127 (al massimo) sul canale 1.
Ho trovato dei moduli (Midi_cmd e Midi_out) devo usare quelli?
Grazie molte

Prova con questo esempio
Private Declare Function midiOutClose Lib "winmm.dll" (ByVal hMidiOut As
Long) As Long
Private Declare Function midiOutOpen Lib "winmm.dll" (lphMidiOut As Long,
ByVal uDeviceID As Long, ByVal dwCallback As Long, ByVal dwInstance As Long,
ByVal dwFlags As Long) As Long
Private Declare Function midiOutShortMsg Lib "winmm.dll" (ByVal hMidiOut As
Long, ByVal dwMsg As Long) As Long
Dim hMidiOut As Long
Private Sub Form_Load()
    Dim T As Long
    midiOutOpen hMidiOut, 0, 0, 0, 0
    midiOutShortMsg hMidiOut, 6567325
    T = Timer
    Do:  DoEvents: Loop Until Timer > T + 4
    midiOutClose hMidiOut
End Sub

 wrote in message
9h1gcf$g19$1...@nreadB.inwind.it...


>E dove metto nota, durata e volume???
Non riporto il testo del post precedente, cosi' imparate a
rispondere in coda ai messaggi ;->
In compenso, hai ragione sul fatto che l' esempio era un po'
da fucilazione sul posto ;-)
midiOutShortMsg hMidiOut, 6567325
sarebbe stato piu' "parlante" se fosse stato:
midiOutShortMsg hMidiOut, &H64359D
o, ancora meglio:
midiOutShortMsg hMidiOut, _
              &h90 + &hD _
              Or (&h35 * &h100) _
              Or (&h4 * &h10000)
Dove il messaggio alla periferica midi (secondo
argomento passato a midiOutShortMsg) impacchetta:
primo byte: stato e canale:
&h90 = stato della periferica ;
&hD  = canale utilizzato (in questo caso il 13);
secondo byte:
&h35 = nota da suonare;
terzo byte:
&h4 = volume;
quarto byte:
&h0 = inutilizzato
In ogni caso, cerca su msdn la documentazione di midiOutShortMsg,
che ritengo necessaria in casi come questo.
hth, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Text box

Salve a tutti,
ho la necessità di dare ad una variabile il contenuto della linea corrente
di una text box. E' possibile farlo ?
Grazie a tutti
Arrivederci

 di una text box. E' possibile farlo ?
Guarda questo codice:
http://www.mvps.org/vbnet/code/textapi/txcurrentline.htm
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)
Newsgroup: it.comp.lang.visual-basic
Titolo: Get system time from VB416bit?

I'm having some performance problems with a VB4-16bit application.
I need to test a few strategies for speeding things up, but the
only way I know to time procedures is to use the Now function before
and after and then get the elapsed time using DateDiff. This only gives
me a time to the nearest second.
I am aware of the 32bit API function GetSystemTime which would allow me
to time procedures to the nearest millisecond, but there doesn't seem to
be any equivalent function in the 16bit libraries. I also understand that
VB Timers are pretty unreliable.
Does anyone have a solution?
(As well as posting, please also email to 
da...@morrow98.freeserve.co.uk
)
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

Try this:
   Declare Function TimeGetTime Lib "MMSYSTEM.DLL" () As Long
Enjoy!
Corrado