mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Forms TAGs

Ciao, volevo solo un consiglio. Nel mio programma, c'č una lista di
"elementi" in una listview. Cliccando su uno di questi, creo un form (nel
senso set ciccio = new formdettagli) che mostra i dettagli per
quell'elemento.
Ora, l'utente puň decidere se modificare questi dettagli, e poi salvare le
modifiche con l'apposito bottoncino sul form. Per sapere qual'č l'ID
dell'elemento da modificare, nell'apertura del form dei dettagli ho scritto:
    formdettagli.tag = form1.listview.selecteditem.tag
    formdettagli.show 1
(nella tag del selected item c'č l'ID del record dell'elemento).
Ora (so che magari non si č capito nulla), č un buon metodo per tenere
traccia degli ID (per poi andare a modificare il record giusto), o c'č
qualche metodo piů "scolastico" o efficacie?
--
Starla. SP.

E infatti avevo il sospetto si potesse fare qualcosa del genere. Anche
perchè, come tu dici, mi servirebbe più di una variabile (1 per l'ID,
l'altra per il controllo se ha fatto modifiche etc..). Scusa la domanda da
newbie, ma in che modo le dichiaro queste variabili? Nelle Dichiarazioni del
form, credo?
Grazie per l'aiuto.
--
Starla. SP.

form, credo?
Potresti definire un' interfaccia (i.e. in vb scrivi un modulo di classe che ha solo
le definizioni di proprieta' e metodi pubblici, ma senza codice) che i form "manipolabili" 
dovrebbero poi implementare.
I form che la implementano dichiareranno delle proprie variabili interne sulle quali
viene svolto il lavoro vero e proprio.
In questo modo:
- ti assicuri uniformita' di accesso ai form;
- sfrutti pure l' early binding in fase di esecuzione e le funzionalita' dell' intellisense
  in fase di scrittura del codice;
- nascondi l' implementazione al codice client, lasciandoti la massima liberta' di 
  realizzarla come ti pare per ogni form.
-- 
ciao, hal

   realizzarla come ti pare per ogni form.
Questo è parlare!
Ciao
Alfonso

Wow, grazie per la risposta; quando leggo certi post, capisco che io del vb
non so ancora una cippa dm. Volevo dire una cosa: se dichiarassi delle
variabili nei form dei dettagli cosě:
public declare IDElemento as long
public declare DeveSalvare as boolean
come diceva Francesco bergamo, non č piů semplice che stare lě a fare la
classe (premetto che non so se sono in grado, perchč ci ho provato una
volta, č venuto su un macello)? Intendo, ci sono CONSIDEREVOLI vantaggi
sviluppando una classe? Tieni presente, che la mia applicazione non č
enorme, anzi. Ciao e grazie ancora.
--
Starla. SP.

Newsgroup: it.comp.lang.visual-basic
Titolo: stampa e winspool.drv

problemino. sto stampando utilizzando le API openprinter, writeprinter, ecc.
della libreria winspool.drv.
questo file lo devo mettere nel pacchetto di installazione, o gia si trova
su tutti i pc?
MarioH

 ha scritto nel messaggio
news:98lj5c$2gsa2$1...@ID-70152.news.dfncis.de...

Win ME c'è l'ha, è un file con copyright MS e nelle info sulla versione dice
che fa parte del SO, quindi probabilmente nella maggior parte delle versioni
di Win è presente.
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT?] Problema grave con InnoSetup

Salve a tutti,
Ho un gravissimo problema con innosetup.
In pratica, in DefaultDirName metto la cartella dove deve essere installato 
il programma.
Bene, testo il setup, ma quando arriva a chiedermi dove installare il 
programma non mi da la DefaultDirName che ho scelto io ma mette quella dell' 
ultima installazione! (infatti è la stessa di un altro progetto che ho 
fatto)...
Che fare?
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site 4 : 
http://www.thetotalsite.it
My Blog: 
http://blog.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS
Se un circuito funziona al primo tentativo è perchè il problema è molto più 
nascosto
e subdolo di quanto tu possa pensare...
E apparirà nel momento in cui farà il massimo danno 

 Che fare?
Ok, emh, sono, emh, riuscito a risolvere...
Nella sezione [Setup] basta inserire:
UsePreviousAppDir=False


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

Un saluto a tutto il NG
Ho un problema,
In un piccolo prg creato da me creo
una sottodirectory con MkDir .
es.: MkDir "C:\prova\documenti\
e dentro di essa inserisco un file
Il problema si pone quando la sottodirectory esiste già, quindi
non riesco ad inserire nessun file perchè il prg va in errore.
In pratica come posso fare a dire al prg di creare la sottodirectory solo se
essa
non esiste?
Grazie .
Roberto.
--
Roberto


OnError (num errore) goto (salta il comando MKDIR)
Per altre informazioni la guida in linea F1
Ciao Marco
--
----------------------------------------------------------------------------
-
Marco Corsaro
ICQ 9870268
http://www.corsaro.it
my greatest love - 
http://151.38.159.216/users
----------------------------------------------------------------------------
-

 ha scritto nel messaggio
news:d9xQ7.266552$sq5.13...@news.infostrada.it...


    > In pratica come posso fare a dire al prg
    > di creare la sottodirectory solo se
    > essa non esiste?
Scrivi il codice seguente:
        If Dir$("C:\Prova\Documenti", vbDirectory) = vbNullString Then
            MkDir "C:\Prova\Documenti"
Questa riga ti permette di creare la cartella solo se non esiste. La
funzione Dir$ infatti restituisce vbNullString solo se la cartella (costante
vbDirectory) non esiste.
Grazie a questa riga, dunque, il codice che segue troverà sempre la cartella
in questione.
Gemini.
PS: Hai valutato il caso in cui non esista neanche "C:\Prova"?


wrote:
---- code ------
' se c'e' errore, prosegui
On local error resume next
 MkDir "C:\prova\documenti\
' ripristina lo stop ad ogni errore
on error goto 0
--- code ----


 Un saluto a tutto il NG

cerca in MSDN la funzione dell'API MakeSureDirectoryPathExists()
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Generare un DB

Salve a tutti,
ho un dilemma che sto cercando sul manuale del programmatore, voglio creare
da codice un'origine dati ODBC quindi un DB o prima l'uno e poi l'altro o
viceversa, non so in quale ordine č meglio farle. E a questo punto bisogna
creare le tabelle.
Spero di essere stato chiaro, grazie a tutti e ciao.
Nicola.

guarda ado e adox
ciao
 ilario

 viceversa, non so in quale ordine è meglio farle. E a questo punto bisogna


Newsgroup: it.comp.lang.visual-basic
Titolo: L'applicazione la vedo dopo diversi secondi...

Ciao a tutti voi,
sono alle prese con la solita applicazioncina che ho creato.
Quando l'avvio, specialmente al primo avvio, devo aspettare anche 15-20
secondi sentendo in sottofondo il disco che lavora.
Il programma utilizza moltissimo il "filesistemobject" e quindi vi chiedo: è
un po' lento di suo o come è probabile, sono io che ho scritto una minchiata
di codice?
Massimiliano

 ha scritto nel
messaggio news:MIQcc.33249$rM4.1...@news4.tin.it...

Il problema è che forse hai scritto il codice nel posto sbagliato, se tu
vuoi avere la tua applicazione visualizzata prima di questa serie di
operazioni che fai col systemobject...
-- 
Le persone non sono il proprio comportamento: devi sempre andare oltre,
essere flessibile, capire il punto di vista degli altri, interpretarne i
comportamenti ed intuirne le esigenze.
Per rispondere in privato elimina
dall'indirizzo "togliquesto"
MasterDavidex
David Ruscelli


Beh, forse hai ragione... le ho scritte nell'evento Form_Load perchè mi
serve per l'inizializzazione delle variabili e dei controlli che vi sono
associati... es. "Dimennsione del disco", "percorso di una cartella"... etc.
Potrei sistemarlo in qualche altro modo?

 ha scritto nel
messaggio news:B5Rcc.33782$rM4.1...@news4.tin.it...

Hai 2 soluzioni
Lasci il tuo codice nell'evento load, ma aggiungi prima di esso
Me.Show
(soluzione che in alcuni casi può creare problemi
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&oe=UTF-8&threadm=%25Ei09.6441%24n04.149248%40twister2.libero.it&rnum=2&prev=/groups%3Fq%3Ddavid%2Bruscelli%2Bme.show%26hl%3Dit%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26selm%3D%2525Ei09.6441%2524n04.149248%2540twister2.libero.it%26rnum%3D2
 )
Oppure sposti tutto da qualche altra parte, magari nell'activate.
Attenzione perchè l'activate viene generato oltre che all'apertura del form
anche ogni volta che questo prende il fuoco, quinndi dovrai usare un boolean
per far girare il tuo codice solo la prima volta che l'activate viene
generato.



Proverò...
Ti ringrazio tantissimo!
Newsgroup: it.comp.lang.visual-basic
Titolo: STAMPA SIMBOLI GRAFICI

VB& sp6
E' possibile stampare con il metodo Printer i simboli grafici (es.  U+2502) 
?
Come ???
Qual'è la procedura ?
(copia e incolla in una istruzione printer.print, non va )
Qualcuno mi dà una mano ?
Non sono bravo in materia
Grazie ed un saluto a tutti.
giap

 E' possibile stampare con il metodo Printer i simboli grafici (es.  U+2502)
Dipende da che font, che charset e che carattere vuoi ottenere,
ma anche dal tipo di stampante, e se supporta quella determinata
combinazione.
In linea di massima il concetto č di usare:
Printer.Print Chr(codice_ASCII_del_carattere).
Per avere i codici puoi vedere sulla mappa caratteri di sistema
(č sotto "accessori" nel menu di sistema, oppure lancia da Start-Esegui
charmap.exe).
Tanto per fare un esempio, prova questo codice (buttato giů
a casaccio, non prenderlo come esempio) in un command
e vedi che succede:
'****************************
Dim N As Long
Printer.Font.Size = 10
Printer.Font.Name
 = "Arial"
For N = 32 To 255
Printer.Print Chr$(N) & " ";
If N Mod 32 = 0 Then Printer.Print
Next N
Printer.Print
Printer.Font.Name
 = "Webdings"
For N = 32 To 255
Printer.Print Chr$(N) & " ";
If N Mod 32 = 0 Then Printer.Print
Next N
Printer.Print
Printer.Font.Name
 = "Wingdings"
For N = 32 To 255
Printer.Print Chr$(N) & " ";
If N Mod 32 = 0 Then Printer.Print
Next N
Printer.Print
Printer.EndDoc
MsgBox "Fatto"
'****************************
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: newbie, Array

Ho un array con tot. elementi di tipo numerico
Dim valori(#) as Integer
come faccio a fare la somma di tutti gli elementi?
Ciao e grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ciao e grazie.
fai un ciclo for dall'elemento 0 all'ultimo
sommandoli tutti
for i = 0 to Array.count -1
    Somma= somma + Array(i)
Next i

 come faccio a fare la somma di tutti gli elementi?
Con il "+" ? Scusa la battutaccia, ma la domanda non è molto
chiara... a meno che quello che ti manca non sia il concetto
di "ciclo".
Prova a fare così:
********************
Dim Valori(100) as Integer
' qui devi assegnare dei valori ai tuoi elementi
Dim N as Long
Dim Totale as Long
For N = 0 to 100
    Totale = Totale + Valori(N)
Next N
MsgBox Totale
********************
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

 For N = 0 to 100
Scusa Paperino non voglio fare il maestro
(ho troppe cose da imparare !) ma il poverino
va in confusione ...
For N = 0 To 99
JKLJKL


 For N = 0 To 99
        Option Base 0 ' Default!
        ' ...
        Debug.Print LBound(Valori),
        Debug.Print UBound(Valori)
        For N = LBound(Valori) To UBound(Valori)
OUTPUT:
 0             100
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 --------
Ho provato, per curiosità, a mè LBound restituisce 0 e UBound 99 (array di
Integer da 1 a 100)
Perchè? Nel NordOvest funziona diversamente?? ;-)
JKLJKL

 Perchè? Nel NordOvest funziona diversamente?? ;-)
    Qui, a Est del Nord-Est, funziona cosi':
        'Option Base 0 ' Default!
        Dim Valori(100) as Integer
