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

ciao,
come faccio a far andare avanti con un ciclo la selezione di una riga del
datagrid?
nel senso:
-> prima riga
     seconda riga
come faccio a far puntare la seconda riga?
Grazie
Giosv@

Rispondo al volo senza verificare.
Hai due possibilità:
1- sposti il cursore del recordset a cui è collegata es: rs.movenext
2- dbgrid.row=dbgrid.row+1 (più o meno)
Ciao Gab

Newsgroup: it.comp.lang.visual-basic
Titolo: drag&drop  textbox

avrei bisogno di dar la possibilitą ad un utente di poter spostare una
textbox in un punto qualsiasi del form...
ho messo come proprietą DragMode=1 perņ nel momento in cui eseguo il
programma se sposto la textbox da qualche parte non succede nulla..che
codice dovrei inserire?

 codice dovrei inserire?
Option Explicit
    Dim Xin As Single, Yin As Single
Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
    Text1.Move X - Xin, Y - Yin
End Sub
Private Sub Text1_DragOver(Source As Control, X As Single, Y As Single,
State As Integer)
    If State = 0 Then Xin = X: Yin = Y
End Sub
beppe

Newsgroup: it.comp.lang.visual-basic
Titolo: ODBC e AS400

Ho creato un collegamento su ACCESS 97 ad una tabella AS400 via ODBC.
Quando apro il recordset (tipo dynaset con DAO) da Vbasic vedo tutti i
record, posso accedervi e modificarli.
Il problema è che, se vengono aggiunti dei records su AS400, il mio
recordset NON li vede fino a quando non eseguo una REQUERY.
L'esecuzione di una requery su quella tabella è tuttavia molto oneroso in
termini di tempo e risulta poco accettabile per l'applicazione in questione.
Esiste un metodo più ottimizzato per accedere a tutti i record ed essere
sicuri di vedere anche quelli aggiunti dopo l'apertura del recordset ?
Qualcuno ha avuto esperienze simili ?
Grazie per le eventuali risposte
Massimo Scali


Molto prob. impostando un recordset via Dao su odbc per As, viene rilasciato
un cursore statico lato client.
Dovresti provare con un cursore Dynamic lato server via Ado.
Non ne sono certo, ma credo che potrebbe andare correttamente.
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco Oracle

Sarei interessato ad avere una versione di Oracle.

 wrote in message
8lu907$83j$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: programma che rinomini file. come?

devo creare un programma che rinomini un file? quale comando devo usare in
visual basic
grazie
:)

 wrote in message
news:zdI37.36753$rh.7...@news6.giganews.com...

Name vecchionomepercorso As nuovonomepercorso
Ciao!
--
Esteban
Replace 'nospam' with 'software' in the address for answer.
Hosted by 
www.seber.it
Newsgroup: it.comp.lang.visual-basic
Titolo: OK_RichTextBoxTrasparenti

Eccomi ritornato!!!
Risolto l'enigma per rendere trasparente il Controllo Richedit, che tanti
chiedevano.
con poche righe di codice . . . . .
Option Explicit
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA"
(ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const STILE = (-20)
Private Const TRASPARENTE = &H20&
Private Sub Form_Load()
    Dim Trasparenza As Long
    Trasparenza = SetWindowLong(TuaRichTextBox.hwnd, STILE, TRASPARENTE)
End Sub
 By Utente Win2k

 wrote in message
9u_97.24235$%7.32...@news6.giganews.com...


 wrote in message
Hv0a7.84728$Qf6.6...@news2.tin.it...


VB6 Ent. sp 3
...da me funziona egregiamente.
Tommaso

 Eccomi ritornato!!!
riposato spero - benvenuto !
vb6pro sp5
tutto ok - pure troppo :)
mettendo scrollbars verticali -> diventano trasparenti le freccine.
ottima idea per form estremamente particolari...

Private Const TRASPARENTE = &H20&
Si', pero' dilla giusta:
Private Const GWL_EXSTYLE =  (-20)
Private Const WS_EX_TRANSPARENT  = &H20&
ciao,
un hal emerso provvisoriamente dalle ferie per assicurare il dovuto
rispetto alle apette di windows ;-)

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

Ho la necessità di inserire alcuni dati in fogli excel (versione 7.0a per
w95) utilizzando la funzione "macro-finestra di dialogo /casella di
riepilogo".  La selezione dei dati di input è corretta, non comodo andare a
definire la cella in cui andare a scrivere il dato selezionato. Mi sarebbe
molto più comodo andare a scrivere il dato selezionetao nella cella attiva.
Esiste qualche possibilità di ottenere questo tipo di funzionamento, magari
utilizzando VB ? se la domanda non è pertinente  agli argomenti trattati in
questo NG, esistono altri NG che si occupano di questi argomenti?
Grazie
G. Zanetta

 Ho la necessità di inserire alcuni dati in fogli excel (versione 7.0a per
Non potresti essere più chiaro?
rin...@unibg.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Come inserire un documento e non poterlo manipolare.

Premetto che sono alle prime armi con VB4; desiderei creare una
documentazione tipo help però non copiabile evidenziandolo Ctrl C e
Ctrl V.
Inserendo un RichTextBox ho la possibilità di attivare gli scroll bar
(i vari documenti sono grossi) ma nel momento che cambio enabled in
true ottengo la protezione del documento ma perdo la possibiltà di far
scorrere il testo rtf verticalmente ed orrizzontalmente.
Ho provato pure con un'inserimento OLE di un doc ma non so come
legarlo ad un'icona di scroll.
Scusatemi se ho posto dei quesiti ovvi, grazie anticipatamente a chi
mi saprà dare qualche delucidazione.
=======================================
Giorgio Prosperini
E-mail: 
g.pros...@finsystem.it
Home Page: 
http://www.aspide.it/freeweb/g.prosperini
=======================================

Ctrl V.
Hai provato con una list box? Non e' molto elegante, ma funziona e soddisfa
i tuoi requisiti...
Vanio Preti
Newsgroup: it.comp.lang.visual-basic
Titolo: Esecuzione programmi esterni

Salve a tutti !
Esisteun qualche sistema per eseguire un programma esterno (io ad esempio
uso SHELL) senza far comparire la finestra DOS ???
Grazie a tutti ...

 uso SHELL) senza far comparire la finestra DOS ???
