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

Ciao
avrei bisogno che qualcuno mi aiutasse a scrivere il codice per cancellare
dei file.
Il nome del file è in TEXT1.TEXT.......i file sono molti facciamo X e hanno
tutto delle estensioni diverse e numarate in successione es. ex1, ex2, ex3,
ecc...eccc.
Come faccio ad eliminare tutti i file con lo stesso nome ma con estensioni
diverse?
Giuli
giul...@iol.it

 wrote in message
cril3.11270$X%.34947@typhoon.libero.it...


 diverse?
Kill "pippo*"
nel tuo caso:
kill text1.text & "*"
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 tutto delle estensioni diverse e numarate in successione es. ex1, ex2,
ex3,
Usa i caratteri jolly, proprio come in DOS, dovrebbe funzionare...
Kill Text1.Text & ".*"
Cerca Kill sull'help in linea !
Bye, G.
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ODIO Microsoft Chart 5.0 !

Lo ODIO !
Non ho mai visto un controllo più ingarbugliato di questo !?!?@
Non riesco a controllarlo come vorrei !
Penso che lo cancellero' !!
Come CA**O si fa a runtime a variare il font e il size delle etichette degli
assi !!
Mi sono perso dentro le colletions !
Se c'e' qualcuno che lo ama (magari gli sta solo simpatico) mi aiuti !
Disperatamente
Giovanni
-----------------------------------
Giuseppe Giovanni Selgi
Informatica & Networking
Sel...@dns.omnia.it

Mi sono perso dentro le colletions !
ecco come fare - in effetti è abbastanza contorto!:
  ' asse X
   MSChart1.Plot.Axis(VtChAxisIdX, 1).
AxisTitle.Font.Name
 = "Arial"
   MSChart1.Plot.Axis(VtChAxisIdX, 1).AxisTitle.Font.Size = 10
 
 ' asse Y
   MSChart1.Plot.Axis(VtChAxisIdY, 1).
AxisTitle.Font.Name
 = "Arial"
   MSChart1.Plot.Axis(VtChAxisIdY, 1).AxisTitle.Font.Size = 10
ciao Davide

...

Ciao Davide e grazie per l'interessamento.
Avevo già provato ad usare queste istruzioni ma
a me non funzionanano!!!
Mi ritornano un bellissimo errore:
Errore di run-time 394
Proprieta' in solo scrittura
BHO !???
Si, credo proprio che lo cancellero' !
Ciao
Giovanni

Newsgroup: it.comp.lang.visual-basic
Titolo: ottenere IP dal nome dell'host?

Salve a tutti, ho un problema: ottenere l'IP di un sito in rete tramite
l'address dell'host.
Qualcuno di voi ha idea di come fare? Ho provato con gethostbyname ma senza
risultato.
Grazie di tutto

www.allapi.net
	   forse qui trovi qualcosa

...


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO: ftp con Inet

Io devo semplicemente creare un programmino che mi trasferisca un file,
sempre quello, in una dir, sempre quella via ftp.
Ho pensato di usare Inet.
Private Sub Command1_Click()
Inet1.URL = "
ftp.host.com
"
Inet1.UserName = "mioID"
Inet1.Password = "miaPW"
.
.
.
End Sub
E poi? C'è un modo per notificare l'avvenuto trasferimento. Mi basterebbe un
msgbox.
Grazie
franc...@tin.it

 wrote in message 88tmev$kea$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Funzioni C in Visual Basic 6

Ciao a tutti!
Mi hanno detto che esiste un modo per usare le funzioni C in VB
Non sapreste scrivermi il codice di VB che mi permette di farlo (ad es per
una generica      type nomefunz (arg1, arg2..)
Per me è abbastanza importante!!
Grazie a chi mi risponde!
Ciao
Bongio

 Per me è abbastanza importante!!
- MSDN: "Declare"
- MSDN: "Accessing DLLs and the Windows API"
- 
http://makeashorterlink.com/?S37D23D51
  (visto h.p.l.? :) )
Ciao

 - 
http://makeashorterlink.com/?S37D23D51
  (visto h.p.l.? :))
Comodo, vero?
Ciao.
--
BSD is for UNIX-lovers -- linux is for Windows-haters.

 Comodo, vero?
Per chi legge sicuramente, per me un po' meno :P
Ciao

 Per chi legge sicuramente, per me un po' meno :P
Guarda questa pagina:
http://makeashorterlink.com/options.php
Ti trascini uno dei due bookmarklet sulla barra del browser.
Quando vuoi creare il link corto basta che fai clik sul
bookmarlet e te lo genera automaticamente. Senza nessun
copia-incolla.

Newsgroup: it.comp.lang.visual-basic
Titolo: Form sempre in primo piano.