definisce un array di 101 elementi, da 0 a 100.


 ha scritto nel messaggio
news:alhq71$1pvle5$1...@ID-52090.news.dfncis.de...

Allora funziona uguale !!!! Evviva Bill !!
Ed io invece non funziono bene questa mattina chiedo scusa per l'idiozia
(sarà la troppa pioggia???)
Ho fatto una FDM
JKLJLK

 FDM
    Ne toccano un po' ciascuno all'anno. Tu ti sei portato avanti per il
2003. Fortunello!


 ha scritto nel messaggio
news:alhtp4$1q0hkl$1...@ID-52090.news.dfncis.de...

Spero non siano residui del 2002 !!

Newsgroup: it.comp.lang.visual-basic
Titolo: Riprodurre dati sulla SB

Qualcuno ha per le mani qualche esempio sul come si possa riprodurre un
stream di dati sulla sound-blaster, per esempio una sinusoide riprodotta in
tempo reale?
Non ditemi di usare le api waveoutopen e compagnia bella perchč ci ho
provato ed č veramente difficile.
Saluti Emiliano.
--
http://digilander.iol.it/galife/
    Virtua Life Simulator

 provato ed č veramente difficile.
pensi sia piů semplice gestirla da driver ? :)))
sotto windows puoi usare solo le api appunto come ti hanno consigliato ciao.

 wrote in message