Usa questa sintassi:
Shell "Nomeprogramma.exe", VbHide
VbHide fa in modo che non compaia la finestrella DOS nemmeno nella taskbar.
--
Volete un abbonamento gratuito a TiscaliFREEnet??
Chiedetemi i Codici di Attivazione!!!
--
Ciao!
==================================
Daniele Pinna
Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola OOPS
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
______________________________________
  La fantascienza come Star Trek non e' solo un buon divertimento, ma
assolve anche uno scopo serio, che e' quello di
espandere l'immaginazione umana.
  Limitare la nostra attenzione a questioni terrestri equivarrebbe a fissare
dei confini allo spirito umano.
Stephen Hawking

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6, registry e XP 64bit

Sto testando la mia applicazione VB6 su una macchina XP a 64 bit ma
subito alla partenza non riesce a leggere la stringa di connessione
dal registry (sotto HKEY_LOCAL_MACHINE), esce la messagebox che
corrisponde alla lettura di stringa vuota (errore di lettura). Il
registry l'ho esportato da una macchina 32bit dove l'applicazione
funziona quindi è sicuramente corretto. Ci sono problemi nell'utilizzo
del registry su macchine a 64bit? Uso l'API RegOpenKeyEx.
Grazie, ciao
Fritz

 del registry su macchine a 64bit? Uso l'API RegOpenKeyEx.
Mi rispondo da solo, alcuni rami di registry sono duplicati per 64 e
32 bit come le connessioni ODBC e, di default, caricando un .reg
vengono popolate le chiavi a 64bit.
Ciao
Fritz

Newsgroup: it.comp.lang.visual-basic
Titolo: [? - ActiveX Exe] Determinare la chiusura dell'applicazione

Come č possibile determinare la chiusura di un applicazione ActiveX Exe che
č stata invocata da qualche client. Mi spiego meglio: quando tutti i
riferimenti creati dai client vengono distrutti l'applicazione viene
terminata. A me interessa sapere dall'interno dell'applicazione quando
questo avviene per poter chiudere connessioni, file, ecc. aperti in fase di
inizializzazione. Quando l'applicazione parete č possibile impostare un
routine di avvio e da lě eseguire le procedure di inizializzazione. A me
interessa un metodo o un evento simile relativo alla chiusura. Su MSDN ho
trovato solo i criteri per determinare quando l'applicazione viene terminata
e dei suggerimenti per il debug.
Grazie a tutti, Rick

, 
rser...@toglimi.dimensioneweb.com
 says...

forse non ho capito del tutto il tuo problema, ma quando una applicazione 
si collega a una classe del tuo ActiveX, se questo al momento era 
"chiuso", dovrebbe scattare l'evento class_initialize.
Se un oggetto si scollega e nessun altro oggetto rimane connesso, 
dovrebbe scattare l'evento class_terminate.
Se hai problemi o un esempio postamelo pure.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [SQL] Query con Like

Scrivo a voi perchè lo sto facendo da VB ma in realtà è generico...
Vi spiego il problema. Questa query qui:
SELECT Tabella.Campo1
FROM Tabella
WHERE (((Tabella.Campo1) Like "*pippo*"))
in access mi funziona correttamente e mi tira fuori: pippo, pippolo e
non paperino o pippide.
Ma  se la provo su di un database SQL SERVER 2000 nulla da fare!
Nemmeno se la faccio con l'autocomposizione View che mi tira fuori:
SELECT     Articolo, Descri
FROM         dbo.Articoli
WHERE     (Articolo LIKE '*pippo*')
però non prende nulla!
Sapete dirmi come farla funzionare?
Grazie a tutti,
Al3x

 ha scritto nel messaggio
news:9a381e97.02111...@posting.google.com...

prova a sostituire il * con il %, per il perchè leggi gli altri post
sull'argomento
Salutoni
Sergio

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

Come faccio a copiare più file????

 
se i file rispettano una mask usa i caratteri jolly (*, ?) e il comando dos
shell "
command.com
 /c copy [files]", 0
lo 0 (zero) esegue la shell nascosta

Newsgroup: it.comp.lang.visual-basic
Titolo: Quale versione di access ?

Come faccio a sapere quale versione di access è caricata
sul computer (naturalmente da codice vb) ? forse con createobject ?
Grazie a tutti.
Ciao, Checco

sul computer (naturalmente da codice vb) ? forse con createobject ?
Mumble, mumble ... e se fossero installate piu' versioni ?
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: DB con percorso di Immagini

Ciao n.g.
Ho delle immagini (bmp) e un database di Access che le deve contenere.
Il problema è che non voglio incorporarle nel DB (perchè diventerebbe troppo
pesante), ma nel DB voglio caricare soltanto il percorso del file.
A questo punto in una maschera dove metto un controllo Image devo visualizzarle
le immagini.
Al click su un bottone, ho provato con queste istruzioni:
Private Sub Comando2_Click()
Dim ccc As String
ccc = "C:\dati\SN00004.bmp"
Immagine1.Picture = LoadPicture(ccc)
End Sub
Ma non c'è verso!!!
Qualcuno mi aiuterebbe?
Grazie
Ciao
-- 
Posted from 
ppp-62-11-168-87.dialup.tiscali.it
 [62.11.168.87] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 End Sub
Quello che fai funziona in VB5/VB6, con Access prova cosě:
Private Sub Comando2_Click()
 Dim ccc As String
 ccc = "C:\dati\SN00004.bmp"
 Immagine1.Picture = ccc
End Sub
@Alex
-- 
Posted from  [146.133.1.30] 


 wrote in message
news:cd4107336ab5963d222...@mygate.mailgate.org...


 Ciao
Su
http://www.microsoft.com/intlkb/italy/articles/I13/6/15.htm
trovi tutte le spiegazioni per inserire immagini in una maschera immettendo
solo il percorso del file in una tabella. Le istruzioni valgono anche per
Access 2000
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Immissione dati DB

