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

Come da oggetto  qualcuno sa dirmi qualcosa al riguardo.
Come si usa? Con possibilmente degli esempi da codice.
Non mi dite di vedere la guida in linea perchè non ce l'ho.
Grazie

 wrote in message
news:8t8s1b$b0l$1...@pegasus.tiscalinet.it...


concordo
ciao
ugo

Mi spieghi perchč sei cosě scettico nei confronti della goto?
Ciao Luciano.

 Non mi dite di vedere la guida in linea perchè non ce l'ho.
trànquilo, non ti chiediamo neanche come mai non ce l'hai :)
apri un nuovo vbp.
nel codice del form1 incolla questo qui sotto
Private Sub Form_Load()
    On Error GoTo errman
    GoTo ciccio
    Exit Sub
spaghetti:
    MsgBox "questo viene chiamato spaghetti coding" & vbCrLf & _
    "indovina perche' ?"
    Unload Me
' poi prova a mettere un apostrofo
' davanti alla linea che segue
' e rilancia il programma
    Exit Sub
cicci:
    MsgBox "e questa era la cicci"
    GoTo spaghetti
ciccio:
    Me.Show
    MsgBox "questa era la label ciccio"
    GoTo cicci
errman: MsgBox Error
End Sub
ciao, a.

 Mi spieghi perchč sei cosě scettico nei confronti della goto?
Non serve che te lo spieghi. Ci arriverai anche da solo dopo aver letto
questo:
Go To Statement Considered Harmful
Edsger W. Dijkstra
Communications of the ACM, Vol. 11, No. 3, March 1968, pp. 147-148
http://www.acm.org/classics/oct95/
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 
http://www.acm.org/classics/oct95/
Vorrei ricordare che Dijkstra oltre a criticare l'uso dei goto è stato anche
uno dei più grandi logico-matematici del nostro secolo.
I suoi studi sugli algoritmi hanno permesso di effettuare grandi passi
avanti nel campo della Ricerca Operativa.
Bella citazione.
Ciao,
  Enrico.

uno dei più grandi logico-matematici del nostro secolo.
Già, anche se non ho mai capito come si pronuncia Dijkstra... ;)
Ciao,
Roberto
email: 
ron...@tiscalinet.it

 Già, anche se non ho mai capito come si pronuncia Dijkstra... ;)
