mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: VBNET e pacchetto installazione

Ricordo che con VB6 veniva rilasciato anche un programma per preparare un 
pacchetto di installazione, rudimentale sicuramente, tanto č vero che allora 
optai per il piu famoso Installshield.
Ho girato un po nelle directory e utility rilasciate con visual studio 2008 
ma sembra che non ci sia niente per poter preparare un pacchetto di 
installazione utilizzando VB net. Mi sapreste indicare qualche cosa (meglio 
gratis.....ovviamente) visto che installshield sembra un tatino caro.
Grazie a tutti. 

 Grazie a tutti.
InnoSetup è ottimo e gratuito (con ISTool diventa anche più semplice)
Ma sei sicuro che non ci sia niente di integrato? Nella express non
c'è, ma nelle versioni a pagamento mi pare che devi aggiungere un
nuovo progetto "setup" alla soluzione
ciao

 nuovo progetto "setup" alla soluzione
Nella express č presente il deployment clickonce
http://msdn.microsoft.com/it-it/library/t71a733d(VS.80).aspx
nelle versioni a pagamento č presente anche il setup "normale" che come 
hai detto deve essere aggiunto tramite il menu
nuovo progetto ->altri tipi di progetto->installazione e distribuzione
ciao
stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: [Forse OT] - Visual Studio 6 e nuova finestra di Internet Explorer

    Salve a tutti. Mi scuso fin d'ora per la domanda OT, ma penso di essere
ancora in tema se dico che comunque il mio è un problema legato in qualche
modo al Visual Basic.
    Ho installato il Visual Studio 6 e mi sono accorto di avere problemi con
Internet Explorer (5). In pratica IE non riesce più ad aprire una nuova
finestra. Questo sia dalle pagine Internet ( target = xxxx    non funge),
che dai link presenti nei messaggi sui NG o nelle E-Mail in genere.
    Mi hanno detto che è un problema conosciuto del Visual Studio, e bastava
installare il Service Pack.
    L'ho fatto, ho installato il SP4, ma il problema persiste.
    Mi sapete dire cosa devo fare per risolvere il problema ?
    Mi scuso ancora per la domanda, ma capirete che è molto fastidioso non
poter usufruire del normale funzionamento di IE.
        Ringrazio di cuore tutti quelli che mi risponderanno.

 wrote in message
news:93t92h$ko7$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] classifica di Marzo

classifica dei post di marzo
  1 hal1961                           330 
  2 pal                                    329 
  3 Moreno Sirri                    288 
  4 Della Bianca Giuseppe 266 
  5 MarioH                            211 
  6 *Alessandro*                  147 
  7 Fibia FBI                         143 
  8 Valter                              133 
  9 Zanna                              108 
10 skunk                               101 
classifica senza OT
  1 hal1961                             314 
  2 pal                                      264 
  3 Della Bianca Giuseppe   245 
  4 Moreno Sirri                      239 
  5 MarioH                               203 
  6 *Alessandro*                     129 
  7 Fibia FBI                           127 
  8 Valter                                 124 
  9 Ricc                                     95 
10 Roal Zanazzi                      94 
classifica solo OT
  1 pal                                      65 
  2 Moreno Sirri                      49 
  3 Della Bianca Giuseppe   21 
  4 
no...@libero.it
                  20 
  5 *Alessandro*                    18 
  5 Zanna                                18 
  7 Stracca                             16 
  7 Fibia FBI                          16 
  7 hal1961                            16 
10 GbC                                 14 
10 Gianni Rondinini             14 
post totali   7409
post OT        463
post IT        6946
OT 6.25%
se volete vedere le classifiche complete le trovate
su 
http://digilander.iol.it/battarsa/classifiche/index.html





OT 6.25%
non male :)

OT 6.25%
Beh, stiamo migliorando....
Visto il distacco dal 3° per quanto riguarda gli OT, potevo starmene zitto.... :-))
OK, mi metterò un pal_a_freno... ;-PPP
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
---------------------------------------------------------------------------

   7 Fibia FBI                          16
non c'e' due senza tre, anzi sette ancora
beh, questo mese č andata meglio: +4 posizioni
se non usassi quella foglia tremolante di Hotmail Hal e pal
tremerebbero :)
P.S. OT + 1
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

 P.S. OT + 1
ps -- ot -1

 10 Gianni Rondinini
14
Ma stiamo diventando un ng serio qua!! Hei Zio Pal, vecchio OTtista
:) questo mese il massimo di ot l' hai fatto tu con 65...sono ormai lontani
i tempi in cui si leggevano valori dell' ordine delle centinaia :))
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Download no cache come??

in un programmino come questo ,come posoo impedire che il file non venga
salvato nei temporanei di internet??
GRAZIE
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 salvato nei temporanei di internet??
Forse intendi dire 'impedire che venga salvato'?
Se usi https non viene salvato.
Inoltre esistono delle intestazioni che il server spedisce al client ogni
volta che viene chiesto un file.
Fra queste intestazioni ce no sono alcune pensate appunto per la gestione
della cache del client (che ovviamente non è obbligato a rispettare).
Se invece il tuo scopo è richiamare lo stesso file più volte senza rischiare
di ripescarlo dalla cache, basta postporre al nome del file un punto di
domanda e un numero casuale.
Es.
http://www.sito.dello.zio.cane/pippo.htm?490595390
termoPilucco

"termoPilucco"  ha scritto
Adesso ho capito cosa intendevi... ma non riesci a scrivere dei messaggi
legati fra loro?
termoPilucco

Newsgroup: it.comp.lang.visual-basic
Titolo: principiante aiuto con dbgrid

Ciao Ho letto che è possibile associare una casella a combinata a una
colonna di una dbgrid con la sub,DBGrid2_ButtonClick(ByVal ColIndex As
Integer),
C'è qualcuno che potrebbe farmi vedere un esempio?
Assai grazie per l'attenzione.
Ettore

 wrote


Integer),


 Ciao Stefano
Grazie Stefano , e Grazie Pal

C'è qualcuno che potrebbe farmi vedere un esempio?
Ciao,
tempo fa presi un file di help sull'uso della DBGrid direttamente dalla Apex.
Il file spiega tutto sulla DBGrid con esempi e c'è anche quello che cerchi.
[Nota polemica ;-)]
Avevo chiesto al webmaster di allora (non mi ricordo più chi fosse) di poter
inviare questo file al sito comune. Non ho mai ricevuto risposta.
teddy...@hotmail.com
ICQ 7044062
Como - Italy

