mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema risolto. Era: Aiuto per problemi di compilazione

Salve a tutto il NG.
Prima di tutto volevo ringraziarvi per la disponibilità ad aiutarmi.
Vi aggiorno sul mio problema ormai risolto...dopo 6 ore di ricopiatura a
mano di un intero modulo...:-(
Sicuramente sarà stato un errore da newbie al 1000%... Avevo dichiarato un
tipo di dati pubblico chiamato myFolderInfo nel modulo mdVariables.bas che
ho usato per la dichiarazione delle variabili e costanti pubbliche. Poi nel
modulo syncPrepare.bas avevo dichiarato due routines che utilizzavano come
parametro un array di dati di tipo myFolderInfo solo che avevo anteposto al
tipo di dato il nome del modulo in cui si trovavano.
Queste sono le dichiarazioni delle routines:
Public Sub prepareSyncFiles(ByRef theArray() As mdVariables.myFolderInfo,
ByRef theType As Integer)
Public Sub readOLFolders(ByRef myFolder As Outlook.MAPIFolder, ByRef
myArray() As mdVariables.myFolderInfo)
E' bastato cancellare mdVariables. dalla dichiarazione delle routines e
tutto si è messo a posto. Peccato che me ne sono accorta (per caso) dopo
aver ricopiato quasi tutto il modulo syncPrepare.bas...:-(
Quello che ancora non mi torna è che gli errori che mi venivano segnalati
erano tutti in moduli o form che non c'entrano con quello in cui ho
dichiarato queste funzioni...Per esempio uno degli ultimi errori veniva
segnalato in frmForSync.frm nel quale non c'è nemmeno una chiamata a nessuna
delle due funzioni, neanche indirettamente, e idem succedeva per l'errore
segnalato in mdActions.bas...Per me il mistero rimane, ma non penso di poter
indagare oltre per mancanza di tempo, mi devo accontentare del fatto che ora
funziona tutto...
Non saprei in che modo potermi sdebitare con voi per il vostro aiuto,
sicuramente vi meritate un GRAZIE gigante!
Buon lavoro a tutti
Valeria Olivati
oli...@tin.it
Studentessa del Master in Scienze e Tecnologie dei Media - Università di
Pavia
Messaggio postato anche in microsoft.public.it.vb

 Non saprei in che modo potermi sdebitare con voi per il vostro aiuto,
I cattivi direbbero di portarti la benzina e la legna per una moderna
riedizione di Giovanna d'Arco sulla pubblica piazza. Loro porterebbero
l'acciarino.
I buoni, beh, ... non lasciar loro troppa libertà... ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: L'evento frmLoad

 Ho notato che parecchi form (tutti modali), con poche cose da fare
nnell'evento show, anche se il carimento è velocissimo, o cumunque
immediato, mi diventa fastidioso peerchè appaiono prima le textbox (anche se
se non solo 2) e poi tutto il resto del form. Anche se è un ritardo di
decimi/centesimi di secondo si vede, e vorrei eveitarlo, ma come fare?
Ho provato a spostare tutto il coodice possibile nell'activate che viene
sopo, ma non cambia nulla.
Nascondere il form all'inizio dell'evennto load e renderlo visibile alla
fine del codice... non cambia...
Do events all'inizio dell'evento load... uguale.
Cosa altro posso provare?
PS il form in questione ha un datacontrol, che fa partire il motore jet solo
per il fatto di trovavrsi li, ma il motore jet dovrebbe risultare comunque
avviato dal form padre.
Grazie dei consigli eventuali
-- 
Greg


Vuoi risolvere il problema? Elimina il datacontrol e scrivi 3 righe di 
codice per aprire il database e il recordset.
Ciao, Vincenzo 

 Ciao, Vincenzo
-- 
Greg

 ha scritto

ho riprovato ora ad aprire il form con 150 controlli, che nel frattempo sono 
passati a circa 160.
appare subito (e' un normale centrino), nonostante il datacontrol, con la 
dbgrid e i text collegti.
pero il dc e' _vuoto_. si aspetta uno dei command che fa una select.
ora ho provato in locale, ma non mi sembra che cambi quando apro il db sul 
server.
(nb: dao viene aperto prima dal form mdi, ma ogni select si prende dietro 
fra i 5k e i 250k record, anche con la piu' breve il rs peserebbe...)
quindi, forse, puoi provare a caricare il dc dopo il form.show, o come 
ultima istruzione.
una cosa che rallenta molto lo show sono i combo e list bound, ma se usi la 
flex non credo li usi.
hth, ciao, a.

 usi la flex non credo li usi.
una form ha 2 combo bound, un'altra form solo una listbox non bound e una
flex bound, ma il risultato è sempre deludente alla stessa maniera, per me.
ciao
-- 
Greg

 avviato dal form padre.
Prova a fare una cosa del genere:
Sposti i comandi dalla Load ad una Public Sub nella form che carichi.
<es. Public Sub DisegnaForm()>
E poi usi un codice tipo il seguente
Load tuaForm
with tuaForm
  Call .DisegnaForm
  .show vbModal
end with
-- 
DBMS Firebird
VB6 + Ado

 end with
Mi sembra vada un pochino meglio :)
-- 
Greg
Newsgroup: it.comp.lang.visual-basic
Titolo: [vba excel] Come reperire l'intervallo delle celle selezionate

devo fare una piccola macro che una volta selezionato le celle volute
dall'utente, mi trasformi il contenuto delle celle (es. 100402 inserito
senza formato specifico) in formato data corretto "10/04/2002"
Qual'è l'istruzione che mi ritorna il range delle celle selezionate
dall'utente?
Grazie.
--
Paolo Albera

 ha scritto nel messaggio
news:aclg8a$pveo7$1...@ID-83513.news.dfncis.de...

SNIP
Andando a memoria dovrebbe essere qualcosa del genere
 ActiveSheet.Selection
Cerca Selection sulla guida

> "
news.dfncis.de
" [...]:

Selection
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------


Scusa l'intontimento, ma ho già provato Selection ma nisba.
insomma metti che una volta selezionato tot celle io voglia con una macro
visualizzare
una msgbox che mi dica che ho selezionato ad esempio da A5 a B7 come devo
fare?
Grazie ancora
Paolo

> "
news.dfncis.de
" [...]:

Modulo1:
Option Explicit
Public Sub Test()
  Dim oXLRange  As Excel.Range
  Dim sPrompt   As String
  Set oXLRange = Selection
  ' oppure:
  ' Set oXLRange = ActiveWindow.Selection
  ' oppure qualsiasi oggetto che serva al tuo scopo e
  ' che abbia la proprieta' "Selection"
  With oXLRange
    With .Worksheet
      sPrompt = sPrompt & .Parent.Name & vbCrLf
      sPrompt = sPrompt & .Name & vbCrLf
    End With
    sPrompt = sPrompt & .Address
  End With
  Set oXLRange = Nothing
  MsgBox sPrompt
End Sub


 ha scritto nel messaggio
news:acsnbh$s8ar7$1...@ID-52090.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO GESTIONE PERIFERICHE

Salve,
vorrei sapere dove posso trovare del materiale (libri, appunti, esempi,
etc...) su come gestire porte seriali o parellele con Visual Basic 6.0.
Grazie a chiunque mi sappia dare qualche indicazione,
Lorenzo

etc...) su come gestire porte seriali o parellele con Visual Basic 6.0.
una DLL ed un esempio sul Sito Comune.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: primi passi - Crystal report

Saluti,
Avrei la necessità di creare un applicazione verticalizzata per un
gestionale.
Tale e' un sistema di invio fax.
Il fax dovrà essere un template in crystal (personalizzabile dall'utente).
Le domande sono:
1) Conoscete un sito (possibilimente ita) dove acquisire informazioni sul
crystal?
2) Esistono componenti Free per la gestione dei Fax?
Grazie!