Da poco sto studiando VB6, e mentre mi accingevo ad eleborare uno stupido
programma gestionale, mi sono subito imbattuto in alcune difficoltà
(alcune già superate), su cui vorrei che voi mi deste una dritta.
Il problema per chi è agli inizi è (credo lo sappiate) non tanto
trovare la soluzione alle cose, quanto trovare quella ottimale ;)
Premessa : Non ho MSDN.
Veniamo al dunque (scusate se le domande vi sembrano stupide) :
1 - Io ho una Combo, che popolo da una tabella. Io vorrei
che soltanto i campi che si vedono nel Dropdown si potessero
immettere. Come fare ?? Esiste una proprietà che mi fa il lavoro
senza dovermi mettere e fare controlli sul Lostfocus ???
2 - Quando ho più Textbox o Combo e voglio fare
dei controlli su di esse (sempre mediante Lostfocus)
mi capita il seg. problema :
facendo perdere (ad es.) ad una TxtBox il focus ( e conseguentemente
si attiva la procedura di controllo dati associata) se il focus cade
su un'altra TxtBox che a sua volta ha codice sul Lostfocus (
con conseguente MsgBox di errore) il programma mi va in Loop.
Come fare ???
( Porca miseria il controllo dati è la parte che mi fa perdere più
tempo. Mi ricordo ai tempi del TP7 ehehehe.......)
3 - Esistono in rete programmi di esempio completi che operano
su DB per carpire tecniche più raffinate ???
Passo e chiudo sperando di non aver infranto regole del NG.
--
Ciao da :
-----------------------------------
Chris'76
chri...@tin.it
ICQ No. :  33921489
-----------------------------------


A milioni ... guarda sul sito comune per cominciare
www.murialdo.it/it_lang_vb/
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Dove sto sbagliando?

Ho cercato di ottimizzare una parte di codice che stava diventando
ingestibile.
Originariamente era:
strVecchioPath = Text(1).Text + "\" + Text_old(0)
strNuovoPath = Text(2).Text + "\" + Text_new(0)
strVecchioPath1 = Text(1).Text + "\" + Text_old(1)
strNuovoPath1 = Text(2).Text + "\" + Text_new(1)
strVecchioPath2 = Text(1).Text + "\" + Text_old(2)
strNuovoPath2 = Text(2).Text + "\" + Text_new(2)
strVecchioPath3 = Text(1).Text + "\" + Text_old(3)
strNuovoPath3 = Text(2).Text + "\" + Text_new(3)
strVecchioPath4 = Text(1).Text + "\" + Text_old(4)
strNuovoPath4 = Text(2).Text + "\" + Text_new(4)
strVecchioPath5 = Text(1).Text + "\" + Text_old(5)
strNuovoPath5 = Text(2).Text + "\" + Text_new(5)
strVecchioPath6 = Text(1).Text + "\" + Text_old(6)
strNuovoPath6 = Text(2).Text + "\" + Text_new(6)
Ho modifcato così
For j = 0 To 6
oldPath(j) = Text(1).Text + "\" + Text_old(j)
newPath(j) = Text(2).Text + "\" + Text_new(j)
Next
Ma c'è qualcosa che ho sbagliato perchè si pianta tutto.
Ovviamente tra le dichiarazioni generali ho:
Dim oldPath() As String
Dim newPath() As String
Dim j As Integer
So che sarà una banalità  ma non ne vengo fuori :-(
Grazie dell'aiuto

 Ma c'è qualcosa che ho sbagliato perchè si pianta tutto.
Definisci "si pianta tutto".
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 Definisci "si pianta tutto".
Più che si pianta tutto credo che entrasse in loop, infatto ho risolto
definendo
Dim oldPath(6) As String
Dim newPath(6) As String
anziche'
Dim oldPath(6) As String
Dim newPath(6) As String
Ma non capisco perchè fosse errato, il ciclo for comunque si fermava ad un
indice pari a 6.

 indice pari a 6.
gli array dovrebbero sempre essere dimensionati prima di assegnare un valore
ai loro elementi
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:43456b7a$0$8490$5fc...@news.tiscali.it...

Cambia spacciatore :))))))))))))))))))
;-)

 wrote in message
news:43456b7a$0$8490$
5fc...@news.tiscali.it

A parte non vedere differenza nelle 2 dichiarazioni, solitamente
gli Array e le matrici sono ZERO_BASED, pertanto l'indice
6 seguendo quanto hai dichiarato non viene supportato poichè
va da 0÷5(6 elementi).
Se vuoi che partano da 1 va esplicitato nel modulo.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

>


 poichè va da 0÷5 (6 elementi).
In C è così, ma in VB no. Se scrivi (con "Option Base 0" attivo):
    Dim OldPath(6) as String
hai dimensionato un vettore di SETTE elementi (da 0 a 6 inclusi).
Se vuoi che siano DAVVERO sei o usi Option Base 1 oppure lo devi
esplicitare: Dim OldPath(1 To 6) as String
Ciao.
Mauro
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] L'IL di VB.Net

Ho letto diversi articoli sull'IL di 
VB.NET
, ma ho ancora le idee confuse.
Quali saranno i suoi effetti sulle prestazioni dei programmi e sulla loro
portabilità anche fuori da Windows? Mi potreste consigliare un sito
autorevole (e non di parte) da cui trarre informazioni sulla nuova versione
di VB?

 una o dall'altra).
E' vero ognuno tira l'acqua al proprio mulino, dicono che la verità stia nel
mezzo e se vuoi un consiglio, provalo, e poi prendi le tue decisioni... se
vuoi, fatti un giro su 
http://www.dotnetwire.com/
Ciao
Corrado

Newsgroup: it.comp.lang.visual-basic
Titolo: Operatore matematico

Ho appena cominciato a usare vb6 e volevo fare una semplice
calcolatrice.
Lasciando i campi TextBox vuoti e premendo il CommandButton che
dovrebbe eseguire la divisione mi viene fuori 
errore di run-time "6":
Overflow 
La stringa che uso per questa operazione č:
Str(Val(Text1.Text) / Val(Text2.Text))
Grazie per le risposte

 wrote in message
8n49usc92f16ngaa4...@4ax.com...

scherzi?
Suppongo che Text2 sia quella vuota, ossia Val("") da Zero, e non č
possibile dividere nulla x zero!!
Metti un IF e vai con Dio.
Ettore Maronese
Il Mes
http://www.maronese.com/mes

Grazie per le risposte
Succede quando fai un /0 e 0 č un float (Single o Double) che non č proprio
0 ma tende a 0.
La Val() restituisce un Double.
Se 0 fosse un integer otterresti il famoso "division by zero".
Ciao

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

Newsgroup: it.comp.lang.visual-basic
Titolo: print su modulo continuo

Ho l'esigenza di stampare una stringa di allarme, appena questo si verifica,
su di una
stampante a modulo continuo (ad aghi per intenderci).
Ho provato con : Printer.print stringa
Ma la stinga viene stampata solo alla chiusura dell'applicazione .
Qualcuna sa darmi una mano ?
Grazie per l'attenzione

 ha scritto nel messaggio