ZPrn8.68994$1S3.2...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: timer event Problem

I sure do apreciate the response but its a no go so far
attatched is a copy of my project I dont know if you need the graphic files
or not
dont think I have a main form rather the plan was to have a series of pop
ups one after another that would at first post the the input to note pad so
I could get the the output to render properly and I would change it to post
the same to a email
sure did not take long to get lost
begin 666 CWVprojectReg.vbp
<encoded_portion_removed>
end

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Errore DLL "Can't Find Dll entry point CreateToolhelp32Snapshot in Kernel32.dll"

Un saluto a tutto il NG
Come menzionato da subject, vorrei sapere come è possibile
ovviare a questo problema:"Can't Find Dll entry point CreateToolhelp32Snapshot in Kernel32.dll"
La verità è che l'applicativo utilizzante questa funzione API
funziona correttamente sotto Windows9X,mentre l'errore viene
generato sotto WindowsNT
Come fare????
Grazie a tutti per l'attenzione!
Un saluto e auguri di buone feste MAURO!!!
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
twingo.tiscalinet.it
 [195.130.224.85] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 generato sotto WindowsNT
Come è specificato nella guida, NT non supporta questa funzione.
Newsgroup: it.comp.lang.visual-basic
Titolo: Software e brevetti...

---------------------------------------------------------------------
Non sono ancora andato a visitare tutti i siti indicati nella mail, ma
mi sembra che il problema non sia da sottovalutare...
Saluti preoccupati,
Marco Gentili
EmmeCiQuadro Snc
m.ge...@emmeciquadro.it

ho letto qualcosa... ma credo siano paure infondate. Infatti nella proposta
si fa riferimento alle invezioni e quindi in genere a tutto ciò che
rappresenta una novità. In una delle varie pagine Web qualcuno ha detto che
addirittura si potrebbero brevettare le due righe di codice che servono per
mettere xor due immagini. Beh credo proprio che non stiano così le cose. Un
conto è depositare un marchio o brevettare un'invenzione, altro invece
utilizzare i più comuni strumenti di programmazione.
Per fare un esempio... un algoritmo che restituisce tutti i punti di una
funzione non si può brevettare perchè si tratta di nozioni conosciute da
tutti e non sono certo novità. Un algoritmo che invece fa una cosa
assolutamente nuova è sicuramente brevettabile (guai se non fosse così).
Comunque speriamo bene..
ciao
Davide


ho letto anch'io qualcosa e se non ho capito male purtroppo il tuo
esempio e' un po' ottimistico, infatti brevettabile sara' non solo
l'"effetto" (il risultato, cio' che il codice fa), ma anche i l metodo
usato; quindi se qualcuno (leggi enormi aziende gia' proprietarie in
USA,dove tutto cio' e' gia' realta', di migliaia di brevetti) brevetta
un algoritmo -per usare le tue parole- per ottenere il negativo di un
'immagine (esempio cretinissimo, non sono programmatore), operazione
questa gia' possibile ma per altre vie, allora tu nel tuo programma quel
codice non lo puoi usare, ci devi arrivare in altri modi; aggiungi a
questo che le aziende USA piu' grosse usano scambiarsi le licenze d'uso
dei brevetti (ne hanno decine di migliaia) proprio per non bloccarsi a
vicenda; insomma per lo sviluppatore indipendente e' un po' piu'
difficile operare in queste condizioni. Del resto le aziende software
investono enormi cifre e il "casalingo" (e la piccola impresa), che
rischia molto meno, puo' dargli parecchio fastidio. La direttiva UE
sembra essere quindi un altro compromesso con il governo americano (che
giustamente difende le sue imprese).
ciao
costa

 wrote in message
376D6BE9...@freemail.it...

Se tutte le vostre catastrofiche previsioni dovessero avverarsi (ma non
credo), allora ci sara' da divertirsi!!!!   >:-))
--
Roal Zanazzi
z...@iol.it

giustamente difende le sue imprese).
boh.... posso dirti per esperienza diretta che molte delle cose che ho
creato per primo nei miei software oggi le trovo anche nelle versioni Demo
dei prodotti più scadenti. Solo che non ho mai pensato a registrare nulla e
quindi mi accontento di esser riconosciuto dai clienti come ideatore di
tanti passaggi che oggi utilizzano molti (sto parlando di software per
giochi a pronostico :-)))
ciao
Davide

 giochi a pronostico :-)))
Tu quindi (come inventore di nuovi algoritmi) saresti stato
avvantaggiato da questa normativa.
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione CHR

Buongiorno a tutti,
stavo navigando con Google alla ricerca di una bella tabella dei
codici ASCII, l'ho trovata e, dopo aver visto il significato di alcuni
numeri, mi sono soffermato su quello che mi interessa:
chr(1) che aggiunge una sorta di quadratino, una linea.
Che utilità può avere?
Chiedo questo perchè in una procedura che sto analizzando viene
riportata la seguente stringa:
linea=NUMEROFATTURA + Chr(1) + DATAFATTURA
dove NUMEROFATTURA ="12" e
       DATAFATTURA ="12/12/2003"
il risultato è:
12  | 12/12/2003.
Quando su usa chr(1)?
Saluti.
Andrea.

Il 23/12/2003 10.05, Andrea scrisse:

Direi che e' stato usato come separatore di campo, impropriamente visto 
che il significato del carattere ascii 1 e' SOH start of heading.
I caratteri ascii da 0 a 31 sono caratteri di controllo, generalmente 
utilizzati nei protocolli di comunicazione o nelle stampe (ad es. il 10 
corrisponde a New Line, il 13 ad A capo). Li si possono utilizzare come 
se fossero normali caratteri, ma non trattandosi di caratteri 
"stampabili" vengono sostituiti da un quadratino.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!