Newsgroup: it.comp.lang.visual-basic
Titolo: [vba] - checkbox e optionbutton in una griglia?

ciao a tutti,
esiste una grigli che mi permetta di inserire all'interno di una cella 
un checkbox o optionbutton (o meglio, piu di uno!)?
Si può in pratica inserire nel campo di una cella un control invece di 
una stringa?
grazie a tutti

 grazie a tutti
VBA intendi Access...?
Se si
   perchč non usi la visualizzazione Continua con campi Bolean
associati....?
Se no
   che VBA usi...?
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 
ciao!
uso VBA di Project Professional 2003 (client in combinazione con 
MSProject Professional Server).
Newsgroup: it.comp.lang.visual-basic
Titolo: Vendo Visual Studio 6

Vendo il mio VS6 Enterprise EN, ancora da registrare, causa che per
varie ragioni mi hanno regalato .NET... accetto offerte... il primo che
mi va bene se lo aggiudica. 'Visibile' a Genova o Milano rispettvamente
sera e giorno.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 sera e giorno.
Ignoro (e non tu sei tenuto a renderli pubblici) i tuoi obiettivi, 
ma io non abbandonerei tanto presto la versione 6.
Penso che dara' da mangiare ancora per un bel po' ;-)
-- 
ciao, hal.imho


...mettiamola cosě: 
Lo credo anche io, VB.NOT si preannuncia una discreta spina nel
c. ...grazie dunque per avere rimarcato che le occasioni di mettersi a
posto con una licenza a buon mercato saranno rare ancora per un po'.
Per quanto mi riguarda io utilizzo prevalentemente VID, quindi se riesco
a recuperare qualcosa dal mio caro VS6... tanto meglio.


 Per quanto mi riguarda io utilizzo prevalentemente VID,
gran editor, lo uso parecchio anch'io ;-)
-- 
ciao, hal



ah si ? :))
url ? :)))
ciao

Franco ha scritto:

Ah, si intendeva l' interdev di vs ;-)


 LOL
traducendo:
    with vb
        if (.net) or (.not) then pita#(nUser)
    end with
public func pita(optional sU as string)
    if sU="" then su=getusername(poareto!)
    pita#=su.pain-in-the-ass 'sharp
end func
j.#

Newsgroup: it.comp.lang.visual-basic
Titolo: Keypress di altre apps

Salve a tutti,
è possibile intercettare con le API i tasti premuti in altre
applicazioni?
Grazie
Daniele

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Ricezione connessione

Ho creato un programma che in base al tempo da cui si è connessi, e alla
durata degli scatti, comunica la spesa telefonica attuale. Vorrei però
riuscire a farlo avviare ogni volta che mi collego, ma non so come fare.
Grazie

Io risolsi questo problema in una maniera grezzissima.
Ti dico quello che mi ricordo:
un timer prova periodicamente (es ognmi 2 secondi) ad aprire la porta com
del modem.
Se non dà errore allora non sei connesso.
Se da errore (porta già aperta) allora sei connesso ed il contascatti parte.
NOTA:
se usi il modem anche per mandare un fax, il contascatti parte.
NOTA:
io impostai anche un ritardo che teneva conto del fatto che uno comincia a
spendere dal momento che il server risponde al telefono, mentre la porta com
si apre subito, anche mentre viene composto il numero di telefono.
NOTA:
mi sembra che ci siano anche delle maniere per scoprire se uno è connesso a
internet (tramite le API), però in questo caso il contascatti parte nel
momento in cui terminano le negoziazioni fra il pc ed il server, e magari
sono già passati 10 secondi da quando il server ha risposto al telefono.


 wrote in message
7pmfjb$jst$1...@fe2.cs.interbusiness.it...


Ora che mi ricordo usai due timer.
Uno provava ad aprire la porta, l'altro a chiuderla e si disattivavano a
vicenda.
Mi ricordo che funzionava abbastanza bene.
Quel programma perň non lo uso piů perchč da quando hanno tirato fori le
tariffe Formula Tre, Formula Pippero e Formula Tizio Caio mi ci sono
sfavato.
Newsgroup: it.comp.lang.visual-basic
Titolo: Scusate ma quanti sono i cd di MSDN?

Ho comprato Visual Studio 6 Enterprise..e mi hanno dato solo 3 cd...non
mancano quelli dell'MSDN? Quanti dovrebbero essere?...ora vado dal
rivenditore e gli sfondo il cranio!!!!
Ciao!!!

 wrote in message
az9v5.3884$Sm1....@news.infostrada.it...


 ha scritto nel messaggio
news:az9v5.3884$Sm1....@news.infostrada.it...


 ha scritto nel messaggio
news:az9v5.3884$Sm1....@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Riferimenti Libreria Excel

Salve a tutti
Se dichiaro come segue:
Dim objExcel As Object
Set objExcel = CreateObject("Excel.application")
e successivamente installo il pacchetto in pc  con Excel installato
precedentemente , penso non sia necessario attivare il riferimento alla
libreria Microsoft Excel Library.
Confermate o sbaglio ?
Grazie
giuseppeD
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Confermate o sbaglio ?
    Io confermo.
    E con la gestione errori fai apparire il msgbox "Excel non e' installato
ecc..."
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 ecc..."
Come fatto.


Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] ListView

Mi sono un pò incartato e non riesco a venirne fuori.
Questo pezzo di codice consente a un item selezionato di una Listview
di muoversi verso l'ALTO:
---------------
Dim sTmp As String
If ListView2.ListItems.Count > 0 Then
   sTmp = ListView2.ListItems.Add(ListView2.SelectedItem.Index - 1, ,
ListView2.SelectedItem.Text)
   ListView2.ListItems.Remove (ListView2.SelectedItem.Index)
   Set ListView2.SelectedItem =
ListView2.ListItems(ListView2.SelectedItem.Index - 1)
End If
------------------
ma verso il BASSO?
Grazie.
Saluti.
Andrea.

On Tue, 21 Sep 2004 08:06:58 GMT, 
andrea....@libero.it
 (Andrea)
