mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: conoscere il proprio sistema operativo

Ciao,
c'e' la possibilita' in VB6 di sapere su che sistema operativo gira
l'applicazione? Es WinXP (Sp1, sp2...), Win2000(sp1... s2...)
Grazie.

"pollom" <NOs...@Nospam.NO> wrote in message
news:pan.2005.11.05....@Nospam.NO

[API]
http://vbnet.mvps.org/code/system/getversionex.htm
[WMI]
http://vbnet.mvps.org/code/wmi/win32_operatingsystem.htm
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.visual-basic
Titolo: Guida Visual Basic

Salve,
chi mi suggerisce la miglior guida esistente di Visual Basic per chi deve
cominciare, veramente, da 0 e non sa, quasi, cos'è un linguaggio di
programmazione?
Grazie anticipatamente.
Marco.

Sul mio sito ospito 22 lezioni del corso VB curato da Giorgio Abraini!!! :))
www.programmando.org
E' dedicato ai novelli programmatori.
--
Massimiliano Etere
massimili...@programmando.org
http://www.programmando.org

Newsgroup: it.comp.lang.visual-basic
Titolo: [SQL] Operatore LIKE e campi integer

Salve a tutti,
Una domanda:
Io per fare le ricerche su campi string uso una cosa del genere:
"WHERE campo_string LIKE 'valore_utente" & "%'"
Ovvero praticamente uso l' operatore like e poi il carattere "%" per digli
di trovare tutti i record che iniziano con il valore usato dall' utente.
Ora però mi trovo a dover fare questo con campi integer...
Se uso la classica LIKE, mi da quest' errore:
"Impossibile eseguire l'operazione 'Like' su System.Int32 e System.String"
Che fare?
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site: 
http://www.thetotalsite.it
My Blog: 
http://blog.thetotalsite.it
Gamertag XBOX Live: Carmine XX
http://live.xbox.com/it-IT/profile/profile.aspx?pp=0&GamerTag=Carmine+XX


usa >, >=, <, <=, <>

 Che fare?
Cioè se uno scrive 1% ti deve restituire 1, 100, 10, ma non 20?
In tal caso verifica la funzione a livello di sql CAST (per firebird) o
similari.
"WHERE CAST(campo_int AS VARCHAR(50))  LIKE 'valore_utente" & "%'"
-- 
DBMS Firebird
VB6 + Ado

 "WHERE CAST(campo_int AS VARCHAR(50))  LIKE 'valore_utente" & "%'"
Mumble perň non posso poi usare il Filter direttamente dal bindingsource 
(ADO.Net) in quanto non supporta la funzione di cast :-(


 (ADO.Net) in quanto non supporta la funzione di cast :-(
Sinceramente conosco appena .Net, ma non č che puoi fare una query sulla
tabella e agganciare questa al bindingsource?
Oppure verifica che ci sia qualche istruzione simile alla CAST...
Altrimenti l'unica mi sa che devi duplicare il campo, oppure cambiare il
tipo di dato stesso, ma presumo altrove di serva come numerico.
Eventualmente prova a postare l'esempio piů reale (perchč il campo č
numerico e perchč gli serve una ricerca '1%'), forse si riesce a trovare
una soluzione alternativa.


 una soluzione alternativa.
Mumble...
Il campo è un numero univoco del record, viene calcolato in modo un pò 
particolare e per questo ho bisogno di fare alcune operazioni sul campo.
Invece il tipo string mi serve appunto per la ricerca %1, in modo che uno 
inserisce il primo numero e gli escono tutti i record che iniziano per quel 
record.

Newsgroup: it.comp.lang.visual-basic
Titolo: Dim Pippo, Pluto, Topolino as Integer

Salve a tutti.
Se non sbaglio con questa dichiarazione solo Topolino sarebbe dichiarato
intero, mentre Pippo e Pluto sarebbero variant.
Se io volessi dichiararle tutte intere dovrei indicarne il tipo una per
una:
Dim Pippo as Interger, Pluto as Integer, Topolino as Integer
Ora, davvero VB non permette un modo piu' "compatto" per dichiarare un
gruppo di variabili con lo stesso tipo?
Grazie per ogni vostra eventuale risposta.
Carlo

Salve a tutti. Dopo un po' che vi leggo ho pensato di approfittare di una
domanda "facile" (grazie, Carlo ;) per farmi vivo anch'io. Speriamo di
averla imbroccata.
Dim Pippo%, Pluto%, Topolino%
ma io preferisco:
  DefBool B
  DefCur C
  DefDbl D
  DefSng F
  DefInt I-K
  DefLng L
  DefObj O
  DefStr S
  DefDate T
' DefUser U
  DefVar V
  DefByte Y
Dim iPippo, iPluto, iTopolino ' Per variabili locali di Sub o Function.
Private imPippo, imPluto, imTopolino ' Per variabili locali a livello di
Modulo o Form.
Public igPippo, igPluto, igTopolino ' Per variabili globali.
Ciao.
Maurizio
Carlo ha scritto nel messaggio <36981530...@geocities.comNOSPAM>...


averla imbroccata.
[...]


gruppo di variabili con lo stesso tipo?
L'unico modo piu' compatto e:
    Dim Pippo%, Pluto%, Topolino%
Vedi Help
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

>>una:


  DefBool B
...omissis...
Mi sembra un'ottima idea. Io uso:
"b" per Boolean
"by" per Byte
"n" per numero intero (quasi sempre long)
"f" per Float o Double
precedute da "a" se si tratta di un array. I nomi delle variabili sono
anche preceduti da "m_" se si tratta di membri privati di una classe o
modulo o da "g_" se si tratta di membri pubblici.
Ogni oggetto (classe, controllo o form), poi, e' identificato da tre
lettere:
"frm" per Frame
"lst" per ListBox
"chk" per CheckBox
ecc. Non sono sempre cosi' "religioso", pero'... :-)
Ciao
Gian Michele Bertoni
--
Home Page: 
http://space.tin.it/computer/gbertoni/
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ACTIVATE e GOTFACUS così non vanno!

Strano, non riesco a trovare l'evento di attivazione di un form provenendo
dall'esterno del form.
Attivo un form, attivo un altro programma e ritorno al mio form.
QUALE EVENTO quando il mio form ridiviene attivato e riprende il focus
quando sia ACTIVATE e GOTFOCUS non vede?
... chi mi puň aiutare?
ciao grazie
reply togliere [NOSPAM] dall'email

