mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Azione eliminata da un oggetto associato?!!?!??

Che cosa vuol dire questo messaggio?
Errore di run time 3426
azione eliminata da un oggetto associato.
io ho fatto un form contenente un tasto per l'aggiunta di un nuovo record
con questo codice:
Dim ultimo As Integer
Data1.Recordset.MoveLast
ultimo = Val(Label10.Caption) ' alla label10 è associato il campo del numero
progressivo
MsgBox ("Inserisci i dati richiesti")
Command7.Visible = True ' varie per togliere i tasti che non confondano
l'operatore
Command1.Visible = False
Command2.Visible = False
Command3.Visible = False
Command4.Visible = False
Data1.Recordset.AddNew
Label10.Caption = ultimo + 1
Text1.SetFocus
Command8.Caption = "Annullamento inserimento"
poi nel tasto command7 (la cui funzione dovrebbe essere quella di confermare
l'inserimento del nuovo record) ho scritto:
Dim ultimo As String
Dim criterio As String
ultimo = Label10.Caption
' Data1.Recordset.Update 'se lascio questa riga va in corto dandomi l'errore
di cui sopra
Command7.Visible = False
Command1.Visible = True
Command2.Visible = True
Command3.Visible = True
Command4.Visible = True
Data1.Recordset.MoveFirst 'l'errore si manifesta qui
Data1.Recordset.MoveLast
Command1.SetFocus
dove sbaglio? mi sembrava di aver capito

 wrote in message
Cf5S7.296816$sq5.14...@news.infostrada.it...

non capisco bene come stai procedendo:
intanto fra addnew e update  ci dovrebbe essere qualcosa del tipo:
data1.recordset!nomeCampo = ultimo
e poi perchè non setti a contatore il suddetto campo e ti risparmi un pò di
fatica?
ciao

 ha scritto nel messaggio
news:Cf5S7.296816$sq5.14...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB e dichiarazione API

Salvea tutto il ng.
Nell'ultimo periodo sto scrivendo codice VB che usa pesantemente le API di
windows. Fin quì nessun problema se non per il fatto che la documentazione è
parecchio scarsa. Nel senso che su MSDN c'è l'universo intero, ma solo per
chi lavora in C. Non che per me sia un problema la traslazione da sintassi e
tipi dati da C a VB, ma quando ci troviamo di fronte alle solito costanti
chiamate per nome (ma mai con indicazione del valore assunto), allora è un
problema. Per le API comuni è vero, c'è API Viewer di M$ che contiene
dichiarazioni in VB, nonchè costanti e strutture dati, ma è incompleto. Ad
esempio ieri sera guardavo l'API SetWindowLong per effettuare il subclassing
in VB. In MSDN trovo scritto che la funzione esiste ancora per compatibilità
ma che per rendere compatibile l'applicazione con le fututre versioni di Win
a 32 e 64 bit bisogna usare la nuova SetWindowLongPtr. Spinto dal fatto di
creare già da ora applicazioni compatibili per sistemi futuri (nonchè dal
fatto che la stessa istruzione in Win2000 Pro funziona a dovere e in Win2000
Server scomoda Dr.Watson) decido di usare questa API, come doverosamente
indicato da MSDN. Così mi metto alla ricerca della API in ApiViewer ma non
la trovo. Bene, e ora? Visto che è una "estensione" della prima, dichiarata
come:
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA"
(ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
decido di tentare una cosa del tipo:
Public Declare Function SetWindowLongPtr Lib "user32" Alias
"SetWindowLongPtrA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal
dwNewLong As Long) As Long
ma la cosa non funziona, dice che non la trova. Ma non la trova in
User32.dll o non la trova a causa del nome errato? Boh.. Su MSDN non è
specificato in quale DLL la trovo, e come si
chiama realmente (o almeno io non sono in grado di trovarla).
E poi, quando trovo le costanti da passare come parametri: WM_QUALCOSA che
valore ha quella costante? Sono tutte costanti dichiarate negli header .H
dei programmi C, ma io ho VB non C, ma devo usare le API per forza. Come
fare?
Esiste dunque una semplice lista (anche in formato TXT), di tutte le
costanti e strutture dati usate da TUTTE le DLL del sistema operativo? o per
lo meno è possibile scaricare questi header C dal sito Microsoft in maniera
"legale"?
Mi piacerebbe sapere cosa ne pensate di questo problema, e se qualcuno ha
già trovato una soluzione, mi faccia sapere.
Massimo.

 wrote in message
97vh5m$dsn$1...@pinco.nettuno.it...


 "legale"?
http://www.microsoft.com/msdownload/platformsdk/psdkwebinst.asp
Di tutto il Platform SDK cio' che ti serve e' il Build Environment, che
e' la serie completa di header.
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ricerca api adatta alle esigenze

Ho caricato allApi Guide (ma la domanda vale anche per qualsiasi tipo di
sistema che visualizza le api).
Volevo chiedere quali criteri devo usare per trovare un'api che contenga le
funzioni che a me interessano.
La domanda L'ho buttata lě come mi veniva e spero di essermi fatto capire,
in caso chiedetemi cosa non č chiaro :)
--
VB6 Sp5
Grazie, Alcau

 ha scritto nel messaggio
news:KSgr8.124417$1S3.3...@twister1.libero.it...

Clicca prima sulla linguetta Groups. Se non trovi, clicca su File e Search e
indica la parola da cercare e in quale contesto

 indica la parola da cercare e in quale contesto
ma la parola è il nome del controllo ?

 ha scritto nel messaggio
news:A%ir8.123303$%g7.39...@twister2.libero.it...

La parola è quella che pensi possa esserci ai fini della ricerca che stai
facendo (per esempio portb se stai cercando qualcosa sulle porte o keyboard
o mouse, etc.) e nel contesto in cui vai a cercarla (per esempio
dichiarazioni piuttosto che descrizione o esempio)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Cerco un Api

Salve ragazzi, mi occorre un' Api che mi dica su che controllo o oggetto e'
posizionato il puntatore del mouse.
GRazie.


C'č la WindowFromPoint()
Declare Function WindowFromPoint Lib "user32" Alias "WindowFromPoint" (ByVal
xPoint As Long, ByVal yPoint As Long) As Long
Per sapere dove si trova il mouse puoi usare l'APE GetCursorPos().
Ovviamente come tu saprai non con le api non riesci ad ottenere l'oggetto ma
solo l'andle (hWnd).
Penso perň che se lavori con le api ti puň bastare.
Ciao.


Io aggiungerei anche questa...
Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd
As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
che ti restituisce il nome della classe (controllo) riferito all'handle
passato. lpClassName é una stringa usata come buffer, nMaxcount deve
contenere len(nMaxCount).
Genesio

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inviare un file a tutte le macchine di una rete locale