Salve,
è possibile in VB6 fare in modo ke una form rimanga sempre in primo piano
anke se quella attiva (quella su kui si lavora è quella sotto, ne avrei
bisogno per fare una barra di navigazione all'interno di un programma ma la
vorrei sempre in primo paino anke se le form sotto kambiano in base ai
pulsanti premuti sulla barra.......
Pensate sia possibile?
Kome?
Grazie.
Kris.

 pulsanti premuti sulla barra.......
non ho capito molto bene cosa vuoi fare, cmq prova a guardare su MSDN alla
voce SetWindowPos
(se non hai MSDN  --> 
http://msdn.microsoft.com
)
Ciao
Faber

 Kome?
Ma Kome Kavolo skrivi?
...non è originale (è stato "inventato" secoli fa) e neppure simpatico!

 Faber
In verità avrei voluto fare 1 specie di toolbar..... utilizzando una form,
in modo ke kome le toolbar sia sempre in primo piano, per ora ho abbandonato
il proposito e mi akkontento di utilizzare una toolbar, poi vedrò, grazie
komunque, adesso provo a guardare sull'MSDN.
Kris.

 ...non č originale (č stato "inventato" secoli fa) e neppure simpatico!
Sinceramente non voglio essere ne originale ne tantomeno simpatiko a te.....
quindi puoi anke evitare di sprekare banda a rispondermi se non vuoi
rispondere alle mie domande!!!!
Ciao e  grazie.
Kris.

 komunque, adesso provo a guardare sull'MSDN.
se vuoi fare una specie di toolbar, e utilizzi VB >= 5, puoi fare (da
Form1):
Form2.Show ,Me
Ciao
Faber

 pulsanti premuti sulla barra.......
Prova con questo:
Declarations
Option Explicit
Declare Function SetWindowPos Lib "user32" _
    (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
    ByVal x As Long, ByVal Y As Long, ByVal cx As Long, _
    ByVal cy As Long, ByVal wFlags As Long) As Long
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_SHOWWINDOW = &H40
Public Const SWP_NOACTIVATE = &H10
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Sub FormOnTop(Handle As Long, OnTop As Boolean)
Dim wFlags As Long, PosFlag As Long
    wFlags = SWP_NOMOVE Or SWP_NOSIZE Or SWP_SHOWWINDOW Or SWP_NOACTIVATE
    Select Case OnTop
        Case True
            PosFlag = HWND_TOPMOST
        Case False
            PosFlag = HWND_NOTOPMOST
        End Select
    SetWindowPos Handle, PosFlag, 0, 0, 0, 0, wFlags
End Sub
Poi nel codice del form che vuoi mantere on top:
FormOnTop Me.hwnd, True
naturalmente prima di fare l'unload 
FormOnTop Me.hwnd, False
Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: Varie (da ex clipper)

Ho realizzato con clipper un programma per la gestione della produzione di
un'azienda metalmeccanica ed intendo, in tempi non brevi, replicare tale
procedura con VB.
Anche se più avanti ricopierò i miei file .DBF in .DBM, per il momento
vorrei utilizzare i .DBF in quanto intendo sostituire la procedura programma
per programma.
Per il momento sto frequentando un corso di VB è sono un vero principiante,
ma ho tutte le intenzioni di imparare abbastanza bene almeno la parte
relativa alla gestione data bases e delle stampe.
Consigli e suggerimenti sono bene accetti.
Chiedo pertanto a chi volesse inviarmeli (non intendo tutti dalla medesima
persona) qualcosa del seguente elenco:
- esempi di R/W su file .DBF
- un programma simile al DBU di clipper in VB
- un programma simile al PE di clipper in VB
- un programma per accedere alle API (penso alle stampe)
- quant'altro riteniate utile per il mio caso
Per il momento non sono in grado di ricambiare quanto eventualmente
ricevuto; più avanti chissà.
Grazie e saluti.
Imola, 5/12/2001       Sauro

beh, per non diventare matto come un cammello io mi allegherei i files DBF
dentro un file MDB di Access.......non so se sai usare Access, però
praticamente puoi creare un nuovo database completamento vuoto, e allegare
file di altri formati, come appunto il DBF.......
a quel punto di devi studiare DAO o ADO (io consiglio quest'ultimo) per
l'accesso ai database,
e per le stampe penserei a Crystal Report, con cui mi trovo bene......
per avere maggiori informazioni, guarda il sito comune........
e cmq impara prima di tutto la programmazione ad oggetti, secondo me: se
concetti come oggetto, proprietà e metodo non ti dicono niente, parti
PROPRIO DA ZERO........e allora sei nei guai......
ciao, e very good coding in the future!!!!
:-)))
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

-
quant'altro riteniate utile per il mio caso
gli NTX sono inutilizzabili,
usa l'SQL. Considera che in VB l'uso di DBF rispetto agli MDB riduce le
prestazioni del 20/30%
Buon lavoro e onore al clipper!, che come
linguaggio procedurale non ha eguali. Haimè ci vogliono segare il DOS..
Ciao
Fabio
--------------------------------
Inviato via 
http://usenet.iol.it
 

 Fabio
Eh no ! Il migliore era FOXPRO, ;-P
Veloce come Clipper, e con un IDE molto più piacevole, senza bisogno di
compilare ogni volta che si cambiava una virgola.
E dire che ho cominciato con DBase II su CPM (non c'é mai stato un DBase
I ), poi DBase III, una breve sortita in Clipper, e infine la scoperta di
Foxpro
(moooolto prima dell'acquisto da parte di M$).
Ciao
Sal
Newsgroup: it.comp.lang.visual-basic
Titolo: Qualcuno sa come si usano i display?

Ciao a tutti.
Devo utilizzare un display integrato di un IBM SurePos 500, ho scaricato
le librerie OPOS ma non riesco nemmeno a farglielo riconoscere.
Qualcuno mi sa dire qualcosa?
Grazie
Francesca
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Qualcuno mi sa dire qualcosa?
Sono installate correttamente?
Codice?
Come hai definito l'oggetto Display?
Ciao
Aran Banjo
<math> 2 + 2 = 5 for sufficiently large values of 2</math>

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO: ricerca record

Non riesco a usare i comandi Findnext, findlast... ecc
chi mi puņ aiutare?
Magari spiegandomi come fare e inviandomi un listato con esempio?
GRAZIE... sono un dilettante!
Aldo

La Guida in linea ti puo' aiutare moltissimo.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Come salvare le mail ...

Cioaz
Come faccio a salvare le mail e il loro contenuto ( file allegati ) da un
database di outlook express quindi in formato .DBX???
Nom mi dite esporta da outlook......volevo un prg o qualche dritta su come
realizzarlo.....non so proprio da dove partire.....
Ps: uso vb6 e lo conosco un po' ;)
Grazzzzie


Penso che la soluzione migliore sia cambiare client di posta.
Io come client di posta uso outlook (non express, l' altro)
per ragioni di lavoro, ma ritengo che sia una schifezza.
L' unica cosa per cui mi era venuto bene era stato per
importare la posta da outlook express, cosi' me la
sono potuta riesportare abbastanza facilmente fuori
da outlook.
Sul client di posta alternativo da usare, mi piacerebbe
leggere i commenti di un po' di gente, anche perche'
vorrei adottarne uno esclusivamente per la mia posta personale.
Ciao
Aldo


Volendolo fare con VB, l'unico consiglio che ti do' e' di
lasciar stare. E' un'operazione molto complicata.
Ci sono due progettini per aria: uno di Jimi ed uno mio.
Se vuoi dilettarti anche tu ti passo i tracciati dei files dbx,
ma sono parecchio complicati.
Soluzione rapida: cambia client di posta.
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 Soluzione rapida: cambia client di posta.
ci sto pensando seriamente...
intanto mi puoi allungare i tracciati p.f.
grazie e ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Spiegazioni

Ciao a tutti
Vi racconto un fatto che mi è successo oggi in ufficio.
L'ufficio segreteria ha un programma per la gestione del personale.
Questa mattina la segretaria non riusciva ad stampare con questo programma.
Il programma quando si andava su stampa dava un errore di run time mi sembra
errore n.484.
Provando con parecchi tentativi non siamo riusciti ad risolvere il problema.
Abbiamo poi chiamato il fornitore del programma per spiegazione dell'errore
che usciva fuori
e il fornitore ci ha fatto notare che il personal aveva i colori dello
schermo a 256  e ci ha
spiegato che il problema era propio questo. Abbiamo aumentato i colori dello
schermo  (portandoli ad 16 bit)
 e il programma ha iniziato ad stampare.
Potete spiegarmi cosa centra i colore dello schermo e la stampante?
Ciao e grazie 1000

Potete spiegarmi cosa centra i colore dello schermo e la stampante?
Ehm, c'entra qualcosa con il visual basic?
-- 
ciao, hal

 Ehm, c'entra qualcosa con il visual basic?
Evidentemente il programma era fatto in visual basic.
Ma poi..mi sembra abbastanza IT....non hai niente da fare?
Ciao

....non hai niente da fare?
Sto studiando vb tramite questo newsgroup. E tu?
-- 
ciao, hal

>> "hal1961" e "MatLaw"
Su ragazzi state buoni :-)
In effetti mi sembra abbastanza [OT]...però sarebbe interessante se una coas
del genere potrebbe accadere
anche da VB (al di fuori del linguaggio del prog di Marco...)
Alex

 Sto studiando vb tramite questo newsgroup. E tu?
Stessa cosa.
Però se mi capita un errore cosi e nella ricerca dell'errore all'interno del
mio ng preferito trovo risposta sarei contento.
Insomma penso anche io quello che ha detto Alex1980.
Senza rancore :)
Ciao :)