news:9nnmuj$1qs$1...@nreada.inwind.it...
[cut ]
Priter.EndDoc
--
Ivan Castellaro
Mettere un punto tra nome e cognome per l'e-mail.
ivancas...@libero.it

 ha scritto nel messaggio
news:9nnp9r$kgm$1...@fe2.cs.interbusiness.it...

Ho provato, ma questo non fa altro che inviare un avanzamento foglio alla
stampante.
Mi ritrovo quindi con la registrazione di un log per foglio, mentre vorrei
che gli eventi fossero
stampati uno di seguito all'altro ed in real time.

 ha scritto nel messaggio
news:9nnmuj$1qs$1...@nreada.inwind.it...


 ha scritto nel messaggio
news:9nntq4$ff3$1...@nreadb.inwind.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: convertitori access

Esistono dei tool in grado di convertire in visual basic un database
access? 
Sto realizzando una applicazione access che mi permette di interrogare
un database oracle. Purtroppo mi hanno chiesto di passare la
componente access in visual basic. Devo rifare tutto da capo?
Grazie a tutti
Stefano

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic in Office

L'editor Visual Basic integrato in Office riporta questa informazione Visual
Basic 6.3 VBA: 6.3.8833 o qualcosa del genere.
Ora vi chiedo.. ma questa IDE permette di sviluppare programmi veri e propri
in Visual Basic.. tranne ovviamente la compilazione per lo stand alone..
oppure è esclusivamente dedicata al VBA per la gestione dei documenti
office?
Non ho idee molto chiare in merito a cosa serve per sviluppare applicazioni
stand alone...potete chiarirmi le idee...?
Grazie in anticipo

 applicazioni stand alone...potete chiarirmi le idee...?
VB, ma non è più in vendita, vai su .Net con tanti auguri...

 applicazioni stand alone...potete chiarirmi le idee...?
Se non sei un professionista e non vuoi stendere $$ per omprare VB allora ti
consiglio RapidQ.
Ha una sintassi praticamente uguale a VB ed i più ti consente di fare il
porting da Linux a Windows (e viceversa) in maniera semplicissima
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: (un pò ot) set di caratteri in polacco

Scusate il post leggermente OT (anche se si riferisce ad un prg in VB ).
Avrei bisogno di far tradurre alcuni DBF contenenti delle stringhe in
polacco; quindi avrei bisogno anche di scrivere in polacco con tutti i loro
caratteri. Come devo fare? Ho bisogno di un Windows in ploacco o posso
muovermi in altro modo? TNX... Maurizio

 wrote in message
news:9qhna5$1se$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:9qhna5$1se$1...@pegasus.tiscalinet.it...


Ok, proverò.
Una tastiera in polacco dovrei avere la possibilità di recuperarla.
Grassie.... Maurizio

 wrote in message
news:9qk434$omm$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:9qhna5$1se$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Sono Nuovo....(del newsgroup)

Ho appena iniziano a smanettare con il visual basic e volevo sapere un po di
informazioni:
1)un sito dove è presente un tutorial in italiano ( non di quelli per i
cretini ...un po + complesso)
2)che programmi devo scaricare e da dove li devo prelevare
3)esiste un decompilatore per programmi VB (possibilmente il v.6) ?
4)...
5)..
6). aggiungete voi.....
10x

 10x
Come i lettori CDROM?
Ciao
--
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

 Come i lettori CDROM?
quelli del millennio scorso... ormai ci sono i dvd...
ciao, a.

  quelli del millennio scorso... ormai ci sono i dvd...
beh, se ti dico che a casa ho, e utilizzo, ancora un lettore 4X mi credi?
funziona e non vedo la necessita' di buttarlo via.


> 3)esiste un decompilatore per programmi VB (possibilmente il v.6) ?
Fortunatamente no!


Allora posso pensare di aprire una news per il miglior antiquariato ancora
in uso...
... io utilizzo un 8x e mi stà benissimo :D
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb.net]  gestione file mp3

salve
ho abbandonato il glorioso vb6,ed ora sto imparando vb2010 express.
in vb6 ho fatto un applicativo che gestisce ( ascolto,pausa,continua, stop 
ecc ecc) file mp3 utilizzando le api per MCI
che cosa si usca con vb2010 express al posto della SendmciMessage ecc ecc.
dove posso trovare un esempietto ?
grazie
leonello
. 



Googlando vien fuori diversa roba:
http://www.dreamincode.net/forums/topic/57357-mymusic-player/
http://www.danstuts.com/2008/08/16/creating-a-mp3-player-in-vbnet-2008-express-standard/


Beh anche se si chiama DotNet....supporta tutti i "vecchi" e "nuovi"
COM
Diciamo che la soluzione più semplice è referenziarne uno!
Esempi vari
http://www.danstuts.com/2008/08/16/creating-a-mp3-player-in-vbnet-2008-express-standard/
http://www.codeproject.com/KB/vb/Play_sound_in_VBnet_with.aspx
il problema è suonare un mp3! Ti ci vuole qualcosa che supporti quel
codec. Ecco perchè si "taglia la testa al toro" e si usa quello che
già c'è: il WindowsMediaPlayer.....potresti referenziare Winamp....o
VLC....
La strada più complicata (e imho più professionale) è fornire il tuo
programma con una libreria che riproduca vari codec....
Newsgroup: it.comp.lang.visual-basic
Titolo: Generazione eventi in VB.Net

Buonasera, nella mia classe ho dichiarato l'evento
 
Public Event ItemAdded(Item As ItemsType)
 
ed ho implementato il metodo
 
Public Function AddItem(...) As ItemsType
 
Il dubbio è: l'evento ItemAdded deve essere generato prima o dopo
che la funzione AddItem abbia restituito un valore al chiamante.
 
A me verrebbe da dire dopo, ma non ho idea di come fare!
 
Per ora ho scritto qualcosa del genere, ma ovviamente non va bene.
 
Public Function AddItem(...) As ItemsType
     Dim NewItem As ItemsType
 
     ... crea l'oggetto ...
 
     RaiseEvent ItemAdded(NewItem)
     Return NewItem
End Function

 che la funzione AddItem abbia restituito un valore al chiamante.
 
In senso stretto, *dopo* non puoi farlo, visto che il "return" esce dalla funzione, quindi qualsiasi istruzione che lo segue viene ignorata.
 
Come l'hai scritta tu però mi pare OK, aspetti di aver fatto tutto e poi, come ultime due istruzioni, inneschi l'evento e restituisci il valore... perchè dici che non va bene?

> perchè dici che non va bene?
 