wrote:
[CUT]
Come non detto sono riuscito da solo.
Bisogna incrementare gli indici! :-(
Saluti.
Andrea.

Newsgroup: it.comp.lang.visual-basic
Titolo: Query di selezione particolare come?

Nel db ho 2 campi (avviso scadenza e Scadenza) dovrei fare in modo che la
SELECT mi selezioni
sia i campi con Compagnia = criterio AND Scadenza compreso tra Il valore in
esso contenuto e il valore di avviso Contenuto in AvvisoSCadenza.
questo è il codice che ho usato fino ad adesso, ma come potete vedere faccio
la ricerca solo cercando l'avviso scadenza del giorno stesso.
Io dovrei creare un specie di avviso a scalare che selezioni quindi i
clienti a partire dalla data AvvisoScadenza fino ad ad arrivare alla data di
scadenza
With RsClienti
        .CursorLocation = adUseClient
        .LockType = adLockOptimistic
        .Open "SELECT *  FROM clienti where ((Compagnia='" & criterio & "')
AND (AvvisoScadenza= #" & Format(Date, "mm/dd/yyyy") & "#)) ", Connessione,
adOpenDynamic
        'Sposto il cursore del recordset al primo record
        .MoveFirst
    End With
Non so se sono stato chiaro spero di si.
Protreste aiutarmi a costruire questa query?
 grazie by Lujx

 la ricerca solo cercando l'avviso scadenza del giorno stesso.
[cut]
cerca nell'help di SQL la clausola BETWEEN
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Latest VB version

Dear VB Experts,
I have been coding in VB6 but unfortunately I am not aware of the
latest version of Visual Basic available after version 6.0.
Can someone please tell me what versions of VB are available after 6.0
(e.g. version 7.0 etc.) and what is 
vb.net
? What are the features
available in these latest version?
If we wish to upgrade our application of vb 6 then what version of vb
we should use? Please note that this application is run on stand alone
PCs and we don't intend to run it on internet.
Thanks & Regards,
Faiz

 available in these latest version?
Start here:
http://makeashorterlink.com/?L11626BF5
PS: This is an ITalian newsgroup.

 PS: This is an ITalian newsgroup.
Mi sono sempre chiesto perchè it.comp.lang.* e non
it.comp.ling.*
Alex
°°° Posted from X-Privat Free NNTP server - 
www.x-privat.org
 °°°

 The last VB6 is ... VB6, Service Pack 5.
sp6 beta is being tested

 sp6 beta is being tested
Sapevo, rammentavo. Risultati, impressioni?

 Sapevo, rammentavo. Risultati, impressioni?
mi hanno mandato l'usa
sto disinstallando vb6it da una macchina e mettendo su quello usa msdn
quando ho finito saremo all'sp7 di net :)

 quando ho finito saremo all'sp7 di net :)
Cioč dopo che io potrň dire di "saperne qualcosa da almeno 2 sp"... ;-)

 quando ho finito saremo all'sp7 di net :)
Ecco, questa appare sufficientemente chiara.
Salvo qualche obiezione da parte dei proprietari dei marchi... e ... altro
...
J, proprio a te e non solo riferendomi al tuo viziacco, bensě alla tua
precisione per certe cose..., dai, fai uno sforzo, ogni tanto, giusto quando
necessario, usa (o USA?) anche tu le maiuscole. Dai, daaai, d-ahi... :-P
Lupo che ha finito i puntini di sospensione

 necessario, usa (o USA?) anche tu le maiuscole. Dai, daaai, d-ahi... :-P
n
j.
:p

[*javalab* = 
jav...@labrador.ca
 in
news:bkpevm$4blbp$
1...@ID-51318.news.uni-berlin.de
] ha scritto:

Il resto č chiaro. Sintetico/ermetico, ma chiaro.
E' il quoting che non mi quadra, nč m'appartiene. :-P (3 crt, come i tuoi,
ma si capisce di piů).
PS: D'ora in poi ti chiamerň Ungaretti, anzi, no, ungaretti. O preferisci
ngrtt? O uaei (che mi suona bene)?

 ngrtt? O uaei (che mi suona bene)?
i gatti puoi chiamarli come ti pare, no ?

...

I don't understand Italian. Can you people please discuss in English
so that I can be benifical from your discussion.
Regards,
Faiz

 so that I can be benifical from your discussion.
Sei in Italia. Sei tu che devi parlare italiano.
You, here, are in Italy. You must speak in italian, not others in english!

so that I can be benifical from your discussion.
Voscia' me scuse, nu ghe capisciu un belin. 'scia' poieva parla' in
zeneize cusci' capisciu quarcosa anche mi?
-- 
ma pensa te!
Newsgroup: it.comp.lang.visual-basic
Titolo: Si può fare il telnet con winsock?

Ho provato a usare il controllo winsock in VB6 per connettermi a un pop
server (
mail.asianet.it
, porta 110). Dopo avere ricevuto  il messaggio di
benvenuto però non riesco più a interagire con il server nel senso che
nonostante invio delle stringhe utilizzando SendData , l'evento DataArrival
non si verifica . Per capire meglio includo dei frammenti di codice:
tcpClient è il nome del controlo Winsock
Private Sub Form_Load() ' Il nome del controllo WinSock è tcpClient.
    tcpClient.Protocol = sckTCPProtocol
    tcpClient.RemoteHost = "
mail.asianet.it
"
    tcpClient.RemotePort = 110
    Me.Caption = "TCP Client"
End Sub
Private Sub txtSend_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        tcpClient.SendData txtSend.Text
        txtSend.Text = ""
    End If
End Sub
Private Sub tcpClient_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
    tcpClient.GetData strData
    txtOutput.Text = txtOutput.Text & strData
End Sub
Dove sto sbagliando?
Grazie!

Dove sto sbagliando?
Cosi' ad occhio e croce direi che manca solo l'accapo dopo ogni riga di
comandi
che mandi al server.
Quando ricevi il carattere return, devi mandare la stringa txtSend.text &
chr$(13) & chr$(10)
Ciao, Andrea


Il telnet si puo' fare.
Guardando il tuo codice penso che forse tu non abbia mandato il codice di
fine linea giusto al server che quindi rimane in attesa di un comando e non
ti invia nulla.
Se credi che ti possa essere utile io ho fatto un programma per
impratichirmi con i winsock con VB5 e te lo posso inviare.
Ciao




...


Scusate se mi intrometto, spero di non essere invadente, ho seguito con
attenzione la vostra vicenda e anch'io ho qualche problema con winsock.
Non saresti cosi' gentile da inviarmi anche a me quel programma.
In tutti modi vi ringrazio in anticipo e scusate per l'intromissione.
Saluti
Corrado Chezzi


Potrei riceverlo anch'io?
Grazie.... 8-)
Giampy
gpa...@com-e.com