... chi mi può aiutare?
VB non prevede che vi sia un evento per quel quel tipo di 'attivazione'.
devi effettuare il SubClassing della form intercettando il messaggio
WM_ACTIVATE
eccoti un esempio abbastanza 'grezzo', andrebbe migliorato parecchio
nel Form_Load:
OldWindowProc = SetWindowLong( _
        hwnd, GWL_WNDPROC, _
        AddressOf NewWindowProc)
nel Form_Unload andrebbe messo
    SetWindowLong hwnd, GWL_WINDPROC, oldwindowproc
in un modulo:
Public OldWindowProc As Long
Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal
lpPrevWndFunc As Long, ByVal hwnd As Long, ByVal msg As Long, ByVal wParam
As Long, ByVal lParam As Long) As Long
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal
hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const GWL_WNDPROC = (-4)
Public Const WM_ACTIVATE = &H6
Public Const WA_ACTIVE = 1
Public Const WA_CLICKACTIVE = 2
Public Const WA_INACTIVE = 0
Public Function NewWindowProc(ByVal hwnd As Long, ByVal msg As Long, ByVal
wParam As Long, ByVal lParam As Long) As Long
    If msg = WM_ACTIVATE Then
        If (wParam = WA_ACTIVE Or wParam = WA_CLICKACTIVE) Then
            debug.print "Active!"
        Else
            debug.print "Inactive"
        End If
    End If
    NewWindowProc = CallWindowProc( _
        OldWindowProc, hwnd, msg, wParam, _
        lParam)
End Function
occhio che il debug risulta molto spesso 'difficile', consiglio di salvare
spesso il lavoro e di avviare il programma con compilazione completa
Ciao!
Faber

 ha scritto nel messaggio
news:8cul0p$fg3$1...@nslave2.tin.it...


ciao e grazie ti faccio sapere
ok. spero che vada      :)
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Database e visualizzazione


Chiama DoEvents dopo la creazione della form, ma prima di accedere al
database.
Questo permette a Windows di processare i messaggi WM_PAINT per la form.
Roal Zanazzi
z...@iol.it

 *** Per rispondermi in email, togliete "cancellare." dall'indirizzo!
Forse la risposta e' stupida ma io ci provo:
Rendi le grid e quello che si incasina invisibile
per poi renderlo visibile quando tutto e' andato a posto...
Se non c'e' modo di sapere quando ha finito, metti un
timer.....
-- 
Cristiano Corsani
e-Mail: 
cris...@dsi.unifi.it
 
cris...@labri.u-bordeaux.fr
www: 
http://dsi2.dsi.unifi.it/~cristian/
Newsgroup: it.comp.lang.visual-basic
Titolo: Come stampare i dati delle caselle di testo con font e dimensione diversa e le immamgini bmp??

Problema in sintesi:
Devo realizzare un programmino con cui fare dei preventivi (ma non
riesco a stampare come vorrei io).
E' presente un unico form, dove sono presenti diverse Caselle Combinate,
Caselle di Testo,
Etichette ecc.
Alcuni di questi componenti hanno i caratteri visualizzati con dei font
di maggiori dimensioni (alcuni 8
altri 12, altri ancora 20 ecc).
Sono presenti anche due immagini con il logo a colori.
Fin qui nessun problema, tutto è visualizzato correttamente, ma ora
vorrei anche stampare il
preventivo (non il semplice form).
Cioè vorrei stampare il contenuto delle varie caselle di testo, il logo
(a colori), avendo la possibilità
di visualizzare i caratteri non tutti con la stessa dimensione (come ora
succede), ma onuno con la
propria dimensione (10, 12, 18, 20, 30 ecc.).
Inoltre, sempre nella stampa, avrei piacere che ci fosse anche
l'immagine con il logo (com'è nel
form).
So che bisogna inserire il codice per dire al programma dove stampare il
testo (cioè la posizione nel foglio)
e qui non c'è nessun problema.
Però non riesco a fargli stampare il logo e nemmeno fargli cambiare tipo
di carattere e dimensione.
Questo è parte del codice che ho inserito (è forse sbagliato il modo di
approccio?).
Private Sub cmdStampa_Click()
Printer.CurrentX = 1000
Printer.CurrentY = 1500
Printer.Font.Name
 = "Times new roman"
Printer.Font.Size = 20
Printer.Print "questa è una prova"
Printer.Font.Size = 35
Printer.Print "questa è una prova per aumentare la dimensione"
Printer.Print txtElenco1
Il fatto strano è che se decido di stampare il contenuto di una casella
di testo il programma
stampa correttamente (cioè le dimensioni dei caratteri vengono
visualizzate esattamente in base
a quanto impostato, mentre se aggiungo un'altra riga (es. di un'altra
casella di testo), i caratteri
vengono stampati tutti della stessa dimendione (penso sia 10 punti).
Il logo in ogni caso non viene stampato (nemmeno in B/N)
Printer.Print imgLogo1   ' Questo codice non mi funziona
Ho tre manuali di Visual Basic 5.0 (per un totale di 1500 pagine),
 ma in nessuno di questi è riportato un caso simile.
Potete aiutarmi ?????
salutoni
Renato P.

Roboprint does this very well !!
-- 
RoboPrint.Ocx Provides Automatic and Fully Preview and Print to VB Apps
http://robocx.com
--
Posted from 
host3-64.mishkei.org.il
 [62.0.64.3]
via Mailgate.ORG Server - 
http://www.mailgate.org





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

Ciao a tutti,
Come posso con un comando di vb6 impostare un'ora nel'orologio di windows,
oppure l'anno, mese, ecc...?


To set the system time, use the Time statement.
Syntax
Time = time
-- 
regards,
Simon

Newsgroup: it.comp.lang.visual-basic
Titolo: Client Server

Salve ragazzi, so che la mia domada forse e' un po' stupida, ma devo
realizzare un programmino client server:
con il server che giacia su un pc
e i client su altri.
La mia domanda, avete esempi con sorgenti da propormi?
Grazie per l'aiuto.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Uso di Property

Ho un oggetto ActiveX DLL
L'oggetto contiene un metodo: obj.aggiorna che oltra a fare altre cose
valorizza una variabile: "mvarId" definita come: Public mvarId as Integer.
Il metodo aggiorna:
Public sub aggiorna(....)
    ................
    mvarId=XXXX
    ................
end sub
Ho definito una property get:
Public Property Get IdRecord() As Integer
    IdRecord = mvarId