Ciao :)
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: una voce in list

cliccando su vari Bookmark di una Grid inserisco delle voci in un file INI
da dove rilette vengono immediatamente visualizzate in una List (cosi' ho
visione aggiornata di quanto inserito nel file).
Superata la lunghezza fisica dell' oggewtto list, compare la scroll
verticale,ma io vorrei, se possibile, fare in modo che la list (il
"bookmark" della list) sia posizionata all' ultima voce inserita. Come
potrei fare ?
Grazie
-- 
Gulp ! Forse mi sono perso qualcosa !

 potrei fare ?
Vedi NewIndex e TopIndex

Newsgroup: it.comp.lang.visual-basic
Titolo: Stringa sql per cercare date

Ciao a tutti,
eccomi con un altro probelino che vado subito ad esporre :-)
Ho una tabella con un campo data/ora (es. 31/05/2007 09:30)
Come faccio a filtrare tutti i record che hanno una data in comune, senza
prendere in considreazione l'ora?
Uso VB6, Ado e SQL server
Grazie a tutti.. Maurizio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie a tutti.. Maurizio
ad esempio:
SELECT Data
FROM Tabella
WHERE (CONVERT(varchar(8), Data, 112) = '20070531')
William. 

 Grazie a tutti.. Maurizio
Altri 2 modi oltre a quello di William:
1) usando la proprietą Filter del recordset.
rs.Filter = "(CampoDataOra >= #01/06/2007#) AND (CampoDataOra < #02/06/2007#)"
2) filtrare i record alla fonte, specificando una simile condizione nella
clausola where della query.
SELECT ...
FROM ...
WHERE (CampoDataOra >= '2007-06-01') AND (CampoDataOra < '2007-06-02')
oppure
WHERE CampoDataOra BETWEEN '2007-06-01' AND '2007-06-01 23:59:59'
Nota: non si puņ usare BETWEEN nella clausola Filter...
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

 ad esempio: [...]
...
Grazie


 WHERE (CampoDataOra >= '2007-06-01') AND (CampoDataOra < '2007-06-02')
...
Alla fine ho messo in pratica questa... E' impensabile come a volte ci si
perda davvero in un bicchiere d'acqua!
Grazie ancora... Maurizio


Newsgroup: it.comp.lang.visual-basic
Titolo: VB -- Access

Qualcuno sa se si può importare una maschera da access a Vb?
Grazie
Ciao
Simo

Qualcuno sa se si può importare una maschera da access a Vb?
Credo che abbiano inventato qualcosa che lo fa, ma, anche se fosse,
dubito fortemente dell' affidabilita' di uno strumento simile.
Imho ti devi ridisegnare le maschere :-(
-- 
ciao, hal

 Imho ti devi ridisegnare le maschere :-(
o imparare un nuovo linguaggio:
http://www.vector.co.jp/soft/dl/win95/prog/se118594.html
chissa' se traduce a2vb in ideogrammi.
di certo, sui filename dell'lzh zipmagic si trova in serie difficolta'.
e' convinto che il disco (c:) non sia formattato.
j.jp

" <dsimo<nospam> ha scritto nel messaggio
news:ad01rv$ljs$1...@usenet.itgate.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: lavorare come programmatore

conosco perfettamente il linguaggio basic e mi chiedevo come posso
sfruttare le mie capacità.
Cioè in italia a chi posso rivolgermi per trovare posto come
programmatore?

 ha scritto nel messaggio 
news:d1200k...@56hg6.5588i.3556.1614.8i116l9...

it.lavoro.offerte
annunci.tiscali.it/tuttitalia/lavoro
www.assioma.org
www.it-recruitment.it
www.job-net.it
www.jobonline.it
www.stepstone.it
Ave
giuseppeD
---
CCR

 sfruttare le mie capacità.
Bastasse conoscere un linguaggio per essere un buon programmatore... :D
Andrea

alex ha scritto:

non per smontare i tuoi progetti, ma per farti un'idea di come butta il
mercato dell'informatica fatti un giretto su it.lavoro.informatica
ciao e buona giornata
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Bastasse conoscere un linguaggio per essere un buon programmatore... :D
eh lo so, meglio che nientee!!!
Io sono cresciuto col Basic partendo dal GW-BASIC, ma ora con l'età e
sempre più difficile impararne un altro :-)

 ha scritto nel messaggio
news:d13pvk...@56hg6.5588i.3556.1614.8i116l9...

ma quanti anni hai?

ma quanti anni hai?
27

 27
Da come parli sembra che ne hai 70!
Ma a 27 anni impari un mondo e l'altro...
Non è che forse ti manca la voglia? <eg>
bye
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.sinapsi-antispam.tk
http://www.nicolaottomano.it/sinapsi.htm
Ingrosso Orologi.
http://www.supertop.it
email spamtrap: 
spam...@nicolaottomano.it


azz... io ho iniziato a programmare a 35/36...
-- 
ciao, hal

Non č che forse ti manca la voglia? <eg>
beh insomma, siamo sulla via dei 30, non č piů come avere 15 anni :-b

 beh insomma, siamo sulla via dei 30, non è più come avere 15 anni :-b
una delle cose, belle o brutte dipende da te, ma direi abbastanza sicure
di questo mestiere, è che non puoi mai smettere di studiare e di imparare
cose nuove.
se già adesso fai fatica, o ti spaventa la fatica che potresti fare per
imparare qualcosa di nuovo, cambia mestiere.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo


 per imparare qualcosa di nuovo, cambia mestiere.
Quoto integralmente il sempre saggio MBB.
Un Paperino 44 "and counting...".

 imparare qualcosa di nuovo, cambia mestiere.
eh, ma cambiare mestiere vuol dire dover imparare qualcosa di nuovo ;-)
-- 
ciao, hal