wrote:
[CUT]
Ti ringrazio.
Saluti.
Andrea.

 
Ovviamente quelli che hanno una funzione se usati nel giusto contesto 
assolvono a quella funzione:
tmpstringa = "ciao" & chr(13) & Chr(10) & "maxx"
debug.print tmpstringa
visualizzera' nella finestra immediata di VB:
ciao
maxx
questo perche' chr(13) e chr(10) "significano" vai a capo.
(Un modo piu' breve in questo caso e' pero' usare la costante di VB vbCrLf).


 questo perche' chr(13) e chr(10) "significano" vai a capo...
...e torna all'inizio della linea. ;-)
ciaociao

 
Miiiiiiiii! Che ggente precisina su sto NG!
:-)


 maxx
ciaociao

visualizzera' nella finestra immediata di VB:
Si grazie questo lo sapevo ma mi sfuggiva proprio il chr(1) e il fatto
che se l'editor non riesce a interpretarlo lo traduce come simbolo.
Arigrazie!!! :-)
Saluti.
Andrea.

Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire la connessione ad Internet

Come si fa ad aprire la connessione per internet da VB?
Grazie
Lorenzo

 wrote in message
7lnmpa$ik5$1...@pluto.sm.dsi.unimi.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: treeview

Ciao a tutti.Ho un problema. Non ho mai usato un treeview in vita mia e
ricercando qua e là un pò di documentazione ci ho capito poco e mi è
anche bùvenuto il dubbio che non faccia quello che penso.
Vi spiego cosa devo fare:
Devo creare una maschera di inserimento dati che ahnno una dipendenza
gerarchica tra di loro:
ho una sezione, per ogni sezione uno o più fogli, per ogni foglio uno
o più mappali e per ogni mappale uno o più subparticelle.
Non ho una tabella da cui caricare dati perchè deve essere creata con
l'inserimento di questi nella maschera.
Qualcuno può suggerirmi una strada?
Grazie a tutti in anticipo

 ha scritto nel messaggio 
news:1162554011.0...@f16g2000cwb.googlegroups.com...

Usare il treeview per inserire dei dati in questa maniera secondo me è 
laborioso.
Io l'ho usato ma solo come visualizzatore.
Io farei cosi
Sezione la scrivo in un textbox dopo diche posso compilare una griglia che 
sono i fogli e poi quella dei mappali e cosi via obbligando il percorso
Newsgroup: it.comp.lang.visual-basic
Titolo: tutorial

mi potete dire dove trovare un tutorial, possibilmente con progetto
compreso, su come interagire con un database?
lettura, scrittura,modifica cancellazione e query
semplice pero' :))
grazie
rispondete per favore qui 
LEVA...@tusciarte.it
ciao

Ciao,
un tutorial vero e proprio non so...  c'è la spiegazione in qualsiasi
manuale cartaceo.
Troverai sicuramente utili i due seguenti links:
http://www.it-lang-vb.net/
 (il sito comune di questo newsgroup)
http://vbsimple.virtualave.net/
Ciao,
Antonio

Newsgroup: it.comp.lang.visual-basic
Titolo: [??] problema con Database e SQL

Ciao a tutti. Questo è il mio problema, anzi problemone.
Ho creato un database di access con tre campi : Nome, Prezzo, Località; l'ho
chiamato SQL.
Poi ho il mio form ( che si chiama anch'esso SQL), dentro il quale ci sono
tre txtbox (una si chiama txtNome, TxtPrezzo, txtLocalità). Inoltre ho il
controllo Data.
A questo punto, siccome sto cercando di imparare un pò di SQL, introduco un
altro controllo. il cmdSeleziona.
Quindi scrivo il seguente codice:
Private Sub cmdSeleziona_Click()
Data1.RecordSource = "Select * from SQL where txtPrezzo < 168000"
Data1.Refresh
End Sub
Non mi calcola quello che voglio io!!!
Mi dice, cliccando il pulsante seleziona, errore di run-time numero '3061',
too few parameters. expcted 1.
Che diavolo posso fare!
Tantissimi grazie a chiunque sia in grado di darmi una mano.
Daniele.

 ha scritto nel messaggio
news:88ub5q$uje$1...@lacerta.tiscalinet.it...


 wrote in message
88uceg$9bj$1...@news.planet.it...

Caro federico, innanzitutto ti ringrazio per l'aiuto che mi hai dato.
Purtroppo però, non mi è servito. Infatti questa volta ho scritto:
Private Sub cmdSeleziona_Click()
 Data1.RecordSource = "Select * from SQL where Prezzo <168000"
end sub
Questa volta mi scrive errore di run-time '3464'
"data type mismatch in criteria expression"
Ora che cosa altro ho sbagliato??
Ciao.
Daniele

 Data1.RecordSource = "Select * from SQL where txtPrezzo < 168000"
Questa istruzione mostra i campi di una TABELLA con il nome SQL (il
database non c'entra niente!)
Prova a rinominare la tabella con i tre campi del tuo database con SQL e
dovrebbe funzionare tutto!

 > > Data1.RecordSource = "Select * from SQL where txtPrezzo < 168000"


dovrebbe funzionare tutto!
al di la di questo,se non erro,  txtPrezzo era il nome del controllo e non del
campo, che suppongo si chiami "Prezzo"

Newsgroup: it.comp.lang.visual-basic
Titolo: COME RIESCONO A IDENTIFICARE IL MITTENTE?

This message was posted anonymously:
Ho postato su diversi News Groups con indirizzi e-mail 
falsi, con indirizzi e-mail di siti tipo 
freemail.com
 etc, 
ma qualcuno e' sempre riuscito ad associare alla mia 
persona tutti i messaggi postati anche stravecchi (o 
perlomeno a sapere che avevano una stessa origine) e a 
sapere la zona (o 
citta') di provenienza (attraverso le informazioni dei 
routers forse?).
COME FANNO?

[*] Propendo per questa ipotesi. ciao carlo, come va?.
Newsgroup: it.comp.lang.visual-basic
Titolo: Dimensione pagina di stampa

Vorrei modificare la dimensione della pagina di stampa da VB senza andare
ad impostare la dimensione personalizzata del foglio nella stampante su cui
intendo andare a stampare.
Impostando le proprietą HEIGHT e WIDTH dell'oggetto printer, queste variano
dal valore che io ho prefissato.
Potete aiutarmi??

Potete aiutarmi??
Non per tutte le stampanti è possibile impostare le proprietà Height e
Width.
Ciao Bruno

Newsgroup: it.comp.lang.visual-basic
Titolo: Sintassi SQL

Ciao a tutti.
Quando cerco di eseguire questa query
"Select Operatori.Id, Operatori.Cognome & " " & Operatori.Nome AS Operatore
from Operatori;"
mi appare un messaggio di errore:
"Invalid operator for data type. Operator equals boolean AND, type equals
nchar."
Prima il db era su Access2000 e funzionava, adesso ho fatto il passaggio ad
MSDE e non funza.
Sicuramente è questione di sintassi!
Mi dite dove sbaglio.
Grazie


ehm, forse è proprio un problema di sintassi.....
Sei sicuro di aver scritto giusta la query, o hai fatto qualche errore con
il copia-incolla?
Salutoni
Sergio

 MSDE e non funza.
In SQL Standard & non esiste come operatore di concatenamento stringhe. Usa
+

 +
Grazie!
Ho risolto con la sostituzione dell'operatore & con +.

Newsgroup: it.comp.lang.visual-basic
Titolo: Db in access in rete

Come gestire un database su internet?
Qualcuno mi ha risposto tempo fa semplicemente
"asp"
Se sapessi utilizzare i db probabilmente quella risposta mi dovrebbe dire
qualcosa, ma purtroppo non mi dice nulla, se non che sono ignorante nell'uso
dei database che non siano locali :(

 ha scritto nel messaggio
news:xTbR6.3256$Ww.3...@news2.tin.it...

ma ti dice di cercare "asp" su msdn...
:-))))
ciao
ugo

 ha scritto nel messaggio