End Property
Dopo aver richiamato da una pagina ASP il metodo aggiorna se cerco di
recuperare il valore di mvarId con:
obj.IdRecord
ottengo sempre e comunque: 0 ergo il valore di mvarId viene perduto dopo che
sono uscito dalla routine aggiorna.
Dove sto sbagliando????
Ciao a tutti.

 Dove sto sbagliando????
Ecco... in asp il discorso cambia. Giri sotto mts o com+ ?
L' activex e' stateless percio' perde tutto una volta che e' uscito dalla
aggiorna.
E' successo anche col mio primo activex per mts: n bell' insieme di metodi e
proprieta' pubblici da buttare in mare. :-(
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: Posizionamento 'assoluto' sullo schermo

Salve,
    ho creato un ActiveX che deve aprire una form sotto il controllo appena
cliccato.
    Il problema è che non riesco ad avere la posizione Assoluta rispetto
alle coordinate dello
    schermo dell'oggetto.
    Riesco tramite extender.left e .top ad avere la posizione RELATIVA del
mio controllo
    dentro al proprio Container ma non quella assoluta. Questo mi impedisce
di aprire il
    form sotto a tale controllo.
    Qualcuno mi sa aiutare ?
    Grazie
Enrico.

 wrote in message
news:10qh32r$1m7$1...@fe2.cs.interbusiness.it...


GetWindowRect, direi. O GetWindowPos. Il tuo ActiveX ce l'ha un hwnd, vero?


Ho postato la risposta ad un'altra domanda
miiiiiiiiiiiiiiiiiiii che flash!

    Qualcuno mi sa aiutare ?
Prova con ClientToScreen() (volendo c'è anche ScreenToclient()) che converte
le coordinate relative ad una window in coordinate schermo.
es:
Dim p as POINTAPI
p.x = MyOCX.Left
p.y = MyOCX.Top
Call ClientToScreen MyOCX.Parent.hWnd, p
Debug.Print p.x, p.y
Ciao

Ringrazio tutti per l'aiuto,
    ho utilizzato   GetWindowRect  e funziona eccelentemente.
Enrico.

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerca nel gruppo

Tempo fa si potevano fare ricerhe mirate all'interno di un singolo 
newsgruppo, e gogle aiutava con questo link: 
https://groups.google.com
 
poi si vede non rendeva molto e lo hanno chiuso. Con cosa si potrebbe 
sostituire?
 
-- 
Greg
 
 

Greg ha scritto:

https://groups.google.com/advanced_search
 esiste ancora.
Ha solo due piccoli problemini: primo, che devi accedere
con un account Google; secondo, che funziona a pene di
chihuahua, le volte che funziona.
 
Se ti serve per questo gruppo, ricorda che c'ï¿œ sempre il
Sito Comune:
http://www.nicolaottomano.it/it-lang-vb.net/home.asp
 
 
Bye, G.

 
http://www.nicolaottomano.it/it-lang-vb.net/home.asp
 
 
Si, ma qui trovo soluzioni, codice e software, non la marea di post 
scritti in tanti anni. O sono archiviati pure quelli?
 
-- 
Greg
 
 

 scritti in tanti anni. O sono archiviati pure quelli?
 
No, magari... :-(
 
Bye, G.
Newsgroup: it.comp.lang.visual-basic
Titolo: Come faccio a passare un valore direttamente in binario?

Con &H lo passo in esadecimale, c'è qualcosa di simile per il binario?

 ha scritto nel messaggio
news:u%9e6.75316$ew1.4...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: per favore

mi dite se si trova on line un editor visual basic da scaricare ?
e se si dove
grazie


Probabilmente nel sito Microsoft.
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

Newsgroup: it.comp.lang.visual-basic
Titolo: metodo pià veloce per eliminare i doppioni...

Ciao,
dovrei scrivere un programmino che apre un file di testo contenente numeri
oppure stringhe,elimina i duplicati e poi risalva il file con le modifiche.
Qual'è il metodo più veloce per farlo ?
Esiste qualche oggetto con proprietà di "primary key" ???
grazie

 ha scritto nel messaggio
news:MYKj9.154774$pX1.5...@news2.tin.it...

Prova la mia macro CancellaDuplicati, credo che faccia al caso tuo.
Prima di lanciare la macro selezionare una cella, tra le celle incluse nella
tabella,
nella colonna dove vanno ricercati i duplicati.
La macro cancella i records con valori duplicati nella colonna della cella
attiva.
La prima riga della tabella deve necessariamente comprendere le intestazioni
di colonna.
Sub CancellaDuplicati()
Dim NRighe As Integer
Application.ScreenUpdating = False
NRighe = ActiveCell.CurrentRegion.Rows.Count
    If IsEmpty(ActiveCell.Offset(1, 0)) = False Then
        ActiveCell.End(xlDown).Select
    End If
    For r = 1 To NRighe - 2
        For N = 1 To NRighe - r - 1
            If ActiveCell.Value = ActiveCell.Offset(-N, 0).Value Then
                ActiveCell.EntireRow.Delete
                Exit For
            End If
        Next N
    ActiveCell.Offset(-1, 0).Select
    Next r
End Sub
--
Ciao.
gilgil

> "qwerty" [...]:

        Class Collection
            Membro di VBA
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: download wohoo

Where can I download V Basic 6.0 ??

 ha scritto nel messaggio
news:39be...@news.server.worldonline.co.uk...

Newsgroup: it.comp.lang.visual-basic
Titolo: acapo dei tag xml

ma con le varie funzioni della microsoft xml non č possibile mettere a
capo i tag dell'xml?
ovvero nel codice
lo crea tutto su una linea
mentre sarebbe meglio (almeno per me) averlo indentato e coi giusti acapi
piů che altro se ci sono errori che non lo fanno aprire da browser, li
diventa un casotto poi riguardarsi la struttura ;)
-- 
SCIRIO - 100% COMMERCIALE
http://scirio.altervista.org
http://cinemaz.altervista.org
http://freddure.altervista.org
http://ihu.altervista.org
http://rime.altervista.org
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 lo crea tutto su una linea
non sono un esperto in merito, ma le poche volte che ho generato un file
xml, aprendolo con un editor di testo risultava "indentato".
tu come generi questo file?
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo


 tu come generi questo file?
premetto che ora lo sto aprendo col blocco note :p
cmq...
uso microsoft xml 3.0
con le varie funzioni createNode, appendChild
non so se c'è un parametro per dirgli che non le voglio tutte su una riga
cmq penso che se aprissi il file con qualsiasi editor, se non ci sono gli
acapi non li mette (homesite x esempio)
-- 
SCIRIO - 100% COMMERCIALE
http://scirio.altervista.org
http://cinemaz.altervista.org
http://freddure.altervista.org
http://ihu.altervista.org
http://rime.altervista.org
questo articolo e` stato inviato via web dal servizio gratuito 


 con le varie funzioni createNode, appendChild
passo.
io mi sono limitato a esportare in formato xml un recordset ado, o un
intero dataset 
ado.net
, lasciando fare tutto a loro.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 


 intero dataset 
ado.net
, lasciando fare tutto a loro.
no, io ci devo smanettare un po' su
siccome mi è capitato di dover smanettare anche su un coso già fatto con
xml chilometrico e formattato male
quando cannavo qualcosa volevo guardarmi l'xml x capire, ma i browser non
lo aprivano xchè c'erano errori
indì dovevo aprirlo con un editor di testo, per non dire il notepad
e... non ti dico che formattazione :)
magari i ghiri del ng lo sanno ;)
halz? :)
-- 
SCIRIO - 100% COMMERCIALE
http://scirio.altervista.org
http://cinemaz.altervista.org
http://freddure.altervista.org
http://ihu.altervista.org
http://rime.altervista.org
questo articolo e` stato inviato via web dal servizio gratuito 


 halz? :)