"hal1961"

conosco gente che si limiterebbe a imparare l'indirizzo della nuova sede :)

imparare qualcosa di nuovo, cambia mestiere.
si hai ragione, ma è che una volta riuscivo a farlo anche
divertendomi.
Adesso metti lo stress, un pò di pigrizia, problemi personali; insomma
qui non è il posto adatto per parlarne...
Newsgroup: it.comp.lang.visual-basic
Titolo: DataReport e VB6

Salve a tutti, il mio problema è il seguente: ho realizzato un report con
DataReport di Vb6 che non riesco a stampare con l'orientamento orizzontale,
la stampante è una laser HP collegata in rete, come posso fare? ho
utilizzato sia l'oggetto printer che il commondialog ma senza risultati.
Grazie per la risposta.  Goku

 wrote in message
4QId5.9850$sE5.1...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: sito comune Errore!

 Ho ricevuto questo errore facendo una ricerca sul SC (dopo circa 40 secondi
di attesa) la mia connessione č abbastanza buona, perņ ho notato che stasera
il SC č Moooooooooolto lento.
Ciao
Pagine ASP error 'ASP 0113'
Timeout script
/result.asp
Il tempo massimo disponibile per l'esecuzione di uno script č stato
superato. Per modificare tale limite di tempo, impostare la proprietą
Server.ScriptTimeOut sul valore desiderato o modificarne direttamente il
valore utilizzando gli strumenti di amministrazione di IIS.

 /result.asp
Evidentemente il server era sovraccarico... e gli script andavano in
timeout... :(
Solo una cosa... includi nel subj il tag [Sito Comune], per facilitare ai
webmaster (specie a quelli indaffarati) l'individuazione del messaggio! ;)


Tornerei al mio post sui timeout.
Che dici?
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: vb 2005 inibire left click e right click

Nella mia applicazione non voglio che sia usato il mouse. (si, voglio
fare il dittatore :) )
Ho fatto System.Windows.Forms.Cursor.Hide(), ma l'utente può ancora
spostare a caso il mouse e cliccare rischiando di lanciare una bomba
atomica direttamente sulla mia casa :)
Perciò mi chiedo: è possibile bloccare i tasti del mouse?
Ciao!!

Perciň mi chiedo: č possibile bloccare i tasti del mouse?
ma credo che se googli trovi qualcosa di sicuro 
(con le API molto piů presumibilmente)
puoi altrimenti fare in modo che il form
e i controlli "rimangano insensibili" ai click
puoi sennň restringere il movimento del mouse 
ad una determinata area con l' api "Clip..." (non ricordo),
magari all ultimo pixel in basso a destra cosě la forma
sta fuori dallo schermo
ma una idea meno drastica?



aggiungo che in vb 6 credo potevi subclassare il form
ricevere i messaggi del mouse e scaricarli 
ma ripeto in vb2005 dovrebbe esserci un metodo piů pulito...

 ma ripeto in vb2005 dovrebbe esserci un metodo più pulito...
si spero anche io
googlando non ho trovato molto...
apparte il mio post al primo posto nei risultati di "vb inibire
mouse" ;)

mouse" ;)
vabbhč, cerca :
disable mouse click
disable mouse key
track mouse messages
trap mouse messages
e poi posta anche su 
microsoft.public.it.dotnet.vb

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiunta Campi tra 2 tabelle di altrettanti Dbase SQL

Salve a tutti,
Avrei la necessità di filtrare dei dati da una tabella che si trova su un 
Database SQL (DBASE1) e aggiungerli in una tabella sul Database SQL di nome 
DBASE2,
come posso fare?
Normalmente uso questa stringa:
SQl = "INSERT INTO Tabella_Dest (Campo1, Campo2, Campo3) SELECT 
[TAB-Sorgente].Campo1, [TAB-Sorgente].Campo1, [TAB-Sorgente].Campo1 From 
[TAB-Sorgente] WHERE ((([TAB-Sorgente].Campo4)='Pippo'));"
ma chiaramente, la tabella [TAB-Sorgente] non si trova nel Dbase 
destinazione...
Grazie a tutti... 

 come posso fare?
albe diceva di fare così:
http://www.google.it/groups?hl=it&lr=&selm=2skgmlF1lu6s7U1%40uni-berlin.de
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Application Setup Wizar

Come si fa a fare in modo che un mio programma venga installato nella
directory pippo e che nel menu avvio appaia il nome pluto ?

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio di dati tra forms

Ciao a tutti.
Ho una piccola domanda. Come posso fare per passare dei dati da un
form all'altro. Per esempio su di un piccolo form ho creato una lista
con i nomi delle partite salvate da un gioco.Cliccando sul nome di una
partita si apre un'altro form e si chiude quello precedente. In quello
nuovo voglio modificare  per es. il valore dei soldi. Ovviamente la
modifica deve essere relativa alla partita precedentemente
selezionata. Come posso fare. 
Io volevo scrivere il percorso  da qualche parte, per poi utilizzarlo
su qualsiasi form, ma mi sembra un sistema un poco grossolano.
Grazie a chi mi puň aiutare.
Ciao

 Ciao

se crei una struttura dati in un modulo del progetto
type Partite
    ....
    nome as string
    punteggio as long
    ......
end type
sempre nel modulo dichiari un'array con il tipo appena creato
Global MiePartite(500) as Partite
e una variabile che ti segna che partita hai selezionato nella lista
Global CurrentSelected as long
nella form1 visualizzi la lista
for x=1 to 500 (oppure fino a quelle utilizzate)
    'visualizzo la partita X
    List1.List(x)=MiePartite(x).nome