news:9f3jf2$3ar$2...@lacerta.tiscalinet.it...


mi vergogno anche di fare ste domande, perň... cosě imparo no?
Active Server Pages
e' una tecnica di generazione dinamica di pagine html, mediante
l' utilizzo di un linguaggio di script (tipo vbscript o javascript) e di
componenti compilati (dll activex).
Esistono anche le Java Server Pages, che hanno piu' o meno
la stessa filosofia, ma utilizzano Java per la generazione dell' html
e componenti java (servlets e beans).
Vengono utilizzati anche altri strumenti, fra cui ColdFusion, ed altri 
linguaggi script, fra cui perl e php.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: tipo Telnet

Ho creato una piccola applicazione che dovrebbe funzionare come un telnet,
ma quando mi connetto all'hosts remoto in risposta ho caratteri strani, dove
sbaglio un tipo di codifica nei dati in arrivo nella TextBox, qui sotto è
riportato una parte del sorgente interessato.
..................
Private Sub Command1_Click()
  TCP1.Connect Text1, Combo1
End Sub
..................................
 Private Sub TCP1_DataArrival(ByVal bytesTotal As Long)
  Dim Dalserver As String
  TCP1.GetData Dalserver, vbString
  Text4 = Text4 & Dalserver
End sub
come faccio a comunicare in VT100
Grazie


ti leggi le RFC sulla negoziazione delle caratteristiche del
terminale/connessione del telnet.
http://ftp.unina.it/pub/docs/rfc/
i caratteri che vedi arrivare alla connessione sono proprio quelli della
negoziazione
buona lettura

 writes:
G> come faccio a comunicare in VT100
1) Procurati la RFC che regola il protocollo telnet che non è una semplice
   connessione TCP/IP - se vuoi parlare con un telnet daemon -
2) procurati un manuale di un terminale VT100 per i codici di controllo che
   devi riconoscere e, se è il caso, interpretare. 
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )
Newsgroup: it.comp.lang.visual-basic
Titolo: Dll + Visual Basic

Ho fatto una dll con una funzione di questo tipo:
unsigned char PreparaPacchetto(StrutturaPacchetto Pacchetto, char
*chrStringa);
La dll è stata dichiarata in questo modo:
Public Declare Function PreparaPacchetto Lib "BarCodeReader.dll" (ByRef
Pacchetto As StrutturaPacchettoDataLogic, ByRef chrStringa As String) As
Byte
Fin qui tutto ok giusto?
Il problema è questo... quando la richiamo:
bytLunghezza = PreparaPacchetto(Pacchetto, strPacchetto)
mi dà un errore del tipo "impossibile trovare il punto d'ingresso della DLL
PreparaPacchetto in BarCodeReader.dll".
Mi sfugge qualcosa?
Grazie, Ste.

 ha scritto nel messaggio
news:ptVy6.126476$lj4.3...@news6.giganews.com...


     altre_eventuali_funzioni_da esportare
Anche io preferisco la soluzione col file .def, comunque esiste una via un
_pochino_ più facile ed è spiegato sul Sito Comune di questo NG.
Col .def però è facilissimo da creare e ti fa trovare i nomi delle funzioni
esportate esattamente come vuoi.
--
 /\/\/\/\/\/\/\/\/\/
| Una iniziativa a livello di questo NG:
| Partecipa alla stesura di progetti VB sviluppati in team, informati sul
Sito Comune
| sezione Leonardo.  Io partecipo al progetto Data Raptor, alleati con noi.
 \/\/\/\/\/\/\/\/\/\
Ciao
Ettore Maronese, il Mes
http://www.maronese.com/mes
Sito Comune di questo NG
http://www.murialdo.it/it_lang_vb

 esportate esattamente come vuoi.


 b) non dover calcolare la somma dei bytes utilizzati dai parametri (in VB)
Concordo al 100%
--
 /\/\/\/\/\/\/\/\/\/
| Una iniziativa a livello di questo NG:
| Partecipa alla stesura di progetti VB sviluppati in team, informati sul
Sito Comune
| sezione Leonardo.  Io partecipo al progetto Data Raptor, alleati con noi.
 \/\/\/\/\/\/\/\/\/\
Ciao
Ettore Maronese, il Mes


 Byte
[...]

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

Salve!
Ho la necessità di creare sotto Visual Basic 6 un Data Report ORIZZONTALE.
Ovvero orientato per la lunghezza del foglio A4 e non per la lunghezza come
d'uso.
Possibile che non sia possibile girare il report ??
Grazie 1000 a ciunque sappia darmi una mano!