Come posso eseguire il broadcast su una rete locale?
Praticamente vorrei sapere se è possibile inviare solo
una volta un file e che questo venga letto da tutte le
macchine di una rete locale.
Grazie in anticipo dell'attenzione!
Ciao, Raffaele

...


Stefano
Ho trovato anch'io un modo utilizzando il controllo Winsock con protocollo
UDP.
Immetto come RemoteHost un valore del tipo x.x.x.255, lui lo considera
broadcast
e lo invia a tutti i computer della rete, però anch'io ho enormi difficoltà
con file
+ grossi di 10K.
Stò pensando seriamente di dividere il file in pacchetti + piccoli di 10K e
inviarli
ad uno ad uno, ma sembra un metodo abbastanza brutto e lento.
Se trovi qualcosa di meglio fammelo sapere.
Ti ringrazio dell'interessamento!
Raffaele

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

Come creare pulsanti piatti che quando il mouse ci "passa sopra" diventano
3d?
Grazie

 ha scritto nel messaggio
news:J9fE5.21231$N93.7...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: grafica

Scusate il disturbo,
vorrei abbellire il form su cui devo rappresentare uno schema simile ad un
diagramma di flusso (ovvero dei blocchi - che nel mio caso sono
CommandButton -,
collegati da frecce, linee curve,...).
Ora, come posso rappresentare sul form linee curve, frecce (di dimensioni
gestibile),
CommandButton (di forma diversa dal rettangolo)?
Grazie e ciao
Luca

va fatto tutto matematicamente, sia delle linee che delle frecce, magari
tenendo traccia dei collegamenti in una struttura di dati o una classe
Per l'emissione a video puoi usare la Line di VB oppure, se i collegamenti
sono veramente tanti, qualche API del GDI (PolyLine, PolypolyLine, LineTo,
MoveTo ecc)
--
Fabio Guerrazzi
http://www.sourcecode4free.com/cgt
fab...@libero.it
fab...@si.tdnet.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Internet / FTP Come? Dove?

Ciao.
Io sto` facendo un compilatore di pagine web e mi piacerebbe che lo stesso
programma si incaricasse di aggiornare il mio sito via FTP ma non trovo
esempi abbastanza completi da permettermelo.
Dove posso trovare esempi x FTP
E per recuperare pagine www (files .html)
Datemi almeno un'inicazione, un link, Grazie123000, FenixX.
|:-D| FenixX |(-:|
ICQ: 16201896
http://www.angelfire.com/ok/fenixx/
http://space.tin.it/scienza/dfelisar/
FenixX=Visual=Book=Marks=System:[Meteos]-[SuperBarZell]-[MangAnime]-[Music]
WebStation: Main Menu
[SearchEngines] [HotPages] [InternetServices] [MessagesServices]
[Hardware] [Software] [InternetSoftware]
[Friends] [People] [Audio-Music-Radio] [Video-Live-Cam-TV]
[MangAnime] [Doc-Info] [NewsPapers] [Lombardia] [Links2Links]
  ("`-''-/").___..--''"`-._
   `6_ 6  )   `-.  (     ).`-.__.`)
   (_Y_.)'  ._   )  `._ `. ``-..-'
     _..`--'_..-_/  /--'_.' ,'

...


...


...