La funzione fa parte di una libreria.
Se lascio le cose così, il programma chiamante che prova a creare un oggetto,
gestirebbe l'evento di creazione prima di aver ottenuto l'oggetto. O no?


Teoricamente si, immediatamente prima, ma in ogni caso gli stai passando la stessa identica istanza attraverso il parametro, quindi non dovrebbe essere un problema per il tuo codice.
 
Anche perchè, se hai previsto di restituire l'oggetto sia tramite evento che come risultato di funzione, immagino sia perchè prevedi di manipolare la cosa in punti differenti (da una parte aggiungi, da un'altra vuoi essere notificato della cosa)... nello stesso modulo/classe/form non avrebbe molto senso aspettare il nuovo oggetto tramite evento quando già sai stai chiamando la funzione, che te lo torna direttamente indietro.
Newsgroup: it.comp.lang.visual-basic
Titolo: MIME DECODE

Sto cercando informazioni sulla codifica e decodifica di MIME
per poter estrarre un allegato zip da una e-mail.
Qualcuno può darmi una dritta, magari un esempio sarebbe il massimo
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie
io avevo trovato un esempio cercando qualcosa come base64 visual basic 
in google.
però sono passati diversi anni...
ciao.

 Grazie
Io ho un demo in VB molto completo, ma ho dovuto modificarlo
nella parte di Parsing in quanto in caso l'allegato fosse un
file di Testo non funzionava.
Ti posso inviare tutto il progetto(non mio) trovato in rete
che pero nel mio caso ho praticamente riscritto per intero
dovendolo adattare ad uno sviluppo di Access.
Credo che nel tuo caso ti basti copiare la parte di Parsing, poi
eventualmente ti spiego la modifica per renderlo completamente
funzionante.
Mandami una mail privata e ti allego il File..!
Ciao
@Alex


Newsgroup: it.comp.lang.visual-basic
Titolo: Caricare un file di testo in una list box

Io ho una list box e devo inserire dei listitem il problema è che questo
testo si trova in un file di txt e può essere di più righe io ho già provato
tramite una richtextbox ma lui me li mette in una sola riga (preceduti dal
numero della riga "in romano" I,II,III)
Grazie



 da "EOF errore facoltativo"
sotto open la guida non da' una mano ?
forse eof(1) (se apri as #1) ?
al momento non saprei dirti di piu'.
ciao, a.

 forse eof(1) (se apri as #1) ?
Const s_LOC_FULLFILENAME As String _
  = "C:\Progetti\VB\VB4.0\CSV\Prova.CSV"
Dim i_nFile              As Integer
Dim s_Record             As String
Dim l_nRec               As Long
  Let i_nFile = FreeFile(0)
  Open s_LOC_FULLFILENAME For Input As #i_nFile
  Do While Not (EOF(i_nFile))
    Let l_nRec = l_nRec + 1
    Line Input #i_nFile, s_Record
    [...]
  Loop
  Close
End Sub
da Grimaldi M., Borrelli M., Melchiorre M. "importazione file e doppi
apici", ICLVB, 21-22.3.2000, s.i.p.
--
Ciao.
Maurizio

 apici", ICLVB, 21-22.3.2000, s.i.p.
anche tav. f.t., ed. lim., ril.  in pell. di spec. non prot. ?
conosco alcuni collezionisti...
grazie, a.

> "pal"

Purtoppo no. E' Plain Text e basta.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] imgedit che salva in jpg

Ho provato a cercare lumi ma non ho trovatoo nulla.
E' possibile salvare un'imgedit in formato jpg?
(Uso VB5).
Grazie e ciao.

 E' possibile salvare un'imgedit in formato jpg?
Non saprei; ma per l'handling delle jpeg ti consiglio l'ottima, veloce ed
articolata dll della Intel, che è fra l'altro assolutamente gratuita. Ti
permette di convertire, manipolare, caricare, salvare in formato jpeg. La
trovi sul loro sito.
-vibino


innanzitutto: grazie per l'aiuto.
sono andato sul loro sito ed ho scaricato la jpeg library. solo che a questo
punto ho 2 problemi: come cacciare dentro il riferimento alla library in
questione e poi come utilizzarla.
ho provato a guardare la documentazione ma il C non e' il mio forte...
so di chiedere troppo ma se avessi un esempietto da postare...
ciao e grazie

"ilkaos" <ilk...@trae.ka> ha scritto



della dll prima versione, non mi ricordo se su vbaccelerator, non avevo
sentito parlare troppo bene. se l'hai presa dal sito intel, dovrebbe essere
la versione nuova, l'avranno messa a punto.
se vuoi una cosa semplice in vb -> gvbox.ocx
http://jcoconsulting.com/
$40 se ricordo, molto pratico. salva in bmp e jpeg, ha una serie di
regolazioni, zoom ecc. -- unico neo che avevo trovato: l'immagine la salvava
coi colori dello schermo (su questo portatile ne ho 64k). ma forse l'ha
messo a punto.

 so di chiedere troppo ma se avessi un esempietto da postare...
Io avevo trovato una classe già pronta per l'utilizzo di quella dll, con
ampi commenti e molto ben fatta: quindi ti rimando a quella. Trovi alla fine
del messaggio il riferimento.
-vibino
'
============================================================================
======
' Filename:    mIntelJPEGLibrary.bas
' Author:      Steve McMahon
' Date:        15 March 1999
' Requires:    cDIBSection.cls (vbAccelerator)
'              IJL.DLL (Intel)
'
' An interface to Intel's IJL (Intel JPG Library) for use in VB.
'
' Copyright © 1999 Steve McMahon for vbAccelerator
' 
http://vbaccelerator.com/
'
' IJL.DLL is a copyright © Intel, which is a registered trade mark of the
Intel
' Corporation.
'
' Note.
' Intel are not responsible for any errors in this code and should not be
' mentioned in any Help, About or support in any product using the Intel
library.
'
'
============================================================================
======


mo ce vado e provo...grazie 1000!
Newsgroup: it.comp.lang.visual-basic
Titolo: textbox array?

Ciao,
sono un novellino in visual basic ed ho un piccolo problema... cercherň di
essere breve :)
Ho costruito un programma con 8 textbox, in queste textbox vengono immesse
delle cifre e poi verificate quando si ha un evento lostfocus.
A programma funzionante mi sono accorto che sarebbe stato piů comodo poter
avere un piccolo array per fare le operazioni di verifica... cosě ho copiato
il mio text1 e VB mi ha chiesto se volevo creare un'array. Tutto Ok array
creato e modificate le varie etichette per avere invece di text1 text1(0) e
via dicendo.
Il mio problema e' che adesso non so come far distinguere una sub
dall'altra... come posso fare a dare comandi alla sub text1(0)_lostfocus o
alla sub text1(1)_lostfocus e via dicendo? Suppongo ci sia il metodo di
definire le varie sub in modo corretto... spero :))
Sarei grato per qualunque aiuto :)
Bye
Andy
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 definire le varie sub in modo corretto... spero :))
Se non sbaglio l'evento LostFocus quando esiste un array di controlli ti
restituisce anche Index, che corrisponde appunto al numerino che c'è dentro
Text1()
Quindi con un
Select Case Index
    Case 0
    Case 1
    Case 2