Vorrei creare un Recordset da passare ad un DataReport in modo che abbia un
risultato del genere:
Ditta                            Dipendente         Ect.
DITTAPROVA1         Pippo Franco
                                   Pluto
                                    Paperino
DITTAPROVA2         Minni
                                   Zio Paperone
Come debbo strutturare la Query SQL?
Come debbo comportarmi nel DataReport?
Grazie.

Avendo il seguente tracciato:
|Ditta|Dipendente|
come posso effettuare una stampa tramite DataReport (senza utilizzare
DataEnvironment) in modo da avere il tipo di stampa seguente:
Ditta1       Dipendente1
                Dipendente2
                Dipendente3
Ditta2       Dipendente4
               Dipendente5
e cosě via?
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Eliminazione spazi in una stringa

Non ricorda quale sia l'istruzione per eliminare gli spazi in una
concatenazione di stringhe.
Esempio
dim frase as string
dim x as string
dim y as string
x = "He"
y= "lp"
frase= ?(x&y)
Dove ? è l'istruzione che non ricordo
Il risultato senza ? sarebbe He lp con l'istruzione ? è Help.
Grazie a tutti.

Se per istruzione intendi una funzione, hai due possibilità:
1) TRIM, che però rimuove solo gli spazi all'inizio ed alla fine
2) REPLACE, che ti toglie tutti gli spazi
Ciao
Alberto

 ha scritto nel messaggio
news:aa5ipa$4lq$1...@e3k.asi.ansaldo.it...


Scorri la stringa concatenata lettera dopo lettera e annida una istruzione
che appena trova uno spazio lo salta.
Giorgio

Newsgroup: it.comp.lang.visual-basic
Titolo: programmi che interaggiscono con DB

qualcuno sa dirmi dove posso trovare materiale (COMPRESO ESEMPI SE
POSSIBILE) che mi illustri come creare applicazioni con Visual Basic capaci
di interagire dinamicamente con un database
Grazie Mariolina

di interagire dinamicamente con un database
Visual Basic 6 Guida per lo sviluppatore di database
recensito sul sito comune http.//
www.it-lang-vb.net
 
alla sezione libri
-- 
hth, hal


è talmente semplice lavorare con database in vb che forse ti basterebbe
mettere un datacontrol nel form e tutto l'apprendimento avverrebbe
gradualmente senza grosse difficoltà.
Magari se cominciassi col farlo ti accorgeresti della cosa..
ciao :)))

Newsgroup: it.comp.lang.visual-basic
Titolo: problema con il porting da vb6 a vb.net

salve ragazzi, approfitto della vostra esperienza per porvi questo problema.
Ho una'applicazione in VB6 funzionante.
Ora devo creare la stessa apllicazione in ASP.net.
Ho pensato di fare così:
faccio il porting del codice VB6 in Vb.net
creo le maschere in 
asp.net
 e faccio girare sotto il codice in VB.net.
Il problema ora è uno:
la moltitudine di errori generati nel porting.
I più ricorrenti sono:
Impossibile risolvere la proprietà predefinita dell'oggetto
mAreeCommerciali.Item().Descrizione.
Dir ha un nuovo comportamento.
Array ha un nuovo comportamento.
Qualcuno conosce come risolverli?
Conoscete qualche programma che limita questi errori?

 ha scritto nel messaggio
news:OYQMb.253717$e6.10...@twister2.libero.it...


 ha scritto nel messaggio
news:OYQMb.253717$e6.10...@twister2.libero.it...


 forse ti riferisci a vb code advisor?
Sě, bravo.
P.S.: occhio al quoting
Ciao

 ha scritto nel messaggio
news:bu0vm6$ccq67$1...@ID-184808.news.uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di run-time 50003

Ho realizzato un programma che usa molto i database per un mio amico.
Questo mio amico lo ha installato su due computer.
Per un mese il programma ha funzionato alla perfezione.
Ora su uno solo dei computer, non sull'altro, durante l'apertura di una form
che utilizza semplicemente un db snapshot, il computer dice:
"Errore di run-time 50003" senza fornire altre spiegazioni e facendo
chiudere il programma.
Provando a reinstallare da capo il programma non ottengo nessun risultato.
Come fare?
Accetto suggerimenti o indirizzi di pagine web dove sono elencati i vari
errori di run-time.
Grazie anticipatamente
            Nicolò



Lo stesso errore io l'ho avuto da una versione precedente del controllo
sstab (mstab.ocx)
Bye

 wrote in message
7u4ln3$7s8$1...@fe2.cs.interbusiness.it...


 Come fare?
Se non sbaglio è un problema derivante dalle diverse versione di DLL
probabilmente del DAO. Su quella macchina sarà stato installato un altro sw
che ha sostituito le librerie installate dal tuo programma. Se queste
librerie risultato essere più recenti anche reinstallando, le tue non
andranno a sostituirle.
Ti consiglio di rintracciare quali sono le librerie differenti per data o
dimensione, cancellarle e reinstallare il tuo sw.
--
Nino Stella
Inteldata Srl
email: 
nino...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Programmazione PPC 2003

Vorrei una dritta su cosa mi serve per programmare questo OS.
Se ho ben capito gli embedded visual tools 3 non sono più supportati, ma
occorre .NET
Io ho Visual Basic .NET Standard Edition ed ho scaricato dalla Microsoft ed
installato l'SDK per Pocket PC 2003, ma nella lista dei tipi di progetto non
compare nulla a riguardo.
Cosa sbaglio ?

> Cosa sbaglio ?
Il fatto che usi la versione standard, la quale non supporta lo sviluppo di
applicazioni mobile...
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

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

 compare nulla a riguardo.
Come dice Corrado VB.net standard non ti permette la creazione di progetti
per SmartDevices, però questo non significa che non li puoi fare.
Certo è molto più complesso, ma il vbc.exe può compilare per smartdevices
indicandogli l'sdkpath alternativo (tutto da riga di comando!).
Se hai installato il CompactFramework i cab per ARM4 sono quelli per i
PocketPC e contengono le dll necessarie.
Peccato che vadano rinominate nel modo giusto (Reflector può aiutarti in
questo per vedere il nome interno).
Ciao
--
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Ocx per indirizzi IP

Sto cercando un ocx o del codice con una casella di controllo per
inserire un indirizzo IP.
Gratuito, altrimenti me lo faccio da solo (ma ho poco tempo!)
grazie
		maxx

 wrote in message
3A5F1595...@laserinforma.com...