next x
quando selezioni la partita setti la variabile
CurrentSelected=List1.ListIndex
quindi nel secondo form puoi utilizzare i dati:
MiePartite(CurrentSelected).Punteggio=.......
spero di essere stato esauriente
Ciao
Stefano


 Ciao
Creati una struttura in un modulo.bas così rimarrà memorizzata per tutta
l'esecuzione del programma...
E' meglio metterli in una struttura così sai che per modificarla dovrai
utilizzare solamente e unicamente quella varaiabile...
Es. in un modulo .bas scrivi
Public Type nome_struttura_che_vuoi
  nome_partita1 as String
  nome_partita2 as String
  ... (scrivi tutte le partite che vuoi... però se pensi siano tante usa un
array)
  nome_giocatore as string
  soldi as double
End Type
E poi ti dichiari una variabile pubblica nel modulo.bas che richiami la
struttura, così solo lei potrà accedere a questa
Public nome variabile as nome_struttura_che_vuoi

 Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: file di dati

Salve,
ho notato in diverse applicazioni che anzichè
usare un database vengono utilizzati dei file
di dati (es. "xxx.dat").
Qualcuno mi può spiegare la differenza?
P.S.
Come sicuramente avrete notato sono alle
prime armi :-)

Qualcuno mi può spiegare la differenza?
I file DAT sono solitamente nel formato dati nativo di visual basic e sono
utili se non devono diventare troppo grandi perchè non supportano nessun
tipo di indicizzazione o ordinamento.
Newsgroup: it.comp.lang.visual-basic
Titolo: passaggio connessione ad db

ho fatto un exe activex che espone una proprietą  connection
ma quando gli passo la connessione gią aperta da un'altro processo mi
restituisce n errore qundo passo la medesima come parametro al metodo open
del recordset
ho inseirto anche un controllo nel activex per controllare che la
connessione sia effettivamente aperta e me la da come aperta!
aiutatemi!
grazie Mattia

 open del recordset
ehm... cosa passi?
La connessione come oggetto o la sua ConnectionString ?
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi Report

Non riesco a selezionare dei records tramite una doppia chiave di
ricerca, Con singola chiave funziona tutto ma non riesco a far le
ricerche incrociate per poterle poi stampare......
Grazie.....
MINO
E-mail : 
sta...@starbit.com

Cerca di essere più preciso, che tipo di chiavi utilizzi ??


Ho risolto il problema delle ricerche con doppia chiave di ricerca e
ne ho uno nuovo.
Praticamente devo poter stampare tutti i record da una certa data ad
un' altra che decide l'utente.
Es.: i Movimenti Bancari dal 01/01/1980 al 31/12/1980
Come Faccio.....?
Grazie.....
Ciao.....
E-mail : 
sta...@starbit.com

Devi filtrare i  record in questo modo:
d1= "01/01/98"
d2="01/02/98"
CristalReport1.SelectionFormula = "{DataBase.Data}>=d1 and
{DataBase.Data}=<d2"

Newsgroup: it.comp.lang.visual-basic
Titolo: File random

Come faccio a caricare tutti i record di un file random (20000) in una
tabella per fare delle ricerche?
Dato che i dati dopo averli visualizzato in vari modi non mi servono piu', č
conveniente memorizzarli in una tabella?
Il record č lungo 32 byte e contiene vari campi, ad esempio l'ora č in tre
byte ora, minuti, secondi.
Grazie

Se carichi una tabella di access, quindi un mdb guarda nel esempio biblio come
si apre (dipende dalla versione VB che usi), dopo vai a crearla in Datamanager.
Usi la sintassi che trovi nel esempio e la leggi, quindi lo riporti nella tua
applicazione.
Ma pensaci bene: Vuoi leggere 20'000 records per poi riscrivere 20'000 records
per poi ricercare 20'000 records con opzioni di lettura a basso livello? Ti ci
vuole 4 volte il tempo che ci metti a fare la ricerca direttamente nel file
random. Inoltre: se fai girare il tuo programma in PC con poca RAM ne soffre
anchora di piu.
Saluti
M. Carretti
Giuseppe ha scritto:


Grazie del consiglio.
Newsgroup: it.comp.lang.visual-basic
Titolo: Listviw  e drag&drop

Ciao a tutti
Se io ho due listview in stile "Report" posso fare drag&drop sui singoli 
items in modo da spostarli da una listview all'altra?
Come?
Grazie 

 
Private Sub LV_parz_MouseMove(Index As Integer, Button As Integer, Shift 
As Integer, x As Single, y As Single)
If Button = vbLeftButton Then
     For i = 1 To LV1(Index).ListItems.Count
         If LV1(Index).ListItems(i).Selected Then
             LV1(Index).Drag vbBeginDrag  ' Drag operation.
             Exit For
         End If
     Next i
End If
End Sub
Private Sub LV1_DragOver(Index As Integer, Source As Control, x As 
Single, y As Single, state As Integer)
If Source.name = "LV_parz" Then
...
End If
End Sub
Private Sub LV1_DragDrop(Index As Integer, Source As Control, x As 
Single, y As Single)
     If Source.name = "LV_parz" Then
         Source.Drag vbEndDrag
...
ciao
	maxx

 Grazie
Prego
Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 e kit di aggiornamento.

Come faccio a creare un kit di aggiornamento??
Riesco facilmente a generare kit di installazione  modificando il
progetto Setup1.vbp ed editando il file setup.lst, etc etc.
Il problema nasce se devo installare delle DLL e delle OCX già
registrate nel sistema. Sembra che non riesca a cancellarle e
sostituirle con le nuove.
Domande:
    1)    Esiste un parametro nella riga di installazione del file
setup.lst che permette la deregistrazione di un oggetto registrato?
(Es: la riga
File101=1,,DatiProtoPrj.dl_,DatiProtoPrj.dll,$(PathDll),$(DLLSelfRegister),$(Shared),5/28/1999
15:47:00,8704,,"","",""
installa e registra la DatiProtoPrj.dll grazie all'opzione
DLLSelfRegister )
    2)    Devo modificare il progetto Setup1.vbp ed inserire a mano dei
comandi REGSVR32 /U XXX.DLL prima dell'inizio dell'installazione vera?
    3)    Cosa caxxo devo fare?
Grazie a chiunque può aiutarmi.

     3)    Cosa caxxo devo fare?
fatti l'upgrade col setup Wizard, installando solo le DLL (edita il file
seup.lst), oppure, al massimo, disinstalla l'app. vecchia dal pannello di
controllo e poi reinstallala con le dll nuove
P.S.
Non sarà che il progr. non ti permettere di sovrascrivere le DLL perché
sono in uso?
-- 
Ale...@tiscalinet.it
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa di etichette