End Select
ti gestisci il tutto.
Ciao
Bald0z




Newsgroup: it.comp.lang.visual-basic
Titolo: Dan. Appleman, libro su API CERCO!!!!!

Siamo onesti? NO!!! Perchè buttar via 120.000£ in un libro se qualcun altro
già ce l'ha?
Cerco "VISUAL BASIC 5.0 WIN32 API" di DAN. APPLEMAN (in italiano
possibilmente), per comprarlo a prezzo ridotto (se non vi serve) o
altrimenti per... trascriverne (per così dire) alcune (per così dire) parti.
Se qualcuno è disposto a collaborare...
Thak's 0

io ce l'ho ma quanto mi dai?
ByE  ////BRUNO
Newsgroup: it.comp.lang.visual-basic
Titolo: Re: Path dei file vbp copiati brutalmente


se ho capito...
usi un prog che rimpiazzi stringhe in pacchi di files in un colpo.
in internet ne trovi freeware senza problemi

Oi!
Sto rimettendo mano ad un software che ho consegnato qualche mese fa. 
Ho copiato su CD tutti i file componenti ma quando lo vado ad aprire
cerca i file .log relativi senza trovarli... dopodichè mi cerca i
files in tutti i path dove avevo prima il programma, mi dà 'drive not
ready', 'file not found' etc
In sostanza, quindi.... come faccio a cambiare tutti i path?
Grazie ,
Axé!

 ha scritto nel messaggio
news:aba0r0175gr5bijer...@4ax.com...

I files log non li cerca: li crea lui per dirti cosa non va.
I percorsi sono tutti scritti in chiaro nel file .vbp e sono percorsi
relativi, quindi l'albero del progetto deve *ovviamente* rimanere invariato.
Se mancano anche dei riferimenti o dei componenti questi vanno installati.
Ciao

 ha scritto nel messaggio
news:31b0ckF...@individual.net

e per essere ancora più chiari (nel caso non si fosse capito) il vbp lo puoi aprire col blocco note.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
"Seminate Linux, che Windows si pianta da sè...." (Antico Adagio)
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.nicolaottomano.it/public/SinapsiAntispam-Setup.exe
email spamtrap: 
spam...@nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [vb6] command

salve
utilizzol'istruzione command ma non ricordo come fare per utilizzarla 
nell'ambiente di svilutto di vb6,per poter fare dei test.
grazie
leonello 

nell'ambiente di svilutto di vb6,per poter fare dei test.
Command$  ritorna una stringa che corrisponde agli argomenti del comando in
linea, cioč quello che segue al nome dell'eseguibile.
Per utilizzarlo in IDE puoi inserire da proprietą progetto la stringa con gli
argomenti da esaminare e fare il debug.
--
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Parsing di un messaggio Outlook

Ciao a tutti,
avete notato sicuramente che quando scrivete una email con outlook (97 o
2000), in presenza di una stringa del tipo 
sip:ti...@caio.com
, il client
automaticamente aggiunge il riferimento ipertestuale e la rende cliccabile;
ciò accade anche con 
ftp://ftp.qualcosa.com
 o 
http://www.qualcosa.com
 e con
altri tipi di protocolli.
La domanda quindi è la seguente.
Secondo voi posso fare un plugin di outlook che mi permetta di sfruttare
questo tipo di comportamento anche con altri tipi di stringhe/protocolli
(es: 
ciccio:ti...@caio.com
).
Grazie,
    Daniele

...

Newsgroup: it.comp.lang.visual-basic
Titolo: set f as frmpippo

Ho una form dove premendo un tasto faccio: (vabbeh non è un tasto ma la
cella di una flexgrid ^_^)
Private Sub FxgLinee_DblClick()
    Dim f As New frmOrdine
    f.NrOrdine = FxgLinee.Text
    f.Show
    Set f = Nothing