Eh troppo semplice :-)
Alcuni utenti evoluti sono abituati al controllo presente nelle Opzioni
di rete del Pannello di Controllo!
ciao
	maxx


 ha scritto nel messaggio
news:3A5F2CD8...@laserinforma.com...


 ha scritto

http://winfiles.cnet.com/apps/98/vb-comp-h.html
ip box


Non per nienet hai vinto il premio come maggior "postatore" :-)
grazie
	maxx

Newsgroup: it.comp.lang.visual-basic
Titolo: uso di postmessage

Sto lavorando con un'applicazione Capture Video con Visual basic 6 per
Windows Xp
Perchč se ho definito la mia finestra come
 capGetDriverDescriptionA 0, lpszName, 100, lpszVer, 100  '// Retrieves
driver info
 lpTTChwnd = capCreateCaptureWindow(lpszName, WS_CHILD + WS_VISIBLE, 48, 32,
241, 181, frmTTC.PicUP.hwnd, 0)
Public Const WM_USER = &H400
Public Const WM_USER_VIDEO = WM_USER + 5
quando utilizzo l'istruzione
PostMessage lpTTChwnd, WM_USER_VIDEO, 1, frmTTC.PicUP.hwnd
non viene chiamata la funzione windowproc ? e di conseguenza non mi appare
il segnale video?
Se invece non utilizzo la capCreateCaptureWindow utilizzando sempre la
postmessage viene chiamata la windowproc.Perchč?
Grazie

 241, 181, frmTTC.PicUP.hwnd, 0)
La butto lě, perchč non ho mai usato la capCreateCaptureWindow().
Con VB ho notato (a differenza di altri compilatori come il Delphi che
correttamente richiede la PostMessage()) che funziona meglio la
SendMessage().
Prova cosě, e fammi sapere.
Ciao
------------------------- SiDB Simple DataBase engine ----
------------------------- adParser Expression evaluator --
 
http://space.virgilio.it/zntf...@tin.it/
----------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: [SITO] VBProgrammers - Shared projects

Volevo annunciarvi che è nata una nuova comunità di condivisione progetti
on-line.
Magari fateci un salto e fatemi sapere cosa ne pensate.
L'url è nella firma
--
Ciao Diego.
*******************************
http://www.biapps.it/vbprogrammer
il portale italiano dedicato al Visual Basic
*******************************

 L'url č nella firma


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

Ciao a tutti,
qualcuno mi spiegherebbe la sintassi precisa del comando loadlibrary
(magari con un esempio)? Ho provato in tutti i modi ma l'unico modo
per caricare un ocx e' stato usare il regsvr.
Grazie

Non mi è chiaro perché tu debba usare LoadLibrary per caricare un OCX e
perché usi regsvr come alternativa. Devi registrarlo o caricarlo in un
programma?
----------------------------------------------------------------------
Stefano Minardi
Zetesis: 
zet...@mclink.it
----------------------------------------------------------------------
Abraxas <abr...@NOSPAMtiscalinet.it> wrote in message
mdEAOf5y5O2ODE...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Finestra Browser

Salve,
ho la necessità di realizzare un eseguibile che operi utilizzando le pagine
web quindi mi necessita di avere une eseguibile che abbia una finestra
browser, come è possibile realizzare ciò???
Avete qualche esempio in merito???
In pratica:
clicco sul bottone A e vengono inviati i dati via internet ed il risultato
(la pagina web) mi deve ritornare all'interno dell'eseguibile.
Grazie
Renato


Puoi usare l'oggetto WebBrowser che viene installato da IE.
In pratica si tratta proprio della client-area di IE.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: VB Mazimizer: qualcuno lo usa ?

Ho letto una recensione del suddetto applicativo e volevo un giudizio da
parte di chi lo usa.
L'impressione che ho avuto e` stata  buona, sia per le funzionalita` che per
il prezzo.
L'unico dubbio puo` essere nella politica di upgrade visto l'approssimarsi
di .NET
BAU!

Io!!!

IO lo uso, ma é soggetto a pesanti limitazioni nella versione non
registrata...
Ho anche proposto di fare una "colletta" per registrarlo (usando magari la
versione di 10 licenze). Se arriviamo a 10 (ma per ora siamo in due)
verrebbe sulle 32K a testa CON LICENZA...
Per il passaggio a .NET... Boh???
Mi sa che non sarà più compatibile (ne sono quasi certo), potremmo aspettare
a vedere se ne esce una versione direttamente per .NET?????
                    Ciao
                                Allanon

 wrote in message
news:9qhkck$mha5k$1...@ID-67444.news.dfncis.de...