come sai che ho smacchinato con l'xml? :-P
a dire il vero ho prodotto piu' xml con java che con vb.
nel caso di vb comunque facevo delle stupide print su file impostando
da codice gli a capo con una funzione che teneva conto del livello
di nidificazione e, in base a questo, stampava tanti tab quanto era il
livello di rientro.
--
ciao, hal
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 livello di rientro.
e vabbè, così non vale ;)

Newsgroup: it.comp.lang.visual-basic
Titolo: [news] xp, java, vb

dal bollettino di 
searchvb.com
:
"Microsoft throws Java out of Windows XP"
As suspected, Microsoft has announced it will not include the Java
Virtual Machine (JVM) in its new Windows XP operating system.
Microsoft said it did not want to violate a January legal settlement
with Sun Microsystems barring it from using current Java technology,
though Microsoft could have tapped an outdated version of Java for
XP. Users will be able to download JVM through Microsoft's Windows
Update site.
SOURCE: InfoWorld
http://iwsun4.infoworld.com/articles/hn/xml/01/07/18/010718hnnojava.xml
DISCUSS THE FUTURE OF VB IN OUR FORUMS!
In response to a recent searchVB poll about the future of Visual
Basic, 38% of respondents said they'll be abandoning VB to brew their
codes with Java, while 37% are still committed to VB. Is your VB fire
still burning? Let us know in the searchVB forums:
http://searchvb.techtarget.com/forums/

 Il 25% che rimane dove va?
che siano i famosi pseudo-programmatori ?
dark nemesis, per esempio, si e' reso conto della differenza fra win me
(del quale sembra avere il sorgente, wow!) e vb ?

 wrote in message
news:9jhm3b$o2hv5$2...@ID-51318.news.dfncis.de...

Ma sai che forse ha davvero i sorgenti di win?
M$ ha aperto il core di WinCE, ovviamente sempre sotto licenza proprietaria
e con vincoli che non si sono mai visti, cmq li ha aperti e sono scaricabili
da chiunque abbia una vversione del developer studio, anche trial.
Ciaotutti,
*

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per stampa

Salve a tutti il mio quesito e' questo:
dovendo stampare dei numeri, come faccio a fare l'allineamento a destra?
Conoscete qualche funzione? Purtroppo l'unica cosa che ho pensato e' fare ina
serie di if len(numero) =1 then printer.currentx=12, ecc, ecc, ecc, ecc...
Mi sembra un lavoretto un po' lungo, che consiglio mi date? 
Grazie 1000 anche per le risposte precedenti :)
-- 
Posted from  [62.98.142.120] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie 1000 anche per le risposte precedenti :)
Ciao...
per stampare un testo allineato a destra puoi fare cosě...
Printer.ScaleMode=7
Printer.CurrentX = Printer.ScaleWidth - Printer.TextWidth ("Ciao")-2
Printer.Print "Ciao"
cos' dovrebbe stampare "Ciao" allineandolo a 2 cm dal margine destro del
foglio...
almeno spero :-))))
Ciao
Andy

La prossima volta che posti un mess. fai attenzione al subject...non lo dico perchè mi è preso il piccio...così..d'improvviso...ma i
motivi sono due:
1)(il meno importante ma giusto da seguire) LEggi il manifesto del Ng (vedi firma) e controlla cosa dice circa i Subject...così
rispetterai le regole che vigono qui dentro per il bene comune!
2) Formulare un buon Subject serve MOLTISSIMO per le ricerche di chi avrà in seguito bisogno di un aiuto simile al tuo! Cercando con
Google, ad esempio, sarà subito individuabile un messaggio ben quotato e aiuterà anche altre persone!
Ciao Ciao..SIMO
--
__________________
www.sasim.net
Vb è relativamente semplice perchè c'è MSDN!
Sito Comune Ng: 
http://www.it-lang-vb.net
Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt
Newsgroup: it.comp.lang.visual-basic
Titolo: grosso problema