Non so aiutarti per bene, ma in giro per la rete ho visto qualke dll free
non documentata per la gestione dei Fax...
inoltre ti potra' essere d'aiuto
www.freefax.it
U(na casella fax , gratis, virtuale, dove poter fare tutte le tue prove :D
Kisses.


Non so aiutarti per bene, ma in giro per la rete ho visto qualke dll free


Newsgroup: it.comp.lang.visual-basic
Titolo: Arrotondamento x eccesso e per difetto...

ciao a tutti...
Qualcuno sa come realizzare in visual basic una funzione tipo
ARROTONDA.DIFETTO e ARROTONDA.ECCESSO dell'Exel?
In pratica mi servirebbe una funzione che arrotondi un valore in base ad un
peso specificato...
Es. 1.56 valore, peso 0.50 ... valore arrotondato = 1.50
      1.56 valore, peso 0.05... valore arrotondato = 1.55
grazie

 ha scritto nel messaggio
news:oc%_c.206447$OR2.9...@news3.tin.it...

Prova cosi:
Function Arrotonda(Valore As Double, Peso As Double) As Double
    Arrotonda = Int(Valore / Peso) * Peso
End Function
Dovrebbe funzionare.
Ciao.

 ha scritto nel messaggio
news:chi4c5$8c2$1...@atlantis.cu.mi.it...


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

Faccio una classe "indirizzi" di tipo collection "Indirizzo" che con un
metodo
mi recupera un recordset ADO di n elementi.
La conferma che mi occorre è:
E' più performante, costa più memoria  e simili  recuperare
il recordset e contestualmente riempirmi la collection a
disposizione della classe indirizzi creandomi tanti oggetti indirizzo.
Oppure è meglio disconnettere il recordset dalla base dati, e riempirmi
a richiesta una solo oggetto indirizzo per volta?

 ha scritto nel messaggio

Siccome gli indirizzi non saranno milioni, e per ogni indirizzo la RAM
occupata è irrisoria (credo), io riempirei la collection creando n oggetti
indirizzo, poi butterei via il recordset.
Ciao
Alberto

Bah supponi il caso più drastico di usare al massimo
il recordset, quindi 2 milioni e spicci record.
Ogni iterazione, più che memoria porta via tempo.
Penso convenga più mostrare solo la lista e poi
lasciar caricare l'oggetto prescelto per intero.
Ciao
Andrea

 ha scritto nel messaggio
news:ap3tno$r7so3$1...@ID-61006.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] [GRAFICA] Effetti grafici su un form spaziale :))

Salve,
come da subject...posso dirlo questa volta? Hummm, mica tanto chiarro
il subject...ok, veniamo al dunque :))
Stavo vedendo che faceva Windows Media Player, e così ho iniziato a
giocherellare un po con i pulsanti; ho trovato, non è la pirma volta
che lo vedo, una cosa carinissima, la possibilità di far scorrere una
barra o di far muovere "oggetti grafici". Un po come avviene per un
cassetto di una scrivania, al click il cassetto si apre piò o meno
velocemente e resta perta fino al successivo click che si richiude.
Carina questa cosa...come fanno? Come si fa a far scorrere un pezzo
del proprio form? Premetto, c'è da premettere che il form in questione
non è quello classico. Chi avesse Windows Media Player può provare a
cambiare l' interfaccia con quelle proposte li e...qualunque prende,
più o meno, può vedere quello che dico io. Due domande :))
1) Mi sembra che qualcuno aveva già chiesto come rendere parti di un
form trasparenti, mi ricerco il post; ma però per appicciare un
immagine sullo sfondo di un form si usa sempre e solo la proprieà
picture? Io avevo fatto una prova una volta...un form con un immagine
sopra grossa quanto l' area del form lo rallentava un po all' avvio.
Come si agira il problema?
2) Come si rendono mobili parti di un form con una forma diversa dalla
classica finestra di win?
Saluti...

 Saluti...
Ciao Skunk !
Io non uso mediaplayer 7 cosi' non so bene di cosa parli.
Una volta ho fatto un applicazione, tanto per provare, che consisteva in un
form principale a forma di paletta di colori (tipo quelle da pittori per
intenderci) e con dei "cassetti" che potevano uscire clikkando su una
piccola freccia.
Semplicemente usavo 2 o piu form sovrapposti.
Form principale a forma di paletta, e dietro il form a forma di cassetto.
Per cambiare forma al Form :-) uso un programmino esterno che genera i punti
per tracciare i contorni.
Per muovere il form che stava dietro usavo semplicemente il metodo Move.
Beh, chiaramente questo non é ottimizzato, ogni tanto rallentava un po' e si
vedeva un po' di flickering.
Penso che il metodo migliore sia di lavorare con i Device Context e l'api
BitBlt....
Ciao
Dave