Comunque mi sembri convinto sulla bonta` del prodotto. Bene.
La proposta delle 10 licenze mi pare buona, bisogna solo trovare chi ci sta.
E non sara` facile!
Intanto provero` ad informarmi se e` prevista una versione per .NET, i
tempi, e se hanno gia` previsto un upgrade.
Appena so qualcosa ti mando una mail , per il momento ti saluto e ti
ringrazio.
BAU!

 ha scritto nel messaggio
news:9qmg4v$ahk$2...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Addin per rimuovere variabili non utilizzate

Ciao a tutti! Capita spesso di scrivere tanto codice temporaneo prima
di arrivare ad una stesura definitiva e talvolta si finisce per
dimenticare variabili che vengono dichiarate e mai utilizzate. Sapete
se esiste un Addin che aiuti a trovarle senza bisogno di spulciarsi
tutto il codice?
Grazie e ciao, Giuseppe
P.S.: Uso Visual Studio 6...

 tutto il codice?
mztools
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

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

 specifico.
IndenterVB5 (che funziona anche per vb6)
Permette di riorganizzare il codice con le giuste indentazioni.
http://www.bmsltd.ie/Indenter/Default.htm

Newsgroup: it.comp.lang.visual-basic
Titolo: Q:Quali file distribuire?

Qualcuno mi sa spiegare o indicare dove trovare una descrizione REALE,
non quella che fornisce Setup Wizard, dei file che di default vorrebbe
distribuissi con ogni applicazione di VB4 32?
Servono davvero tutti?
Es. progetto senza OCX, OLE, Accesso ai dati
L'unico file fondamentale penso sia VB40032.DLL
Ma lui (Setup Wizard) vorrebbe che aggiungessi
	 VB4IT.DLL (ma serve??)
	ven2232.olb (idem)
	OlePro32.dll (ma se non uso OLE!)
	msvcrt20.dll(penso serva per Setup.exe)
	msvcrt40.dll(chi lo usa? Non sapevo di usare il C++)
	ctld32.dll (pare serva per NT? Ma serve ancora?)
 
Es.2 progetto con accesso a un db di Access
Della miriade di file che vorrebbe farmi installare quali sevono?
Ovviamente VB40032.DLL e OlePro32.dll
ma ai soliti si aggiungono DAO3032.DLL 
			MSJT3032.DLL (penso il Jet Engine, ma sono 3
dll?)
			MSJTTER32.DLL
			MSJTINT32.DLL
			VBAJET32.DLL
			VBDB32.DLL
			MSRD2X32.DLL
			MSWNG300.DLL
			ODBCJT32.DLL
			ODBCJI32.DLL
			ODBCTL32.DLL
			VBAR2232.DLL
Un plauso a chi mi saprà chiarire le idee
Ciao
Stefano

 
Me lo sono domandato anche io ho provato ad eliminarne alcuni e setuppando
il programma su di un computer senza VB non mi č andata bene.
Comunque  problema parzialmente risolto con il VB5 - Le dimensioni si
dimezzano e vengono dei packages piů umani.
Ad esempio un programma che generava in VB4 4 MB di files ora ne genera 2.2
Sono ancora troppi - ma va meglio - a proposito o sproposito mi sai dire
come si fa per creare un programma che consente il drag and drop di files
da Explorer?
Ciao
-- 
Tullio Naglieri - Roma
T.Nag...@Agora.stm.it

Newsgroup: it.comp.lang.visual-basic
Titolo: ? aprire word senza word

Cari amici,
E' possibile aprire un documento word anche se sul p.c. non è installato
Office???
domanda n°2
E' possibile creare un' applicazione VB per farla girare su altri pc con win
3.11??
Se si cosa occore?? e dove reperire ciò che occorre???
Forse sto dicendo cavolate, ma ... mi sono appena svegliato----???
Comunque mi affido al Vs. buon cuore

Cari amici,
E' possibile aprire un documento word anche se sul p.c. non è installato
Office???
Ciao

...

-----------------
Ciao!
Sì, è possibile, basta che nel computer sia installato Microsoft Word Viewer
(o altri programmi analoghi che supportano i file DOC di Word 97). Se i file
di Word sono in formato RTF, puoi usare il controllo RichTextBox fornito con
VB edizioni Professional o Enterprise.
A presto
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco

Newsgroup: it.comp.lang.visual-basic
Titolo: help treeview

Come si fa a cambiare lo sfondo di un controllo tree view in VB6  ?????
How i can do to change background of a treeview control in VB?????
Grazie a chiunque è in grado di rispondermi
Tanks to everyone can answer to me!
pso...@tin.it

 wrote


 Come si fa a cambiare lo sfondo di un controllo tree view in VB6  ?????

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione Ora in secondi

Ciao a tutti,
esiste in VB6 una funzione che converte una data (time) in secondi?
Oppure devo fare una function del genere:
Public Function Time2Seconds(ByVal DataIn As Date) As Long
Time2Seconds = DatePart("s", DataIn) + (60 * DatePart("n", DataIn)) _
               + (3600 * DatePart("h", DataIn))
End Function
Grazie a tutti
-- 
DBMS Firebird
VB6 + Ado


Provato a vedere DateSerial e TimeSerial?
Gnap :P
-> GbC
www.gbcweb.com


secondi = (data - Fix(data)) * 24 * 60 * 60
o se in data hai solo l'orario
secondi = data * 24 * 60 * 60
Ciao 

 Provato a vedere DateSerial e TimeSerial?
Si, ma a me servirebbe il contrario :)
Cioč DateSerial/TimeSerial da degli interi mi danno variabile data.
Io ho variabile data (time) e voglio sapere quanti minuti o secondi ci
sono.
Es:
myDate=TimeSerial(11,0,0) (nel mio caso viene da un RecSet)
Debug.Print Time2Min(myDate)
Mi deve restituire: 
---> 660
Per ora comunque ho fatto da Time2Minuti e Time2Secondi.
La funzione sarebbe piů simile alla DatePart, solo che dovrebbe fare le
moltiplicazioni/divisioni.


 secondi = data * 24 * 60 * 60
-___-'
Si vede che non mi capita spesso di usare variabile date :-).
Un'altro help.
Sto lavorando nel DB con campi Time
Ado li riconosce però come adDate, anche se il debug.print
debug.print Rs("ORA").value mi da 11.35.00
Quindi come time.
Mi converrebbe usare la prima function o la seconda?
Per le altre operazioni ci possono essere problemi? Per ora non me ne ha
dati, cioè si accorge che non sono Date+Time ma solo Time.
Tnx


 dati, cioè si accorge che non sono Date+Time ma solo Time.
Non esistono campi time fuori da alcuni motori DB, ma solo datetime.
Se hai solo il time significa che la data è 0, cioè il 30/12/1899 (per 
convenzione).
In questo caso puoi usare la forma abbreviata.
Tanto per spiegare come funziona la cosa, le date sono memorizzate come 
double dove la parte intera sono i giorni e quella decimale le frazioni di 
giorno.
Ciao 

 giorno.
Ok grazie :)
Ecco perchè la CLng non fungeva :)


Newsgroup: it.comp.lang.visual-basic
Titolo: multiselect in commondialog

Vorrei che in una CommonDialog Open fosse possibile caricare piu' file che
andranno poi in una listbox.
Uso ListBox.AddItem (CommonDialog.Filename)
e ho settato CommonDialog.Flags = cdlOFNAllowMultiselect
ma non mi permette assolutamente di fare selezioni multiple.
Ringrazio chi vorra' spiegarmi dove sbaglio, sto imparando.
free...@sincretech.it

...


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

Ciao a tutti, qualcuno sa come : 
1)convertire le lire in euro ?
2)Il rapporto di conversione rimane costante o fluttua giornalmente ?
3)Dove posso trovarne il simbolo ?

...


3)Dove posso trovarne il simbolo ?
     in Win98 è di serie, per Win95 e WinNT devi cercare le patch dei
caratteri sul sito di Microsoft (non ricordo bene l'indirizzo...)

3)Dove posso trovarne il simbolo ?
Se intendi il font:
- Win98 è già OK
- Win95 e winNt: cerca sul sito M$ e trovi i font "corretti" con il
carattere euro  - CHR$(128)
Se intendi il logo, vedi i siti sopra.
buon diverimento... :-)
bye
Mauro Mariz
3nto