Ho realizzato un piccolo programma che gestisce la stampa di etichette
adesive a fogli continui.
le etichette si distanziano l'una dall'altra do 5 cm e quindi ho impostato
lo scalemode dell'oggetto printer a vbcentimeters dove una variabile che si
incrementa di 5 unità per etichetta arriva a diventare 'numero_etichette*5'
Nonostante questo metodo penso che sia poco elegante (non ne conosco altri)
ho il problema che la stampante riconosce la fine del formato A4 e mi sballa
la stampa che va oltre.
Come dovrei fare? o meglio: come si divrebbe fare?
grazzzzzie!

 ha scritto nel messaggio
news:qEP89.83596$n04.2...@twister2.libero.it...

Domanda: la stampante, di suo, è settata correttamente?
Se non ricordo male la gestione della stampa in modulo continuo, sulla
stampante è memorizzata la dimensione del foglio, in modo tale che quando
arriva a quella che secondo lei è la fine di un foglio passa all'inizio del
successivo; quindi le strade dovrebbero essere 2:
1) spiegare alla stampante che il foglio è alto 5 cm, di conseguenza nel tuo
programma fai un printer.enddoc (o printer.newpage, ma controlla qual'è il
metodo esatto perchè non lo ricordo bene) alla fine di ogni tua etichetta
2) spiegare alla stampante che il foglio ha una lunghezza infinita.
Fammi sapere come è andata perchè l'informazione potrebbe essermi utile
Salutoni
Sergio

 2) spiegare alla stampante che il foglio ha una lunghezza infinita.
Io proporrei una terza possibilità, quella che io ho adottato:
Dichiaro la dimensione del foglio esattamente identica alla realtà, magari
con dimensione personalizzata se non prevista fra gli "standard" della
stampante. Mi riferisco al foglio che contiene tutte le etichette, non al
foglio "virtuale" corrispondente alle dimensioni di un'etichetta. Poi, per
parametrizzare il tutto (non dimentichiamo che non è affatto scontato, anche
se auspicabile, che la prima etichetta di un foglio disti dall'inizio foglio
quanto un'etichetta "interna" al foglio dista da quella che la precede) ho
chiesto (depositando le risposte, ovviamente) l'intera "mappatura" del
foglio: numero etichette in altezza, numero etichette in larghezza, e
_tutte_ le distanze relative (dimensioni etichette, distanze verticali e
orizzontali fra di loro, distanza della prima riga di etichette dall'inizio
e dal margine sinistro del foglio).
In tal modo, se le indicazioni date dall'operatore sono corrette in
relazione alle etichette impiegate, io non toccherò mai più la mia routine.

Newsgroup: it.comp.lang.visual-basic
Titolo: internet control e dimensioni

in un form metto un internet control
chiamo il metodo "navigate" su una pagina web
mi piacerebbe sapere, in twips, quanto è "grande" la pagina web, per
ridimensionare l'internet control in modo che la contenga tutta, senza barre
di scorrimento.
Sapete come si fa?
grazie.

Me.ScaleWidth
Me.ScaleHeight
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no
web: 
http://www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: TextBox legato ad un documento

Si puo' collegare una textbox ad un documento? Mi serve per visualizzare
le istruzioni sulla prima form del programma e dato che sono tante
vorrei scriverle in un documento word e poi collegarlo alla textbox in
modo da poter anche avere i caratteri in grassetto e un minimo di
allineamento.
Grazie.
Jerry
--
Automatic posted from 
camcic.unicam.it
 [193.204.8.13]
via Mailgate Server - 
http://www.mailgate.org

> Si puo' collegare una textbox ad un documento? 
no. Puoi perņ collegare un file rtf all'apposito controllo.
Ciao Bruno

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] problema con controllo inet

Devo trasferire un file di contabilita' estratto da una mia applicazione ad
un sito ftp ed e' la prima volta che utilizzo il controllo inet.
Ho un problema strano, dopo la chiusura del programma questo rimane attivo
per qualche minuto sia compilato che da visual basic.
Questo e' la porzione di codice utilizzata per il trasferimento, ho provato
anche ad eliminare la parte relativa all'estrazione dei dati ed a mettere il
codice in un singolo form ma il problema rimane.
In realta' al cliente la cosa non dovrebbe dar fastidio poiche', a parte un
piccolo rallentamento, non si vede nulla, pero' se qualcuno sa come
risolvere gliene sarei grato.
With Inet
    .URL = "
ftp.dominio.it
"
    .UserName = "pippo"
    .Password = "Pluto"
    .Execute , "Put  C:\Temp\file.txt /public/file.txt"
     While .StillExecuting = True: DoEvents: Wend
    .Execute , "CLOSE"
End With
end

 ha
scritto:

Ciao č successo anche a me, anche se invece del controllo inet ho usato le
api di wininet.dll che anche il componente usa.
Ho scritto anche sui newsgroups della microsoft ma non sono mai riuscito a
risolvere il problema che per me era molto piů grave in quanto avendo la
logica della connessione in un componente separato il programma chiamante mi
rimaneva surgelato anche per diversi minuti.
Se ti interessa ho risolto trasformando la dll di accesso ai dati in un
activex exe che chiudo subito con l'api terminateprocess.
ciao.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 activex exe che chiudo subito con l'api terminateprocess.
Purtroppo ho la necessita' di avere un eseguibile "leggerissimo" e come
suggerisci tu diventerebbe molto piu' pesante, una curiosita': il problema
ti si e' presentato solo con W2K o con tutti i sysop?
ciao e grazie del consiglio

cè una patch per il controllo inet che viene installata con l'ultimo service
pack (sp6) non ricorso se è relativa al tuo problema... prova a darci un
occhiata...
CIAO

 ha scritto nel messaggio
news:2m7erjF...@uni-berlin.de...

io ho provato in w2k e xp tra l'alrto il problema sembrava random, e pure la
durata del congelamento variava di volta in volta.
Newsgroup: it.comp.lang.visual-basic
Titolo: Unire 2 tabelle per aggiornare

Ho un database con due tabelle
1) [Generalità], contiene campi tipo NID (counter), Cognome,
datanascita, sesso etc etc etc...
2) [Prestazioni], contiene NID (in comune con [Generalità]), Note etc
etc etc
Qualcunoi mi può fare un esempio di query per aggiornare
contemporaneamente le due tabelle, e affinchè quando visualizzo un
record di una tabella venga visualizzato il record corrispondente
dell'altra tabella?
(Non so se mi sono fatto capire...spero di si)
Grazie in anticipo.
Robin

 dell'altra tabella?