All'olandese, suppongo. ;-)) Ma anche la soluzione di chiamarlo per nome non
e` cosa, per noi italiani: Edsger Wybe Dijkstra!


Newsgroup: it.comp.lang.visual-basic
Titolo: account user pass - acc.txt (0/1)

 
Numero: 7020016418
Nick: gouser
Password: tksv511


Newsgroup: it.comp.lang.visual-basic
Titolo: registrare ocx

Premetto che non ci capisco molto della materia.
Come faccio a creare un eseguibile con vb5 che comprenda tutti gli ocx
che ho usato per scrivere il programma?
Pensavo che mi linkasse tutto in un file (come vacevano i vari
compilatori sotto dos)
Su un altro pc mi viene la scritta:
MSCOMCTL.OCX non registrata
Mi sembra ovvio che non basta copiare questo ocx in qualche directory di
windows.
Mi serve che il mio programma .EXE possa essere eseguito su 95/98 e NT
Se non c'e' un metodo per farlo in automatico mi potete spiegare
passo-passo come devo fare?
Un programma vb con controlli ocx standard mi gira su qualunque
macchina?
Grazie
Roberto

 windows.
I controlli ActiveX (.OCX) devono essere installati, ovvero copiati ad es.
in C:\Windows\System, e poi registrati con regsvr32.exe o con altre utility.
Per usare regsvr32.exe (che dovresti avere in C:\Windows\System) puoi usare
Avvio\Esegui..., battere regsvr32.exe e leggere la sintassi che ti
suggerisce.
In alternativa potresti usare RegCtrls OLE Control Registration Utility di
SoftCircuits Programming, scaricandola da 
http://www.softcircuits.com
In pratica è una versione grafica di regsvr32.exe, più flessibile, avendo
funzionalità aggiuntive. Io la trovo molto comoda.
Ricorda che gli OCX che puoi scegliere nel menù Progetto\Componenti sono
tutti e soli quelli registrati.
Ricorda anche di selezionare eventuali "riferimenti" necessari per alcuni
OCX (menù Progetto\Riferimenti): ad es. per un Data Control che usa ADO per
accedere ai dati è necessario selezionare il riferimento alla libreria ADO
visibile nel menù, affinchè ne siano disponibili le funzionalità.
ALOHA!

 [snip]
------------
Francesco Beccari
frankb@I_HATE_SPAM_interplanet.it

 windows.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] aggiornare tabella Access

Salve a tutti,
avrei questo problema:
- una tabella con dei campi tra cui (articolo - descriz1 - descriz2 -
descriz3 ecc..)
- un'altra tabella con gli stessi campi
- vorrei aggiornare i campi descrizX della tabella 1 con quelli della tab2
(ovviamente con codice articolo uguale)
Come posso fare?
Con la query di aggiornamento non riesco.
Grazie a tutti.
Ciao.
Paolo.

dim Db as database
dim RstTabellaPlay as recordset
dim RstTabellaRec as recordset
set db=currentdb
set RstTabellaPlay =db.openrecordset("QueryCheSelzionaSoloRecordGiusti")
set RstTabellaRec=db.openrecordset("tabella2")  'anche qui si puo usare una
query
if RstTabellaPlay.recordcount>0 then
  RstTabellaPlay.movefirst
  while not RstTabellaPlay.EOF
    RstTabellaRec.findfirst "[articolo=]"  & RstTabellaPlay!articolo 'se
articolo è una stringa usa gli apici
    if  RstTabellaRec.nomatch then
      RstTabellaRec.addnew
      RstTabellaRec!articolo=RstTabellaPlay!articolo
    else
      RstTabellaRec.edit
    endif
    RstTabellaRec!descri1=RstTabellaPlay!descri1
    .
    .
    .
    RstTabellaRec!descriN=RstTabellaPlay!descriN
    RstTabellaRec.update
    RstTabellaPlay.movenext
  wend
endif

 (ovviamente con codice articolo uguale)
Questo comando, per quanto con sintassi fuori standard, viene digerito
correttamente da Access:
update Tabella1,Tabella2 set Tabella1.descriz1=Tabella2.descriz1 where
Tabella1.articolo=Tabella2.articolo
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Tabella1.articolo=Tabella2.articolo
luca scusa, premesso che di sql ne so zero, non basta update tabella1 set
... ?
ciao, a.

 ... ?
Si, pero' hai bisogno di specificare la *seconda* tabella da dove prendere i
dati; la sintassi corretta dovrebbe essere quella che prevede anche una
clausula FROM nel comando update, tipo:
UPDATE tabella1
SET descriz1 = tab2.descriz1
FROM tabella1 AS tab1, tabella2 AS tab2
WHERE tab1.articolo = tab2.articolo
nota l'uso dei 2 alias...
siccome devo tener conto di diversi RDMS tendo ad evitare costrutti troppo
"esotici" nei programmi; query di questo tipo le uso solo per fare
manutenzione "a mano" dei DB, quindi non saprei dirti con certezza se questa
sintassi e' piu' portabile dell'altra; dato che si parlava di Access quella
in oggetto mi e' sembrata piu' comoda.


 in oggetto mi e' sembrata piu' comoda.
grazie, come molte altre cose mi mancava.
della sintassi corretta mi sfugge comunque la logica. se gli dico
    set tab1.desc = tab2.desc
mi sembrerebbe implicito che il desc lo voglio FROM tab2 :)
a sql evidentemente non sembra.
abbe', non si finisce mai d'imparare.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Click simulato ........ non ne esco

Buongiorno a tutti,
ho una form che contiene una dirlistbox e la relativa filelistbox.
Io vorrei che cliccando su un nodo della dirlist si apra subito una 
sua sottocartella.
La dirlist apre solo su doppio click quindi ho inserito il riferimento 
alle api in un modiulo:
Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, 
ByVal dX As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal 
dwExtraInfo As Long)
Public Const MOUSEEVENTF_LEFTDOWN = &H2
Public Const MOUSEEVENTF_LEFTUP = &H4
Nella form ho inserito un timer a 100 e in mouse click. mouse down e 
in mouse up della dirlist ho inserito questo codice
Private Sub dirPodio_Click()
    tmrMouseClick.Enabled = True
End Sub
Private Sub dirPodio_MouseDown(Button As Integer, Shift As Integer, X 
As Single, Y As Single)
        tmrMouseClick.Enabled = False
End Sub
Private Sub dirPodio_MouseUp(Button As Integer, Shift As Integer, X As 
Single, Y As Single)
    If tmrMouseClick.Enabled = True Then
        mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
        tmrMouseClick.Enabled = False
    End If
End Sub
Sono riuscito a raggiungere lo scopo solo che quando clicco su altri 
pulsanti della form mi perde un click, cioï¿œ se clicco su un pulsante 
mi si seleziona ma devo ripremerlo un'altra volta per eseguirlo.
Ho provato a spostare il setfocus fuori dalla dirlist ma senza 
risultato.
Avevo provato anche senza timer ma funzionava uguale
Mi date una mano a risolvere questo problema 

 sua sottocartella.
Ma non c'� bisogno di simulare nessun click!
Basta questa semplice istruzione:
Private Sub dirPodio_Click()
    dirPodio.Path = dirPodio.List(dirPodio.ListIndex)
End Sub
Bye
Raf 

 
Ma porc...........
Grazie ....... e non ci avevo proprio pensato
Benvenuto nell'ufficio complicazioni cose semplici :)
Grazie ancora

Newsgroup: it.comp.lang.visual-basic
Titolo: Convertire un'applicazione VB6 in un ActiveX

Ciao 
E' possibile convertire un'applicazione VB6 in un controllo ActiveX da
mettere in un .cab scaricabile con IE?
Ho pravato a impostare il progetto come Exe ActiveX e a convertire
tutti i form in UserDocument tramite la conversione guidata; ma mi
dice che non posso usare controlli activeX nè form MDI, che invece mi
servirebbero.
Magari mi serve un controllo ActiveX? Boh!?!
Spero possiate aiutarmi.
Grazie.

Grazie.
di nulla

 servirebbero.
Scusa, ma se il controllo lo devi vedere tramite IE, e quindi tramite 
una pagina web, come pretendi di inserirci form di qualsiasi tipo?
Ciao
-- 
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Ciao
Hai ragione. Per questo avevo dubbi che si potesse fare.
Comunque grazie a tutti.
Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP] Error 713

Come capisco che tipo di errore č?
Che posso fare?

 Che posso fare?
Vedi, se ci raccontassi un po' di piů (come, dove, quando), forse potremmo
anche capire il perchč...
Potendo solo cercare 713, ecco: 
http://makeashorterlink.com/?W64B24804



Poiche'
?Error$(713)
Application-defined or object-defined error
quello che puoi fare e':
- consultare la documentazione (se c'e') dell'oggetto che ha generato
l'errore;
- cercare in rete sul web e sui newsgroups con le parole chiave
error 713 <nome_libreria_che_da_errore>
magari specificando anche caratteristiche del contesto in cui si
verifica l'errore.
Gia' cosi' e' un buon punto di partenza.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Come faccio a sospendere quella funzione?

Scusate se ripropongo lo stesso quesito, ma non ho mai ricevuto nessuna
risposta in merito.
Supponiamo che nel Form1 ci sia la seguente SUB:
Public (o Private) Sub xxxxxx()
    Istruzione1
    Istruzione2
    Form2.Show 1
    Istruzione3
    Istruzione4
End Sub
Esiste un modo per sospendere l'esecuzione della Sub finchè non c'è l'Unload
di Form2 ?
Devo proseguire con  l'Istruzione3 solo dopo che determinati valori sono
stati stabiliti con la Form2.
In precedenza non ho mai ricevuto risposta.
Vorrei almeno capire se la mia domanda è stupida o c'è qualche altro motivo.
Ho provato con la ShellAndWait di Berardi Paolo.
Mi sembra ottima.
Ma funziona solo con programmi esterni.
Se qualcuno potesse rispondermi ........
Grazie, Sauro

?????????????????
Forse non ho capito la domanda .....
ma non è proprio quello che fa l'istruzione [Form2.show 1] mostrando un form
modale ???

 ha scritto nel messaggio
news:nJ7G9.41188$3l.11...@twister1.libero.it...


 form2.show 1 apre una form modale.
Eppure per qualche ragione non succede se non occasionalmente (per dire,
ieri funzionava sempre, oggi mai, domani funzionerà ancora sempre).
Forse avrò fatto qualche casino che scombina le sequenze.
Naturalmente il mio caso effettivo non è così semplic come l'esempio
illustrato.
A proposito, non ho specificato che il richiamo del Form2
viene effettuato all'interno di uno UserControl mio che è presente nel Form
principale.
Il sapere che comunque si dovrebbe comportare come da Voi spiegato mi
aiuterà a risolvere.
Grazie e saluti, Sauro

 Esiste un modo per sospendere l'esecuzione della Sub finchč non c'č


 aiuterà a risolvere.
in una form normale col codice che hai scritto tu si DEVE comportare cosi in
quanto la chiami con vbmodal  (Form2.Show 1 ) anche se ometti il secondo
parametro , quindi prova a dettagliare meglio cosi vediamo l'inghippo

Newsgroup: it.comp.lang.visual-basic
Titolo: 2 Suoni contemporaneamente, possibile?

Come da oggetto, come faccio a eseguire
due file wav contemporaneamente, o comunque a
sovrapporli, senza che l'inizio di uno interrompa
quello prima...
GRAZIE MILLE
--------------------------------------------
             ASSA
http://web.tiscalinet.it/Assatarram
--------------------------------------------

 GRAZIE MILLE
Se non erro, sul Sito Comune, nella sezione FAQ ci dovrebbero essere esempi
su come usare i suoni.
So che l'api ha una costante per chiedere se eseguirlo sincrono o asincrono,
poi non so.
Sito Comune:  
http://www.murialdo.it/it_lang_vb
Ciao
Ettore Maronese  By -MES-
http://www.maronese.com/mes



Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] visibilità...

Qualcuno mi dice se vede i miei post? Ho dei problemi di login col mio
news reader e non vorrei che questo in qualche modo causasse la perdita di
post :-(
ciao, michele

 post :-(
Per le prove c'è it.test

 ha scritto nel messaggio
news:a2u37m$c9o$1...@newsreader.mailgate.org...


 ha scritto
| Ho dei problemi di login col mio
E non solo quelli: sei un'ora avanti... :-)

vero, scusa l'ingoranza ma... da cosa dipende?
"Jabba The Hutt" <Jabba....@Alderaan.SW> ha scritto nel messaggio
news:sjw48.26615$hi.6...@news1.tin.it...


 vero, scusa l'ingoranza ma... da cosa dipende?
Orologio di sistema

 ha scritto nel messaggio
news:a2u3ol$13smqs$1...@ID-87006.news.dfncis.de...


 ha scritto nel messaggio
news:a2u3s8$cgc$1...@newsreader.mailgate.org...

devi impostare il fuso orario a +1
ciao buc

ok, vediamo se funziona


 ha scritto nel messaggio
news:a2vhfc$1en$1...@newsreader.mailgate.org...


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

Salve,
 stò usando un programma per creare delle etichette. LabelView 8.0,
per stampare l'etichette creo un nuovo documento richiamando il mio
template, in seguito passo ai campi del nuovo documento i valori letti
da DB.
Per creare il documento uso il codice:
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim Lbl As Object
'etichetta selezionata
Set Lbl = CreateObject("Lblvw.Document")
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Se LabelView è in formato Demo riesco a creare il nuovo documento e
farlo stampare con i dati giusti, se inserisco la chiave hardware di
licenza, alla creazione del nuovo documento mi visualizza errore 429 -
Il componente ActiveX component non può creare l'oggetto.
Qualcuno sa indicarmi una via d'uscita? [che non sia il suicidio !!!!]
Lanfra


Sono riuscito a scoprire l'arcano.... Ho sviluppato appoggiandomi a
LabelView 8.0 PRO, con chiave hardware.
Peccato che la versione LV PRO 8.0 non supporta la gestione dei
componenti ActiveX (al contrario della 6), ma bisogna utilizzare la
versione LV GOLD 8.0
Ciao ciao
LANFRA

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

Vorrei sapere se è possibile trovare in rete un decompilatore per visual
basic 5 o 6
Grazie!

 wrote


A quanto ne so... non esiste...
Ciao !


 wrote in message
news:FqpS3.978$SV.1...@typhoon.libero.it...


 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: ScreenSaver in Windows98

...
    Stranamente su 
www.wotsit.org
 sito per programmatori, che espone come è
strutturato ogni formato di file. Ho trovato informazioni errate
relativamente ai file scr, screensaver, scaricando il file che ho allegato.
    Ho scritto tale messaggio per sapere se mi davate qualche dritta su
come, in Win98, rispondere alla chiamata imposta screensaver dal pannello di
controllo/ impostazioni schermo/ scrensaver.
    Spero che abbiate capito e una vostra risposta.
    Grazie a chiunque mi risponda.

>Comunque tutto il proggetto parte da una submain che controlla la >Var di
ambiente Command con If..Then..Else ma non so perchè mi >avvia correttamente
solo "/s"; il debug non dà nesssuna risposta di >errore, tutto sembra
corretto ma win non vuole saperne di >configurazione e quindi di parametri
/p /a /c
Ma non sarebbe molto più ratico usare Case?
Select Case Pippo
        Case "s"
                'Fai questo
        Case "p"
                'Fai quest'altro
        Case "a"
                'Cambiamo ancora azione
        Case "c"
                'Configura o che a che altro serve
End Select
Secondo me è probabile che se parte sempre e solo con il primo parametro ci
si a un errore nei cicli if...then....else, usa case + semplice e "ordinato"
di una serie di if

QWxsb3JhLA0KU29ubyBkJ2FjY29yZG8gc3UgY2nyIGNoZSBtaSBoYWkgc2NyaXR0byBwZXLyIGlv
  Cortesemente, evita anche codifiche di qualsiasi tipo: questo e'
cio' che vedo della tua codifica base 64, percio' ovviamente non posso
rispondere alle tue domande. :-]
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

Inoltre per la preview c'é qualche chiamata API????
Puoi usare BitBlt avendo l'accortenza di ricavare l'handle (Windows avvia la
preview dello screensaver aggiungendo tali argomenti alla riga di comando /p
XXXXXXX, dove XXXXXXX e' l'handle di contesto)

...



A me interessa soprattutto evitare che lo screen saver parta appena lo
seleziono in pannello di controllo: anche se non si vede la preview
nello schermo fa niente.
Come posso fare?
Se non e' troppo potresti postare la parte di codice interessata?
Grazie


Se vuoi evitare la prewiev basta che ignori il command"/p", quindi nella
subn main di avvio scriverai:
dim Varc as string
VarC=Right(Command,2)
select case VarC
    case "/s"
        'tuocodice per lo screenSaver
    case"/a"
        'tuo codice per la finestra password
    case"/c"
        'tuo codice per la configurazione
end select
Questo è il tuo codice di struttura, come vedi omettendo il case "/p"

...

Newsgroup: it.comp.lang.visual-basic
Titolo: ? Info Ricerca SQL

Come posso fare con SQL una ricerca di una stringa in una tabella Access
senza contare gli spazi.
    ad esempio:  cercando "DATASERVICE" mi deve trovare eventualmente anche
"DATA SERVICE".
Grazie a chi vorra' rispondermi.
Stefano

Non sono a conoscenza di comandi per fare quello che dici.
Puoi rimuovere gli spazi all'inizio e fine (RTRIM), puoi sostituire gli
spazi con altri caratteri (REPLACE), ma che io sappia non esiste un metodo
per non considerarli.
Ovviamente puoi fare una cosa terribile del tipo "WHERE dato='D ATASERVICE'
or dato='DA TASERVICE' or .......".

 wrote in message
Hpol3.22627$X%.41140@typhoon.libero.it...


Se il caso è solo questo sì, ma da quel che ho capito vuole trovare anche D
ATASERVICE, DA TASERVICE, DAT ASERVICE etc. (ovvero spazi tra qualsiasi
coppia di caratteri).
Attenzione all'*, da sostituire il sql con %.

"DATA SERVICE".
credo che sia molto dura!
potresti provare con una routine che testa tutte le sottostringhe diminuendo
ogni volta di 1 lettera:
dataservice ataservice taservice etc
pero' non becca le parole con piu' di uno spazio
ciao
Marcello

Cristiano Larghi Micronix2 <C.La...@Micronix.it> wrote in message
7n6nbk$h10$1...@fe1.cs.interbusiness.it...

Che ne dite di usare la funzione Trim nella query?
--
Roal Zanazzi
z...@iol.it




TRIM rimuove solo spazi iniziali e finali (se non ricordo male con comandi
sql va usato RTRIM, che sarebbe in VBA Trim solo dx, ma non sono sicuro).

 wrote in message
fBWl3.64501$X%.73506@typhoon.libero.it...

Scusate, ho scritto una cavolata...
Dovrei leggere con piu' attenzione le domande, e collegare il cervello prima
di rispondere!
--
Roal Zanazzi
z...@iol.it

 wrote in message
iZ5m3.1830$lQ1....@typhoon.libero.it...


La funzione Replace che è disponibile sia come DML dell'SQL standard che in
VB6 e in VbScript serve per trovare e sostituire una sequenza di caratteri
con un'altra:
SELECT * FROM MiaTabella Where Replace(MioCampo, ' ', '') = " &
Replace(DatoDiParagone, ' ', '')
Questa istruzione confronta il contenuto del campo di ricerca nella tabella
privato degli spazi con i ltermine di paragone anch'esso privato degli
spazi.
Dovrebbe funzionare
Ciao
Attenzione solo in VB6 e non in VB5
--
      Pino Saffioti
-----------------------------------
pino.s...@asl1.to.it
Newsgroup: it.comp.lang.visual-basic
Titolo: se y è simile ad x

Carissimi,
in un'applicazione VB devo effettuare alcune operazioni alla seguente
condizione:
Se y č 
http://www.sitoweb.it/
 *casuale*
Dove *casuale* č spesso un numero o altro
Quale potrebbe essere il codice da inserire?
Avevo risolto con
If y >= "
http://www.sitoweb.it
" Then
....
End If
ma se y č 
www.altrosito.it
 senza http:// la condizione č vera
Vi ringrazio anticipatamente
Raffaella
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

:-)

 If y >= "
http://www.sitoweb.it
" Then
ma y non era un numero?
Ciao
--
Reporting tool: 
http://www.neodatatype.net


Ragionando si possono trovare varie soluzioni.
Ad esempio puoi utilizzare variabili temporanee nelle quale togliere
http:// se presente e limitare la lunghezza alla prima ricorrenza di /:
if left$(q$,7)="http://" then q$=right$(q$,len(q$)-7)
if instr(q$,"/")<>= then q$=left$(q$,instr(q$,"/")-1)
o soluzioni simili.
Alessandro!
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Grazie 1000 :)
Raffy


"Raffaella" <nos...@grazie.invalid> ha scritto nel messaggio 
news:82Z57Z13Z224Y1...@usenet.libero.it...

Non so cosa tu voglia fare, ma la cosa migliore č sicuramente scrivere un 
piccolo "parser" della url, che ha una sua grammatica ben definita. Devi in 
questo caso eliminare il protocollo (http o ftp o altro) cercando //:, poi 
separare la parte indirizzo e la parte directory (dop il primo slash, se 
presente).
Scrivi una funzione separata tipo:
If EstraiIndirizzoDaURL(y) <> "
www.sitoweb.it
" Then
Function EstraiIndirizzoDaURL(ByVal strURL As String) As String
    Dim strTemp As String
    Dim iPos as Long
    Dim a as Variant
    a = Split(strURL, "://")
    If UBound(a) < 1 Then
        strTemp = strURL
    Else
        strTemp = a(1)
    End If
    iPos  = InStr(strTemp, "/")
    If iPos  > 0 Then
        EstraiIndirizzoDaURL = Left(strTemp, iPos  - 1)
    Else
        EstraiIndirizzoDaURL = strTemp
    End If
End Function
Ciao
Elef

Newsgroup: it.comp.lang.visual-basic
Titolo: R: [?] qbasic e filelistbox

> Sta sul cd di win98 nella cartella MsOldDos
No. Quello e' l'intermprete QBasic, non il compilatore QuickBasic.

Newsgroup: it.comp.lang.visual-basic
Titolo: tagliare i rami secchi

Nello sviluppo di un progetto, capita che alcune classi/metodi/proprietà 
non vengono più utilizzate. E' possibile trovare questo codice non più 
eseguito in modo da cancellarlo?
In particolare anche le query devi vari dataadapter.
Grazie

 In particolare anche le query devi vari dataadapter.
Per VB6 c'� mzTools che per ogni modulo ti trova le cose non utilizzate, mi
pare si chiami "analisi codice sorgente".


mmmh ... visto che che parla di data adapter forse si rifersice a .NET
ciao
stefano

 stefano
yes :D .net

 mmmh ... visto che che parla di data adapter forse si rifersice a .NET
Si vero, mi pare che mz ci sia anche per .NET ma non era gratuito mi pare.

Si vero, mi pare che mz ci sia anche per .NET ma non era gratuito mi pare.
Qualcosa di gratuito nulla vero?
Newsgroup: it.comp.lang.visual-basic
Titolo: Funzioni di una dll chiamate da una pagina asp?

Ciao a tutti,
volevo chiedere quale č esattamente la sintassi per effettuare chiamate a
funzioni contenute in una dll da una pagina asp.
Supponiamo di avere una classe di nome c avente una Sub e una Function, č
corretto chiamarle in questo modo:
Dopo aver creato l'oggetto c
    c.Sub (var1, var2, var3)
    c.Function (var4, var5, var6)
Grazie per l'aiuto
Sergio

 wrote in message
news:RQjQfl1...@newsmst.mcis.galactica.it...


La DLL DEVE essere un oggetto COM. Una DLL tradizionale non va bene perchè
VBScript non supporta Declare.
E comunque deve dichiarare la classe prima con
vMyObj=Server.CreateObject("progId")
oppure
vMyObj=CreateObject("progId")
A questo punto tenga presente che il VBScript (e simili) non "usa" mettere
le parentesi per delimitare parametri di chiamate di tipo Sub:
[Call] MioMetodo elencoparametri
anche se non costituisce un errore grave.
Per utilizzare le funzioni di una DLL tradizionale deve creare una classe
wrapper di tipo COM che riesponga quello che le interessa (metodi,
proprietà,..) attraverso l'interfaccia di automazione.
Saluti


Ciaotutti,
Alessandro

Newsgroup: it.comp.lang.visual-basic
Titolo: Ocx per Generare Barcode

Ho bisogno di un OCX per generare Barcode di vari formati.
Ne ho trovati parecchi in giro per la rete ma sono tutti molto cari.
C'č qualcuno che conosce un controllo funzionale e il piů possibile
economico?

 ha scritto nel messaggio
news:LRlX8.26251$7N3.5...@twister2.libero.it...


Io ho utilizzato un font true type e mi sono scritto un modulo bas!
Se vuoi te li spedisco!
Funziona pero' solo per l'ean 13

 ha scritto nel messaggio
news:LRlX8.26251$7N3.5...@twister2.libero.it...


 ha scritto nel messaggio
news:LRlX8.26251$7N3.5...@twister2.libero.it...
Per la tipologia del progetto che sto portando avanti i Font sono da
scartare, serve proprio un generatore di B.Code in grado di generare un
certo numero di Bcode (almeno EAN 13 - 8, UPC ,Code 39 93 128)

 Se vuoi te lo mando domani dall'ufficio.
Provo a cercrlo poi ti facio sapere .
Tenks...

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

ciao a tutti
sto cercando un database contenente tutte le vie di milano con relativo cap.
sapete dove lo posso trovare??????
grazieeeeeeeeeeeee

hai provato dal giornalaio? ci sono molte edicole che vendono cd
aggiornatissimi a prezzi stracciati.
--------------------------------
Inviato via 
http://usenet.libero.it

 wrote in message
217Z59Z51Z132Y...@usenet.libero.it...


ti commenti da solo o vuoi la lista degli aggettivi che ti si addicono?

Newsgroup: it.comp.lang.visual-basic
Titolo: Chiusura con tasto X

Ciao, forse la mia č una domanda stupida: come faccio ad intercettare quando
viene schiacciato il tasto X in alto a destra della finestra di un form
principale MDI? Mi serve pechč quando schiaccio questo tasto il programma
che ho fatto esce senza salvarmi i dati. Nei form normali riesco a
disattivare il tasto ma nel form  principale MDI non c'č l'opzione. Si puň
disattivare anche in quelli MDI? Spero in un aiuto!!!!!!
Grazie.
Ciao, Fabiano.

disattivare il tasto ma nel form  principale MDI non c'è l'opzione. Si può



Newsgroups: comp.lang.basic.visual.misc
Subject: Re: Stopping a shutdown
Date: Fri, 29 Oct 1999 16:36:57 -0700
I can help out with catching the shutdown event. Windows will notify your
program what its doing. Use the QueryUnload event of your form and check the
UnloadMode.
See the description of UnloadMode below:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
' =======================================
'
' Parameters -Cancel (Integer)
' If cancel = 0 Then all children of
' the form and the form its self will
' be unloaded. Otherwise, they
' will not be unloaded. I like to use
' the following code to stop an unload
' Cancel = vbYes
'
' -UnloadMode
' see info below (This is the relevant
one)
' =======================================
Select Case UnloadMode
Case 0:
' User used the Control Box Menu in the upper
' left corner or the "X" in the upper right
' corner of the form. If this is one of many
' forms, I send it back to the form that called it.
' One way in, one way out.
Case 1:
' Some other code within this application is causing
' the shutdown. Usually a routine in a BAS module.
Case 2:
' Windows session is closing (i.e. Start, Shut Down)
Case 3:
' Task Manager is closing this application. (i.e.
' Ctrl+Alt+Del, End Task)
Case 4:
' The MDI parent form is closing.
End Select
End Sub
As far as cancelling a shut down, I imagine there is an API command to do
it, but I don't know it. Check the MSDN Library site under windows32 API or
check the API Viewer included with Visual Studio.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] E' possibile settare l'altezza di un form a più di 11570

Perchè ho un problema di stampa!
p.s.
sono disperato
grazie mille

Due persone diverse con lo stesso problema! Ma che vi siete messi d'accordo?
Comunque come ho detto in quell'altro se setti il BorderStyle a zero a me
funzionava...ho provato un 30.000 e me l'ha preso tranquillamente.
Gianni Moretti
Newsgroup: it.comp.lang.visual-basic
Titolo: [Vb.net] For each, DirectCast e Collection

Ho questa piccola curiosità:
C è una collection che viene riempita con oggetti di tipo Pippo.
Pippo è una classe che espone due proprietà A e B
Devo impostare a x entrambe le proprietà A e B di ogni oggetto Pippo
contenuto nella collection C.
Posso farlo con un ciclo For each:
For each P as Pippo in C
    P.A = x
    P.B = x
next
Oppure posso usare un normale ciclo e DirectCast:
For i as integer = 1 to C.count
    Dim P as Pippo = DirectCast(C.item(i),Pippo)
     P.A = x
     P.B = x
next
E' ovvio che il primo sistema è più elegante e più leggibile ma a parte
questo il primo metodo è migliore dal punto di vista delle prestazioni?
Utilizzando For each ogni oggetto viene trasformato in Pippo esattamente
come avviene utilizzando DirectCast o ci sono delle differenze?
Grazie!
Ciao Fil

 come avviene utilizzando DirectCast o ci sono delle differenze?
Per questi piccoli dubbi puoi controllare le differenze con Reflector.
Così a occhio ti direi che non ci sono differenze a parte l'uso
dell'enumeratore anzichè dell'indice, poichè il For each altro non fa che
dichiarare una var. per il loop ed eseguire il cast sull'elemento corrente.
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual basic & sql

Ciao sono Michele,
Vorrei sapere come utilizzare le istruzioni sql come insert table etc..
in ambiente VB senza dover ricorrere al controllo Data.
Inoltre come posso utilizzare le variabili Vb nella clausola Where della
SELECt

...


prova così :



Usare il data non è molto complicato, la sua funzione dovrebbe essere
quella di facilitare l'utilizzo dei database. Nel progetto che ho fatto
io ho inserito solo un istruzione che chiamava DATA:


file = "esempio.mdb"

Data1.DatabaseName = file


L'utilizzo dell'insert è semplice, questo esempio dovrebbe chiarirti
le cose, naturalmente il numero di campi dopo values deve essere uguale
al numero di colonne della tabella:


Set bdd = Workspaces(0).OpenDatabase(file)

query_aggiorna_vet = "insert into vettura values ('" & text4.Text
& "' ," & Text1.Text  ")"

bdd.Execute query_aggiorna_vet

bdd.Close


Per quanto riguarda la select, l'unico modo per usare le variabili è
la concatenazione di stringhe, in questo modo il VB prima assegna il valore
alla variabile e poi concatena questo con il resto della stringa che andrà
a formare una chiamata SQL. Nel mio esempio la variabile è Combo1.Text,
ma puoi mettere quello che ti pare:


query_aggiorna_vet = "select * from vettura where modello = ' " &
Combo1.Text & " ' "


Un salutone!

 

o° °o°o°o.o°o°o° °o


°o ROSMARINO o°


° °o°o°o.o°o°o° °

 



wrote:


...



Dipende...
Se ti interfacci ad un database Access, e' meglio DAO (consigliato dalla
stessa Microsoft, pare)
--
Roal Zanazzi
z...@iol.it

 wrote in message 7e3fcb$62e$4...@hermes.iol.it...

Si ma se vuoi che la tua applicazione sia facilmente scalabile .... ADO è
sicuramente la scelta piu' azzeccata !
Giuseppe G. Selgi
sel...@dns.omnia.it
Newsgroup: it.comp.lang.visual-basic
Titolo: VB Script nelle HomePage

Scusate, vorrei sapere se si puň inserire il VB Script nella mia HomePage.
Se si puň, vi prego, gentilmente, di spiegarmi come si fa utilizzando
FrontPage 98
Grazie gia da ora.
--
Daniel Buccarella
E-Mail: 
dan...@cz.flashnet.it
HomePage: 
http://www.byte.it/~daniel

Se si può, vi prego, gentilmente, di spiegarmi come si fa utilizzando


FrontPage 98
Menù Inserisci, voce Controlli Avanzati, Script.
Chiaramente se non hai familiarità con l'Object Model dell'Explorer ottenere
dei risultati non è semplicissimo anche se a qualcosa può servire la
creazione guidata (il pulsante è sulla finestra che salta fuori dopo il
comando da menù di cui sopra).
<--< Nik >-->
(Per rispondermi in E-Mail togliere "delete-me" dall'indirizzo)

Newsgroup: it.comp.lang.visual-basic
Titolo: [NET] Calcolo combinazioni .. funzione che non riesco a trovare :(

Salve a tutti, vorrei realizzare (anzi a dire il vero ho gia realizzato 
qualcosina) una routine che mi faccia tutte le combinazioni passandogli 
alcuni indici. Esempio, se io vorrei tutte le combinazioni dei numeri 
che vanno da 1 a 4 su 3 posizione, il programma dovrebbe stamparmi
1 2 3
1 2 4
1 3 4
2 3 4
Qualcuno ha gia qualche esempio??
Io ho provato con una funzione ricorsiva, ma oggi sto troppo stanco per 
poter capire cosa c'è che non va, infatti la mia funzione funziona ma 
non mi stampa l'output come vorrei, cioè mi stampa:
1-2-3-
4- (qui dovrebbe essere 1-2-4)
3-4- (qui 1-3-4)
2-3- (qui 2-3-4)
Qualcuno può aiutarmi???
grazie in anticipo ..
-- 
[CapoBecchino]
Cimiteri associati & Co.
Da Barzellette.it:
In una lapide di un cimitero c'è questo epitaffio:
"Qui riposa, per la seconda volta, Ernesto Rossi. Una prece."
Un tizio, incuriosito, chiede informazioni al necroforo che, fra l'altro,
conosceva il defunto e così gli risponde:
- Vede signore, il defunto Rossi in vita lavorava in Comune...

 
Ho risolto il problema. Grazie
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: DAO vs ADO

in una app pesco da un db Access (JET 4) con DAO 3.6, e devo dire che mi
trovo mica male... finchè il mio db è grosso quanto è grosso.
Ma se crescerà...?
ADO va meglio, molto meglio, dicono. Più veloce. Dicono...
Ma leggo anche dai post che dà parecchie grane..... robe che con dao non ho
mai visto...
E' veramente più veloce? "quanto"?
Voi che ne dite?


Se non ho detto cavolate e nessuno (+ sgamato di me) non mi contraddice,
questa sarebbe un'altra bella FAQ!
 /\/\/\/\/\/\/\/\/\/
| Una iniziativa a livello di questo NG:
| Partecipa alla stesura di progetti VB sviluppati in team, informati sul
Sito Comune
| sezione Leonardo.  Io partecipo al progetto Data Raptor, alleati con noi.
 \/\/\/\/\/\/\/\/\/\
Ciao
Ettore Maronese, il Mes
http://www.maronese.com/mes
Sito Comune di questo NG
http://www.murialdo.it/it_lang_vb


DAO e' sempre piu' veloce di ADO, perche' anche ADO deve usare il motore
JET, inoltre ha una serie di complicazioni in piu' che DAO non possiede.
In pratica ADO ha bisogno di moltissime informazioni che DAO puo' ignorare,
questo perche' DAO e' intimamente legato a JET e puo' fare delle assunzioni
che ADO non si puo' assolutamente permettere.
Se il DB e' su un server vero, cmq, cioe' non su un file server ma su una
macchina con un processo attivo che esegua le query, ADO e' effettivamente
piu' veloce, poiche' il motore ha il DB a portata di mano e passa solo i
risultati, inoltre puo' gestire un caching delle query frequenti ed altre
cose che il JET non fa.
Mai usato DAO con cose diverse da JET, anyway...
Ciaotutti,
Alessandro
Newsgroup: it.comp.lang.visual-basic
Titolo: File di testo già aperto

Ciao a tutti....Avrei bisogno di un aiuto....
Qualcuno sa dirmi se posso controllare (senza API o OCX) se un semplicissimi
file di testo è già aperto da un altro programma???
Grazie
Troy

Troy ha scritto:

Open: nomepercorso For modalità [Access accesso] [blocco] As [#]numerofile
[Len=lunghezzarec]
blocco: Facoltativa. Parola chiave che specifica le operazioni consentite
nel file aperto tramite altri processi, ovvero Shared, Lock Read, Lock
Write e Lock Read Write.
mai provato, ma forse se provi ad aprirlo in esclusiva e ti da' errore e'
gia' aperto.
hth, a.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 semplicissimi file di testo è già aperto da un altro programma???
Prova ad aprirlo in modalità esclusiva, e gestire l'eventuale errore,
'*************
Dim FileLibero As Integer
Dim NomeFile as String
FileLibero = FreeFile
NomeFile = "C:\test.txt"
Open NomeFile For Output Lock Read Write As #FileLibero
'*************
Se c'è errore 70, "autorizzazione negata", vuol dire che è aperto da
qualcun'altro. Fai delle prove, perché non sono sicuro che questo
sistema funzioni in tutte le situazioni (rete, diversi S.O., eccetera).
Bye, G.

"Paperino" <non...@lo.dico> ha scritto

dettagli  :P

 sistema funzioni in tutte le situazioni (rete, diversi S.O., eccetera).
Nei win9x non funziona
ma e' una peculiarita del SO .. neanche altri metodi funzionano
Per esempio con il File System Object si puo cancellare definitivamente
dei file gia' aperti da altre applicazioni
Adesso non ho la posiibilita di provare su un XP
--
Fosco

Newsgroup: it.comp.lang.visual-basic
Titolo: Sviluppo applicazioni con VB e tecnologia ADO (server MSQL7)

Salve a tutti,
mi occupo di applicazioni del tipo in oggetto, mi piacerebbe scambiare
informazioni ed esperienze.
contattatemi
ciao    Davide

 ha scritto nel messaggio
news:za_66.184758$IP1.6...@news1.giganews.com...


 ha scritto nel messaggio
news:93i0e6$5us$1...@fe1.cs.interbusiness.it...


 piedi, teniamoci in contatto via mail e scambiamo problemi specifici.
<flame>
To', un ng privato !
</flame>
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] interfaccaire VB con un registratore di cassa ..... come fare?

ciao a tutti, sto sviluppando un'applicazione e il cliente mi chiede se
posso interfaccaire il programma con il suo registratore di cassa (modello
sarema FRONTIERA) per stampare da vb gli scontini fiscali ....... sapete
darmi un consiglio su come fare? cè qualcuno che ha epserienza in questo
campo ....
GRAZIE

Se aggiusti l'orologio, forse, Te lo dico! ;)


normalmente i registratori di cassa usano porta seriale o porta dedicata.
Io ho sviluppato per porta seriale ma ho preferito farlo in Pascal; comunque
devi avere il manuale perché ogni registratore di cassa ha i suoi comandi
(non tutti funzionano con tutti i registratori di cassa).
Una volta che sai quali sono i comandi devi semplicemente inviare dei
comandi AT e, se serve, attendere la risposta (non è molto diverso da un
normale modem)

 da vb gli scontini fiscali .......
Ciao,
io l'ho fatto con una XT (o EXTRA che dir si voglia) tramite seriale.
So che la XT è il modello intermedio. Scusami ma non ricordo se la
Frontiera sia più economico (nel qual caso so che non si può, la XT
è la più economica di quelle che lo permette) o più evoluto.
Supponendo che sia vera la seconda, hai due strade. Ti consiglio
di farla settare in modalità XON/XOFF (per la XT non è lo standard,
di solito occorre far aggiornare la Eprom da chi glie l'ha venduta)
in modo che tu possa inviare i comandi direttamente (sono stringhe
molto semplici da comporre, in ogni caso il manuale è chiarissimo)
tramite la seriale con un banalissimo oggetto MsComm.
Altrimenti (in modalità "normale", non XON/XOFF) devi interfacciare
il tuo programma VB con una DLL che ti viene fornita dalla Sarema
e mandare i comandi alla DLL (NON alla porta, quindi senza MsComm)
che carichi con una normale "Define". Però ti avviso che questa
seconda modalità oltre ad essere (secondo me) MOLTO più scomoda
e difficile da usare, è anche più limitata nelle funzionalità.
Per contro la DLL Sarema "filtra" eventuali (tuoi) errori, per cui
se usi XON/XOFF è facile (MOLTO facile) che in debug ti si pianti
il registratore (no problem, basta premere "cancel" sulla cassa o
spegnerlo e riaccenderlo) mentre la DLL al più rifiuta il comando.
Ciao.
Mauro

 wrote in message
9o61hk$l6l$1...@nreadb.inwind.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Difficile ma ci provo( non ho altre scelte)

Ho appena finito di frequentare  un corso di VISUAL BASIC e vorrei fare un
pò di pratica sul "campo".C'è qualche azienda o privato disposti ad
accogliere la mia richiesta?
Non chiedo nessuna retribuzione se non quella di "imparare";garantisco
massima serietà e volontà.
Ho già provato fra i miei "contatti",purtroppo senza esito.
Grazie Cmq
Nicola

 ha scritto nel messaggio
news:v7sL8.7823$K4.1...@twister2.libero.it...

Te ne intendi anche di html, .asp,java,?
Fammi sapere ciao JOE

datti da fare....
metti annunci su jobpilot, easyjob, adecco e cosě via......
perchč metti qua il messaggio? qui si parla di programmazione, posta il msg
da qualche altre parte piů opportuna.......
good coding!!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

 ha scritto nel messaggio
news:adlstu$bndc$1...@ID-134521.news.dfncis.de...


 ha scritto nel messaggio
news:sA7Q8.51142$TS.14...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare colore item di una ComboBox

Salve a tutti,
ho un progetto già fatto e funzionante, e vorrei fare una modifica.
E' possibile fare in modo che un ITEM di una combobox abbia uno sfondo
diverso, o un colore, o un font in grassetto, insomma qualcosa che lo
differenzi "ad occhio" dagli altri.
Avevo letti di Api e vbaccelerator, ma non ho trovato nulla.
Le mie necessità sarebbero di usare il controllo combobox standard, dato
che è una cosa già funzionante ed installata sui vari clienti.
Grazie a tutti.


Qualcosa tipo questo?
http://www.codeguru.com/vb/controls/vb_combobox/article.php/c2995/
William. 

 
http://www.codeguru.com/vb/controls/vb_combobox/article.php/c2995/
Esatto, ora verifico che non mi dia problemi con quello che c'è di codice.
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Filmati AVI





Ho bisogno di visualizzare in un Form un filmato 
AVI che ho creato con la mia fotocamera digitale.


Il filmato è di tipo video/audio. Con molti 
programmi (RealPlayer, Windows Media Player) e varie OCX


riesco, quando sono fortunato, a riprodurre solo 
l'audio. 


 


L'unico programma che mi permette di visualizzarlo 

in modo corretto è QuickTime.


 


C'è qualcuno che può risolvere questo mio dilemma 
????


 


Grazie.



 ha scritto nel messaggio
news:OE47voFOAmEaJ...@hotmail.com...


A me funziona con la comct32.ocx (common controls2-5.0 mi pare)
e poi
Dim pth$, file$
pth$ = App.Path
file$ = pth + "\" + "search.avi"
Animation1.Open (file$)
Animation1.Play
Paolo

 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta info su Linq e vb 2005

Esiste la possibilità di usare linq sul vb2005 express ??
Se si installando che cosa ?
Grazie per l'attenzione. 

 Esiste la possibilità di usare linq sul vb2005 express ??
Io non credo, perché VB 2005 vede solo il Framework 2.0.
Puoi scaricare VB 2008 Express beta 2, che supporta il Framework 3.5 
(anch'esso in beta 2...) e tutte le nuove funzionalità.
Oppure pazientare, e aspettare la versione definitiva :-)
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL
Newsgroup: it.comp.lang.visual-basic
Titolo: EXCEL-VBA Toolbar

Qualcuno ha già realizzato una macro che crea toolbar e icone con un
esegui macro collegato?
-----------== Posted via Newsfeeds.Com - Uncensored Usenet News ==----------
 
http://www.newsfeeds.com
       The #1 Newsgroup Service in the World!
-----= Over 100,000 Newsgroups - Ulimited Fast Downloads - 19 Servers =-----


...ceeerto!

Beh mi dai un aiutino ....
fab10


-----------== Posted via Newsfeeds.Com - Uncensored Usenet News ==----------



...be, sarei molto facilitato se tu mi dicessi esattamente cosa ti proponi
di fare e a cosa ti serve di preciso questa toolbar.
un ciccio in attesa!


    Spiega un pochino più accuratamente il problema...
anche con un esempio dello scopo che vuoi raggiungere
io ho scritto un pezzo di codice VBA che, all'apertura della cartella, legge
su di un foglio certi parametri e crea sia il menu che la toolbar , con
shortcut, tooltips e possibilità di eseguire all'interno del moduloVBA
Qualora faccia al caso tuo te lo posso postare
(così come è)
Ciao
Acia

 esegui macro collegato?
Mi dispiace, non ho niente di pronto a portata di mano ma forse questo
potrebbe esserti utile:
http://groups.google.com/groups?q=commandbarbutton+group:it.comp.lang.visual
-basic&hl=it&lr=lang_it&selm=9ai4rt%2456pfp%241%
40ID-52090.news.dfncis.de
&rn
um=2&filter=0
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------



Vorrei semplicemente creare una macro che a sua volta crea toolbar con
pulsanti dedicati a svariate funzioni: collegati loro stessi a macro
definite dall'utente o funzioni standard.
Penso che il tuo codice dovrebbe andar bene
fab10
Codebue Fabio
fc...@delmetin.it
----^----^----
PainoSoft sas

Newsgroup: it.comp.lang.visual-basic
Titolo: spedire una stringa ad un'applicazione

ciao a tutti,
io ho un'applicazione DOS che aspetta la digitazione di un numero e la
pressione di invio e poi utillizza quel numero x fare dei calcoli.
vorrei che quel numero, magari sotto forma di stringa, e la simulazione
della pressione dell'invio lo inviasse VB all'applicazione DOS
come posso fare?...
ho provato con sendkeys ma non va bene.....vuole il FOCUS sull'applicazione
DOS...che invece deve lavorare in hide...
ho provato con l'API sendmessage....ma manda solo messaggi di sistema tipo
chiuditi o cose del genere....
come posso fare?
grazie:-)
d.

 ha scritto nel messaggio
news:lyWU4.1498$EY1....@news.infostrada.it...


 wrote in message 8g2oda$p8q$1...@news.IT.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: File di installazione con dot.net

E' possibile creare un file di installazione con dot net, come con vb6
si creava il setup.exe?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 si creava il setup.exe?
sì, è un po' più complicato (imho) ma ti consente di impostare le cose in
modo più preciso del vb6
per i dettagli guarda le procedure guidate dell'help, la cosa è spiegata
passo passo.
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Date nelle caselle di testo

    Quando io scrivo una data in una text in VB io la scrivo come ggmmaaaa
ma lui non me la converte come fa Access gg/mm/aaaa. Comunque la text in
questione è collegata a un Data Base Access e quindi Data Format non lo
posso modificare in quanto VB prende in considerazione come  è stato
impostato nella struttura della tabella (che io ho impostato in modo Data).

 ha scritto nel messaggio
news:8l74nl$qr$2...@nslave2.tin.it...

prova a mettere questo codice nell'evento LostFocus della textbox
Sub text1_LostFocus()
    text1.text = Format(Text1.Text, "dd/mm/yyyy")
end sub
dovrebbe funzionare...
ciao
Enrico

Newsgroup: it.comp.lang.visual-basic
Titolo: Avvio del programma all'avvio di win9x

Come posso fare a far partire il mio programma all'avvio di win9x?
Non con il win.ini. Vi ringrazio se sarete molto chiari nelle spiegazioni.
--
        \ | /\ | /
         (@ @)
  ---o00-(_)-00o-----
Alessio Linke
c-...@libero.it

 --
o piazzi un collegamento sotto menu avvio\programmi\esecuzione automatica o,
più bello, inserisi una chiave di registro sotto
HKLM\Software\Microsoft\Windows\CurrentVersion\Run, e nel valore inserisci
il path del programma. Ci sono alcune API da usare, ma trovi la spiegazione
nel sito comune.