Ti ringrazio Silvestro ma tutte queste prove le ho gia` fatte e non funzano.
Forse alcuni server mi spediscono il file a blocchi?
Tra questi: Angelfire,Virgilio,MetaSearch. Gli altri vanno anche se un po
lenti.
Inoltre credo di averle provate tutte x utilizzare inet via proxy ma o non
funza o mi ritorna una stringa nulla. In particolare volevo sfruttare le
potenzialita` di Webcelerator che uso regolarmente senza problemi (400Mb di
cache).
In una news si parlava di un metodo alternativo a "inet" creando un'istanza
[create object(...)] mi pare di IE e rimandava al Help del VB (quale
versione=bo) ma non ho trovato altre info al riguardo.
Dico cio` perche` se mi capita` di interrompere il programma mentre lui
attendeva un URL dalla rete, mi impedisce lo stop completo e l'edit del
sorgente uccidendo poi il VB.
In ogni caso ti porgo un pacco d'Auguroni x un felice San Valentino. Ciao,
FenixX.




Newsgroup: it.comp.lang.visual-basic
Titolo: informazioni per un principiante

Ciao a tutto il ng, avrei bisogno di alcuni consigli:
1) e' meglio VB5 o VB6?
2) quanto costano?
3) e' possibile scaricarli gratuitamente?
Grazie a tutti
            Cristiano

3) e' possibile scaricarli gratuitamente?
Purtroppo no... :-)Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto su sincronizzazione dati

Vorrei un aiuto per risolvere un problema di sincronizzazione.
Mi serve soprattutto un "metodo".
In pratica ho un database locale. Ho poi lo stesso database replicato
su di un portatile.
Nel mio programma VB devo gestire una funzione di "sincronizzazione":
In pratica un volta scelta questa funzione di sincronizzazione dovrei
scaricare i dati del portatile, e una volta aggiornati i dati del
server, rimandare i dati "aggiornati" al portatile.
Il problema ovviamente sussiste se ci sono dei record "modificati" sia
sul portatile che sul server.
Mi sapete indicare qualche metodologia per fare questa
"sincronizzazione" senza impazzire troppo...
Grazie
Alessandro

record modificati sul server dall'ultima sincronizzazione.
Mi spiego meglio:
Innazitutto si tratta di tenere aggrionate delle esistenze di
magazzino.
la mattina scarico sul portatile i dati aggiornati quindi
SERVER=PORTATILE
durante la giornata vengono modificati sia i dati del portatile sia
quelli dei server quindi SERVER<>PORTATILE
Alla fine della giornata vorrei riaggiornare il server con i dati del
portatile tenendo conto delle varie modifiche fatte sia sul server che
sul portatile.

 [..]problema di sincronizzazione.

Ciao Alessandro,
volevo chiederti un chiarimento:
da come indichi la sequenza delle operazioni i dati piu' aggiornati sono
quelli sul portatile, quindi se un record esistente viene modificato sul
portatile, tale modifica sara' trasferita al server. Quindi i dati sul
portatile hanno la precedenza perche' aggiornano eventuali modifiche a
record modificati sul server dall'ultima sincronizzazione. Non capisco
perche' dovresti eseguire un'operazione di ritorno?
Se invece il db sul server non viene toccato ma e' solo sul portatile che
vengono fatte modifiche o inserimenti al db, allora potresti prevedere una
tabella d'appoggio dove memorizzare le chiavi dei record che sono stati
modificati dall'ultima sincronizzazione (che ogni volta svuota tale tabella
d'appoggio). Al momento della sincro puoi aprire un recordset contenente i
record modificati sul db del portatile, aprire il db sul server e
aggiornarlo.
Non ho ancora affrontato problemi di questo tipo, ma penso che proverei con
questo metodo, anche se bisogna tenere conto della struttura del tuo db per
trovare la soluzione ad hoc.
Bye
Ste.
--
-------------------------------------------------------------------------
Stefano Masiero
stefano...@flashnet.it
stefano...@lib.disco.unimib.it
Linux-Knights: 
http://www.media.dsi.unimi.it/~linux
-------------------------------------------------------------------------

dipende da come sono strutturati i dati se esiste un archivio che segna
tutte le movimentazioni di magazzino devi solo aggiungere al server i
movimenti in piu se e' solo un contatore che viene aggiornato non credo sia
possibile.
Ciao stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: Metodo Navigate

Sono un principiante e scusatemi
Avrei la necessità di utilizzare il metodo navigate evitando di richiamare
la pagina dalla cache ma vorrei scaricare la pagina sempre aggiornata.
E' possibile ?
Ciao e grazie

 E' possibile ?
Se usi strumenti di M$, la cache è sempre un problema.
Se tu potessi controllare le intestazioni HTTP che spedisci potresti
inserire diverse direttive che tentano di impedire l'uso della cache. Ma non
ne avresti la certezza.
Io in genere utilizzo un trucchetto:
se devi richiamare la pagina 
http://www.reroper.com/pippo.htm
fallo così
randomize
nuovaurl="
http://www.reroper.com/pippo.htm
" & "?" & rnd()
Se l'indirizzo contiene già un punto di domanda (es:
http://www.reroper.com/pippo.asp?p=trtr
),
fai così
randomize
nuovaurl="
http://www.reroper.com/pippo.asp?p=trtr
" & "&" & rnd()
rnd() costringe il client a richiedere la pagina al server perchè dopo il
punto di domanda vengono specificati i parametri di richiesta della pagina,
che ogni volta cambiano.
termoPilucco.

Prova a passare al parametro Headers del metodo navigate la costante
INTERNET_FLAG_RELOAD
il cui valore dovrebbe essere &H80000000
CiAO.

--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.lang.visual-basic
Titolo: leggere file evt

ciao
qualcuno sa come leggere i file *.evt prodotti per i log di win2k?
grazie

 qualcuno sa come leggere i file *.evt prodotti per i log di win2k?
.EVT
 PC Tools Event File Scheduler
 MS WinNT/2000 Event Log
http://filext.com/detaillist.php?extdetail=evt
http://www.filext.com/
http://extsearch.com/
http://whatis.com/ff.htm
http://www.wotsit.org/
http://www.xs4all.nl/~joz/ext.html
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: windows 98 e VB5

Quando provo ad inserire un componente Common dialog control mi appare
l' errore di Vb che mi avverte di non avere le licenze necessarie per
utilizzare
il controllo.
Perchè con W95 funzionava tutto regolare ?
Ringrazio chiunque sappia dare una risposta .
fil...@tin.it

...


Sul cd di VB dovrebbero esserci tutti i file .reg per aggiornare il
registro.
ciao


A me mi funziona.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] NG su W2000

Ciao a tutti,
 sapreste dirmi dei NG dove si tratta di SO (W98, W2000 server ecc.) perchè
avrei delle domande sull'utilizzo del Terminal Server di W2000.
Grazie.
Ciao
Paolo.

 avrei delle domande sull'utilizzo del Terminal Server di W2000.
it.comp.os.win.win2000
--
bye BlackMagic
ICQ: 85485468
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO SELECT con LIKE pazzesco!

O e' lui o sono io (spero di essere io)
VB6 SP5
Una banale select funziona solo se non uso l'operatore LIKE.
Ecco la porzione di codice:
--------------------- connection
Set gCn1 = New adodb.Connection
With gCn1
    .CursorLocation = adUseServer
    .Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &gDbPathname
End With
---------------------- recordset
mSQL = "SELECT * FROM aziende WHERE ragsoc LIKE 'a*' "
Set mRsMain = New adodb.Recordset
mRsMain.CursorLocation = adUseClient 
mRsMain.Open mSql, gCn1, adOpenDynamic, adLockOptimistic, adCmdText 
-------------------------
Ebbene, senza LIKE il recordset contiene tutta la tabella, con il LIKE
invece e' vuoto!
La stessa select con DAO funziona perfettamente (come e' ovvio).
Qualcuno sa cosa c'e' che non va?
Grazie
Gianluca

 mSQL = "SELECT * FROM aziende WHERE ragsoc LIKE 'a*' "
ADO vuole % e _ al posto di (DAO) * e ?

 ADO vuole % e _ al posto di (DAO) * e ?
lupo, o la tastiera più veloce del west...... :-))))
Salutoni
Sergio

LUPO!!!!
Ora controllo ma prima lasciami dire che se tu fossi una ragazza direi
che ti amo alla follia!!!!
(ho spedito il messaggio 10 secondi fa!!!!)


 ADO vuole % e _ al posto di (DAO) * e ?
ehmmm... consentimi...  ;-P
"SQL"  vuole "%"
"*" č solo uno dei tanti esempi di come access "accrocchia"
pur di andare incontro all'utente non professionale...
ciao
ugo

 
Se non erro l'"*" viene usato per indicare tutti i campi di una tabella 
così:
SELECT T1.*, T2.Nome, T2.Cognome
FROM Pippo T1,
    	PLUTO T2
WHERE .....
Giusto?

 Giusto?
Sě, ma non va bene (in ADO, anzi, per dare i giusti meriti all'Ugo
nazionale, a SQL Ansi) nel Like

 che ti amo alla follia!!!!
Controlli se sei una ragazza? ;-)

 pur di andare incontro all'utente non professionale...
Si dice "mi consenta", si pronuncia "mi conscenta".
Quando Lupo lo sente, si mette a ululare, anche alle ore 12:00 di un
assolatissimo 15 agosto!
Ok, ne ha facoltà! Ora però lo ridico (me lo hai strappato): Amo DAO+Access!
Tiè! ;-PP

 Giusto?
Si che č giusto ma serve vale anche da
carattere jolly per Access.
Se non sbaglio i caratteri jolly per Access
sono gli stessi del dos.
            danilo

 sono gli stessi del dos.
Aridaje! Vanno bene (mi riferisco sempre alla clausola Like) con DAO che
adotta un "suo" SQL, non standard al 100%, non per ADO che adotta il
linguaggio SQL Ansi.


Si ok, ma io parlavo di Acces
come ambiente non come file.
    danilo

 
Sono le schifezze che fa la Microsoft....
Newsgroup: it.comp.lang.visual-basic
Titolo: [SEMI OT] Libri su .NET a Genova

Una piccola segnalazione di servizio per i frequentatori genovesi e oriundi
Nell'androne della stazione Principe c'e' una piccola libreria con parecchi
libri in offerta tra cui anche alcuni volumi di informatica *come nuovi*
(forse degli avanzi, il cellophan e' stato probabilmente messo dopo, ma si
vede chiaramente dal dorso e da tutto il resto che non sono mai stati
aperti; quello che ho preso io ee' perfetto)
Tra questi spicca l'ormai celebre Balena, la versione completa, al prezzo
(udite, udite) di 25 Euro contro i 75 di copertina
Non ho verificato se c'e' anche il CD allegato, ma il 60% di sconto parla da
se
Belin figgiêu, son palanche :-)
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Belin figgiêu, son palanche :-)
Me vegne da cianze se pensu che l'aia acatou a presgiu pin e no
l'ho manco lezzuo mezzu :-(
-- 
ciao, hal

 ha scritto nel messaggio
news:8eb25vgn6tafo42je...@4ax.com...

LOL
anche a me... ma mi sono autoconvinto che, perbacco, il mio e' piu' bello,
perche' e' la versione inglese rilegata, si rovina meno, poi l'inglese
tecnico e' meglio... la volpe e l'uva, insomma... ;-)
Per consolarmi ho preso il Richter-Balena (programmazione avanzata per
VB.NET
, c'era anche il Richter e basta, uguale ma basato su C#) a 24
franchi...
Ciao


 l'ho manco lezzuo mezzu :-(
se continuate, faccio postare mia suocera.
o bin laden, che e' lo stesso.

o bin laden, che e' lo stesso.
ti saje' miga un po'... bulicciu?
-- 
ciao, hal
vabbe', ora la smetto

 ti saje' miga un po'... bulicciu?
suocera assente, m'e' toccato guglare:
http://www.ilconfessionile.com/parolaccia/parolaccia_gen02.htm
intendevo la iena bin laden, non la belva :P

[a.p] scrisse:

Trovo irritanti questi post, da parte di qualcuno che, impunemente, si permette
di postare in tedesco.
:-) of course
--
Salutoni
Sergio

 di postare in tedesco.
macche tedesco. i liguri sono una popolazione antichissima. stavano qui
prima dei celti, e' tutto dire.
guarda hal, per esempio.
chi lo direbbe che ha la stessa eta' di tutankamen ?

 chi lo direbbe che ha la stessa eta' di tutankamen ?
In effetti lo trovo piuttosto ben conservato: al confronto otzi è proprio messo
maluccio. Ma pare che abitasse sul lago di garda, che per quanto vasto non è un
mare.
--
Salutoni
Sergio

 mare.
pero' fa molto macho. nel tedesco che tu apprezzi cosi' perentoriamente,
    die see, _la_ see, mare
    der see, _il_ see, lago
e infatti quando si scordano che ancora e nonostante tutto siamo
indipendenti, i tedeschi lo chiamano der gardasee :)
ciao
ps
l'hai testata con loro la birra ? sono degli ottimi beertester :P
Newsgroup: it.comp.lang.visual-basic
Titolo: BACKCOLOR CONTROLLO TREEVIEW

Come da oggetto .... come faccio ad impostare un colore di background in un
controllo treeview??
sarebbe bello metterci anche una figura come sfondo ........
come????
Fr...@rsadvnet.it

 sarebbe bello metterci anche una figura come sfondo ........
'Colore di sfondo.
Private Const TV_FIRST As Long = &H1100
Public Const TVM_SETBKCOLOR = TV_FIRST + 29
lngRet = SendMessage(TreeView1.hwnd, _
    TVM_SETBKCOLOR, 0, ByVal 0&)
Per quanto riguarda l'inserimento di bitmap nel background
del controllo, posso inviarti un esempio.
Non lo posto qui dato che č piuttosto lungo.

Newsgroup: it.comp.lang.visual-basic
Titolo: Spazi nella Command Line

Tramite una funzione Shell avvio WinRar attraverso una linea di comando.
Es.:  Stringa = "WinRAR a C:\6. CODES\code 01.rar " & file 01.txt
      Dim RetVal
      RetVal = Shell(Stringa, 1)
Alcuni nomi di cartelle e files da elaborare contengono degli spazi (che
vorrei evitare di togliere) ma la cosa e' indigesta a WinRar che si
blocca al primo spazio non "regolamentare".
E' possibile formattare la riga di comando per far digerire gli spazi a
WinRar?
-- 
*** Ti piace Piccante? 
www.PeperonciniPerHobby.it
 Facci un Giro! ***

 WinRar?
Che succede se raddoppi le virgolette?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 WinRar?
Prova a racchiudere i percorsi fra doppi apici:
Stringa = "WinRAR a ""C:\6. CODES\code 01.rar"" " & file 01.txt
Oppure
Stringa = "WinRAR a " & chr$(34) & "C:\6. CODES\code 01.rar" & _
 			chr$(34) & " " & file 01.txt
Con winrar comunque puoi anche scrivere in un file tutta la roba da
comprimere, e poi passare il file .lst da riga di comando.
Es.
File C:\Winrar.LST
Contenuto
C:\File1.txt
C:\FileN.txt

 C:\FileN.txt
Col file .lst vengono accettati gli spazi, grazie del consiglio!
Roby.


Newsgroup: it.comp.lang.visual-basic
Titolo: VB --> ACCESS

Ciao a tutti, sono nuovo di qui forse per voi č una stupidata quello che sto
per chiedervi:
Io avrei necessitą da visualbasic di accedere alle tabelle di sistema di
access come la sysobject, ho un controllo data sulla form ma non risco ad
assegnarli la tabellina di sistema di un mio db in access come posso fare?
Gazie a chi mi risponderą
Marco

 wrote in message
6XMh7.5425$%a4.2...@news.infostrada.it...


 autorizzazioni necessarie.
Msysobject è tabella di sistema e come tale non accessibile con una normale
query.
Devi specificare il system database (normalmente il system.mdw) e
login/password dell'utente di amministrazione del database (normalmente
Admin/"")
Prova questo:
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
    con.Open "Provider=Microsoft.Jet.OLEDB.3.51;Password=" & """" & """" &
";Persist Security Info=True;Data Source=C:\db1.mdb;Jet OLEDB:System
database=c:\windows\system\system.mdw"
    rs.CursorLocation = adUseClient
    rs.Open "select * from msysobjects", con, adOpenStatic, adLockReadOnly
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Misteri sul Ctrl + Alt+ Canc

Su Windows 2000, quando si preme la combinazione del saluto a tre dita non
compare il Task Manager come su Xp, compare invece una finestra con diverse
opzioni (Lock computer, Logoff etc.) la cosa interessante è che tutte le
altre finestre scompaiono (è come se si facesse uno switch ad un altro
Desktop).
Sto realizzando un Task Manager e vorrei implementare una simile opzione.
Infatti, se un piantamento riguarda anche "explorer.exe" a volte accade che
il Task Manager faccia comunque fatica a prendere il controllo del sistema
imponendosi sulle altre finestre.
Qualcuno ha idea di come si possa fare o anche solo di come faccia windows a
fare una cosa del genere? Si tratta di un altro Desktop o cosa?

Mi rispondo da solo :-)
http://www.vbaccelerator.com/home/VB/Code/Libraries/Windows/Creating_New_Desktops/article.asp
Newsgroup: it.comp.lang.visual-basic
Titolo: Funzionamento DB - ADO

 
Dovendo ottimizzare un programma che si smazza una buona dose di dati vorrei
vedere se ho abbastanza chiari i meccanismi che stanno dietro a certe
operazioni sui db (Ado). Che differenza c'è tra
RecordSet.Open(NomeTabella,...)
e
RecordSet.Open("SELECT...)?
Immagino che nel secondo caso venga creata una tabella temporanea con il
contenuto della SELECT. In particolare questa tabella temporanea verrà
creata nel db, non nella memoria allocata dal programma (il che spiegherebbe
il lievitare delle dimensioni dei db Access). Questo significherebbe anche
tempi di apertura del recordset più rapidi nel primo caso, non dovendo
creare la tabella temporanea. È così?
Analogamente, accadrà quando applico il metodo Filter: tabellina temporanea
col contenuto del filtro. Dovendo analizzare su una tabella molto grande i
dati a piccoli blocchi, fare una serie di SELECT dei dati necessari o una
Filter dopo aver aperto tutta la tabella dovrebbe dare lo stesso impegno di
risorse e quindi la stessa velocità del codice. Dico bene?
Ciao e grazie!!!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio
news:194Z243Z137Z76Y...@usenet.libero.it...


Ti ringrazio della spiegazione, davvero utile!
I miei dubbi nascono dalla conversione di un programma fatto con DAO (per
Access) per garantire la compatibilità anche con MySQL (usando quindo ADO).
Il problema primcipale è che ho una tabella (di qualsi 300.000 record) che
devo analizzare a blocchi: la tabella contiene una colonna Nome che contiene
il nome degli elementi e una Data (più altri campi). Per ogni nome e ogni
data ho 96 record.
L'analisi deve essere fatta per coppie nome-data, quindi prendo la prima
coppia, carico in memoria i 96 record che la riguardano ed elaboro, poi
passo alla coppia successivo. Con DAO potevo:
a) fissare il bookmark sul primo record di una coppia
b) fare un FindFirst su Nome e DAta per trovare il primo record della coppia
successiva e tramite Absolute position sapere quanti record riguardavano la
coppia (non sempre sono 96!) per dimensionare un vettore.
c) ritorno al bookmark e scorro i record caricando il vettore.
Ora però Find lavora su un solo campo e i bookmark non sono supportati
dall'ODBC di MySQL... e a dire il vero pure AbsolutePosition e RecordCount
con MySQL fanno casino, mi sa che c'è qualcosa che non va nelle stringhe di
connession :-(
Soluzione possibile fare SQL mirate o dei Filtri, ma non vorrei rallentare
troppo: alla fine ho fatto dei cicli di Move Next e MovePrevious, ma non è
che sia bellissimo...
Interessante il discorso dei cursori in sola lettura: questi me li gioco!!!!
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: aprire DB access 2002

Oi!
Sto cercando di aprire un db creato con access 2002, ma non ci riesco,
faccio l' ADODC ma questo non mi risulta attivo quando apro la form e
non mi visualizza i dati.
Qualcuno sa dirmi come fare, o anche mandarmi verso un tutorial che
lo dica?
Grazie mille,
Axč!

 Axè!
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.471 / Virus Database: 269 - Release Date: 10/04/2003

- una stringa di connessione ODBC?
la stringa.
Provider=Microsoft.Jet.OLEDB.4.0;DataSource=db.mdb;Persist Security
Info=False
Axč!

 Info=False
sei sicuro che il db esista?


sei sicuro che il db esista?
si :D
Axč!

Newsgroup: it.comp.lang.visual-basic
Titolo: Form "tagliati"

Salve a tutti, sono nuovo di questo newsgroup.
Ho notato che è molto interessante e ho deciso di postare anche io una
domanda.
So che in vb6 era possibile tagliare i form della forma che si voleva
utilizzando delle api oppure usando dei programmini che generavano i file
frm con già il codice pronto. Ora che è uscito 
vb.net
 vorrei passare a quela
sistema e mi stavo chiedendo come fare.
Ho provato ad usare le stesse api modificando un pò alcuni parametri per
renderle compatibili, ma una volta eseguito il tutto, il form mi diventa
invisibile e vedo solo il titolo nella taskbar (questo con windows XP dove
ho testato .net).
C'è un modo per tagliare i form anche con .net? Non è che magari hanno
creato un oggetto apposito come è stato fatto per l'icona del systray?
Ringrazio anticipatamente per le risposte,
JW

 passare a quela sistema e mi stavo chiedendo come fare.
Per fare form rotondi:
http://www.c-sharpcorner.com/vbnet/vbcode/CircularForminVBNETVK6.asp
--
Dark Hado

 creato un oggetto apposito come è stato fatto per l'icona del systray?
E' un errore usare la funzioni API con .NET, come lo è per gli ActiveX.
.NET ha pressochè tutti gli strumenti necessari per tutte le esigenze.
Nel tuo caso basta usare la classe System.Drawing.Region e la omonima
proprietà del form.
Es.
Me.Region = New System.Drawing.Region(new
System.Drawing.Rectangle(3,4,100,100))
Ciao
--
y = f(
http://neodatatype.interfree.it/index.html
)

 ha scritto nel messaggio
news:aj803c$4ek$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Operazioni ripetitive senza matrici

Se per esempio ho tanti campi con nome progressivo (txtNome1, txtNome2,
txtNome3...) e devo fare un ciclo for next che contenga un istruzione del
tipo
txtNome(index).text="" ma non posso usare matrici, come faccio ?
Grazie a tutti

 ha scritto nel messaggio
news:8ifs6j$aat$1...@nslave1.tin.it...

Mi pare tu possa fare:
    For x = 1 To 5
        Controls("Text" & Format(x, "#")).Text = x
    Next x
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!
Newsgroup: it.comp.lang.visual-basic
Titolo: diskcopy()

Salve. C'e' qualcuno che sa dirmi come fare a richiamare la finestra del
diskcopy dall'interno di un prg in Vb5 ?
Grazie.

 diskcopy dall'interno di un prg in Vb5 ?
Option Explicit
   Private Sub ChiamaDiskCopy()
      Call Shell("rundll32.exe diskcopy.dll,DiskCopyRunDll")
   End Sub
Per i codici di altre funzioni, e per sapere come attendere che
la copia sia finita, 
http://www.mvps.org/vb/tips/shellcpl.htm
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

Newsgroup: it.comp.lang.visual-basic
Titolo: Outlook Expres

Ciao, avevo postato la stessa domanda un po'di tempo fa e nonostante gli
aiuti non ho ottenuto grandi risultati.
Qualcuno sa dirmi come aprire i files dbx di outlook expres?? Oppure sapete
dove reperire un documento che descriva la loro struttura interna?
La mia intenzione č di creare un applicativo in grado di interpretare sti
cavolo di files per fare il backup delle singole mail e per fare altri
lavori simili.
Ciao e grazie fabio
-------------------------------------------------------------------
              Fabio Viganň
Dipartimento Informatica Sistemistica e Comunicazione
Universita' degli Studi di Milano Bicocca
E-Mail: 
fabio....@lib.disco.unimib.it
 
fabio....@tiscalinet.it
URL: 
www.lib.disco.unimib.it/fabio/
Fax: 1782227796
-------------------------------------------------------------------

 ha scritto nel messaggio
news:985g69$ogg$1...@sun250.unimi.it...


 ha scritto


 ha scritto nel messaggio
news:9881kq$nbsj$1...@ID-51318.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Dubbio sulla retrocompatibilità

Come da subject ho alcuni dubbi, non tanto piccoli, sulla retrocompatibilità
tra 
vb.net
 e vb6.
Come è già stato discussi in altri 3d MS ha inserito inVB.NET la possibilità
di utilizzare funzioni e costanti presenti in VB6 ma che non fanno parte del
Framework .NET
1) Quando si crea un nuovo progetto VB, per quello che ho visto, di default
è possibile
usare le varie costanti di VB6 come vbCrLf di cui si è tanto discusso, cosa
si deve fare per disabilitare questo?
2)Esiste un elenco delle funzioni e costanti mantenute solo per
compatibilità?
Esempio come faccio a sapere se la funzione InStr() esiste nel Framework
oppure
esiste solo per compatibilità? Mi devo basare solo sulla guida che mi dice
che
questa funzione è nell'elenco "Riferimenti del linguaggio Visual Basic",
oppure
c'è altro?
Bye BlackMagic

 c'è altro?
Rimuovendo Microsoft.VisualBasic già vedrai che alcuni funzioni non vengono
accettate, il modo però più corretto è quello di studiarsi il Framework
HTH
--
Corrado Cavalli
UGIdotNET - 
http://www.ugidotnet.org

 si deve fare per disabilitare questo?
Vedi miei post come primo riferimento, l'ultimo è stato
[!3][.NET] VB -> 
VB.NET
 senza compatibilità
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"

 [!3][.NET] VB -> 
VB.NET
 senza compatibilità
Fabio mi immagino i post tra qualche tempo,
[!125][.NET 2] VB -> 
VB.NET
 -> 
VB.NET
 2
^__^
-- 
Antonio Cangiano
Webmaster di 
www.visualcsharp.it
free.it.comp.lang.csharp
free.it.comp.lang.vbnet
free.it.comp.lang.aspnet
free.it.comp.lang.delphi
--

 [!125][.NET 2] VB -> 
VB.NET
 -> 
VB.NET
 2
Oggi posto il [!3b]
Ma non c'è poi così tanto da modificare ancora... non so se si andrà iltre
il [10] :)


 il [10] :)
Se non arriva prima la Mamma ;-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Trova di vb6...

Ciao a tutti,
sapete se è possibile fare una ricerca nel codice del tipo
End NOT End If
Dovrei trovare se ho disseminato qualche End nel programma, ma mi trova
tutti i vari end if, end sub ecc.
In realtà dovrei beccarli tutti, dato che stanno nello stesso posto, ma non
vorrei tralasciare nulla.
Eventualmente potrei ricercare per End & vbnewline ma non mi pare sia
possibile comunque :\
Grazie 

Nel suo scritto precedente, Andrea ha sostenuto :

Se apri il codice dei moduli con word, puoi fare una ricerca coi 
caretteri speciali. Sempre che, però, non ci sia qualche commento dopo 
End...
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 End...
Per ora dovrei averli trovati tutti, di solito erano al KeyDown_F1 dei
frmMain.
Comunque penso possa essere quello il problema, dato che i programmi che
presentavano quel problema erano sempre fra quelli che avevano l'End e non
l'unload me (che erano 4/5 su una 30ina).

 End...
Trall'altro nella ricerca c'è:
Usa criteri di ricerca (sotto Maiuscule/Minuscole), ma non mi sembra
funzioni
(ho usata "End~( )" che doveva trovare tutti gli end senza uno spazio dopo)
Vabbè :)

tutti i vari end if, end sub ecc.
Mztools ha una funzione ricerca molto migliore di quella di VB, oltre a tante
altre funzioni utili.
http://www.mztools.com/v3/download.htm
--
ciao
  Stefano

 altre funzioni utili.
Tnx sembra interessante, appena ho un attimo lo provo.
Deduco che non crea casini vero? :)

 trova tutti i vari end if, end sub ecc.
Altro consiglio: puoi utilizzare VB6 Code Advisor per fare ricerche 
complesse all'interno del codice VB6, e marcarle con dei commenti.
VB6 Code Advisor č nato per analizzare progetti VB6 prima di darli in 
"pasto" al Migration Wizard di Visual Studio .NET.
Ma considerato che le rules possono essere anche scritte ad hoc (con delle 
regular expression pattern) č possibile utilizzarlo anche per fare 
ricerche (ed inserire automaticamente appositi commenti) complesse nel 
codice VB6.
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 codice VB6.
Ti ringrazio appena posso ci dò un occhio.

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare su schedine Super Enalotto!!!!

Ho un piccolo problema:
A parte che questa è la prima volta che utilizzo la stampante in uno dei
miei programmi VB, chieo aiuto per la stampa su schedine del Super Enalotto
Computerizzate (quelle a 5 colonne).
Posseggo una HP Laserjet IIP Plus.
Frazie a tutti!
--
Posted from 
mta2.iol.it
 [195.210.91.152]
via Mailgate.ORG Server - 
http://www.mailgate.org

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Viste tra tabelle

Buon giorno a tutti,
sto sviluppando un software in VB6 interfacciato ad
un database Microsoft SQL Server 2000 ed ho un problema di questo tipo:
Ho 3 tabelle così costituite:
Tabella A
---------
TIPO	 
CAMPO1A
CAMPO2A  
Tabella B
---------
TIPO     
CAMPO1B  
CAMPO2B
Tabella C
---------
TIPO
CAMPO1C
CAMPO2C
Io devo ottenere un
recordset (tramite codice SQL) che contiene i tutti i dati presenti nelle 3
tabelle, raggruppati per il campo "TIPO".
Esempio
Tabella A
--------------------
TIPO;CAMPO1A;CAMPO2A
--------------------
1
;Rosso  ;Blu
--------------------
2   ;Verde  ;Arancione
--------------------
3   ;Giallo ;Nero
--------------------
Tabella B
--------------------
TIPO;CAMPO1B;CAMPO2B
--------------------
 1
;Piccolo;Quadrato
--------------------
 3  ;Vuoto  ;Cerchio
--------------------
 4  ;Bello  ;Rombo
--------------------
 6  ;Brutto
;Triangolo
--------------------
Tabella C
--------------------
TIPO;CAMPO1C ;CAMPO2C
--------------------
 1  ;Giovanni;Luigi
--------------------
 2  ;Marco   ;sergio
--------------------
 5  ;Luca
;Andrea
--------------------
 6  ;Gino    ;Pino
--------------------
Devo ricavare il seguente recordset:
Tipo;CAMPO1A;CAMPO2A
;CAMPO1B;CAMPO2B  ;CAMPO1C ;CAMPO2C
---------------------------------------------------------
 1  ;Rosso  ;Blu
;Piccolo;Quadrato ;Giovanni;Luigi
---------------------------------------------------------
 2  ;Verde
;Arancione;       ;         ;Marco   ;sergio
---------------------------------------------------------
 3  ;Giallo
;Nero     ;Vuoto  ;Cerchio  ;        ;
---------------------------------------------------------
 4  ;       ;
;Bello  ;Rombo    ;        ;
---------------------------------------------------------
 5  ;       ;
;       ;         ;Luca    ;Andrea
---------------------------------------------------------
 6  ;       ;
;Brutto ;Triangolo;Gino    ;Pino
---------------------------------------------------------
Ho giò
provato legando le tabelle (SELECT con JOIN), ma non riesco ad ottenere
tutti i dati.
Unendo invece tutti i dati tramite SELECT ed UNION ottengo
il risultato desiderato però le prestazioni a livello di 
tempistica sono
inaccettabili. 
Come posso fare?
Vi prego aiutatemi......
Grazie
Distinti Saluti
--------------------------------
Inviato via 
http://usenet.iol.it

Posta la stringa SQL che esegui. E' più semplice per tutti verificare dove
sono gli errori
L'unione di tabelle è un'operazione abbastanza frequente per chi usa spesso
le istruzioni sql (non io:-))
Fabio
Newsgroup: it.comp.lang.visual-basic
Titolo: postgre sql

qual è il sito "ufficiale" per imparare qualcosa su questo database? per
sito ufficiale intendo il sito dell'azienda che l'ha sviluppato, e su cui
sicuramente si troverà una guida, un tutorial, e via dicendo...
grazie
Ugo

www.postgresql.org
 (ufficiale)
www.pgsql.com
www.greatbridge.com
ciao, Pascal ;)
--
________________________________
Padroni d'ITALIA!!!!!
Perche' perche',
la domenica mi lasci sempre sola
per andare a vedere la partita
della Roma
Perche'
Perche'
tifo Roma
tifo Roma
Ale' Ale'
_______________________________
"Delta Hug" <xx@xx.x> ha scritto nel messaggio
news:eu8b7.126066$Pb6.6...@news1.tin.it...


 
www.postgresql.org
 (ufficiale)
grazie
ho dato un'occhiata al primo sito. ci sono dei tutorial veramente chiari...
solo che una cosa mi ha lasciato perplesso... non si parla minimamente del
VB !!!!
esistono solo C e Python (che io non conosco...)
ma fosse che PostgreSQL è complicatissimo da usare con VB ??
Ugo

Ma no .... è facile da usare come tutte le fonti dati ODBC, già provato, va
una meraviglia con ADODB.
Mario.
"Delta Hug" <xx@xx.x> ha scritto nel messaggio
news:YIub7.125568$Qf6.8...@news2.tin.it...



quindi creare una stringa di connessione a un DB postgresql è semplice? bene
bene...
solo una cosa... per caso conosci dei testi in italiano che trattano postgre
sql? io ero indeciso tra iniziare a studiare questo nuovo DB e un altro,
mysql. ho visto che per mysql ci sono diversi libri in giro, mentre per
postgresql non ne ho trovato manco uno...
poiche sono ancora indeciso su cosa orientarmi, e ho sentito che postgresql
è molto piu potente e stabile, se ci fosse addirittura un buon testo sarebbe
il massimo.
ne conosci qualcuno?
grazie
Ugo

Mi sono, purtroppo, sorbito un intero testo in inglese scaricato dal sito di
Postgresql.
Mi sono chiesto la stessa cosa su MySql  e Postrgesql, esaminando la rete ho
dedotto che il secondo è migliore,
salve, Mario.
"Delta Hug" <xx@xx.x> ha scritto nel messaggio
news:JCQb7.138510$Qf6.8...@news2.tin.it...


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

QUALCUNO CONOSCE QESTO LINGUAGGIO PER  RISOLVERE QUESTO PROBLEMINO...
Come posso fare a spostare una stringa presente in un modulo campo text
..... in un alto text di un modulo in altra pagina HTML , questo qundo
l'utente
preme invia ???
CIAO joe

QUALCUNO CONOSCE QESTO LINGUAGGIO PER  RISOLVERE QUESTO PROBLEMINO...
Si', ma e' corretto trattarlo altrove, ad esempio it.comp.www.html
A proposito, adesso urlo anch' io:
NON SI SCRIVE TUTTO MAIUSCOLO SU USENET, CA%%0!
-- 
ciao, hal


oh ma volete far silenzio ???
che è tutto sto casino ?????
bye :))

che è tutto sto casino ?????
Chiedo tenia ;-)
In effetti gridare non e' educazione :-(
-- 
ciao, hal


Anche se come ti hanno detto questo NON è il NG giusto, volevo dirti che con
l'HTML semplice e puro non si può fare. Ti dovresti affidare alla tecnologia
ASP, che permette di dare 'una memoria' alle pagine web statiche.
-Ciao-
-Luca450Mhz-
Newsgroup: it.comp.lang.visual-basic
Titolo: Invio stringhe MSDOS

Si possono inviare da VB delle stringhe come se fossero
digitate sulla finestra del prompt dei comandi di WinXP?
Mi potete fare un piccolo esempio?
Grazie per l'aiuto, ciao
P. 

 ha scritto nel
messaggio news:ck3767$6ej$2...@carabinieri.cs.interbusiness.it...

comand Shell
-- 
______________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

 comand Shell
Ti ringrazio molto.
Ciao
P.

Newsgroup: it.comp.lang.visual-basic
Titolo: Calcolare i bpm

Ciao
Qualcuno conosce un algoritmo per calcolare i bpm di un file audio ?
Grazie anticipatamente
---------
Jo

non sono sicuro, ma credo che sia nell'header di ciascun file audio
*UN* file audio è un pò generico :) ..ce ne fosse uno di formati...
comunque sia su 
www.wothis.com
 trovi gli header di quasi tutti i formati
audio, se non fosse nell'header sicuramente ci sono gli algoritmi di
calcolo.
ps* se l'url fosse sbagliato (l'ho scritto a memoria) fai una ricerca per
'file format specifications" su un qualsiasi motore di ricerca
--
Fabio Guerrazzi
VB Graphic Developer
http://www.sourcecode4free.com/cgt
fab...@libero.it
ICQ: 64649187

 comunque sia su 
www.wothis.com
www.wotsit.org


 ha scritto

se intendi il bitrate di un mp3, c'e' un'ottima classe sul sito comune
www.it-lang-vb.net
ciao, a.
--
www.comune.modena.it/cittadini/apal/

 wrote in message
news:9td4eu$a2n$1...@fe1.cs.interbusiness.it...

C'é stato un thread una o due settimane fa con il titolo "Calcolo BPM di un
mp3" . Forse c'era qualche informazione interessante per te.
Lo potrai trovare qui :
http://groups.google.it/groups?hl=it&group=it.comp.lang.visual-basic
Ciao
Sal

Ciao
anche io sono interessato all' argomento ma non sono riuscito a trovare
niente,
comunque i BPM di una canzone in genere sono i battiti al minuto,
cioè detto in parole povere quante volte suona  la cassa (basso) di un
pezzo in minuto
Es. un campione di 4 battute di lunghezza 2400 millisecondi  ha 100 BPM
perchè per suonare 100 battute (Cassa,Bassi)  in un minuto ogni battuta
deve suonare ogni 600 millisecondi.
Avendo cosi il riferimento a 100 BPM Possiamo calcolare i BPM di un
campione di 4 Battute di qualsiasi lunghezza
ES. il campioneé di  3360 millisecondi
100:2400=3360:x
X=140
un campione di 3360 ha 140 BPM
La parte difficile è calcolre i BPM di un file wave, mp3 ... ecc mentre sta
suonando
Infatti sto sviluppando un progetto che dovrebbe  mixare due file wave in
modo automatico,
calcolando I BPM di ciascun filee quindi  portandoli allo stesso BPM ,
In modo manuale e un giochetto , basta regolare la velocita del file finchè
lo porti allo stesso BPM,
in pratica come fanno i DJ con i Piatti in discoteca, ma in automatico
ancora non ci sono riuscito
Spero di essere stato chiaro .....
Se avete un idea per risolvere questo mio problema , fatemi sapere....
Grazie in anticipo
------------------
David

Newsgroup: it.comp.lang.visual-basic
Titolo: è solo un test : non aprire

test

 test
esiste it.test.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemone con db access2000!!

 > nei post precedenti?
Nelle "Re:" orfane?

 wrote in message
zpGN8.3771$j65....@twister1.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] valori RGB separati

 remove underscore for mailing

 Grazie a chiunque potra' aiutarmi.
Visto che, spulciando l'MSDN allegato a VB5 ho trovato da solo la soluzione
al mio problema, penso che forse a qualcuno potrebbe interessare.
Ecco la funzione che, dato un intero lungo RGB, ritorna tre interi R, G e
B. Nelle note e' spiegato tutto, quindi penso sia inutile rispiegarle.
'-----------------------------------------------------------------
'PURPOSE: Returns red/green/blue color from RGB color value.
'ACCEPTS: RGB color value as Long, and component number as integer
'         that represents the component color to return (1=red,
'         2=green, 3=blue).
'RETURNS: The intensity of the color component (0 - 255) as an
'         integer or -1 indicating that an argument was invalid.
'-----------------------------------------------------------------
Private Function GetRGB(RGBval As Long, Num As Integer) As Integer
  ' Check if Num, RGBval are valid.
  If Num > 0 And Num < 4 And RGBval > -1 And RGBval < 16777216 Then
    GetRGB = RGBval \ 256 ^ (Num - 1) And 255
  Else
  ' Return True (-1) if Num or RGBval are invalid.
    GetRGB = True
  End If
End Function


che rappresentino rispettivamente i tre colori di base Red, Green e Blue?
Separare le tre componenti fondamentali di colore 
Dim ColorValue As Long
Dim Rosso As Integer
Dim Blu As Integer
Dim Verde As Integer
ColorValue = Form1.BackColor
Rosso = ColorValue And &HFF&
Verde = (ColorValue And &HFF00&) \ 256
Blu = (ColorValue And &HFF0000&)\65536

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Pannello dei controlli dentro VB6

Ciao,
sempre ringraziandovi per la vostra disponibilita', avrei
uno sfizio da togliermi. Come faccio, alla partenza di un
nuovo progetto di VB6, ad avere gia' una serie di controlli
preferiti ed aggiuntivi gia' visibili nel pannello a sx dei controlli,
senza doverli aggiungere uno per uno, ad ogni progetto ?
Avevo sentito dire che occorre specificarli in un file di startup,
ma non so quale questo sia.
Grazie del vostro aiuto.
Saluti,
Andrea Gatti.

senza doverli aggiungere uno per uno, ad ogni progetto ?
Ti crei un file .vbp che riferisca agli activeX che ti interessano
e lo salvi nella sottodirectory Template dove si trova vb6.
Quando creerai un nuovo progetto, ti troverai l'icona del nuovo
modello nella listview dei tipi di progetto e potrai selezionare
giusto il modello che ti sei salvato.
-- 
hth, hal

 hth, hal
Ciao Hal,
grazie, avevo pensato a qualocosa di simile, ma cosi' poi perdo la
flessibilita' delle creazioni guidate, etc. Pensavo ad un file INI da
qualche parte, ma se non c'e', amen.
Saluti e grazie.
Andrea Gatti.

flessibilita' delle creazioni guidate
Sarebbe la tua fortuna ;-)
-- 
ciao, hal