End Sub
Bene se chiamo la form con f.Show e riclicco sulla form che l'ha chiamata
essa mi sparisce!!!
Ma 'ndo va??
Ho la necessità di parire più istanze di una form...magari sbaglio
metodo...non sono molto lucido oggi :-(!
Alex


Prova a togliere "Set f = Nothing"
Peio


Va dietro l'altra, non rimane imn primo piano.

 Ma 'ndo va??
Caro Alessandro secondo me hai bevuto troppo a pranzo...
Alex
PS: ora funge perň mi apre due volte la form...secondo voi perchč?
Ecco il codice COMPLETO!
        f.txtQtaRichiesta.Text = PInt & "," & PDec & "kg"
        griglia.Col = 4
        f.CodProdotto = griglia.Text
        griglia.Col = 6
        f.QtaProdotto = griglia.Text
        'f.Show
        Set f = Nothing
Il fattoč he scrivo dentro 3 campi e me ne apre due...mah, se mi sveglio
forse qcosa concludo!
Alex


In realtà adesso funge...
cmq inizialmente non c'era, l'avevo aggiunto dopo ^_^
Grazie,
alex

 Va dietro l'altra, non rimane imn primo piano.
Come dicevo quello l'ho risolto...cmq NON andava dietro (ovviamente
controllavo dietro e nell'elenco delle finestre)
spariva proprio dipendeva dalla prop. MDIChild settata a false anzichč true.
Alex

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO COMANDO DIR

Allora veniamo subito al sodo: devo fare un programma che "stori" un
file TXT contenente l'albero di un'unita' selezionabile dall'utente.
Una cosa del genere:
-----
pippo
	pippo.txt
	peppa.zip
poppe
tunio
beppino
	tombola
		documenti
			ecc...
----
ecco con il comando DIR riesco a trovare le directory di primo
livello, diciamo quelle in rut (si scrivera cosi'?) ... quelle subito
dopo il nome dell'unta' del tipo c:\pippo ... c:\pippa ecc...
ed arriva il mio problema : come faccio a dirgli di entrare nella
prima directory, controllare se ci sono altre directory, salvarle nel
txt(ovviamente all'inizio in una rich text box ...)  con tanti spazi
quanti livelli ha la directory (del tipo quelle in C: nessuno spazio,
quelle dentro alle directory sotto C: (le sottodirectory) 2 spazi
ecc...), scendere di livello passare alla 2a directory rifare tutto
ecc...
Spero di essere stato chiaro (e gia' dalle mie parti mi chiamano "la
lanterna sempre spenta" ...)
Werewolf: "Ringrazia la cortese attenzione"!
gio...@iol.it

 ----
Sul sito comune (vedi qui sotto) c'e' un ottimo esempio di analisi delle directory e sottodirectory e sottosottodirectory e
sottosot....  :-))
Ha la particolarita' di essere una funzione non ricorsiva (ai tempi quando la feci io [ho perso il codice] la feci ricorsiva)
e sfrutta un'architettura ad albero.
Dagli un'occhiata, mi sa che ti risolverebbe tanti problemi. Il file si chiama dirtree.zip.
Passo e chiudo.
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire file PDF da VB6

Salve a tutti, avrei un piccolo problema, praticamente ho creato un
programma per la navigazione di un CD e mi servirebbe che quando clicko su
un tasto mi venga aperto in automatico un file PDF...riesco ad aprire un exe
con shell, ma un file con estensione diversa non so come aprirlo.
Grazie a chiunque mi aiuterà,
                                Mayhem

 wrote in message
news:8m4sni$sl1$1...@nslave1.tin.it...

prova ad aprire in shell acrobat reader, dando come parametro il file da
aprire...
Ciao
Enrico

 ha scritto nel messaggio


dimenticavo:
funziona da Win95 in su e pure con Win2000
:-)
ciao
Xaero

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] queery su tabelle diverse ma campi uguali....

Salve a tutti,
ho una domanda sulle query: ho 2 tabelle Access (ordiniTesta e OrdiniRighe)
relazionate tra di loro dal campo ID di OrdiniTesta ed entrambre hanno il
campo "MARCHIO" (può essere differente tra le righe e la testata). Come
faccio a chiedere il valore del MARCHIO della riga invece che quello dell
atestata??
es.
    Set rRec = New ADODB.Recordset
    sSQL = "SELECT * FROM OrdiniProdTestata INNER JOIN OrdiniProdRighe ON
OrdiniProdTestata.ID = OrdiniProdRighe.IDtestata WHERE
OrdiniProdTestata.numero= '" _
     & Label4.Caption & "' AND OrdiniProdTestata.data_ord = #" &
Format(Label8.Caption, "mm/dd/yyyy") & "#"
    rRec.Open sSQL, cConn, adOpenKeyset, adLockReadOnly
  -->>  rRec("MARCHIO")  voglio che abbia il valore del campo di riga e poi
di testata
Grazie a tutti.
Ciao.
Paolo.

 Format(Label8.Caption, "mm/dd/yyyy") & "#"
sSQL = "SELECT OrdiniProdTestata.MARCHIO AS MARCHIOTESTATA,
OrdiniProdRighe.MARCHIO AS MARCHIORIGA FROM OrdiniProdTestata INNER JOIN
OrdiniProdRighe ON
OrdiniProdTestata.ID = OrdiniProdRighe.IDtestata WHERE
OrdiniProdTestata.numero= '" _
& Label4.Caption & "' AND OrdiniProdTestata.data_ord = #" &
Format(Label8.Caption, "mm/dd/yyyy") & "#"
rRec.Open sSQL, cConn, adOpenKeyset, adLockReadOnly
avrai rRec.fields("MARCHIORIGA")   e   rRec.fields("MARCHIOTESTATA")
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: anno 2000

Personalmente non ho mai riscontrato incompatibiltà nel software di sistema
(BIOS e S.O.) con l'anno 2000 neppure sui vecchi PC 386 con Win 3.1, DOS e
BIOS molto datati !
Se imposto la data  ad anni > 1999 tutto funziona correttamente a livello di
Sistema Operativo, inoltre le varie routine disponibili per chiedere
data-ora funzionano correttamente nei programmi applicativi !
Vi risulta anche a voi oppure c'è qualcosa che non ho tenuto in
considerazione !
Ciao, Massimo

Il problema non sta nel settare la data al 2000 (che sono in grado di
gestire tutti...) ma il passaggio dal 1999 al 2000, in quanto se l'anno č
rappresentato da 2 cifre (come nei vecchi SO e nel clock del PC) succede che
00 < 99! Quindi sballa i conti sulle date!
Comunque se programmi sotto win9x o NT e usi VB non avrai nessun problema...
l'anno č gestito a 4 cifre!
Ciao,
Henrik.


Allora, se non ho capito male, su qualunque SO e BIOS anche vecchi è
possibile impostare date e quindi anche usare funzioni che restituiscono
date corrette anche >= 2000. E' il software di sistema stesso che non
utilizza l'informazione data correttamente in alcune delle sue funzionalità
intrinseche. Quindi, per intenderci, se un vecchio programma applicativo
fosse stato fatto "oculatamente" potrà funzionare anche su un SO e/o BIOS
non compatibili con l'anno 2000 !
Bye, Max

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Icone

Vorrei mettere un'icona personalizzata in un eseguibile.
Esiste un editor di icone?
Devo crearle 16x16 e 32x32?
I puntatori del mouse sono icone? (le estensioni accettate sono .ico e .cur
(?????))
I puntatori sono generalmente trasparenti (come le gif), le icone possono
esserlo?
Grazie
Simone

 ha scritto nel messaggio
news:96288805...@tango.comm2000.it...

MicroAngelo!!! Cercalo su 
www.download.com
 fa al caso tuo.
Ciao By Gianni C.

 wrote in message
news:8k20ob$38cu$1...@stargate1.inet.it...


Mmm... l'ho fatto di nuovo... Ho cliccato send pensando che fosse reply :)
Cmq, nessuno ha mai provato a trascinare un'icona .ico in un ambiente C++
vuoto? L'effetto e' interessante.
Ciao,
Alessandro


 vuoto? L'effetto e' interessante.
l'ho appena fatto... apre l'editor di icone interno utilizzato per creare i
file di risorse; bello  :)
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Provider=Microsoft.Jet.OLEDB.4.0 oppure Microsoft.Jet.OLEDB.3.51