impratichirmi con i winsock con VB5 e te lo posso inviare.
Se avete esempi di programmazione, inviateli al Sito Comune di questo NG,
cosi' viene messo a disposizione di tutti.
http://www.murialdo.it/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]pacchetto Setup: cosa usare per crearlo?

Salve a tutti!
Scusate se sono ancora a chiedervi queste cose ma purtroppo non so cosa
altro fare...:-(
Avevo postato già 2 volte in precedenza e ringrazio coloro che hanno voluto
aiutarmi, ma non ho risolto niente!
Figurarsi che ho contattato anche Francesco Balena (!) senza risultato: mi
ha suggerito di verificare quali dll mancano....(pensare che non credevo di
avere risposta da lui...invece...!)
Ah già, ma se non vi spiego tutto....allora io ho finito il mio sw e devo
distribuirlo ad altri colleghi su pc con win95.
Tutto sarebbe semplice se bastasse fare, dopo aver usato il wizard MS, una
bella esecuzione manuale di MDAC2.6. DCOM95, MJET40(sembra che la MDAC2.6
non porti dietro le dll MSJet...), cambiare la stringa di connessione ADO da
OLEDB3.51 a OLEDB4.0....ma non lo è!
Uso ADO e DataEnvironment, Datareport MS, dbase di Access 97, WIN95 e
IE5.0(gli altri hanno la rel 4.0)...
Cosa devo fare?Formattare il mio pc può essere un inizio?Mi do al C?...o
all'ippica?!?!?:-)
Grazie a tutti...spero un giorno di poter ricambiare gli  immensi favori che
mi fate...
Alex


Ciao Alex !
Io ho smesso di usare l'installer di MS appena ho visto cosa faceva
:-)
Ti consiglio Install VISE 8.x che esiste anche in versione demo ed é
perfettamente compatibile con VB, addirittura ha una funzione (che ha
anche il MS installer) che ti dice quali dll devi allegare al tuo
progetto per far si che funzioni.
In passato ho avuto parecchi problemi a installare un software
comprendente dll installate da IE5.0 su pc che ne erano sprovvisti,
per cui ti consiglio di installare anche l' IE5.0 sulle macchine,
magari prima del resto.
...perche' formattare il tuo povero PC ?
Ciao !
DaVe
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 DaVe
Ciao
Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: Query help

Una query che mi sembrava semplice, invece non ottengo i dati voluti.
Tre campi: Data, Cod_cliente, Telefono.
Ogni Cod_cliente pu� chiamare diverse volte in un giorno da diversi numeri 
di telefono.
Ed io vorrei estrarre per ogni data, conteggio clienti distinti e conteggio 
telefoni distinti, insieme o separatamente
Data  CodCliente Telefono
8/2    12    021234568
8/2    12    0245689
8/2    55    06458963
7/2    12    021234568
7/2    12    0245689
Io vorrei avere:
8/2    2    3
7/2    1    2
o almeno:
8/2    2
7/2    1
grazie
greg

 7/2    1