Leggi la documentazione sul 'JOIN' nalla sintassi del SQL
SELECT a.*,b.* FROM a INNER JOIN b on a.ID=b.ID
ritorna una tabella con i campi di a e b 'affiancati'

 (Non so se mi sono fatto capire...spero di si)
Ovviamente non abbastanza. Sono dell'idea che se avessi espresso il tuo
quesito in maniera perfetta e perfettamente comprensibile non l'avresti
neanche posto perche' avresti gia' avuto la soluzione in mano. E' anche
questo il bello dei ng: dialogando si trova la soluzione...
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: Exel con VB

Ciao atutti.
Io ho un piccolo problema che spero di tutto cuore che qualcuno mi possa
aiutare.
Ho la necessita di caricare sotto Vb i dati che si trovano su un exel per
poter automatizzare il trasferimento dei dati verso una tabella Access.
Come si possono leggere i dati da un foglio Exel sotto VB?
Vi ringrazio a chiunque mi possa dare una mano .
Ciao.

 Come si possono leggere i dati da un foglio Exel sotto VB?
Per rispondere in modo piu' consono credo sarebbe opportuno sapere come sono
organizzati i dati in excel: se sono cioe' strutturati come un "elenco dati"
(prima riga nomi dei campi, righe successive i record) oppure se si tratta
di dati "sparsi".
Probabilmente e' vero il primo caso, l'elenco, e se non e' cosi' considera
la possibilita' di riorganizzare in questo modo i dati.
A questo punto hai diverse possibilita':
1. nel file mdb potresti allegare l'area dati di excel vedendola cosi' come
una tabella di access;
2. in maniera analoga, in vb, potresti accedere all'area dati di excel con
istruzioni del tipo:
Option Explicit
Dim db As DAO.Database
Dim rs As DAO.Recordset
Private Sub Command1_Click(Index As Integer)
On Local Error Resume Next
  With rs
  Select Case Index
  Case 0
    Call .MovePrevious
  Case 1
    Call .MoveNext
  End Select
  Let Text1.Text = .Fields.Item(0)
  End With
End Sub
Private Sub Form_Load()
  Set db _
    = OpenDatabase( _
      Name:="C:\db.xls" _
    , ReadOnly:=False _
    , Exclusive:=False _
    , Connect:="Excel 8.0;")
  Set rs = db.OpenRecordset("Database", dbOpenDynaset)
  Call Command1_Click(1)
End Sub
Private Sub Form_Unload(Cancel As Integer)
On Local Error Resume Next
  rs.Close
  db.Close
  Set rs = Nothing
  Set db = Nothing
End Sub
3. Se i dati sono "sparsi" leggi nella guida la voce CreateObject e
dintorni;
4. ...
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Strutture

Ho un problema: ho creato un controllo che ha diversi metodi. Uno di questi
ha bisogno, per funzionare, di una struttura che ho definito all'interno del
mio applicativo. Quando provo a passare byref o byval questa struttura al
metodo del controllo, vb mi da un errore dicendo che non riconosce la
struttura.
La domanda è questa: come posso condividere la struttura che ho creato a
livello globale, in modo tale che sia riconosciuta sia dal controllo che dal
programma principale? Grazie in anticipo

Trasformi la struttura in una classe e la rendi PublicNotCreatable
creandone un'istanza ovviamente all'interno del controllo.
BYE

-- 
------------------------------------------------------------
+      Dott. Bruni Emiliano - Graduated in Physics         +
------------------------------------------------------------
+   Cisco Certificated Designer Associate                  +
+   Software developer & Network Administrator             +
+   Nick Handle: EB1346-RIPE  BE1484        ICQ: #16774468 +
+   E-Mail: 
br...@micso.it
                                 +
+   Web:    
http://www.ebruni.it
                           +
+----------------------------------------------------------+

 >
Ti ringrazio tantissimo :-)


un'ultima cosa, se non disturbo troppo...come faccio a creare un'istanza
prima nel controllo e poi nell'applicazione? grazie ancora!

Cerco utilizzatori di OPENGL per avere informazioni in merito
Sebastiano Floridia
Siracusa

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemino con la tastiera

Prima di tutto voglio ringraziare tutti quelli che mi hanno dato una mano
con i quesiti che ho postato in passato.
Adesso ho un piccolissimo problema.
Quale codice devo utilizzare per bloccare l'azione di alcuni tasti della
tastiera e dove devo scrivere questo codice
Per esempio voglio fare si che quando la mia applicazione è in esecuzione
l'utente possa piggiare il tasto cursore destro per esempio e che non venga
rilavata la pressione del tasto in questione da parte del programma.
Grazie mille siete fantastici.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Dubbi riguardo lo sviluppo in Team di un applicazione

Ciao Ragazzi,
volevo esprimere alcuni dubbi riguardo l'aspetto della sicurezza dei dati in
uno sviluppo in team di un applicazione.
.
Premesso che so che deve esistere una soluzione  altrimenti non
esisterebbero i team di sviluppo, premetto al tempo stesso che non ho la piu
pallida idea di come si possa risolvere la question.
Mi spiego:
Oramai è un anno che part time sto sviluppando un gestionale globale per una
certa industria e, fortunatamente il progetto sta prendendo talmente piede
che comincio a non starglio piu appresso da solo per ragioni di tempo
Vorrei quindi servirmi di un collaboratore che sotto mie specifiche mi dia
una mano a nel coding dell'applicazione, ma nutro forti dubbi relativamente
all'aspetto sicurezza.
Come faccio ad impedire e quindi ad avere la certezza che questo mio
collaboratore, visto che avrà pieno accesso ai sorgenti dell'applicazione,
non faccia il furbetto e se la venda per cazzi suoi senza dirmi niente??????
Mi raccomando, rispondetemi o datemi dritte su pubblicazioni, articoli che
possano aiutarmi.
Ciao e grazie

 Ciao e grazie
Prego.. ;)
M
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ciao e grazie
Ciao
Andrea

 Oramai è un anno che part time sto sviluppando un gestionale globale