Come faccio a quale provider è installato su un certo PC?
Il mio problema è che se apro un MDB utilizzando nella stringa di
connessione OLEDB.4.0 funziona correttamente, se invece utilizzo OLEDB.3.51
mi dice che non riesce a trovare il provider specificato.
C'è modo di vedere quali provider sono supportati su un certo pc?
Quali DLL o altri file devo controllare?
Grazie a tutti.
Ciao
Skysurfer


wrote:

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] App.path

Salve a tutti,
scusate ma sul sito comune non sono riuscito a trovare niente e su MSDN non
ho trovato un esempio che mi spiegasse bene il funzionamento di App.
Mi spiego: devo creare un pgm che vada a leggere un file INI. Fino ad oggi
inserivo io a pgm il percorso dove andare a prendere il file INI ora però
vorrei che il percorso lo andasse a prendere in automatico dove è stato
installato il pgm stesso (es. C\Programmi\PGM\file.INI).
Per questo penso che l'oggetto App.path sia quello giusto da utilizzare ma
non riesco a capire bene il funzionamento!!
Grazie a tutti.
Paolo



hai provato a scrivere "msgbox App.path"?
Ora, cos'è che non capisci?
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 Ora, cos'è che non capisci?
Grazie per la risposta, effettivamente a questo non avevo pensato!!
Un'ultima cosa: quando andrò a creare il pacchetto di installazione, questo
App.path mi indicherà la cartella C:\programmi (se è li che risiederà
l'eseguibile)?
Paolo


 wrote:

PercorsoTuoProgramma=App.Path
Tutto qui!
Forse non hai trovato nulla peche' non c'e' nulla da dire! :-)


E insisti!!!! :-)

l'eseguibile)?
Secondo te? E non dirmi "se lo sapessi non te l'avrei chiesto", poiché
pensaci su 10 secondi e la risposta la trovi da te (se dopo 8 non l'hai
trovata, premi F1) :-PP
Piuttosto, preferisco occupare queste righe per dirti: "occhio che se
installi il programma nella root del disco, App.Path ti ritorna anche il
"\" finale... quindi occhio a come concateni percorso & nomefile..."
Questà, forse, sarà una banalità, però all'epoca mi fece un brutto
scherzo... anche se chi installa nella root sarebbe da fustigare, tieni
sempre presente che ad installare il programma potrebbe essere un
"utente" come un "utonto"... :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: impostare tasti funzione

Un ciao a tutto il ng...
io vorrei fare in modo che ad un command sia associato un tasto funzione....
come posso fare?
Grazie a tutti

 come posso fare?
Se non ricordo male io l'avevo risolto mettendo un menů nascosto
richiamabile
con il tasto ad esempio F11, poi nell'evento click del menů richiamavo il
command_click

 come posso fare?
Io di solito uso l'evento Form_KeyDown che mi restituisce lo scancode dei
tasti che non hanno codice Ascii (come i tasti funzione, controllando che
lo scancode ricevuto sia quello richiesto (nel tuo caso, F1 = 112, oppure
puoi usare la costante vbKeyF1).
Se è il caso, puoi testare anche il campo shift che ti dice se è stato
premuto
contemporaneamente anche un tasto CTRL, SHIFT, ALT, o una combinazione
di essi.
In caso si tratta di F1, ti basta far eseguire la funzione associata
all'evento
click del tasto (Command1_Click) e il gioco è fatto.
Per evitare che il tasto F1 non funzioni quando il focus è su altri
controlli,
dovresti poi inserire nelle funzioni KeyDown di tutti i controlli che
possono
ricevere il focus, una chiamata alla funzione Form_KeyDown passandole
gli stessi parametri ricevuti; ad esempio:
Sub Command1_KeyDown (KeyCode As Integer, Shift As Integer)
    Form_KeyDown KeyCode, Shift
End Sub

puoi usare la costante vbKeyF1).
[CUT]
Fin qui tutto ok, poi basta che imposti KeyPreview=True sul form dove vuoi che vengano
utilizzati i tasti "veloci".
Ciao, Aran

 utilizzati i tasti "veloci".
Questo è quello che c'è scritto nell'help, ma io non ho trovato differenza
nel dichiarare KeyPreview = False o True, e comunque, devo sempre
fare quel maledetto gioco di dirottare l'input dai controlli al form,
altrimenti
viene intercettato dai controlli e non viene passato al form... :-(((
--
Er Roscio.
Newsgroup: it.comp.lang.visual-basic
Titolo: Help - Il Report non si aggiorna

Devo stampare tramite Report il risultato di una Query:
il Report realizzato con il DataEnvironment mi crea il seguente problema:
come fonte dati del mio Command utilizzo la stringa in  SQL che genera il
risultato della Query solo che, quando cambio Query, rimane memorizzata la
precedente fonte dati e di conseguenza il Report non cambia. In pratica
sembra quasi che la fonte dati non venga “rinfrescata” anche perché non sono
riuscita a trovare il metodo Refresh .
Eventualmente potrei associare al mio Report un controllo ADODC? Se si come?
Grazie Cristina

 ha scritto nel messaggio
news:8qvrf6$n5g$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [quando inizia una connessione]

Salve a tutti
come posso determinare quando inizia e finisce una connessione alla rete?


Dai un'occhiata sul mio sito o sul Sito Comune
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: mciSendString e l'apertura del CD

Col seguente codice:
------------------
Private Declare Function mciSendString Lib "winmm.dll" Alias
"mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As
Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Command1_Click()
        mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0&
End Sub
Private Sub Command2_Click()
        mciSendString "Set CDAudio Door Closed Wait", 0&, 0&, 0&
End Sub
--------------------
Io schiaccio prima command1, poi command2 funzia perfetto apre e chiude il
cassetto, poi sia che schiaccio command1 che 2 mi si inchioda e
difficilmente riesco a recuperare chiudendo vb. Qualcuno sa perchč? grazie

 difficilmente riesco a recuperare chiudendo vb. Qualcuno sa perchč? grazie
prova usando
Private Declare Function mciSendString Lib "winmm.dll" Alias _
    "mciSendStringA" (ByVal lpstrCommand As String, ByVal _
    lpstrReturnString As String, ByVal uReturnLength As Long, _
    ByVal hwndCallback As Long) As Long
    Dim RetValue As Long
    Dim ReturnString As String * 127
    RetValue = mciSendString("set CDAudio door open", _
        ReturnString, 127, 0)
Ciao
Faber