BitBlt....
Cioè?
Saluti...

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema tipo dati

Type MioTipo
Valore As Integer
Nome As String
End Type
Public Dati(200) As MioTipo
Sub Totale()
Dim A, Contatore As Integer
Contatore = 1
With Worksheets("Foglio1")
    Do While (.Cells(Contatore, 1) <> "")
        A = .Cells(Contatore, 3)                        
        With Dati(Contatore - 1)
            .Valore = A   <---------- Mi dice "Errore Tipo Dato"
        End With
      .Cells(Contatore, 13).Value = Dati(Contatore - 1).Totale
     Contatore = Contatore + 1
    Loop
End With
End Sub
Ringrazio anticipatamente ki mi aiutera'

Ringrazio anticipatamente ki mi aiutera'
per favore evita le k inutili :)
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: consigli per gli acquisti (necessito di..)

a tutti,
desiderando riprendere a programmare (avevo iniziato circa 20 anni fa con
il defunto gwbasic...) mi trovo ora in grande difficoltà a scegliere un
programma!
Ho letto "di tutto, di più" ma ne so quasi quanto prima. Chiedere ad una
news VisualBasic se è meglio Delphi o VisualBasic  e quale versione mi
sembra
una oscenità ma, mi dicono, che l'ignoranza sincera viene sempre
perdonata...
Ogni vostro consiglio è bene accetto
grazie
Sergio
XXXch...@isiline.it
(XXXnospam)

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Sono nuovo

Ciao
Grazie anticipatamente a chi mi aiuta
Io vorrei creare un'agena teelfonica Chi mi aiuta a creare il db
Vorrei creare inoltre una clacolatrice chia mia iuta a farla cioč non so
come fare la somma
ciao

ciao
Caspita, non sai fare la somma? 1+2=3!  ^_^
Se sei un'autodidatta ti consiglio di leggerti qualche libro che tratta di
programmazione VB a partire da zero.
Prova a vedere sul Sito Comune, nella sezione libri puoi valutare quale sia
il migliore, o magari, fai un salto in libreria e scegli direttamente.
http://www.murialdo.it/it_lang_vb
Mentre ti sciroppi il/i libro/i, continua a seguire questo NG, domande e
risposte, e fai uso degli esempi presenti sul Sito Comune, e vederai che
farai ottimi passi avanti.
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(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: Come fare ad avere una tabella inizializzata come in C++????

Ho sempre programmato in C++ per DOS e da un po' uso VB e VISUAL C++. So che
e' una domanda stupida, ma vorrei sapere come e' possibile con VB a
dimensionare una tabella di dati inizializzata(naturalmente senza usare DATA
ecc..). In C questo e' possibile nel segunete modo:
unsigned int  TABELLA[]={1,2,3,4,5};
in VB ???????

 wrote in message
news:7m1h8o$p04$1...@nslave1.tin.it...

Semplice non si può fare. Devi prima dichiarare la matrice e poi riempirla
elemento per elemento.
Ciao Bruno

in VB ???????
La cosa che si avvicina di piu' e':
Dim aVariant As Variant
aVariant = Array(1, 2, 3, 4, 5, 6)
Ciao
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Dllhost.exe e msdtc.exe...

...i suddetti files mi rimangono sul taskmanager alla chiusura del mio exe 
creato con visual basic 6.
Che debbo fà???
avete delle risposte adeguate?
grazie a chiunque possa darmi una mano.
ciao!
:) 

 Che debbo fà???
Scaricare correttamente i tuoi oggetti COM+, o meglio,
modificarli in modo che lavorino stateless.
-- 
ciao, hal

ciao...scusa...potresti spiegarmi meglio?
come devo fare??
sono abbastanza principiante.
ciao e grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Indirizzo del desktop

Buongiorno a tutti,
ho un problemino su come individuare l'indirizzo del desktop nelle varie
versioni di windows 95 e 98.
L'indirizzo classico [unità]:\windows\desktop non sempre si rivela
efficace
Esistono possibili alternative?
Grazie in anticipo.
--
Posted from 
ns.etomep.net
 [212.210.182.2]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
3858B679...@etomep.net...