CUT
Se lavora come CoCoCo (ecco ho fatto l'uovo) oppure una tantum...ci sarà
sempre un contratto no?
No contratto? ahia hai!
Se lo paghi a nero fa bene a copiarti tutto quello che ti può copiare!
Se invece....
Allora fra di voi c'è un contratto dove si impegna a non divulgare ad altri
il frutto del lavoro....se è "bocco" potresti farli firmare che per "x"
anni/mesi si impegna a non farti concorrenza con prodotti analoghi.
Tu dalla tua parte ti impegni a pagarlo....e cerca di pagarlo bene!
Con un contratto sei a posto ...lui e tu!
Perchè fidarsi è bene....ma chinarsi a raccogliere la saponetta senza le
mutande di "bandone".... è da grulli!
:-)
--
%%============================%%
Il Wodkino Nazionale è raggiungibile anche a :
www.martek.it
Ed ha pure il forum...
http://www.martek.it/go.asp?PortamiA=1
Newsgroup: it.comp.lang.visual-basic
Titolo: esercizio difficile!

Ciao, sto seguendo un corso di VB in facoltą,
e ieri ho ricevuto questo esercizio:
"riordinare in ordine crescente i valori di un vettore 1 to 50 integer"
potete aiutarmi?
Ciao,
Dony.

Ciao,
in facoltà sto seguendo un corso di VB,
e ho ricevuto questo esercizio che non riesco a fare...
potete aiutarmi? ;)
Grazie, ciao
Dony.
"riordinare in ordine crescente i valori di un vettore 1 to 50 random
integer"

potete aiutarmi?
sul Sito Comune 
http://www.murialdo.it/it_lang_vb
 nella sezione 'Piccole Perle'
trovi una funzione di ordinamento che sfrutta l'algoritmo Quick Sort; non vorrei
pero' che la soluzione fosse un po' troppo sofisticata per il tuo insegnante....
;)
Ciao.
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it

Con Il QBasic c'era la cara vecchia SWAP che ordinava i bit adesso invece
devi avvalerti di due variabili
For a=1 to 50
    For b=1 to 49
'-------------------------------------------------------- VB
  if Vettore(b)<Vettore(b+1) then
            Scambia1=Vettore(b)
            Scambia2=Vettore(b+1)
                    Vettore(b)=Scambia2
                    Vettore(b+1)=Scambia1
                        End If
'-------------------------------------------------------- QB
  if Vettore(b)<Vettore(b+1) then Swap Vettore(b), Vettore(b+1)
                Next b
                        Next a
il ciclo viene ripetuto 50 volte (cioè per quanti vettori sono considerati)
per assicurarsi l'esattezza dell'ordinamento. Se ponessi un ciclo di 10
anzichè 50 non otteresti un ordinamento perfetto.
bye
NB
ho supposto che si tratti di valori numerici. Nel caso di stringhe
alfanumeriche utilizzi l'istruzione ASC per ottenere l'ascii della prima
lettera e nel caso di eguaglianza consideri la seconda lettera e via dicendo
(ipotesi ordinamento alfabetico...).
Infine potresti trasportare tutti i vettori in una combo con la proprietà
Sort impostata su True e scaricare i dati dalla Combo già ordinati
guadagnandone in velocità :-)) questo è un espediente che sa poco di
programmazione e molto di inciucio... però funge lo stesso

potete aiutarmi?
E' uno degli algoritmi piu' semplici (e lenti) in assoluto.
Ciao, Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] : Pulsante di avvio

Qualcuno conosce il metodo per intercettare tramite Api la pressione del
tasto (AVVIO / START) che apre il menu di windows ?
Mi serve intercettare la chiamata anche se nessuno dei miei form e' attivo.
Grazie per le eventuali risposte.
                        Alessandro

tasto (AVVIO / START) che apre il menu di windows ?
Dovresti installare un hook di sistema che monitorizzi la posizione del
puntatore, intercettare i conseguenti messaggi inviati alla finestra
"AVVIO",nella fattispecie WM_LMOUSEDOWN e WM_LMOUSEUP, ecc, il tutto però da
eseguire in C attraverso una DLL, la quale, come é noto, é una risorsa
condivisa, e quindi non risiede nello spazio di indirizzamento del PRG in
VB.
Spero solo di non averti smontato troppo...
Comunque ho qualcosa di simile che potrebbe fare  al caso tuo, ma che
"hookizza" ( :-))) ) la tastiera, potresti usarlo come base; se ti serve
posso postarlo come vuoi...
Saluti
Genesio

tasto (AVVIO / START) che apre il menu di windows ?
Devi subclassare la window associata al tasto "AVVIO", e tramite un hook di
sistema, sia di tastiera che di mouse, intercettare gli eventi che ad essa
sono diretti. Ti ricordo che l'hook deve risiedere in una DLL standard,
quindi non creata con C o C++ e non da VB.
Robetta... :-(((
Ciao
Genesio

Newsgroup: it.comp.lang.visual-basic
Titolo: Ancora RAS!

Ciao a tutti, sono nuovo di questo ng,
mi affido a voi xchè leggendo i vostri posto sono convinto che mi
potete dare una mano, vista la preparazione di molti di voi.
allora, in poche parole devo intercettare la conn a internet e ricavare
la durata e i byte inviati, il tutto su xp. ho provato con il seguente
codice:
Public Type RASSTATS2000
    dwSize As Long
    dwBytesXmited As Long
    dwBytesRcved As Long
    dwFramesXmited As Long
    dwFramesRcved As Long
    dwCrcErr As Long
    dwTimeoutErr As Long
    dwAlignmentErr As Long
    dwHardwareOverrunErr As Long
    dwFramingErr As Long
    dwBufferOverrunErr As Long
    dwCompressionRatioIn As Long
    dwCompressionRatioOut As Long
    dwBps As Long
    dwConnectDuration As Long
End Type
Declare Function RasGetConnectionStatistics Lib "rasapi32.dll" _
            (ByVal hRasConn As Long, _
            lpStatistics As RASSTATS2000) As Long
Declare Function RasGetLinkStatistics Lib "rasapi32.dll" _
            (ByVal hRasConn As Long, _
            ByVal dwSubEntry As Long, _
            lpStatistics As RASSTATS2000) As Long
Public c As RASSTATS2000
però c.dwBytesRcved e sempre uguale a zero.
Dove sbaglio????
Grazie mille a tutti

 Dove sbaglio????
impossibile dirlo se non ci dici come fai la chiamata.
-- 
ciao, hal

help? scusa sono neofita di vb!
mi puoi dire che codice devo aggiungere?

 help? scusa sono neofita di vb!
Eppure leggendo il tuo post ero sicuro che a scrivere fosse un esperto.
--
Greg