Quindi vorresti fare un Count(Distinct con un Group By Data,CodCliente, 
giusto?
Non ï¿œ difficile, perï¿œ senza sapere che Sql usi...
Alberto

 Non � difficile, per� senza sapere che Sql usi...
Quello di Access, scusa avevo dimenticato :(
--
greg 

 Quello di Access, scusa avevo dimenticato :(
Si, beh, come saprai io con quella roba lï¿œ non mi ci mescolo troppo, mi 
fa male alla salute.
Perï¿œ digitando "Count Distinct Access" su google, ho trovato un 
esempio:
SELECT C.Color, Sum(C.Value) AS Total, T2.N
FROM
    (SELECT T.Color, Count(T.Color) AS N
     FROM
        (SELECT DISTINCT Color, Count(*) AS N
         FROM tblColors GROUP BY Color) AS T
    GROUP BY T.Color) AS T2
INNER JOIN tblColors AS C
ON T2.Color = C.Color
GROUP BY C.Color, T2.N;
Meglio che prendere degli schiaffi.
Alberto

 Alberto
Ecco perche non mi veniva naturale :(
Comunue grazie Alberto
Greg
-- 
Greg 

 Ecco perche non mi veniva naturale :(
Con firebird si fa una cosa del genere, vedi se c'� qualcosa di simile in
access:
Select DATADOC
     , COUNT (DISTINCT ID_FATT) AS FATTURE 
     , COUNT (DISTINCT CODCLIENTE) AS CLIENTI
From FATTURE
Group By DATADOC

"Andrea [Work]" <andrea.isw...@gmail.invalid> ha scritto nel 
messaggio news:isw5dk72walv$.15pdgpbtah1p7.dlg@40tude.net...

Non funziona, count e distinct insieme, come diceva Alberto, non sono 
supportati.
Non mi resta che digerire quste subquery, o continuare con le query 
intermedie salvate nel db.
Il fatto � che concettualmente fino ad una risco anche a stare dietro, ma se 
diventano due m'incrocchio i neuroni solo a leggerle. Non gli sto dietro.
ciao
greg 

 diventano due m'incrocchio i neuroni solo a leggerle. Non gli sto dietro.
Beh, capisco che uno statement secco sia piï¿œ facile da usare, ma la tua 
richiesta ï¿œ banale. Nel senso che esistono infinite altre necessitï¿œ ben 
piï¿œ complesse, per risolvere le quali non puï¿œ esistere alcuno statement 
predisposto all'uopo, per cui saper spippolare con le subquery ï¿œ 
fondamentale a prescindere.
Alberto

 Alberto
Hai ragione, � verissimo.
Devo provarci di piu; � che mi capita di rado di doverle usare, e quando 
ricapita ho gia dimenticato.
Comunque con una sola subquery di mezzo me la cavo un poco, � quando sono 2 
che si incasina tanto da non riuscire manco a leggerla, figurati a 
scriverla.
Ma forse la lacuna maggiore � di non riuscire a capire subito al volo, 
quando capita, che � necessaria una una subquery.
greg
Newsgroup: it.comp.lang.visual-basic
Titolo: aiutatemi

Ho un form dove ci sono dei campi testo, ho bisogno che cliccando su un
command button il contenuto dei campi vada in un certo ordine a copiarsi su
un nuovo file di testo (.txt) come posso fare? Come faccio a dare il nome
che voglio al documento txt?
Spero di essermi spiegato bene, scrivetemi per qualsiasi chiarimento.
Grazie in anticipo per la risposta.
Ciao Luca

 wrote in message
xv0F5.8041$Z95.2...@news.infostrada.it...

private sub command1_click()
    dim intFree
    intfree=freefile
    if dir("C:\Prova.txt")<>"" then kill ("C:\Prova.txt" )
    open "C:\Prova.txt" for binary access write as intFree
    put intfree,, cstr(text1.text)
    ..................... 'le altre textbox
    close intfree
end sub
Appppproposito... qualcuno mi sa dire perchè in un file aperto come sopra,
quando faccio un put senza scrivere cstr mi aggiunge 4 caratteri prima della
variabile?
Ciao

 Ciao
dovrebbero essere un identificatore del tipo di campo stai scrivendo
(variant tipo stringa)
Marco

Grazie!




Se il punto del file è sempre quello puoi usare
Put intFree, intPosizioneNelFile, cStr(txtRisultato.Text)


si il punto è sempre quello. Ma come si fa a stabilire la posizione?
cosa devo mettere al posto di intPosizioneNelFile?
scusa l'ignoranza ma sono alle prime armi. Potresti farmi qualche
piccolissimo esempio?
ciao e grazie ancora

 wrote in message
LmzF5.19469$Z95.6...@news.infostrada.it...

Se apri il file for binary è semplicemente il numero di byte che precedono
il punto dove vuoi scrivere. Non so però se sovrascriva, ma non penso.
Newsgroup: it.comp.lang.visual-basic
Titolo: Threads si/no

Buongiorno,
ho bisogno di eseguire processi separati e vorrei sapere se è possibile 
usare i threads in VB5 oppure devo passare a VB6 oppure ... ?
Ho trovato un esempio un po' vecchiotto che però sconsiglia di usarli 
perchè rendono il programma instabile.
Ho pensato all'alternativa di simulare uno scheduler con un Timer ma mi 
sembra un po' complicato, oppure di lanciare mini-applicazioni per task 
specifici.
Qualcuno ha dei suggerimenti efficaci ?
Grazie mille
	Paolo

Sul sito di Fibia FBI (very good) trovi un esempio di come usarli..
Ma il loro funzionamento è corretto solamente se usi queste prassi
    lanci il processo con un indirizzo di routine
    msgbox "ciao"   oppure Tuaform.show 1       'Il thread lanciato prima
continua a girare
    distruggi il processo
Anche se nella realtà non penso avrai una situazione che ti permetta di fare
questo..
Ciao a Tutti
oZ
P.s. se ho detto castronate qualcuno mi smentisca....

> Sul sito di Fibia FBI (very good) trovi un esempio di come usarli..
#^__^#
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

 usare i threads in VB5 oppure devo passare a VB6 oppure ... ?
l'esatto contrario :)
se usassi VB6 dovresti passare a VB5 perché la libreria di runtime di
VB6 non digerisce la CreateThread
di usare la ShCreateThread non ho trovato proprio soluzione ;)
Alternative valide consistono nel creare una DLL ActiveX che giri
nello stesso processo del tuo programma oppure creare un EXE ActiveX
ma in questo caso il marshaling dei dati è tremendamente lento.


Grazie per le risposte.
Qualcuno ha una soluzione efficace sia per VB5 che per VB6 ? In altre 
parole sono disposto a usare un'alternativa ai Threads standard, usando 
magari come accennato uno scheduler fatto in casa.
Quindi: qualcuno ha un buon esempio di uno scheduler, ossia un modo di 
eseguire diverse procedure in maniera (simil-) contemporanea, 
interrompendo l'esecuzione di una per passare all'altra e poi riprenderla 
?
Grazie
	Paolo
Newsgroup: it.comp.lang.visual-basic
Titolo: [NET 2008] Errore in creazione di appuntamento OUTLOOK

Ciao a tutti,
sto cercando di creare da codice un appuntamento per outlook
Errore:
Recupero della class factory COM per il componente con CLSID 
{0006F03A-0000-0000-C000-000000000046} non riuscito a causa del seguente 
errore: 80040154.
Codice
Imports System.Reflection
Imports Outlook = Microsoft.Office.Interop.Outlook
Module Module1
Sub Main()
Dim oApp As Outlook.Application = New Outlook.Application() 
<---------------QUESTA RIGA MI DA' SUBITO L'ERRORE
Dim oAppt As Outlook.AppointmentItem = 
oApp.CreateItem(Outlook.OlItemType.olAppointmentItem)
oAppt.Subject ="" &  Form1.TextBox1.Text
oAppt.Body ="" & Form1.TextBox2.Text
oAppt.Location ="" & Form1.TextBox3.Text
oAppt.Start = Form1.DateTimePicker1.Value
oAppt.End = Form1.DateTimePicker1.Value
oAppt.ReminderSet = True
oAppt.ReminderMinutesBeforeStart = 5
oAppt.BusyStatus = Outlook.OlBusyStatus.olBusy
oAppt.IsOnlineMeeting = False
' Save to Calendar.
oAppt.Save()
' Clean up.
oApp = Nothing
oAppt = Nothing
End Sub
End Module

Creare una nuova scadenza su Outlook tramite automazione con 
VB.NET
http://community.visual-basic.it/lucianob/archive/2005/09/08/16254.aspx
-- 
-----------------------------------------------------------------
Luciano Bastianello - MBS CP Navision Development
Software Consultant - Apprentice Sorcerer
MSN: 
cte...@hotmail.com
 - ICQ: 209754422
http://community.visual-basic.it/LucianoB/
----------------------------------------------------------------- 
"Dave Mustaine" <mega...@megadeth.metal> ha scritto nel messaggio 
news:VAtBj.14739$q53....@tornado.fastwebnet.it...



Non era registrato correttamente il tutto nell'assembly...

Newsgroup: it.comp.lang.visual-basic
Titolo: Stranezza clausula With con oggetti

VB6 con recordset:
 
Dim Rs as ADODB.Recordset
Set Rs=new Adodb.Recordset
....
With Rs
	Set Rs= MiaFunzione (Rs)
	.Fields("pippo").value="ciao"
End with
 
 
Function MiaFunzione (Byval recSet as adodb.recordset) as adodb.recordset
   Dim Rs2 as adodb.rec...
   ' operazioni da cui vedo in lettura dati di recSet
   Rs2("Qta").value=100
   Set MiaFunzione=Rs2
End function
 
 
Questo codice fa si che il "ciao" non sia aggiornato, mentre il 100 si,
immagino perchè la With crea il puntatore, che viene cambiato all'interno
del blocco. Se spezzo il blocco tutto funziona, perchè probabilmente ricrea
il puntatore giusto.
 
With Rs
	Set Rs= MiaFunzione (Rs)
End with
With Rs
	.Fields("pippo").value="ciao"
End with

 
 
per forza.
qui i passaggi sono diventati:
- apri il with puntando a RS (che credo sia gia' inizializzato, giusto?)
- resetti RS usando una funzione che usa RS come input
- apri il with puntando a RS 'post reset'
- usi il puntatore a RS fornito dal blocco with
 
qui il secondo with (quello in cui lavori) punta a un oggetto che non 
viene distrutto e ricreato all'interno del blocco stesso...
 
-- 
Paolo opg
 
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: [SITO COMUNE] Come inviare materiale da pubblicare

Volevo solo sottolineare che con la nuova versione del Sito COmune, per inviare del materiale da
pubblicare è necessario utilizzare gli appositi moduli che trovate sul sito stesso.
Non verranno considerati (per motivi tecnici) i progetti inviati direttamente alla casella di posta
del WebMaster.
Grazie per l'attenzione,
Sirri Moreno
WebMaster del Sito Comune di questo newsgroup:
http://www.murialdo.it/it_lang_vb
it_la...@murialdo.it

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

ma chi ti invia nullaaaaaaaaaaaaaaa
221 persone ad oggi.... scusa.
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
---------------------------------------------------------------------------


Forse sei distratto o non conosci bene questo Newsgroup.
Moreno Sirri è l'auutale Webmaster del Sito Comune di questo NG, eletto per
mezzo di votazioni qui sul NG con un mandato di 6 mesi.
Visto che anche tu partecipi a questo newsgroup, Moreno è anche il tuo WM.
Poi se preferisci non usufruire della sua disponibilità (gratis)
e del sito comune, questa è una tua scelta.
Il Sito Comune NON ha propretari, è il sito di Questo NG e quindi è di
tutti, anche tuo. Contiene sorgenti,progetti,articoli e tanto altro e tutto
rigorosamente free al 100%.
 /\/\/\/\/\/\/\/\/\/
| 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

Newsgroup: it.comp.lang.visual-basic
Titolo: Automatically highlighting text in text boxes

I have a form, with several textboxes, If a user tabs to one text box
that already has something in it, how would I code it to where that
text would automatically get highlighted and the user would not have
to backspace or delete the old text before typing in new text?

Elucubravo in letizia, quando udii Terry sostenere...

Solution 1:
On GotFocus event of every textBox:
  txtControl.SelStart=0
  txtControl.SelLength = len(txtControl.text)
Solution 2:
Add a Timer control on the form;
Set the timer interval to 500 ms;
On the Timer event:
on error goto Exit
dim cTmp as control
for each cTmp in <myform>.controls
  If TypeOf cTmp Is TextBox and cTmp = screen.activecontrol Then
    cTmp.SelStart=0
    cTmp.SelLength = len(txtControl.text)
  end if 
next cTmp
Exit:
-- 
Bye by SixaM 8-]
-----------------------------
Sito comune: 
www.it-lang-vb.net

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Chiamare form

In vb6 c'era questa forma:
form2.Show
me.hide
Ora come si fa ad aprire un altro form ? Ho provato con
Form2.ActiveForm.Show ma non funziona. Grazie a tutti.
Stefano
--------------------------------
Inviato via 
http://usenet.libero.it

 Ora come si fa ad aprire un altro form ?
Concettualmente e' come prima, la differenza e' che in VB6 "Form2"
identificava contemporaneamente una classe e una istanza predefinita della
stessa con il medesimo nome, visibile a livello di intero progetto.
Ora invece "Form2" e' solo una classe, e quindi come per tutti gli oggetti,
devi prima dichiarare una variabile opportuna, istanziarla, e infine usarla.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 devi prima dichiarare una variabile opportuna, istanziarla, e infine
usarla.
Insomma dovrebbe essere:
Dim f2 as Form2
f2.Show
...se ho ben capito ?
Stefano

 Dim f2 as Form2
dim f2 as new form2
Nella forma che hai scritto tu f2 ha valore nothing

 ha scritto nel messaggio
news:uYfRa.180549$lK4.5...@twister1.libero.it...

ti manca ancora il passaggio "istanziarla":
Dim f2 As Form2
Set f2 = New Form2
f2.Show
Nota che adesso e' possibile inizializzare l'oggetto in dichiarazione senza
le controindicazioni che esistono in VB6 (vedi valanghe di vecchi messaggi),
quindi puoi abbreviare con
Dim f2 As New Form2
f2.Show
oppure alla nuova maniera, che se vogliamo e' anche piu' coerente con le
altre inizializzazioni possibili
Dim f2 As Form2 = New Form2
f2.Show


 Set f2 = New Form2
Warning PM0x03938: In 
VB.NET
 la parola chiave Set č stata eliminata.
Provare per credere: VS.net te la elimina per credere
mmmh... mi sto identificando con il compilatore... mi sa che devo andare in
vacanza...

 Provare per credere: VS.net te la elimina per credere
ERROR PM0x00983: author asleep
Expected: VS.net te la elimina senza tanti complimenti.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]TABULAZIONE in txtform

Sto VB6 mi fa impazzire...
Come posso usare una tabulazione in un sistema del genere?
Form1.Rec_String = .campo1 & " " & .campo2 & vbCrLf '
Evidentemente non accetta il TAB(xx) e sul file me li attacca tutti assieme,
dovrei proprio usare un TAB usando len ed aggiunta di chr(20) fino ad
occupare lo spazio?
La prima idea che mi viene in mente semplice semplice :
rem per TABULAZIONE 20
for x = len(campo1) to 20
aggiunta=aggiunta +chr(20)
next x
capo1=campo1 & aggiunta
che pero' se lavoro con caratteri che non sono tipo "courier" non va molto
bene!
Qualche altra soluzione gia' fatta che mi lavori il CAMPO1?
Qualche cosa di più semplice e funzionale?
bye & tnx
wl...@ticino.com
reply (togli [NOSPAM])

Chr(9)
è questo il codice del TAB.... perché hai usato 20???
aaa & chr(9) & bbb
mette un tab tra aaa e bbb
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

 mette un tab tra aaa e bbb
)

Newsgroup: it.comp.lang.visual-basic
Titolo: Excel password

Qualcuno conosce le passwords per aprire i moduli visual basic relativi alle
soluzioni foglio di calcolo proposte in Microsoft Excel?
Filename:
 - Gestione acquisti.xlt
 - Gestione fatturazione.xlt
 - Gestione rimborso spese.xlt.
Ve ne sarei grati,     Alex

Prova su 
http://astalavista.box.sk
 e dovresti trovare qualche cosa di
abusivo come quella che cerchi.
Ciao

Ho trovato su astalavista ciò che cercavi, è un programmino che ti rileva le
password, però non so che versione di Excel hai.
Comunque l'importante è che c'è, lo troverai senza dubbio anche tu.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come dico al CReport quale file DB usare ?

Come faccio a passare al crystal report il file db di riferimento per
leggere i dati ?
lo so' sarà banale ma mi sono inlooppato !
...domanda di riserva !!!
non esiste la funzione mid() per troncare i campi lunghi..possibile ?
grazie
bob

 ha scritto nel messaggio
news:HVCT5.35636$FV2.1...@news.infostrada.it...

I) Utilizzando il Controllo CRYSTL32.OCX devi fare riferimento
all'insieme DataFiles che si riferisce alle tabelle utilizzate nel
report. Per ogni tabella utilizzata puoi indicare a quale database
fare riferimento. Nell'esempio qui sotto, quanti è il numero di
tabelle utilizzate (come al solito si parte da zero), CR è il
controllo Crystal
    For x = 0 To quanti
        CR.DataFiles(x) = MioPercorso & "\MioArchivio.MDB"
        If CR.LastErrorNumber <> 0 Then
            Exit For
        End If
    Next x
2) Cosa intendi per troncare i campi lunghi? Esiste la funzione
Left[$] che ti restituisce n caratteri partendo da sinistra. Esempio
Troncata = left$("123456789",4)
restituisce in Troncata "1234"
Ciao
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 news:HVCT5.35636$FV2.1...@news.infostrada.it...



 > news:HVCT5.35636$FV2.1...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Wizard o ADO a mano?