Salve a tutti, ho reinstallato visual basic 6 enterprise
perche` ho formattato l'hard disk. Ora quando creo un file exe
e sul form principale ci metto una textbox o una label e cerco
di far girare il programma mi da il seguente errore:
"vb6 ha provocato un errore di pagina non valida nel modulo
vb6.exe.......". Ho disinstallato e reinstallato di nuovo il
tutto ma il problema. Qualcuno sa dirmi cosa devo fare per
risolvere il prblema? Grazie a tutti

 ha scritto nel messaggio
news:b3frjd$fil$2...@gossip.excite.it...

SO?


Win 98 se
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb e Virus

salve, qualche tempo fa mi è arrivato un virus che ha modificato
autoexec.bat e mi ha formattato il computer, perchè aveva inserito la
stringa: "format c:/autotest".
vorrei capire se è possibile, onde evitare di combinare ancora questo guaio,
se è possibile,   senza accedere a windows e dos modificare autoexec.

Cosa intendi per MODIFICARE AUTOEXEC "SENZA ACCEDERE A WIN E/O DOS"?
1) Se vuoi sapere come ha fatto il tizio del virus, allora sappi che non ci
vuole nulla... bastano poche righe di un prog in VB o C++ o Pascal (e posso
andare avanti per molto).
2) Se vuoi sapere come puoi sfreggiarlo tu, sappi che devi per forza fargli
avere un tuo prog ("tuo" xchč tu ci metterai le istruzioni necessarie per
fargli lo stesso scherzo=))))) e cmq basta saper manovrare i filez. Per cosě
poco ti sconsiglio VB, perchč ogni programma sviluppato con Visual basic
richiede un kit d'installazione (se il destinatario del prog non possiede le
librerie run-time del VB) e perciň MINIMO 1.38 MB di installazione. Al
massimo ti sonciglio di fare un prog in Pascal e darglielo via e-mail
fingendo che sia l'aggiornamento di qualche programma speditogli da una casa
di software.... poi fai un po' come ti pare =)
digilander.iol.it/darkbytes
    (il mio sito, sito in costruzione)
--
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto


1. non e' che per caso vorresti farlo tu, vero ?
2. che c'entra vb ?

:-) Scrive un virus in VB non è proprio il massimo!!!! Mi spacco dalle
risate quando nelle chat mi provano a spedire questi programmoni
giganteschi!!!!

 giganteschi!!!!
be', i love you non era poi cosi' enorme...
il punto non e' quasi mai la forza bruta.
il punto e' il punto.
di leva.
:)

 wrote in message
news:8ro1pv$ij7vl$2...@ID-51318.news.cis.dfn.de...


 guerriero devi costruire un cavallo piu' grande della citta' :-)
beh, veramente basta sperare...
sperare che la vittima abbia i runtimes
con vb l'eseguibile verrebbe di 30kb, e sono pochi.... ma se la vittima non
ha msvbvm##.dll niente virus
stessa cosa per loveletterforyou.txt.vbs [ILoveYou]: se la vittima non aveva
Windows Script Host il _worm_ non avrebbe funzionato
poi dipende tutto da cosa stai puntando. se vuoi creare un casino globale
nella rete, quindi puntare alla massa, te ne frega poco che qualcuno non
abbia i runtime; se invece devi colpire una persona....
ciao
xAERO

 abbia i runtime; se invece devi colpire una persona....
le mandi prima i runtimes ? :)

> le mandi prima i runtimes ? :)
si.
più o meno gli puoi dire così:
"senti, senza che sto a perdere tempo, a dire caxxate ecc... ti mando i
runtime di VB6 perchè domani ti devo mandare un bel virus. mi raccomando,
installa sia i runtime che il virus. grazie per l'attenzione"
;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Picturebox

Ciao al ng. Avrei bisogno di un altro aiutino. Ho inserito una immagine in
una picturebox ed avrei bisogno che la picturebox fosse leggermente piů
grande dell'immagine. Quindi ho scritto:
  Picture1.Width = Picture1.Width + 400
per quanto riguarda la larghezza, ma come faccio con l'altezza? Non posso
fare:
  Picture1.Height = Picture1.Height + 400
perchč mi aggiunge lo spazio sotto l'immagine. Come faccio a far apparire la
striscia in piů sopra all'immagine?
Poi ho un'altra domanda sempre sullo stesso argomento. Si puň fare in modo
che la parte di poicturebox che non viene cosě coperta dall'immagine sia
trasparente?
--
Ramses
http://evilzone.tsx.org
ICQ: 39860665
"La prima volta che ho preso l'alcole ho visto Dio"
by Claudio Zanon

trasparente?
Non lo so, ma se non erro sul sito comune c'č un esempio che ti permette di rndere trasparente una
form: probabilmente funziona anche con una picturebox...
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
---------------------------------------------------------------------------

Ciao,
come faccio a caricare in una picturebox un immagine contenuta in una
imagelist ?
Seconda domanda:
Come faccio per "scaricare" l' immagine appena caricata nella picturebox per
farla tornare "vuota".
scusate la terminologia
GRAZIE
Paolo

farla tornare "vuota".
Con l'istruzione LoadPicture. Maggiori info con F1.


Newsgroup: it.comp.lang.visual-basic
Titolo: Emulaizopne 3270 e VB

...
 > Come gią richiesto da ADL, nessuno conosce il modo di interfacciare il
 > VB4 con le emulazioni terminali IBM 3270 (con scheda di emulaizone gią
 > installata sul proprio PC o tramite gateway SNA su TCP-IP).
 > 
 

 specializzate il gioco č fatto.
La soluzione piu' semplice cche ho trovato e' stata usare Extra! for
Windows come emulatore: ha un linguaggio script che e' praticamente
IDENTICO al Visual Basic!
----------------------------------------------------------------
Alex Palmese
Internet: 
al...@programatic.it
 
http://www.programatic.it/~alex/

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema urgente !!!

Ragazzi quali sono i codici escape necessari per far eseguire un Lf al
contrario , cioč tornare di una riga indietro , alle stampanti Epson 300+ Lx
e alla Epson Lq300 ?
Grazie in anticipo
Marco

 ha scritto nel messaggio
news:fewJ6.8183$024.1...@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Gif e suoni in visual basic

Come posso fare per visualizzare una Gif su una Form?
Io ho tentato di usare il componente Animation Gif Control v 2.25, mi ha
chiesto la registrazione.Ho trovato un key generator e mi sono registrato,
cosě sul mio Pc il mio programmino in formato exe funziona, ma non funziona
se lo faccio girare su un altro Pc. Perchč? Come potri fare?
Come devo fare inoltre per associare un suono ad un determinato evento?
Grazie
MATTEO

 chiesto la registrazione.Ho trovato un key generator e mi sono registrato,
MMMM, molto illegale, mica male eh????????
Ciao,
--
Timothy Redaelli
timothy....@email.it

 cosģ sul mio Pc il mio programmino in formato exe funziona, ma non


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] - Problemi con Crystal Report

    Ogni volta che installo il mio programma su una qualsiasi macchina,
    se lancio una stampa e voglio vedere l'anteprima prima di stampare,
    il crystal report mi piazza la finestra di anteprima con l'angolo
superiore sinistro in mezzo allo schermo,
    mentre io gli avevo detto di mettermela a pieno schermo.
    Ma c'è dell'altro, se chiudo questa finestra di anteprima, e subito
rilancio la stampa, la finestra si posiziona in modo corretto, e cioè a
pieno schermo.
    Questo mi succede tutte le volte che lancio il mio programma installato.
    Mi potete aiutare voi a far funzionare il crystal report come si deve?
    Per meglio capirci, riporto sotto il codice che metto nella sub di
stampa:
    Dove:
            Stampante     è il mio oggetto crystal report
            Percorso        è la DIR dove si trova il file di stampa
Public Sub Stampa()
Dim Merrore as String
    On Error Resume Next
    Err.Number=0
    Stampante.ReportFileName = Percorso & "Report.rpt"
    Stampante.Destination = 0
    Stampante.WindowState = crptMaximized    ' la stessa impostazione è
riportata
' nelle proprietà dell'Oggetto Crystal Report
    Stampante.Action = 1
    If Err.Number <> 0 Then
        Merrore = "Errore " & Str(Err.Number) & " generato da " _
                & Err.Source & Chr(13) & Err.Description
        MsgBox Merrore, vbCritical, "Errore"
    End If
    Screen.MousePointer = 0
End Sub
    Mi potete aiutare please ?
    Grazie a chi mi risponde.
        R [ D / L ] + 1    
rdim...@tdi.it


Newsgroup: it.comp.lang.visual-basic
Titolo: crystal report : come si integra a vb 6.0??

Ciao a tutti!!
Potreste essere cosě gentili a spiegarmi come faccio, mediante codice
scritto in vb 6.0 , ad inviare in stampa un report realizzato con crystal
report 8.0????
 Grazie per l'aiuto che sicuramente mi darete
salvatore

 report 8.0????
Sito Comune.
Cerca "CrySvr"
ciao
ugo
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com

dipende da come l'hai usato, comunque io faccio così....
una volta creato il file RPT, metto l'activex di CR su un form del mio
programma, poi.....
Me.CrystalReport1.ReportFilName=nome del file contenente il report
Me.CrystalReport1.Action=1
questo è il minimo indispensabile, partendo dal presupposto che tutte le
altre proprietà le hai settate nell'activex stesso: destinazione (finestra
per vedere l'anteprima), etc......
Volendo puoi settare via codice usando SelectionFormula una query per
filtrare i dati da stampare.....
good coding!!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262


Grazie per la rapida risposta. Oggi stesso proverň ad installare l'ocx
indicatomi e ti farň sapere.


Non è un ocx: è un progetto di esempio sull'uso delle Api interne di Crystal
Reports.
ciao
ugo

 Damiani Liborio Igor
DAMIANO ti ringrazio per la risposta, ma il problema è un altro.
Fino a quando usavo crystal report 4.6 andava tutto bene perchè includevo
nei componenti disponibili  l'oggetto "crystal report control 4.6" cioè
includevo nel progetto l'OCX crystl32.ocx.
Con questo oggetto le istruzioni da te indicatemi andavano benissimo.
Adesso invece che ho realizzato i report con  crystal report 8.0,
l'istruzione Me.CrystalReport1.ReportFilName=nome del file contenente il
report non è riconosciuta. Questo significa che l'OCX "vecchio" non è più
valido.
Se hai altre diritte non esitare a mandarmele
ciao e grazie da salvatore

 ciao e grazie da salvatore
quale versione di cr8 hai?
perchè se non hai la developper, credo
che tu possa avere difficoltà ad interfacciarti
con vb e mandare i report in stampa
--
bye BlackMagic
ICQ: 85485468


Ho provato ad eseguire il progetto che mi hai indicato, ma va in errore in
fase di compilazione: "impossibile trovare il progetto o la libreria"
probabilmente si riferisce all'oggetto "CRPEAUTO.Application"
A quale libreria appartiene?


Crystal report engine
Quale versione di Crystal report hai?
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare senza far uscire il foglio

Ciao, sto creando una procedura per stampare su una stampante ad aghi a
modulo continuo.
La pagina è suddivisa in tre blocchi che non sempre vengono stampati
insieme.
Vorrei fare in modo che quando finisco di stampare un blocco di dati la
stampante non mi faccia uscire il foglio in automatico.
Con il comando "Printer.EndDoc" viene avviata la stampa ma quando
finisce butta fuori il foglio...
Devo lavorare sulle impostazioni della stampante? In questo momento ho
impostato dalle proprietà della stampante foglio A4 a ciclo continuo.

 impostato dalle proprietą della stampante foglio A4 a ciclo continuo.
O lavori in modalitą grafica, e quindi disegni tutta la tua pagina e poi fai 
l'EndDoc oppure lavori in modalitą testo (come di solito si fa con le 
stampanti ad aghi) e quindi fai una Open "LPT1:" e ci scrivi come se fosse 
un file di testo.
Ciao 

 Ciao

 volta
Basta non fare un EndDoc ad ogni blocco ;)
Per la Open, guardati la guida, c'è spiegato tutto.
Basta aprire il file che si chiama come la porta a cui è collegata la 
stampante, di solito "LPT1:"
Ciao

Hai provato ad impostare le dimensioni personalizzate del foglio nel
pannello di controllo? Ovviamente vanno impostate anche da codice con
l'oggetto printer.
E' un metodo che uso spesso e dà i suoi risultati (eccetto per qualche
stampante ad aghi)
Saluti
Monkey

 l'oggetto printer.
Premetto ce il prgramma gira su XP. La stampante è una NEC PinWriter
P2X
Sono andato su "Stamapnti e fax" da file >> Proprietà server, ho
creato un nuovo modello con le seguenti dimensioni: W: 20.03 cm e H: 8
cm (dimensioni di ogni singolo riquadro presente sul foglio, ce se sn
in totale 3 per foglio).
Dalle proprietà della stampante ho selezionato >> Impostazione
periferica hp sel il nuovo modello.
Sul codice:
colonna = 300
riga =  400
Printer.Width = 10000 'twips
Printer.Height = 4000  'twips
    operazione_data = "box 1 data op"
    operazione_numero = "box 1 num op"
    Printer.CurrentX = colonna + 200
    Printer.CurrentY = riga + 2000
    Printer.Print operazione_data
    Printer.CurrentX = colonna + 500
    Printer.CurrentY = riga + 2500
    Printer.Print operazione_numero
Mando in stampa e succede sempre la stessa cosa cioè stampa
correttamente i dati del primo blocco(in questo momento mando in stampa
solo il primo) ma terminato, invece di fermarsi sul secondo blocco
pronto per la successiva stampa, mi scorre tutta la pagina e si
posiziona adinizio pagina di quella successiva.
In cosa sbaglio??


 In cosa sbaglio??
Ma io ancora non ho capito cosa vuoi dire "stampa un blocco e poi salta la 
pagina".
Salta la pagina quando gli dici di fare il NewPage.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Usare Codice Per Creare un Form

So che mi prenderete per matto ma ho un reale bisogno di creare
un Form ( e dopo alcuni controlli ) da Codice
ho provato a leggermi il manuale e tutte le note informative ma da
quanto
son riuscito a capire riesco solo a ricreare un Form identico ad uno
gia' esistente
Set Form As New Form1
che poi posso modificare. Io invece dovrei proprio crearlo senza nessuna
base in modo da poter agire liberamente...
Sono stato chiaro??? mah ....
E' Possibile ???
Come ????
Grazie 1000 in Anticipo.....
--
!------------------------------------------------!
!ICQ     : 8281944
!E-Mail  : 
Dan...@levon.it
!
! " M'accorgo del cielo infinito solo se
!   una rondine ne percorre un tratto. "
!
!HomePage : 
http://www.levon.it/daniele
!
!------------------------------------------------!

per essere stato chiaro sei stato chiaro....
con le normali istruzioni VB non penso proprio che sia possibile realizzare
qualcosa del genere;
ritengo che sia lo stesso che voler creare un controllo (Control) non
associato a nessuna form;
ciao
Daniele Pinai <d.p...@Levon.it> wrote in message
387F680B...@Levon.it...


> E' Possibile ???
Ma perchč non lo crei in fase di programmazione e lo lasci nascosto o
addirittura non lo carichi finchč non ti serve? Mi sembra piů logico.
Da quanto ne so non č possibile creare array di form!!!
P.

> Da quanto ne so non è possibile creare array di form!!!
forse non array, ma collection si...
RiK

Newsgroup: it.comp.lang.visual-basic
Titolo: Proprietà Tabella Access - Descrizione

ciao a tutti,
vorrei sapere, gentilmente, se e come posso stampare la struttura di una
tabella di Access 2000.
Mi interessa in particolare il nome della tabella, il tipo di campo e
soprattutto la DESCRIZIONE.
Grazie a chi saprą essermi d'aiuto.
Ciao.



Penso non ci siano problemi a leggerlo con DAO.
Vedi la parte relativa a DBEngine.
Ciao,
	Negus

 soprattutto la DESCRIZIONE.
Se usi ADO o 
ADO.NET
 la connection esiste un metodo openschema (o
tableschema o schema) che ti rende un recordset (o una datatable) con la
struttura... cerca su MSDN é ben documentato e su 
http://groups.google.it
puoi trovare vecchi post che ne parlano...
                Ciao
                                                    Allanon
--
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità

 puoi trovare vecchi post che ne parlano...
azz....non l'avevo mai usato, fichissimo!
Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiornamento struttura database con ADO

Prima di chiedere aiuto ho cercato un pò sul newsgroup
ma non ho trovato niente.
Vorrei aggiornare la struttura del DB da codice
lanciando una routine all'avvio del programma
che controlli se sono state fatte delle modifiche alla
struttura delle tabelle ed in caso affermativo proceda
alle modifiche opportune.
L'ho fatta in ambiente DAO ma non so farla ancora in ADO.
Potreste per favore segnalarmi se da qualche parte
su internet ci sono degli esempi da vedere?
Grazie mille
Ciao
Roberto

Sembra che Roberto abbia detto :

CREATE
ALTER
DROP
Sono i comandi SQL più utilizzati per fare le modifiche alla struttura.
La loro sintassi, però, dipende dal db che utilizzi, e che non 
specifichi. Sul NG specifico del db troverai altre informazioni (oltre 
che sull'help del db stesso).
Ciao
Alberto
-- 
Si è visto di meglio,
ma si è scopato di peggio,
qualche volta a pago
e non erano neanche sempre donne
[Paolo]

Grazie per la risposta
Scusate se ho inviato due volte il msg ma sto usando
Thunderbird per la prima volta e non vedo il mio msg
mentre ne vedo altri successivi al mio...
Ciao
Roberto
Albe V° ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET - ListBox ;evento Form_Disposed

IDE
1- ListBox
Non viene presentata in fase digitazione , nel programma che ho installato ,
la Proprietą ListBox.Text .
Mancanza riscontrata perchč dovevo leggere il valore selezionato
Confermate ?
ps
La gestione della Combo e della List box
mi sembrano alquanto appesantite rispetto a VB6
2-
Manca , nella lista dei metodi , l'evento Form_Disposed
giuseppeD

 Manca , nella lista dei metodi , l'evento Form_Disposed
Alcuni metodi non sono implementati direttamente nell'IDE (vedi ad esempio
MouseWheel).
Per utilizzare tali metodi devi utilizzare AddHandler, ovvero
AddHandler Me.Disposed, AddressOf DisposedHandler
Public Sub DisposedHandler(ByVal sender As System.Object, ByVal e As
System.EventArgs)
End Sub
HTH
--
Corrado Cavalli
UGIdotNET - 
http://www.ugidotnet.org

 End Sub
Form_Disposed viene attivato nella chiusura della maschera.
Mi sembra strano che oltre ad istanziare devo pensare a costruire un evento
che è utilizzato nella chiusura.
Mi sembra più logico trovarlo nell'elenco.
In più per i presenti nell'elenco mi posso informare sul loro utilizzo, ma
per gli assenti ?
giuseppeD

Ci sono altri eventi da utilizzare durante la chiusura del form (ad esempio
Closing) l'evento Disposed viene invocato dal CLR ed è in qualche modo
legato al metodo Dispose che, come indicato da MSDN è 'per uso interno'.
Per quanto riguarda gli eventi mancanti tempo fa qualcuno di MS mi disse che
non sono stati implementati per "problemi di tempo" ma che verranno
integrati alla prima occasione (SP)



Utilizzo Form_Disposed per eliminare la form dalla Collection gestione
maschere aperte.
Potrei utilizzare l'evento maschera_Closed .
Detto evento č riconosciuto dalla form in chiusura e il nome (Form_Disposed)
č uguale per tutte le maschere.
Stavo pensando ,se č possibile, inserirlo in una maschera master e farla
ereditare.
Proverň piů in la
giuseppeD

 è uguale per tutte le maschere.
Correggo l'evidente inesattezza e riporto l'intera stringa:
Private Sub Form_Disposed(ByVal sender As Object, ByVal e As
System.EventArgs) Handles MyBase.Disposed
    'codice
 End Sub
Handles MyBase.Disposed
è l'interprete principale
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Excel

Ciao a tutti,
Come faccio a chiudere un oggetto Excel creato nel seguente modo:
Dim MyExcel As New excel.Application
Dim cartExcel As Excel.Workbook
Dim foglioExcel As Excel.Worksheet
Set cartExcel = Excel.Workbooks.Add
Set foglioExcel = Excel.Worksheets.Item(1)
....
....
....
cartExcel.Close False
MyExcel.Quit
Set foglioExcel = Nothing
Set cartExcel = Nothing
Set MyExcel = Nothing
attivando la finestra con i task attivi rimane sempre presente
l'applicazione Excel che si chiude solo chiudendo il programma che l'ha
generata.
Grazie Alberto

 Set cartExcel = Excel.Workbooks.Add
Crei un oggetto MyExcel di tipo Excel.Application, poi però crei un WorkBoox
in maniera assolutamente indipendente.
Quindi quando fai MyExcel.Quit, chudi un'applicazione che avevi creato e che
era stata li a non fare niente, visto che in realtà avevi usato CartExcel in
maniera slegata.
Quindi, o fai Set cartExcel = MyExcel.Workbooks.Add, oppure chiudi e
distruggi CartExcel prima di chiudere l'applicativo.
Ciao
Alberto V

> "Alberto" [...]:

    Dim MyExcel     As Excel.Application
    Dim cartExcel   As Excel.Workbook
    Dim foglioExcel As Excel.Worksheet
    Set MyExcel = New Excel.Application
    Set cartExcel = MyExcel.Workbooks.Add
    Set foglioExcel = cartExcel.Worksheets(1)
    ' ...
    cartExcel.Close False
    MyExcel.Quit
    Set foglioExcel = Nothing
    Set cartExcel = Nothing
    Set MyExcel = Nothing
Ti faccio ora un esempio *sbagliato* ma che "funziona" (!):
    Dim MyExcel     As New Excel.Application
    Dim cartExcel   As Excel.Workbook
    Dim foglioExcel As Excel.Worksheet
    MyExcel.Visible = True
    Set cartExcel = Excel.Workbooks.Add
    cartExcel.Application.Visible = True
    Set foglioExcel = Excel.Worksheets(1)
    ' ...
    cartExcel.Saved = True
    cartExcel.Application.Quit
    Set foglioExcel = Nothing
    Set cartExcel = Nothing
    MyExcel.Quit
    Set MyExcel = Nothing
Come vedi sono stato costretto a mettere DUE "Quit". E non ho potuto
chiudere cartExcel perche' se l'avessi fatto non avrei potuto chiudere con
"Quit" l'applicazione che lo possedeva.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Secondo piano FRAME

Come faccio da codice a fare in modo che un frame a seconda della condizione
sia in primo o secondo piano rispetto a dei label ed a textbox
                                                                    grazie
stefano

 sia in primo o secondo piano rispetto a dei label ed a textbox
prova utilizzando il metodo ZOrder del frame
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Looking for following OCX files

Hello everyone,
I don't have these files on my system. Can anyone send me these files at
adnanj...@hotmail.com
 or let me know from where I can download them
H5OCX32.OCX
SPR32X30.OCX
CRYSTAL.OCX
I highly appreciate your help.
Paul


Please post on an English NG.
Thanks


In case you will find somebody who send you these files, they prolly wont
work.
SPR32X30.OCX looks like a spreadsheet tool and should require more dlls
CRYSTAL.OCX should be the CRW component.. i think you miss the whole crystal
report package into your system

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di licenza non valida su alcuni controlli...

Inserendo alcuni controlli in VB ottengo l'errore di mancanza della licenza.
Ho provato ad installare la patch per VB ma non ho ottenuto risultati. C'e'
una alternativa alla disperazione della formattazione =!
Ciao e grazie
--

 ha scritto

quale vb ?
quali controlli ?
quale patch ?

 ha scritto nel messaggio
news:9dh6eq$iddst$1...@ID-51318.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: ? device context

Come spiegate (in Italiano) il significato di device context ??


Contesto grafico
Ciao

 wrote in message
82bjjn$3d6$1...@pluto.sm.dsi.unimi.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per HELP WORKSHOP

Dovrei creare un HELP con HELP WORKSHOP fornitomi con VB6 ma purtroppo tutti
gli aiuti che forniscono con questo programma sono in inglese. Non esiste un
sito do venga spiegato come utilizzare questo programma (ovviamente in
italiano)?
Grazie 1000 a tutti e buona primavera
Dm

 italiano)?
Ma dai, chi non sa l'inglese oggigiorno ;-) ????
http://www.beginend.com/vbasic/scarica.asp?ID=49
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com
P.S. Trovato su Google in 5 sec, ragazzi, cercate, cercate :-)

 ha scritto nel messaggio
news:Qphl8.71720$_u5.2...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: aiutatemi su 2 problemi

Chiedo ancora una volta il vostro aiuto su due questioni.
1. Il mio programma è composto da 2 eseguibili. Uno di essi deve accorgersi
quando è caricato in memoria l'altro e deve poterlo terminare a mia
richiesta
2. La mia applicazione si posiziona nel system tray e premendo il tasto dx
del mouse visualizza un menu di scelta. Vorrei che se clicco con il mouse su
una zona che non è sul menu lo stesso menu si chiuda. Qualcuno di voi mi ha
gentilmente parlato di SetForegroundWindow ma io ho bisogno di un piccolo
esempio d'uso.
grazie e buone feste
max

 esempio d'uso.
guarda che lo fa già se utilizzi popupmenu...
se no postami con che cosa fai il meu e vadiamo di risolvere...
L2K

 guarda che lo fa già se utilizzi popupmenu...
non è vero....non lo fa in automatico....lo fa nei form...ma non nel
SysTray.. :(
Cmq...per usare SetForegroundWindow fai:
SetForegroundWindow (Me.hwnd) nella routine dove richiami il menu....quindi
SetForegroundWindow (Me.hwnd)
If Button = vbRightButton Then PopupMenu MnuTray, 0, , , mnuExit
'Questo vale se lo metti in un Evento MousePress pensando di farlo col tasto
destro...cmq..spero che tu abbia capito cosa intendo...
Poi nella parte generale del form o in un modulo dichiari la funzione API:
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As
Long) As Long 'Caso Form
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As
Long) As Long 'Caso Modulo
Ciao SIMO


grazie per l'esempio, funziona benissimo :-)
ciao
Max