Per quanto ne so io, la sottodirectory \desktop della directory di windows
e' costante, quello che puo' variare e' il disco o il percorso della dir di
windows (che non necessariamente e' c:\windows)
Per ricavare la dir di windows usa:
environ("windir")
Ciao.

 Esistono possibili alternative?
Il nome della cartella del Desktop può variare (si può fare con
TweaksUI), esistono quindi *doverose* alternative: una può essere quella
quella di leggere il percorso completo nella chiave di registro
seguente:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell
Folders\Desktop
Sul sito comune c'è il codice necessario per l'uso del registry.
Ciao
Flavio Ronco
-- 
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

ovviamente non è proprio il massimo....
Eh, no... in effetti non è proprio il massimo.
Sul mio sito trovi un esempio di come ottenere il nome delle directory di sistema.
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.net disabilitare il ctrl+v e il popup

Salve.
Qualcuno sa come poter impedire il ctrl+v (Incolla) sulle textbox?
Altro problema vorrei anche impedire la visualizzazione del popup menu
delle textbox o provato ad cancellarla con il metodo clear della
proprietą contextmenu della text ma non mi riesce.
Devo perforza ereditarmi la classe contextmenu e ripassargliela alla
text?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:4135aa327bf64d38f26...@mygate.mailgate.org...


Newsgroup: it.comp.lang.visual-basic
Titolo: OCX UDP cercasi...

Ciao a tutti.
Cerco un controllo OCX che implementi il protocollo UDP.
Non mi va molto bene il WinSock Microsoft perche` mi sembra un po`
scarsetto.
Qualcuno di voi ne ha visto uno in giro magari freeware e magari con
sorgenti ?
Grazie.
PS: forse chiedo troppo, lo so, pero` tentare non nuoce.

...


 scritto nell'articolo



Quelli che persino M$ ha silurato, perche' erano troppo bacati anche per i
loro gusti?
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema di stampa in VB

Ho questi 2 problemi con il mio programma :
Ho costruito un data report per la stampa di un database access
contenente dati per la fattura e come chiave primaria ha il campo ID.
Ovviamente quando faccio la stampa ,lui mi stampa tutti i dati
contenuti all'interno del mio database. Come faccio a dirgli di
stampare un determinato ID tralasciando gli altri ?
Sempre in questo programma vorrei creare un tasto TROVA che mi
facilita la ricerca in base al cliente: Qual'è codice da inserire
all'interno del form ? qualcuno di voi ha qualche esempio di ricerca
in un DB ?
Grazie a tutti coloro che vorranno aiutarmi

 Grazie a tutti coloro che vorranno aiutarmi
L'argomento e' talmente vasto e la tua descrizione cosi' generica che fai
prima a studiarti un po' di manuale.
Si tratta in generale di eseguire una query sul DB (basandosi sulla ragione
sociale e/o altro parametro, es. p.iva) e visualizzare una lista dei
risultati probabili cosi' da far scegliere il cliente giusto.
Buono studio! :)
Ciao,
mindless

 in un DB ?
come ti sei aperto il rs??
rs.find ...........


 stampare un determinato ID tralasciando gli altri ?
Apri un recordset con i dati di fattura, o filtrandolo o usando direttamente
il where ID= opportuno.
Poi colleghi il datareport al recordset e ordini la stampa.
Se cerchi nei vecchi post c'era anche parecchio codice.
Presta comunque attenzione al fatto che il datareport è asincrono, quindi se
devi stampare più di una volta devi assicurarti che l'istanza precedente sia
morta o comunque completata.
Ciao
Alberto

 in un DB ?
citta=Text1.text
datClientiRS.RecordSource = "select * from CLIENTI Where LUOGO = '" &  citta
& "' order by COGNOME,NOME"
datClientiRS.Refresh
--
Gulp
....forse mi sono perso qualcosa !

& "' order by COGNOME,NOME"
E se citta fosse L'Aquila? ;-)
-- 
ciao,
hal

 E se citta fosse L'Aquila? ;-)
E se citta fosse (letteralmente)
pippo' delete clienti select * from clienti where luogo='milano
?
:-)
Alberto

?
sql injection :-P
-- 
ciao,
hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [Classi]

in VB6 si può aggiungere una proprietà dinamicamente?
cioè:
devo fare in modo che ogni volta che apro un recordset
ogni suo campo deve diventare una proprietà della classe.
Si può fare qualcosa del genere? ci sono altri modi per
avere lo stesso risultato?
Grazie Mille

 ha scritto nel messaggio
news:2v0u7vF2ehe33U1@uni-

No, non puoi.
Il massimo che puoi fare è aggiungere alla tua classe qualcosa del genere:
Public Property Get Fields As DAO.Fields ' O ADO.Fields
    Set Fields = MyRecordset.Fields
End Property
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net


Puoi esporre una proprietà Field, e tenerti il recordset privato.
Del tipo:
Public Property Let Field(Byval Nome_Campo as string) as Ado.Field
    Set Field=mvarRecordset.Fields.Item(Nome_Campo)
End Property
da usare (esempio)
Textbox1.Text=Istanza_della_Classe.Field("nome_Campo").Value
Ciao
Alberto
--
E tutto mi sembrava andasse bene...

 Public Property Let Field(Byval Nome_Campo as string) as Ado.Field
Emh...
meglio Get, và...
Alberto

 ha scritto nel messaggio
news:2v0u7vF...@uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: domanda su timer

Quanti eventi timer posso gestire in un'app vb senza che si incasini tutto.?
Grazie

 ha scritto nel messaggio
news:Zgzc6.5999$L94....@twister2.tin.it...


Quanti eventi timer posso gestire in un'app vb senza che si incasini
tutto.?
Direi 1: quello che serve a rinfrescare l'ora.
Esiste l'equazione
    Casino = (numero di timers) ^ ((numero di timers) * (numero DoEvents nei
timers))
Ciao

Splendido ! :)
Ciao
Aldo

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

Esiste un oggetto già pronto inseribile in un progetto come un activeX per
gestire il registro di Windows senza doversi arrischiare a incasinare il
tutto? Ciao!

 ha scritto nel messaggio
news:9pdnrh$drc$1...@nreada.inwind.it...


 tutto? Ciao!
Dovrebbero esserci diversi esempi sul Sito Comune, prova a cercare
'regagnt.zip'...
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Settare molte textbox

Ho creato una maschera con molte textbox (circa 40) in cui devo inserire
dati numerici su quali eseguire calcoli.
Come faccio a pulirle tutte all'avvio o su comando?
Spero di non dover fare tanti:
tex1.text+AD0AIgAi-
 ecc.
text40.text+AD0AIgAi-
grasssie.

...


Rigrassie

Tempo fa' avevo chiesto questo:
Ho creato una maschera con molte textbox (circa 40) in cui devo inserire
dati numerici su quali eseguire calcoli.
Come faccio a pulirle tutte all'avvio o su comando?
Spero di non dover fare tanti:
tex1.text+AD0AIgAi-
ecc.
text40.text+AD0AIgAi-
Genni mi ha risposto cosi':
Dim x as Textbox
For each x in form1.controls
If typeof x is textbox then
x.text+AD0AIgAi-
end if
next x
Ma cio' genera error 13 nonostante il mio form si chiama proprio
form1.frm.
Dove sbaglio?





Inoltre per settare dalla textbox10 alla textbox20 come fare?
Dove sbaglio?

Se il codice che hai scritto nella form è esattamente quello riportato
nella tua post, e cioè:
Dim x as Textbox
For each x in form1.controls
    If typeof x is textbox then
        x.text+AD0AIgAi-
    end if
next x
non funzionerà mai!
Devi scrivere:
Dim x as Textbox
For each x in form1.controls
    If typeof x is textbox then
        x.text = "" 'oppure il testo che desideri
    end if
next x
ma che sarà uguale ovviamente in tutte le text box, anche in quelle sopra
la 10...
Davide Prati

Scusa, mi dici dove e' la differenza? Io non la vedo....
Davide Prati ha scritto nel messaggio +ADw-01be9aec+ACQ-2e14d870+ACQ-0e000001+AEA-inf+AD4-...
+AD4-Se il codice che hai scritto nella form +AOg- esattamente quello riportato
+AD4-nella tua post, e cio+AOg-:
+AD4-
+AD4-Dim x as Textbox
+AD4-For each x in form1.controls
+AD4-    If typeof x is textbox then
+AD4-        x.text+AD0AIgAi-
+AD4-    end if
+AD4-next x
+AD4-
+AD4-non funzioner+AOA- mai+ACE-
+AD4-
+AD4-Devi scrivere:
+AD4-
+AD4-Dim x as Textbox
+AD4-For each x in form1.controls
+AD4-    If typeof x is textbox then
+AD4-        x.text +AD0- +ACIAIg- 'oppure il testo che desideri
+AD4-    end if
+AD4-next x
+AD4-
+AD4-ma che sar+AOA- uguale ovviamente in tutte le text box, anche in quelle sopra
+AD4-la 10...
+AD4-
+AD4-Davide Prati

 form1.frm.
Tu prima dichiari la variabile x come TextBox e poi scrivi:
For each x in form1.controls
Non ti sembra un po' pretenzioso?
La routine giusta è questa:
Dim x As Control
For Each x In Form1.Controls
    If TypeOf x Is TextBox Then
        x.Text = vbNullString
    End If
Next


Perché così speri che funzioni? Guarda come hai dichiarato x. ^_^
Bye


La differenza è che tu usi un formato strano per inviare i messaggi, quindi
alcuni caratteri "noi" li vediamo diversi. L'errore sta nella dichiarazione
della variabile x, che non va dichiarata come TextBox, ma come Control,
perché stai facendo un For Each su elementi che appartengono a classi
differenti, ma che sono tutti controlli.
Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: Array di oggetti

Da poco sto utilizzando la versione .NET di visual basic. nella versione 6 
se inserivo più oggetti, nel mio caso TextBox e li rinominavo con lo stesso 
nome in automatico mi creava un array TextBox(0), TextBox(1)...
nella versione .NET semplicemente mi da errore, perché non posso assegnare 
lo stesso nome a 2 oggetti. C'è un modo per creare un array di oggetti in 
.NET?

PasCi ha scritto:

Lo puoi fare da codice se vuoi. Ma a cosa ti serve esattamente?
Esempio:
         Dim myTxtBox(4) As TextBox
         For i As Integer = 0 To 4
             myTxtBox(i) = New TextBox
         Next
Crea un array di cinque controlli TextBox. Poi, sempre da codice, li 
puoi piazzare sul form come vuoi.
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL


In pratica ho una serie di TextBox non in sequenza, in cui scrivere un 
valore numerico tramite un ciclo For, il fatto di avere un indice in questo 
caso mi sarebbe molto comodo, cmq ho provato, ma quando vado a impostare il 
nome come "myTxtBox(0)" mi dice "L'identificatore 'Numero(0)' non è valido", 
ora come dovrei impostare il Name delle caselle TextBox?

 ora come dovrei impostare il Name delle caselle TextBox?
Ma non serve dargli un nome, hai già il nome dell'oggetto.
Esempio:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button1.Click
         Dim myTxtBox(4) As TextBox
         For i As Integer = 0 To 4
             myTxtBox(i) = New TextBox
         Next
         With myTxtBox(0)
             .Text = "Sono la TextBox 0"
             .Location = New Point(10, 10)
         End With
         Me.Controls.Add(myTxtBox(0))
End Sub



In pratica non dovrei avere già i TextBox sul Form ma li devo aggiungere con 
il codice?

 il codice?
Se proprio vuoi usare una array, credo che non ci sia altro modo.
Al limite, prova a guardare questo:
http://msdn2.microsoft.com/en-us/library/kxt4418a(VS.80).aspx


 ha scritto nel messaggio 
news:604fbuF...@mid.individual.net...

Newsgroup: it.comp.lang.visual-basic
Titolo: [AIUTO!] Ora del server: NetRemoteTOD

Ho un problema urgente ed importante da risolvere!
Ho la necessità di reperire l'ora di un PC NT Server in rete da un programma
VB6; il programma deve girare solo su macchine NT.
Ho trovato la funzione NetRemoteTOD ma non riesco ad utilizzarla nel modo
corretto.
Ci sono anche altre soluzioni?
Grazie a chi mi aiuterà!
Giorgio

 Ci sono anche altre soluzioni?
Penso che l'unica alternativa sia utilizzare il comando NET TIME da riga di
comando e reindirizzare l'output su un file che poi ti leggi da VB.
Ciao,
   <--< Nik >-->

Newsgroup: it.comp.lang.visual-basic
Titolo: SP3 x VB5: a che serve?

sono inesperto ed ho letto sul Ng di questo SP per Vb5
è importante ? quali sono le sue caratteristiche?
bisogna aver installato anche il SP2?
ciao

ciao
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

ciao

se ti interessa fra qualche decennio avrò completato il mio SPx13 per
mettere a posto tutti i "problemini" di VB. ahahahhaha
ciao
Davide

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

Salve a tutti
volevo porvi questo problema:
Esiste una funzione di Sistema chiamata CopyMemory, l'ho provata su stringhe
e su tipi statici come byte, integer, dei quali si conosce la dimensione.
Essa copia il contenuto dall' indirizzo di memoria SOURCE all indirizzo di
memoria DESTINATION l'equivalente in byte della LENGHT passata cone
parametro.
La definizione in VB è questa:
Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory"
(Destination As Any, Source As Any, ByVal Length As Long)
Purtroppo su tipi object dei quali non conosco l'effettiva dimensione in
Byte questa funzione da errore.
Sarebbe interessante capire come fare a determinare la dimensione effettiva
in memorya di un qualsiasi oggetto.
Tipo ad es.: dimensione = len(myobj)
La funzione len funziona solo con stringhe, ma se fosse possibile creare una
funzione "LenObj" che restituisce la dimensione di un oggetto, quest'ultima
si potrebbe passare alla funzione CopyMemory e mezzo problema sarebbe
risolto.
L'altro mezzo problema è capire cosa si intende per puntatori alla memoria.
Siccome CopyMemory accetta due indirizzi di memoria, in VB basta passare il
nome dell'oggetto o bisogna ottenere in qualche modo l'indirizzo di dove
esso è allocato?
Se qualcuno ha qualche semisoluzione benvenga
Se qualcuno ha la SOLUZIONE è un mito!!!
Grazie Maverick!!!


[SNIP]


Grazie Ale, effetivamente questa gestione dell'oggetto non la conoscevo!!!
Il problema  a monte di tutto ciň č che stň cercando di copiare una
Collection
 ( clonarla ) senza dover copiare tutti gli elementi.
Ho provato ad utilizzare una funzione di questo tipo:
Function ClonaObj (byval OBJ as object) as object
    set clonaobj = obj
end Function
la quale "dovrebbe", passando obj come valore e non come riferimento,
restituirmi un'altro oggetto identico al primo ma situato in indirizzi di
memoria diversi.
Non so perchč ma non funziona!

 wrote in message
news:8rusb3$jo9$1...@nslave3.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: **** RichTextBox HELP Needed!! ****

I've written code so that when the user clicks on a line in an RTB the
line will be highlited.  I want to make it so that right after the
line is hilighted, the rtb will scroll so that the highlited line is
in the center of the RTB.  I use the SendMessage API as shown to
scroll up and down.
    Ret& = SendMessage(rtbWaves.hwnd, EM_SCROLL, 1, 0)
the last two parameters specify how much to scroll.  To scroll to the
center however I need to find out what line number the selected line
is relative to what you see in the control.  (ie. selected line is
100th line in the RTB file but it's the 4th line you see from the top
of the control)  Once I find out how to determine what line number
from the top of the control it is, it will be easy to move the line to
the center of the RTB.  PLEASE HELP!
Once again:  I'm trying to determine what line number the selected
line (cursor) is at from the top of the RichTextBox Control.  Please
help me out this is very important.
Chetan Phull
odd...@home.com



Newsgroup: it.comp.lang.visual-basic
Titolo: HELP!!!! Problema con i MODULI BASIC !

Ciao,
ho un problema fastidioso.
creo un mio tipo di dato:
public type prova
   x as integer
   y as integer
end type
Dim miotipo as prova
in un modulo basic.
chiaramente nel modulo scrivo anche le funzioni per accere e manipolare tali
dati:
public sub SetProva(a as integer,b as integer)
  miotipo.x=a
   miotipo.y=b
end sub
public function GetProva() as prova
  GetProva=miotipo)
end function
se le richiamo in un form, perň non funziona niente.
cioč, se chiamo una sub mi dice type mismatch o altre cavolate.
e se chiamo la function mi dice che ha bisogno di un oggetto (?)
mi potreste aiutare?
GRAZIE!!

 wrote in message
865bsd$gaf$1...@serv1.iunet.it...


Ciao Stefano,
il codice così come è scritto (a parte la parentesi dopo miotipo), a me
funziona, come richiami la sub e la funzione? Il codice che allego funziona
   SetProva 10, 10
   Debug.Print GetProva.x
Ciao Luca

Newsgroup: it.comp.lang.visual-basic
Titolo: Check box in DBgrid

C'è un modo per avere un campo check box all'interno di una DBgrid? In
particolare se un campo è di tipo boolean il valore true dovrebbe
corrispondere al check spuntato....
ciao e grazie.
Chri

 wrote in message
ePmu7.7729$0Y2.1...@news.infostrada.it...


 corrispondere al check spuntato....
Che io sappia non si può fare con la semplice dbgrid; la True DBGrid della
apex lo permette (e permette un sacco di altre cose;-), solo che costicchia:
eccoti il link al sito: 
http://www.componentone.com/
Ciao

egregiamente...
mah... questa è una delle prime Piccole Perle pubblicate sul Sito Comune
e, son sincero, non sono mai riuscito a vederla funzionante...
misteri...
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inserimento record in tabella con contatore

Ciao a tutto il NS.
Volevo sapere se e' possibile inserire un record, in una tabella Access con
un
campo contatore, utilizzando solo SQL.
Mi spiego meglio ... con un' esempio. Ho la seguente tabella che chiamero'
Tab1 :
ID (AutoNumber) | Dato (Text)
Se volessi aggiungere un record adesso procederei in questo modo:
set miorecordset = miodb.openrecorset("SELECT * FROM Tab1")
with miorecordset
    .addnew
    !Dato = "testo"
    .update
end with
Questo metodo funziona ma mi sembra un po' "barbaro", nonche' uno
spreco di risorse.
E' possibile fare la stessa cosa in SQL con qualcosa del tipo :
INSERT INTO Tab1 VALUES( xxx ,'testo')
Cosa metto al posto di xxx visto che e' un contatore ?
Grazie mille !
--
DaX
--= Togli NOSPAM per rispondermi =--
--= Remove NOSPAM to reply =--



Devi semplicemente referenziare i campi che vuoi inserire.
Ecco il tuo esempio:
insert into Tab1 (dato) values ('testo')
il campo contatore verrà incrementato automaticamente e il gioco è fatto!
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTATEMI - 2 Errori Run-time

FELPATISSIMO
Ho un programma VB6 - Access 97 - Crystal Report 8 :
Errore 1 : Run-time error 429 : Active-x can't create object.
Errore 2 : Run-time error 20532 : Cannot find database DLL. (Sicuramente
di Crystal Report).
Per favore datemi una mano.... devo consegnare entro sabato !!!!!
-- 
Posted from [212.210.43.228] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel
messaggio news:3AA5FA79...@guest.telecomitalia.it...


di Crystal Report).
A naso dico che manca una dll :)) Prova a
riinstallare Cristal Report...magari ti rimette quello che ti manca...non
si dirti di più.
Ma se fai Err.Source? Che dice?
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Caselle combinate collegate

ciao a tutti!
Avrei bisogno di un vs suggerimento in merito ad un elenco condizionato d
valori che voglio realizzare col linguaggio vba in access.
Ho due caselle combinate, entrambe con elenco valori e voglio che, mentre la
prima sia statica, l'elenco valori della seconda sia dinamico e condizionato
all'inserimento di un determinato valore della prima.
Mi spiego meglio: il valore digitato nella prima casella combinata non deve
figurare nell'elenco valori della seconda!
Help me!!!
Grazie a tutti!
Vittoria
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Help me!!!
beh, se la prima combox e la seconda combobox hanno gli stessi elementi,
puoi fare semplicemente:
sul click della prima combobox
Me.Combo2.Remove Me.Combo1.ListIndex
cioč rimuovi dalla seconda combo l'item che hai selezionato dalla prima.
Se invece le combobox sono diverse, allora devi loopare la seconda combo:
'Salvo l'elemento selezionato dalla prima combo
Testo = Me.Combo1.List(Me.Combo1.ListIndex)
For i=0 to Me.Combo2.ListCount
    If Me.Combo2.List(i)=Testo Then
        Me.Combo2.Remove i
        Exit For
    End If
Next
non l'ho testato.
good coding!!!
-- 
Alletun
"Io lo so che accadrą. La voce sussurra nei miei pensieri di Jair, Rone,
Allanon e soprattutto nelle Mortombre.
Sussurra segreti che mi sono tenuti nascosti, nella grigia oppressione
di questo giorno e nell'oscuritą caliginosa di quello che mi aspetta.
Saremo distrutti. Tutti."
Brin Ohmsford - La Canzone di Shannara - T. Brooks

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Q.cuno ha una calcolatrice decente?

Qualcuno ha una calcolatrice un po' più decente di quella di WinNT?
Con punti delle migliaia, riporto degli mporti già digitati etc. etc.
o sa dove posso scaricarla?
grazie
dado

 wrote in message
9nsj9k$9lgb3$1...@ID-73094.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: OCX 6.0!

Ho scaricato VJ++ 6.0 che mi ha sostituito le OCX (come comctl32.ocx,
comdlg, etc...) con le versioni più aggiornate. Quando ho ricaricato un
programma nel VB5 mi è stato chiesto se volevo effettuare l'aggiornamento
alle nuove versioni delle OCX. Ho risposto sì, e in definitiva l'unica cosa
che è cambiata era la comctl32.ocx. Sono cambiare tutte le definizioni delle
larghezze dei campi di una listview.
Fin qua tutto ok, correggiamo il tutto.
Ma ora l'eseguibile funziona solo con le nuove versioni delle OCX. In più
non bastano le comctl32 e comdlg nuove, ora mi richiede anche una
mscomctl.ocx che è lunga più di un mega! In definitiva l'installazione sarà
grandissima!
Domanda: questa libreria mscomctl.ocx c'era anche prima? Se sì era inclusa
nelle librerie di runtime SP3? Se le cose stanno così sarebbero necessarie
le nuove runtime 6.0... ancora non ci sono vero? Come posso fare per far
rifunzionare il tutto lavorando ancora sul mio sistema (non posso tornare
indietro dalla richiesta di aggiornamento di cui sopra)?

indietro dalla richiesta di aggiornamento di cui sopra)?
  Devi disinstallare VJ++, cancellare eventuali file e riferimenti nel
registry rimasti e poi reinstallare VB5.
  In generale, ti sarai accorto che non e' una buona idea installare
tools piu' recenti sopra quelli con cui stai lavorando se non sei
disposto ad utilizzare i nuovi ActiveX che ovviamente sono piu'
grossi, soprattutto i Common Controls hanno una tendenza
all'elefantiasi...
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258
Newsgroup: it.comp.lang.visual-basic
Titolo: Exe dentro exe

E' possibile incorporare in un exe un altro exe?
--
W il Manifesto del newsgroup
Jimmy
E-mail: 
jimmy...@hotmail.com
ICQ#: 41646051


guarda i virus...


incorporare no ma chiamare un altro exe si...
-- 
Sidewinder  
---------------------------------------------------------------------
You may my glories and my state dispose,
But not my griefs; still am I king of those.
		-- William Shakespeare, "Richard II"
---------------------------------------------------------------------

 guarda i virus...
Forse mi sono espresso male, scusate.
Intendevo chiedere se è possibile includere un exe qualsiasi in un programma
in VB.
Se è possibile desidererei anche sapere come.
(la prima cosa che mi viene in mente è includerlo come oggetto OLE ma mi sa
che non è una buona idea)


 --
invece puoi anche includerlo...
lo includi come risorsa binaria (quindi può anche essere un eseguibile in
c++ o altro) estrarlo ed eseguirlo...
Ciao Marco

 c++ o altro) estrarlo ed eseguirlo...
A questo punto ci manca solo sapere come !!!
Thanks
--
Ciaps
Stracca
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------




 > lo includi come risorsa binaria (quindi puņ anche essere un eseguibile in


> a parte l' "embeddare", che debbo presumere sicilianismo forte per
Naah... Orribile neologismo, dall'inglese "embed", parola che ancora non sono
riuscito a tradurre propriamente ("inserire"? "ficcare"? "incorporare"?). Chiedo
perdono per questo mio assalto alla lingua italiana...

 volta! Spero di essere stato chiaro...
Ho capito la seconda soluzione.... ma a me interessa la prima: come faccio
in pratica con VB?

 Naah... Orribile neologismo, dall'inglese "embed", parola che ancora non


Non so, a dire la verità io e il compilatore di risorse litighiamo spesso...
inoltre è un coso brutto, senza interfaccia grafica e con un help striminzito e
svogliato. Io non ho mai usato file RES in tutta la mia vita di programmatore
(avrei dovuto usare le virgolette per rispetto dei veri programmatori...), mi
dispiace, ma credo dovrai andare a sbattere la testa altrove
Newsgroup: it.comp.lang.visual-basic
Titolo: Servizio

Ho un'applicazione sviluppata in vb6 che dobrei far partire
come servizio di windows nt o 2000... sapete dirmi se posso fare
qualcosa di veloce per "trasformare" una normale applicazione
in un servizio NT?
grazie
ŠpEIO

Il 14/10/2003 11.56, ©pEIO scrisse:

groups.google.com
In classifica si trova tra le prime 10 domande del NG.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 In classifica si trova tra le prime 10 domande del NG.
E dove si vede codesta classifica?
Alex
Posted from X-Privat Free NNTP server - 
www.x-privat.org

 E dove si vede codesta classifica?
eh, signůr, quanta pazienza!!!!
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&oe=UTF-8&q=creare+un+servizio+2000&meta=group%3Dit.comp.lang.visual-basic
good googling!!!
-- 
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

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

Salve a tutti!
Stò imparando ad usare Vb(6).
Il mio manuale si VB6 non è molto chiaro e certi punti mi risultano
incomprensibili.
Ecco la mia richiesta: c'è qualcuno disposto a rispondere alle mie domande
sul visual basic in e-mail?
Grazie per l'aiuto che mi darete (lo spero!).


Meglio sul Ng.
Vedrai che a domande:
1) Chiare
2) Possibilmente non rsolvinili leggendo la - prima - riga dell'help on line
3) Circostanziate
Pioveranno risposte altrettanto chiare e da piů fonti.
Inoltre, cosě, potrai indirettamente aiutare altri che si ritrovano nei tuoi
stessi dubbi e/o problemi.
ciao
ugo

 wrote in message
news:9ji3vu$5te$2...@pegasus.tiscalinet.it...

Concordo. Permettimi solo di aggiungere che questo Newsgroup ha un Sito
COmune (
it-lang-vb.net
) nel quale sono raccolti centinaia di progetti nati
da problematiche affrontate qui sul NG, quindi č molto probabile che lě o
tra i siti consigliati o nei libri recensiti o ancora tra i vecchi messaggi
su Google troverai la risposta alla tua domanda ancora prima di piostarla
qui sul ng...
Ciao,
Moreno(@work)
Ah, giŕ che ci sei, sul Sito COmune trovi anche il Manifesto per usare al
meglio questo ng...

Newsgroup: it.comp.lang.visual-basic
Titolo: report con selezione

Mi collego al mio post da poco trasmesso.
Sono riuscito a creare il mio report e a stamparlo.
Ma ora devo cimentarmi in un altro problema :
come faccio per filtrare i risultati del report ?
Forse devo passare una stringa di selezione a  "commandtext"  dell'oggetto
command ? E se si, come ?
Grazie

 ha scritto nel messaggio
news:CS_G6.23423$sb5.1...@news.infostrada.it...


 ha scritto nel messaggio
news:9ci6ae$71f$1...@pegasus.tiscalinet.it...


 In cosa sbaglio. ? Grazie
Ok, non hai un dataenvironment, ma hai un recordset Ado creato da codice,
no?
Collegali a quello con una
With DataReport1
    Set .DataSource = rsAdo
    .Show
End With
ciao
ugo

 ha scritto nel messaggio
news:9cn04h$jpd$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Monitorare l'applicazione attiva

Salve,
ho la necessità di testare ciclicamente quale è l'applicazione (o meglio, la
form di una applicazione esterna) attiva nel pc . L'applicazione potrebbe
essere di qualsiasi natura (Office, piuttosto che Explorer oppure il
Gestionale dell'azienda)
Pensavo di risolvere facilmente il problema con il seguente codice:
Private Sub Timer1_Timer()
  Dim myName As String
    myName = 
Screen.ActiveForm.Name
    If myName <> Me.Name Then
        MsgBox myName
    End If
End Sub
invocato da un timer (impostato a 1/10 di secondo).
In realtà myName contiene sempre il nome della form all'interno del quale si
trova il codice.
Qualcuno sa il perchè ?
Grazie
Fabio

 che Explorer oppure il Gestionale dell'azienda)
www.pro-vision.it/download/client_monitor.zip
Ciao
Alberto

Newsgroup: it.comp.lang.visual-basic
Titolo: Info banale su Visual Studio 6.0!!

Qualcuno gentilmente mi saprebbe dire quanti cd sono il suddetto pachetto
Microst nella verisone completa??? Contiene anche la guida on line??
Grazie in anticipo
Stefano
punt...@freemail.it

Qualcuno gentilmente mi saprebbe dire quanti cd sono il suddetto pachetto
Microsoft nella verisone completa??? Contiene anche la guida on line??
Io ho la versione Enterpraise su 3 cd ma quando vado a consultare la guida
mi dice che non trovato un  certo MSDN installato e questo programma, o
quello che č,  dovrebbe stare, a quanto ho capito, su un cd o piů separati.
Che mi dite?


Qualcuno gentilmente mi saprebbe dire quanti cd sono il suddetto pachetto
Microsoft nella verisone completa??? Contiene anche la guida on line??
Io ho la versione Enterpraise su 3 cd ma quando vado a consultare la guida
mi dice che non trova un  certo MSDN installato e questo programma, o


Newsgroup: it.comp.lang.visual-basic
Titolo: selezione file

come faccio a fare in modo che selezionando in una combo box  per esempio
"File .jpg"
Mi si vedano nella listbox solo i file .jpg?

 wrote in message 8tm6mc$g89$1...@news.mch.sbs.de...
: come faccio a fare in modo che selezionando in una combo box  per esempio

:
:

Senza offesa, ma credo che la gente ti risponda più volentieri.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Gif Animate

Vorrei sapere come si utilizzano le Gif animate all'interno di un programma
VB5.
Esiste un qualche controllo free oppure è possibile realizzarle attraverso
le API di windows, se fosse così qualcuno sa suggerirmi da dove iniziare ?.
Attualmente emulo lo stesso effetto caricando una singola image da un
controllo imagelist attraverso un timer, ma, anche inserendo l'istruzione
DoEvents nell'evento Timer, l'applicazione non sempre restituisce il
controllo al form con l'immagine ed il timer, così la Gif sembra fermarsi.
Grazie



Guarda a 
http://www.fortunecity.com/skyscraper/capacity/402/activex.html
c'è un controllo per usare le gif animate i VB.
Ciao
**************************************************
BERTI CARLO ***********************************
Visual Basic & HTML *****************************
Http://www.lunet.it/offerte/berti
 *********************
ICQ =15741832 ***************************************
************************************************************