Ciao
mi sto smazzando con i wizard... datatableadapter, databindingsource, 
dataset...
ma voi li usate o fate tutto con ADO?
grazie
-- 
Ciao
Nik 

 grazie
Personalmente mai usati....

Personalmente li uso e poi di norma modifico il tutto ad hoc per me.
Ovviamente dipende da cosa devi sviluppare. Spesso ado è + veloce del 
wizard.
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: Edit-And-Continue Visual Basic 2005

Ciao a tutti,
utilizzando visual basic 2005 ho un problema con alcuni progetti. Vado 
dritto al sodo: l'edit-and-continue non vuole saperne di funzionare. 
Il messaggio d'errore restituito dall'ide è il seguente:
"Cannot currently modify this text in the editor. It is read-only"
Questo errore accade con tutti i progetti che importo da VB6, ed 
ultimamente avviene anche con un progetto importato tempo fa da 
VB.NET
 
(2003). Sottolineo ultimamente perchè ad importazione ultimata tutto 
funzionava a dovere, dopo aver modificato alcune impostazioni del 
progetto (non ricordo quali, numerevoli che comunque non centravano 
nulla con l'edit-and-continue) ha smesso di funzionare.
Per quanto riguardo tutti i nuovi progetti invece nessun problema.
L'opzione in oggetto è abilitata. I file sull'HD non hanno l'attributo 
di sola lettura ed ovviamente tento di modificare il codice in break 
mode.
Ho cercato una soluzione per diverso tempo su google, da fonti 
inglese, italiane, francesi e spagnole ma non ho trovato una soluzione 
nonostante ci siano diversi risultati rilevanti. Sapreste darmi una 
mano?

nessuno sa aiutarmi?

Newsgroup: it.comp.lang.visual-basic
Titolo: resource editor

dove posso trovare un resource editor free e semplice per vb?
ho visual studio 6 prof originale con licenza d'uso...non dovrebbe essere
incluso li'?
grazie
Roby

 wrote in message
88cmbk$96d$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: MySQL e OLE-DB

salve, con Access sono abituato a collegarmi al DB mediante OLE-DB, e non ho
mai usato connessioni ODBC. volevo chedervi due cose.
innanzitutto: č vero che se uno con Access si collega mediante ODBC, deve
modificare solo la stringa di connessione, perche tutte le istruzioni
successive (query, operazioni sui record, ...) restano immutate?
come č possibile collegarsi mediante OLE-DB (con visual basic script) a
MySQL?
grazie
Mario

 MySQL?
Cerca MyOledb sul sito di MySql.
ciao
ugo


per chi ha provato ODBC e OLE-DB on MySQL, quale è il tipo di connessione
che si imostra piu veloce, poi?
grazie di nuovo.
Mario
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ByVal in API

Stavo provando LB_SETSEL per selezionare tutti gli elementi di una ListBox,
ma non mi funzionava.
Spippolando un po' mi sono accorto che il problema e' dovuto al ByVal nell'
lParam, cosi' funziona:
    SendMessage List1.hwnd, LB_SETSEL, 1, ByVal -1
e cosi' no:
    SendMessage List1.hwnd, LB_SETSEL, 1, -1
(-1 serve per selezionare tutti gli elementi)
Dato che non mi piace fare le cose a caso, vorrei capire meglio il perche'
della cosa e le differenze tra passare una costante per riferimento o no ad
un API.
Ciao e grazie 1000


Certo, perchè lParam è dichiarato As Any, cioè accetta un puntatore a un
dato indefinito (potrebbe essere un long, una struttura o quant'altro) e non
il valore.
Mettendo ByVal -1 "forzi" VB a passare il valore anzichè il puntaore.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Query con date: AIUTO (urgente)

Ciao a tutti
come faccio a fare una query per cercare i record che hanno un campo
(tipo date/time) vuoto????????????
Mi da sempre errore
Grazie
Attilio

...

Hai provato a ricercare il valore nullo:
SELECT aa.* FROM aa WHERE (((aa.Data) Is Null));
Luca

Newsgroup: it.comp.lang.visual-basic
Titolo: Differenza tra pulsante "X" e unload form1

Ho una applicazione che carica una icona nella tray, e rileva gli eventi del
mouse.
Il problema è questo: quando chiudo il form premendo sulla "X" tutto ok,
quando lo scarico con "unload form1" non mi scarica un bel niente: il
programma ricomincia (riparte propio dall'inizio, come appena avviata).
Come mai?
Premetto che nell'evento unload del form ho messo le routine per togliere
l'icona dalla tray e per restituire a win il controllo della windows
procedure originaria.
Grazie mille,
Alex
--
------------------
email: 
el_co...@libero.it
------------------


In presenza di form in traybar, normalmente uso una logica di questo tipo:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = vbAppWindows Or UnloadMode = vbAppTaskManager Then
        Cancel = False
    ElseIf nModal = 1 And UnloadMode = vbFormControlMenu Then
        Cancel = True
        Me.WindowState = vbMinimized
    Else
        If MsgBox("Chiusura " & App.FileDescription & vbCrLf & vbCrLf  &
"Uscire?", vbQuestion + vbYesNo + vbDefaultButton2, App.FileDescription) <>
vbYes Then
            Cancel = True
            Me.WindowState = vbMinimized
        Else
            CloseAll True
        End If
    End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
    If nModal = 1 Then
        Shell_NotifyIcon NIM_DELETE, nid
    End If
End Sub
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Puntatore del Mouse

Ciao,
ho un piccolo problema:
ho una form nascosta e vorrei cambiare il puntatore del mouse quando il mio
programma esegue alcune istruzioni.
Il comando screen.mousepointer = 11 non funziona.
Come posso fare ???
Grazie
Siccome non accedo sempre al Newsgroup vi sarei grato se spediste la
risposte anche al seguente indirizzo:
ant...@globenet.it

...

Newsgroup: it.comp.lang.visual-basic
Titolo: sottomaschere???

ciao a tutti, sono un nuovo "lettore" di questa newsgroup ed un neofita di
visual basic 6, e volevo fare una domanda:
come faccio a richiamare una query (esistente nel file di access) ???
grazie

>come faccio a richiamare una query (esistente nel file di access) ???
L'oggetto della tua domanda e' un po' fuorviante.
Per richiamare una query e' sufficiente che apri un dynaset sul nome della query, oppure "select * from query".
Antonio

Newsgroup: it.comp.lang.visual-basic
Titolo: Come posso aprire Word da VB e trasferire dati?

Ho bisogno di aprire Word da un'applicazione VB4 e trasferire il contenuto
di un RichTextBox. Possibilmente aprire Word con un modello esistente.
Grazie.

 wrote:

AUTOMAZIONE OLE:
public function pincopallino(sdfklkdslksdj)
dim word as object
on error resume next '(quando usi un'applicazione 
		'esterna e' meglio prevederlo)
set word=createobject("word.basic")		'con questo parte word
word.appshow		'con questo rendi visibile la finestra di word
word.filenew		'con questo crei un file nuovo in word
word.insert "Saluti a tutti"   'Scrivi "..." in word
mi sembra che ci sia anche un metodo per mandare del testo in formato
rtf, forse insertrtf, ma questa ricerca la lascio a te.
word.fileclose 2
show		torna a visualbasic
set word= nothing		recuperi la memoria utilizzata
end function
Newsgroup: it.comp.lang.visual-basic
Titolo: Copiare dati da un form all'altro

Per cortesia una verifica
Ho la necessità di prelevare il Numero di IdContatore da una maschera e
farlo rilevare da un campo Txt di una seconda maschera.
Ho provato con questo codice ma non funge
Allora:
Questo è il mio codice
      NomeSecondoForm.NomeCampoSecondoForm.Text = Me.IdContatore
Nb:Questo codice l'ho abbinato con prove agli eventi "Nominativo Change()",
Sul "Load Form" ecc ma mi dice che manca l'oggetto.
Se tolgo il .Text mi carica si la seconda maschera ma no mi compila il campo
In che evento va collocato il codice?
Dove sbaglio?
Ho provato anche con questo If  abbinato a campo IDContatore (evento Change)
ma non funge
If NomeSecondoForm.Visible = True Then
   NomeSecondoForm.NomeCampoSecondoForm.Text = Me.IDContatore
End if
Nella seconda maschera (NomeSecondoForm) non richiamare nessuna procedura?
Grazie 1000

Il 17/12/2003 11.22, Giorgio A. scrisse:

Load form2
form2.campo.text=me.idcontatore
form2.show
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

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

Ho letto spesso nei post che bisogna installare prima MDAC_TYPE e poi il
programma.
Perche?
Dovrebbe essere il contrario, in quanto l'installazione di MDAC_TYPE
dovrebbe aggiornare i componenti gia installati.
Ciao Carmelo

 ha scritto nel messaggio
news:qhju7.6139$0Y2.1...@news.infostrada.it...


Per evitare problemi, basta che metti il file mdac_typ.exe con cui hai 
sviluppato l'applicazione nella directory:
c:\programmi\visual studio\vb98\Wizards\PDWizard\Redist\
o simile.
A questo punto quando lanci il programma di installazione, ti viene
installato
in automatico la versione corretta e tu non devi fare niente altro.
	Cipo.


 wrote in message
3BB9D823...@agip.it...


 include nei pacchetti d'installazione...
Cut
vai a....
http://www.microsoft.com/data/
:-)