mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Problemi con Excel in VB

Ciao a tutti.
Ho un problema con Excel utilizzato all'interno di VB.
Queste sono le istruzioni che ho scritto:
Dichiaro le variabili
  Dim xlApp As Excel.Application
  Dim xlBook As Excel.Workbook
  Dim xlSheet As Excel.Worksheet
Creo l'oggetto Excel e apro un file di testo
  Set xlApp = CreateObject("Excel.Application")
  xlApp.Workbooks.OpenText App.Path & "\FILE.TXT", xlWindows, 1,
xlDelimited, xlDoubleQuote, _
        False, False, True, False, False, False, Array(Array(1, 2), _
        Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1),
Array(7, 1), Array(8, 1), _
        Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1),
Array(14, 1), Array(15 _
        , 1), Array(16, 1))
Assegno l'oggetto xlBook
  Set xlBook = xlApp.Workbooks(1)
Assegno l'oggetto xlSheet tramite il quale vorrei manipolare i contenuti del
foglio di lavoro
  Set xlSheet = xlBook.Worksheets(1)
Da questo momento in poi, vorrei agire sul foglio che mi sono creato andando
a manipolare il formato delle celle, il colore, la dimensione del carattere,
il grassetto, le proprieta' dei margini ecc.
Per esempio:
  With xlSheet.Cells.Font
    .Name = "Arial"
    .Size = 8
    .ColorIndex = xlAutomatic
  End With
  xlSheet.Columns("I:I").NumberFormat = "#,##0_ ;[Red]-#,##0 "
  xlSheet.Columns("L:L").NumberFormat = "#,##0_ ;[Red]-#,##0 "
  xlSheet.Range("A6:P6").Font.Bold = True
  xlSheet.Range("A6:P6").Interior.ColorIndex = 35
  xlSheet.Range("A6:P6").Interior.Pattern = xlSolid
ed altre istruzioni simili.
Ma il risultato e' nessun risultato. Nel senso che quando salvo il file di
Excel con nome e lo apro, e' come se si fosse fermato alla sola importazione
del file di testo, senza prendere in considerazione le altre istruzioni.
L'unica istruzione che prende in considerazione e' quella per cambiare il
contenuto di una cella:
  xlSheet.Cells(1,10) = "pippo"
Devo dire che se al posto dell'istruzione per aprire il file di testo,
utilizzo la seguente istruzione:
  Set xlBook = xlApp.Workbooks.Add
e tutto il resto e' uguale, allora tutte le manipolazioni sulle celle e
colonne funzionano bene. Ma non e' questa la soluzione che vorrei adottare,
ma quella dell'apertura del file di testo.
Mi sapreste dire dove sbaglio?
Grazie 1000
--
Saluti
Michele
mic...@tiscalinet.it
oppure
jdmi...@jumpy.it

...



 wrote in message
8iklue$j6t$1...@newsserver.cilea.it...





 ha scritto nel messaggio
news:8ikl7u$m6h$1...@fe2.cs.interbusiness.it...


 wrote in message
8ilp99$8iu$1...@sirmdpsin16.inwind.it...



Newsgroup: it.comp.lang.visual-basic
Titolo: Option Button

Mi succede una cosa strana. Faccio una semplice if
condizione vera then opt(0).value = true else opt(1).value
= true.
L'option button, che fa parte di una matrice, automaticamente
deseleziona l'option non attivo. Bene ... in fase di debug
se faccio passo passo, la condizione funziona e l'option
corretto viene selezionato. Se, sempre in debug ma senza
breakpoint, lascio eseguire il codice, il risultato è che una
volta viene selezionato un option e una volta l'altro. Poi
iniziare a rifunzionare come dovrebbe. Da cosa può dipendere
gli unici punti in cui imposto il value sono dentro la condizione
if di cui sopra, l'evento click non esiste ...
non sò dove andare a cercare.
Idee
Ciao Andrea

 non sò dove andare a cercare.
Incuriosito (utilizzo option button di rado) ho inserito ad una form una
matrice di 5 option button. Da Option1(0) a Option1(4).
Poi ho aggiunto il seguente codice:
Dim i As Integer
i = 15
If i > 50 Then
    'Me.Option1(0).Value = 1
    Me.Option1(0).Value = True
Else
    'Me.Option1(1).Value = 1
    Me.Option1(1).Value = True
End If
Funziona in qualsiasi situazione.
Considerazioni:
In apertura del form tutti gli option button sono disattivati.
giuseppeD
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Non saprei che dirti ... ora ho cambiato del codice
che non c'entra nulla con il problema ... e sta funzionando.
Che sia il caldo?????
Boooo.
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Parametri alla sub main + curiosità

Ho un problema: non so come fare a far ricevere alla sub main un parametro
da riga di comando:
myapp.exe \param
Sub main(param)
....
End sud
Il compilatore mi dice, non appena scrivo param tra parentesi che devo
impostare la form o la sub main di avvio. Da notare che il passaggio
parametri in altri punti del programma funziona.
Poi una curiosità, ho scaricato la classe clsresize di Adam David Moss dal
sito comune: fantastica, ma mancava il resize dei fonts. Ora, visto che ci
ho messo mano e che in due minuti ho fatto l'aggiunta(non sono un gran
programmatore...anzi..), mi chiedevo come mai nessuno l'avesse già fatto:
c'è qualche prolema di cui non ho tenuto conto??
Ciao Paolo

 sub main un parametro da riga di comando:
La funzione Command$ (utilizzabile ovunque nel programma)
restituisce una stringa contenente i parametri che cerchi.
Ciao.
--
BSD is for UNIX-lovers -- linux is for Windows-haters.

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] LOL e compagnia bella

Ricordo di un link che spiegava il significato di tutte queste 
abbreviazioni.
Sapreste indicarmelo?
Grazie

 ha scritto

qualcuna da me
sw > misc > net abbs
cmq trovi centinaia di pagine
-- 
hth, ciao, j.
http://www.sundaysw.com
Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 .. Riviste ???

   Che riviste mi consigliate per VB6 ???
Grazie
--
!------------------------------------------------!
!ICQ     : 8281944
!E-Mail  : 
Dan...@levon.it
!
!"Accadono cose che sono come domande,
!passano ore,giorni a volte anni e poi
!la vita risponde !"
!
!
!HomePage : 
http://www.levon.it/daniele
!
!------------------------------------------------!

 Grazie
Senza ombra di dubbio:
Visual Basic Journal
della Infomedia.
http://online.infomedia.it/default.htm
E' qualche anno che sono abbonato e mi è sempre arrivato regolarmente.
Oppure, se non hai problemi di lingue, la versione americana (che è diversa
da quella italiana).
Visual Basic Programmers Journal
http://www.vbpj.com/
Questa la trovi nei negozi ben forniti di riviste specializzate.
A Milano la puoi acquistare alla libreria Hoepli.
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
-
--
---
Curatore della "zona links" de:
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/
Newsgroup: it.comp.lang.visual-basic
Titolo: immagini dei pulsanti

stavolta credo di essere nei pasticci...
ho provato a inserire una toolbar in una form. ai pulsanti ho associato
alcune immagini che mi erano molto gentilmente state spedite via e-mail da
alcuni di voi (icone.zip ecc).
solo c'č un problema. ogni volta che provo a riavviare il progetto e la
form, i pulsantini vengono sempre piů "deturpati".. lo sfondo nero, la parte
alta tutta "disturbata"... ma come diavolo č possibile?
Grazie.
Mario

ho dimenticato di dire che credo dipenda dal valore della proprietà
UseMaskColor.
se la imposto su False, funzinoa tutto bene, ma lo sfondo dei pulsanti è
bianco e non grigio.
se la imposto su True, all'inizio sembra andare bene, nel senso che lo
sfondo è grigio, e non c'è quell'effetto sgradevole di avere un pulsantino
con in mezzo ritagliato un quadratino bianco. ma dopo poco, lo sfondo da
grigio inizia a diventare nero, e poi l'immagine è sempre più
"inguardabile".
come faccio?
Mario


---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---


che significa impostare le immagini in esecuzione?

che significa impostare le immagini in esecuzione?
Va meglio se scrivo run-time? Devi inserire le tue immagini in una
imagelist, alla toolbar associ questa imagelist e nel Form_Load
scrivi:
ToolBar1.Buttons(1).Image = ImageList1.ListImages(1).Picture
Dove al posto del numero 1 inserisci nella toolbar la key del bottone
(o anche l'indice se vuoi, ma ti consiglio la chiava) e nella
listimages la key (valgono le considerazioni per la toolbar)
dell'immagine associata al bottone.



Se usi VB6...
...tempo fa avevo notato anch'io il problema delle icone sulla
toolbar, il problema si è risolto al momento dell'installazione del
SP3 (ti ricordo che ora c'è il SP4)
Impostare le immagini in esecuzione significa farlo da codice...vedi
metodi/proprietà di ImageList e di ToolBar
Ciao, Adriano

capito tutto, grazie, metto tutto in Form_Load(), ma è complicato, metti che
ho 15-20 pulsanti... sai che rottura...
Mario

 capito tutto, grazie, metto tutto in Form_Load(), ma č complicato, metti

Newsgroup: it.comp.lang.visual-basic
Titolo: AVI con VB

Devo inserire dei piccoli filmati in un form VB.
Qualcuno sa dirmi come fare? Esistono controlli (shareware)
che mi permettano una gestione completa via codice
di un filmato?
grazie,
leonardo.

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Access e dati variabili

Su un Db Access, posso scrivere una vista con una variabile inserita
nella condizione di WHERE ?
Se si, con VB & ADO, come si passa il valore alla variabile alla vista in
fase di esecuzione?
Grazie

 fase di esecuzione?
Set mdb = New Connection
mdb.CursorLocation = adUseClient
mdb.Open "PROVIDER=MSDASQL;dsn=MYSystemDSN;uid=MyUser;pwd=MyPassword;"
Set RS = New Recordset
RS.Open "SELECT ID, Paese, Data FROM MiaTabella WHERE (ID = '" &
Combo1.ItemData(Combo1.ListIndex) & "')", mdb, adOpenDynamic,
adLockOptimistic, adCmdText
In un form ho un controllo ComboBox, in base al valore selezionato, eseguo
una ricerca sul DB di tutti i record corrispondenti.
Spero di esserti stato utile !
--
'''®foolbrain®'''
Visual Basic Programmer
Database Designer & Manager
ICQ 88912631
Y! foolbrain_2fb

Newsgroup: it.comp.lang.visual-basic
Titolo: DLL e NT

Ho sviluppato una dll che funziona benissimo su 95/98, sotto NT, mi dice in
compontente ActvieX non può creare l'oggetto. Boh!!!
Grazie per l'interesse.

 
molto probabilmente devi registrarla con regsvr32 <file.dll>

Scordavo, dopo averla installata l'ho anche registrata regolarmente.


Newsgroup: it.comp.lang.visual-basic
Titolo: Outlook e attach

Si può passare un messaggio + attach ad Outlook da VB?

 ha scritto nel messaggio
news:9bv4nb$avtab$1...@ID-52601.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Blocco di Record Ottimistico, Pessimistico

Salve a tutti, cerco qualcuno che sia disponibile (anche in e-mail) per
risolvermi alcuni problemi......
Per quanto riguarda questo msg, ho iniziato un prg. in VB6 SP3 Win98 con
ADODB aprendomi una connessione ad un DB che si trova sul PC1 con i driver
ODBC, io lavoro su PC2 e provo il prg contemporaneamente dal Pc2 e Pc3.Il
prg è solo di esempio, si tratta di una tabella con un campo chiave univoca
COD e la Form ha una Label e un Botton.Quando click sul pulsunte il
recordset legge l'ultimo numero del COD lo aumenta di uno e lo salva
visualizzandolo nella Label.
Il problema è che quando dal Pc2 e Pc3 clikko contemporaneamente chi arriva
secondo alla richiesta di salvataggio mi da errore di ChiaveDuplicata e ha
ragione (ovviamente) perchè il COD e chiave univoca di qualla tabella.
Leggendo la guida di ADO ho visto la proprietà LockType ma niente sempre lo
stesso errore.
Voglio sapere se quest'errore lo devo controllare manualmente ho c'e
qualcosa che non faccio (di sicuro)...?
Se c'è qualcuno interessato invio il cod e ne discutiamo assieme
Graze ancora del tempo che perdete per leggerev i miei msg
bye Roberto

E' un vecchio e sempre presente problema.
Il problema è rappresentato dal fatto che non puoi controllare cosa succede
tra i due PC, la rete, il db, ecc.
In genere si risolve così:
1- Crei una tabella con un solo campo: un numero,
2- accedi al db e fai il lock alla tabella
3- leggi il numero
4- aggiorni il numero aggiungendo 1
5- unlock tabella
e usi il numero che ti è arrivato. Nessun altro avrà quel numero.
In Oracle ci sono i contatori che fanno proprio questo senza la necessità di
creare una tabella.
Altre soluzioni passano da stored procedure, ma il criterio è questo:
Se ti serve un numero squenziale prendilo solo nel momento in cui puoi
incrementarlo.
Se prendi un numero, poi aspetti che l'utente faccia qualcosa per poi
salvare, un altro utente sicuramente avrà terminato tutto e occupato quel
numero.
Spero di esserti stato utile :)
Dads; Il vecchio plurale.
Pls, non rispondetemi per e-mail, quelle che c'è qui non esiste.

 e usi il numero che ti è arrivato. Nessun altro avrà quel numero.
E se alla richiesta arrivano contemporaneamente più utenti??
bye Roberto

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO ISAM

Con gli aurguri di Buona Pasqua,
sono a chiederVi aiuto.
Cosa significa quando lancio l'eseguibile .exe appenca compilato
msgbox con:
Impossibile trovare ISAM installabile.
Grazie a quanti mi aiuteranno
e ancora auguri a tutto il NG.
--
ELETTRONIC SYSTEM
WWW.ELETTRONICSYSTEM.COM
in...@elettronicsystem.com
ICQ N.: 27427846

Installa dataacc (lo trovi sul sito Microsoft)
Poi dipende da che db stai usando...

 ha scritto nel messaggio
news:9b49pu$n71$2...@fe1.cs.interbusiness.it...


 Impossibile trovare ISAM installabile.
prova a controllare la proprietą CONNECT dei contolli DATA e verifica che
sia = ACCESS

 ha scritto nel messaggio
news:9b48p0$9m4$1...@pegasus.tiscalinet.it...


 ha scritto nel messaggio
news:9b69ao$skg$1...@serv1.iunet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: optionbutton

Salve,
ho un problema:  ho 3 OB in gruppo in un frame, e ho settato la 
proprieta' Index (0,1,2).
Ho creato un controllo :
 Private sub optButt_gotfocus(index as integer)
	if optbutt(0).value then
		prima operazione
	elseif optbutt(1).value then
		seconda op.
	.......
	end if
 end sub
Mi succede che ad esempio se clicco sul terzo OB, non succede nulla 
finche' non clicco un altro button, e di conseguenza si attiva l'opzione 
relativa al terzo bottone.....dov'e' l'errore ??

Gaetano ha scritto:

Prova cosi':
Private sub optButt_click(index as integer)
        Select Case Index
        Case 0: prima operazione
        Case 1: seconda op.
        Case 2: terza op.
        Case Else: MsgBox "Questo non deve succedere !"
        End Select
end sub
hth, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Confrontare stringhe di numeri.

Ho due o piu' stringhe che contengono valori numerici seperati da virgola e
voglio recuperare solo i valori presenti in tutte le stringhe.
Al momento splitto la prima stringa in una variabile, ciclo su questa e per
ogni valore faccio un instr sulle altre stringhe, cosa che si e' rivelata
piu' veloce che non splittare tutte le stringhe e scorrere le matrici.
Solo che quando ho migliaia di valori diventa comunque molto lento.
Qualcuno ha un'idea migliore?
Saluti.
Luciano

 Qualcuno ha un'idea migliore?
Hai provato ad ordinare gli array con un quicksort?
In questo modo potresti evitare di scorrerti ogni volta tutti gli elementi
(scoorri il secondo...n-esimo array finchč il numero č > del numero che stai
cercando...). Se poi ti memorizzi anche il punto in cui sei arrivato ottieni
l'optimum (puoi partire dall'elemento sucessivo e non devi scorrerti tutti
gli elementi piů piccoli)... non so se mi sono spiegato bene!
I numeri possono essere ripetuti negli array?
Penso che il peso dei confronti e della memorizzazione della posizione degli
array (potresti utilizzare una struttura dati ceh contenga array e
posizione) venga ben ripagato dalla diminuzione del numero dei confronti!
:-)
Ciao

 I numeri possono essere ripetuti negli array?
No.
Saluti.
Luciano

direttamemte ad un determinato punto.
array(n-elemento)
dove n-elento parte da 0 se modifichi le impostazioni...
hth
-- 
Visita il sito comune del NG: 
http://www.it-lang-vb.net
Visit: 
http://www.hardwaretips.com

 dove n-elento parte da 0 se modifichi le impostazioni...
Non ho capito, potresti spiegare meglio?
Saluti.
Luciano

 Non ho capito, potresti spiegare meglio?
Per leggere il valore dell'n-esimo elemento dell'array devi semplicemente
utilizzare qualcosa del genere:
variabile=array(n-elementodesiderato).
Nel caso di un loop basta che il ciclo for lo fai partire dall'n-esimo
elemento invece che da 0.
ad esempio:
for contatore=n_primo_elemento_utile to ubound(array) do
    ...
    if condizione then
        n_primo_elemento_utile  = contatore+1
        exit do
    endif
    ...
next contatore
Newsgroup: it.comp.lang.visual-basic
Titolo: vecchi post

Esiste un posto dove posso trovare i vecchi post.
Nel sito comune non li ho trovati (o forse non ho cercato abbastanza)
Grazie
ilpav

 Nel sito comune non li ho trovati (o forse non ho cercato abbastanza)
Qui:
http://groups.google.com/groups?group=it.comp.lang.visual-basic
Ciao,
Carlo.

Newsgroup: it.comp.lang.visual-basic
Titolo: PORNO SCIOCCANTE

http://euronet.globalredirect.com
GB543
F4GV
54F
RGV
5BH
Y
5465656545
4Q5FG
34
FR324
FR
234F5
G5G35G4F
R
4W354
RW
W5
QW5
ET4
ETETTE
T
RW
423
35

Chiara Masi ha spammato.
Ma, cazzo, non si puň far niente per evitare 'ste cose???

:(

ha spammato metà newsgroup italiani (ho visto su php, webmaster e
fastweb.... poi non so gli altri).
"Solo lo spazio e la stupidità umana sono infinti... ma del primo non sono
tanto sicuro." - A.Einstein

 tanto sicuro." - A.Einstein
gia' gia' ha proprio ragione sto tipo , che ng frequenta sto A.Einstein ?

 gia' gia' ha proprio ragione sto tipo , che ng frequenta sto A.Einstein ?
'sto tipo è il fondatore della relatività (E=mc^2), mentre per il ng chiedi
informazioni a it.scienza.fisica ....penso che conoscerranno + di me "sto"
Einstein....

http://euro-net.da.ru
TRVE
5F4EG
5RBH
FT
BF
645
65645645
645GE54H867
9J87
87
45
2W
21
EFUBJ VH

Di scioccante c'e' solo la tua stupidita'.
-- 
hal

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

Ciao a tutti.
Ho un problema di questo tipo:
Ho fatto un ActiveXDLL utilizzando VB6 e ora mi trovo a dover cambiare
interfaccia al componente.
La DLL contiene l'oggetto Classe1.
Per compatibilità all'indietro non posso cambiare Classe1 e allora ho usato
Classe2, la quale utilizza nelle
dichiarazioni la KeyWord "Implemets Classe1."
Ora, nessun problema a rimappare eventi e proprietà (Comunque faccio
riferimento al codice scritto in Classe1)
Esempio:
Public Sub MioMetodo()
   Classe1.MioMetodo
End Sub
Probabilmente mi sto perdendo in un bicchier d'acqua, ma come faccio a
gestire gli eventi di Classe1 in Classe2?
"Implements" non crea nessun riferimento a questi.
E logicamente se dichiaro nel Client
"Public WithEvents MiaClasse as Classe2"
ricevo un Automation Error.
Sono sicuro che qualcuno di voi saprà come aiutarmi.
Ciao da Raoul


[...]

 ha scritto nel messaggio
news:95begt$kng$1...@news.mclink.it...



io userei
 Dim MioOggetto as DLL.Classe2
 Set MioOggetto = New DLL.Classe2
     MioOggetto.MiaClasse2.Metodo....
ed ignorerei l'esistenza di classe1 nei client nuovi, tanto classe2 usa per
l'appunto classe1 quando i metodi sono gli stessi...
Ciao
Alfonso

 Alfonso
Scusa se rompo ancora, ma facendo cosi i metodi di classe2 devono essere
pubblici, invece la implements me li astrae in modo privato. Quello che hai
scritto tu si traduce come
MioOggetto.MioOggeto.Metodo.... in quanto MioOggetto č un'istanza di Classe2
Se faccio cosi infatti non vedo nulla in MioOggetto....
So che c'č qualcosa che mi sta sfuggendo e intanto approfitto ancora della
tua disponibilitą.
Ciao
Raoul

 ha scritto nel messaggio
news:0Jde6.48907$Up.4...@twister1.tin.it...


 ha scritto nel messaggio
news:95bqlr$nt1$1...@news.mclink.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: - RICAVARE CODICE HTML DA PAG.WEB

- RICAVARE CODICE HTML DA PAG.WEB
si può fare???
con quale ocx???
rispondete sul ng

gigi <gi...@ccm.ot> wrote in message news:7qbs1d$miq$1...@nslave1.tin.it...

Con IE5 lo vedi subito..c'e' l'opzione...

Cosa intendi per "Ricavare codice html" ?
Se vuoi solo vedere il sorgente delle pagine html (non delle asp !) è
sufficiente che tu chieda al browser di mostrarti l'html o il source
(per la versione inglese); tra le altre cose puoi farlo anche con
versioni precedenti di Explorer 5.
Molto più interessante sarebbe invece se tu intendessi trovare il modo
per far tirare fuori l'html da una pagina ad una tua applicazione, ad
esempio per poterla manipolare; in questo caso la cosa è abbastanza
semplice, considera sempre che un file html è essenzialmente un file
di testo.

Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio di parametri

Ciao!
Ho una domandina da porre a chiunque voglia aiutarmi....
ho un file *.bat che esegue una serie di istruzioni su un file di
testo ,copia sposta ecc anche via ftp, il nome del file e il suo
percorso sono contenuti nelle tipiche variabili dei file bat %1%2 ecc,
al termine delle operazioni vorrei fosse possibile eseguire una macro
di word sul file in questione ma non riesco in nessun modo a
trasferire l'informazione %1%2 in qualcosa che word possa leggere.
Ho pensato di avviare la macro attraverso WSH alla fine del bat ma
resta sempre il problema del passaggio dei parametri (percorso e nome
del file). Ho provato utilizzando una variabile di ambiente 
SET varamb=%1%2
che sarebbe stato possibile utilizzare all'interno della macro di word
ma appena chiusa la sessione dos naturalmente la variabile sparisce.
Spero di essere stato chiaro nella spiegazione... grazie a chiunque
voglia aiutarmi.

 che sarebbe stato possibile utilizzare all'interno della macro di word ma
appena chiusa la sessione dos naturalmente la variabile sparisce.
Cerca nella guida di Word la pagina "Controllo dell'avvio di Microsoft
Word".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------



Scusami, credo che tu non abbia capito il mio problema, non volgio
sapere che parametri sono disponibili per l'avvio di word...
voglio riuscire a far passare una variabile da un BAT a una macro WSH
che avvia uno script VB di word.
Sto pensando di provare con un file di testo anche se preferirei
qualche altro modo.

Salve,
sto utilizzando VB6 ed ho un problema nel passare i parametri ad una
subroutine. Vorrei richiamare questa Sub passandole la prima volta un
textbox e una variabile stringa, la seconda volta un listbox e un
textbox, la terza volta un array e un listbox.
Vorrei inoltre poter determinare, all'interno della mia Sub, il tipo
dell'oggetto passato come parametro per poterne utilizzare i relativi
metodi e/o proprieta'..
Di che tipo devo dichiarare le variabili della mia Sub affinche' possano
contenere un oggetto di  qualsiasi tipo?
Grazie
Donatella :)
-- 
Posted from root@[195.120.213.3] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ciao Donatella,
Essendo i parametri passati di tipo diverso, devi necessariamente
dichiararli come Variant, poi attraverso la funzione
TypeName(NomeParametro),
potrati vedere di che tipo č la variabile (anche un oggetto)  passata come
parametro.
Ciao Giuseppe
-- 
Posted from [212.34.192.40] 

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore accesso dati con ado.

In Vb5 (sotto Windows 95) utilizzo questo tipo di connessione:
Set Conn
= CreateObject("ADODB.Connection")
Conn.Open ("guestbook")
E fin qui
tutto bene, la connessione viene eseguita.
Sempre con Vb5 ma sotto
Windows 98 (e WIndows 2000),
le stesse due righe di istruzioni
mi danno
il seguente errore:
Errore di run-time -
2147467259
 (80004005)
errore
non specificato.
Naturalmente in ODBC la dns esiste, ed e' 'guestbook'
come in Windows 95.
Potrebbe essere legato alle versioni differenti delle
librerie di ole db?
--------------------------------
Inviato via 
http://usenet.iol.it

 librerie di ole db?
Cosě a occhio direi che se scrivessi codice piů aderente alle specifiche...
Prova con:
dim Conn as new adodb.connection
conn.open "Provider=MSDASQL.1;Extended Properties=" & """" & "DSN=pippo;" &
""""
con eventualmente le altre properties del caso, che non posso scriverti dato
che non hai scritto di che tipo di connection si tratta...
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con OpenURL

Utilizzo VB5 professional e dovrei riuscire a trasferire un file
da internet. Ho provato l'esempio riportato dall'Help di VB5
sull'utilizzo di OpenURL:
 
    Inet1.AccessType = icUseDefault
    Dim b() As Byte
    Dim strURL As String
    ' Si suppone che l'URL sia valido.
    strURL = "
ftp://ftp.microsoft.com/developr/drg/Win32/Autorun.zip
"
 
    ' Recupera il file come matrice di dati byte.
    MousePointer = 11
    b() = Inet1.OpenURL(strURL, icByteArray)
 
    Open "C:\temp\Autorun.zip" For Binary Access Write As #1
    Put #1, , b()
    Close #1
 
    MousePointer = 0
    MsgBox "Done"
Funziona tutto bene, ma il file che ricevo non supera mai i 64Kb
di dati. In che altro modo si puo' scaricare dei file via FTP o HTTP
che siano anche di notevole dimensione?
Grazie!

Grazie!
Non č vero! Ha funzionato appeno adesso con un file di 67k. Ma il tuo
sistema č a 32 bit?
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Riduzione ad iconcina sulla barra di Windows

La questione è questa: come si fa a ridurre un'applicazione in
un'iconcina piccolina sulla barra di windows? intendo una di quelle
iconcine poste vicino all'orologio.
Ringrazio anticipatamente chiunque mi sappia fornire una risposta.
Flavio

 La questione č questa: come si fa a ridurre un'applicazione in

Newsgroup: it.comp.lang.visual-basic
Titolo: Cut & Paste tra applicazioni

In una applicazione, in una RichTextBox, faccio uso di cut & paste in 
questo modo :
RTB1.cut()
RTB1.copy()
RTB1.paste()
Purtroppo però questa azione mi vale solo per lo stesso form.
Non va oltre.
Cosa devo fare per far sì che il cut & Paste valga per la clipboard 
generale, in modo da trasportarlo anche su altre applicazione sul desktop ?

 generale, in modo da trasportarlo anche su altre applicazione sul desktop ?
Quei comandi in realtà dovrebbero copiare e incollare usando la 
clipboard. Che problema riscontri esattamente?
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Scarica "OpenOffice.org 3: Soluzioni a raccolta", molto più di semplici 
FAQ! 
http://it.openoffice.org/doc/manuali/

 
Il problema che se io clicco sulla mia applicazione ad esempio 'copy', 
(dopo aver selezionato un pezzo di testo) poi il 'paste' su MS Word non 
me lo fa.
Si comporta come se la clipboard fosse vuota.

 Si comporta come se la clipboard fosse vuota.
A me funziona regolarmente, a parte il fatto che non incollo su Word :-)
Provato su VB 2010 Express.


 
A me non funziona ma penso di aver scoperto l'inghippo :
se io faccio un 'copy' poi il paste su MS Word mi funziona, ma esso 
'eredita' il font che sta su MS Word in quel momento, A  MENO CHE io 
prima salvo il mio testo in un rtf file che poi leggo da MS Word.
Questo perchè sul mio programma ho caratteri di altri alfabeti (arabo, 
ebraico) che tra l'altro sono RTL
Quindi un semplice cut & paste mi scombussola tutto.
Abbandonerò l'idea. Obblighero gli utenti a passare prima da un rtf 
file. Ekkekakkio !


Provato con un Incolla Speciale... ?

 Provato con un Incolla Speciale... ?
no. esiste anche quello ? Mo' vado a fare ricerche.

Newsgroup: it.comp.lang.visual-basic
Titolo: Query senza doppioni

Salve,
sono nel panico! Ho una query sql su DB Access ottenuta con alcuni Inner
Join. Quello di cui ho bisogno è mostrare solo i record che NON sono
ripetuti (in un campo).
Es.
Nome    Cognome
Mario    Rossi
Andrea   Rossi
Mario    Verdi
dovrebbe tralasciare i primi due in quanto hanno lo stesso cognome (il
controllo deve essere fatto solo su un campo) e restituirmi solo Mario
Verdi!
Qualcuno può indicarmi la retta via?
Grazie - Alessio

 Verdi!
SELECT Cognome
FROM NomeTabella
GROUP BY Cognome
WHERE Count(Nome) = 1
Prova

WHERE Count(Nome) = 1
Così non restituisce il nome :)
Visto, che al tizio interessano solo quelli che non hanno doppioni si può fare
così:
SELECT First(Nome), Cognome
FROM NomeTabella
GROUP BY Cognome
WHERE Count(Cognome) =1
termoPilucco

 cosě:

Newsgroup: it.comp.lang.visual-basic
Titolo: CONTASCATTI x Voi - Fatemi sapere

Dove troverete molto du MIDI, VISUAL BASIC, ADVANCED DUNGEONS & DRAGONS.
MAI PIU' PROBLEMI CON INTERNET !!! TIENI SOTTO CONTROLLO LE TUE TELEFONATE
!!!
E' finalmente pronto !!! Un programmino Contascatti per Internet. E' una
versione dimostrativa, praticamente il primo programma che faccio, ma volevo
comunicarlo a tutti e darlo a chi se lo vuole prendere. Fatemi sapere cosa
ne pensate.
Ciao.
Vai nella sezione dedicata a Visual Basic in :
http://digilander.iol.it/lamak
Ciao a tutti.

 wrote in message
815f6g$ej9$1...@aquila.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Dischi di istallazione

Ho appena preparato il set di dischi (.cab) per l'installazione di
un'applicazione
in VB6.
E' possibile che mi abbia generato 9 dischi per una applicazione di 168k
senza niente di particolare?
In più c'è genearata anche una cartella Support. A che cosa serve?
Grazie Gabriele

 wrote in message
8gb567$79$1...@fe2.cs.interbusiness.it...

normalissimo la directory sottostante serve a ricreare il pacchetto di
installazione senza dover reimpostare il tutto ...

 wrote in message
news:8gb567$79$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VisualBasic e IRC

sapete se per caso esista un canale IRC Chat dedicato a VisualBasic,
se possibile in italiano ?

#it_lang_vb, raggiungibile dai server 
irc.azzurra.it
, 
services.net
, 
irc.jnet.it
, 
irc.net36.com
, 
irc.myline.net
 e
irc.cervia.com
 
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
Home Page - 
http://www.geocities.com/SiliconValley/Bridge/1414/
---------------------------------------------------------------------------
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: [?] Codice su DataReport

Salve, sono ancora il neofito di DataReport, non è che qualcuno può mandarmi
2 righe di codice per gestire ad esempio dei filtri nelle stampe!?! Come
faccio cioè a dirgli ad esempio, stampami i dati di quella tabella che
abbiano il campo NOME che inizia con "P", oppure che lla DATA sia comprese
tra 01/01/01 e il 31/01/01.
Grazie 1000.
Paolo.

 ha scritto nel messaggio
news:t1iu6.9548$lT1.1...@news2.tin.it...

Sarà che sono un genio :(( ... ma il Datareport mi sembra uno strumento
ancora + semplice e flessibile del Report di Access ...
comunque .. il datareport ha una proprietà (DataSource) che ti permetti di
'dare in pasto' un recordset alla fonte dati (appunto DataSource) del Report
.. il tutto lo puoi fare a runtime.
Il mio consiglio è quello di assegnare tale proprietà (e quindi  creare il
recordset) nell'evento Activate del report con un opportuno 'semaforo' per
un' unica esecuzione della routine in quanto l'evento Activate può
verificarsi + volte (il classico Static Once as Boolean)
L'altro evento disponibile è DataReport_Initialize() ma come bon sai, tale
evento è protetto da un timeout per cui potresti perdere l'esecuzione di
parte del codice ...
Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: Wizard Stored Procedure

Esiste qualche wizard per creare le stored procedure x SQL SERVER ?

 Esiste qualche wizard per creare le stored procedure x SQL SERVER ?
Wizard proprio non saprei ( e sarei anche un po' diffidente ad usarne )
pero' se usi il client di sql server 2000, l' isql ( sql analizer )
ti offre dei pezzettini di t-sql preconfezionati.
-- 
ciao, hal
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:14eb54ae351c8e37cb...@mygate.mailgate.org...


 
http://www.sqlservercentral.com/products/procblaster/
[snip]
Grazie, su questo mi riprometto di farci un giro :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Offerta lavoro...

Cerchiamo urgentemente le seguenti figure professionali:
a) Neolaureati in facoltą scentifiche (pref. Informatica, Ingegneria Informatica)
da avviare alla professione di programmatore. 
b) Programmatori Area Database (Sql, PL/Sql, Developer2000)
c) Programmatori Java e Ambiente J2EE (EJB, Servlet, Jsp)
d) Programmatori Visualbasic
e) Programmatori Cobol
f) Project Manager in grado di gestire piccoli gruppi di lavoro (max 5 persone)
in ambiente Client/Server Oracle e per progetti in architettura Web con tecnologia
J2EE.
Zone di interesse: Liguria, Lombardia e Toscana.
Se interessati inviare CV a 
sil...@silnet.it
grazie e buon lavoro a tutti.
 ___________________________________________________
 Se vuoi un indirizzo di posta elettronica gratuito, iscriviti a
 
http://www.katamail.com
 Da oggi anche l'instant messenger targato Kataweb
 
http://www.kwmessenger.kataweb.it/
-- 
Posted from 
c000-h005.c000.muc.cp.net
 [209.228.29.29] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 e) Programmatori Cobol
Esistono ankora, non si sono estinti?


 a) Neolaureati in facoltà scentifiche (pref. Informatica, Ingegneria



e se ad es. l'azienda ha un indirizzo gratis ?????? ::)))))))))


Concediamoglielo pure.
Ma il loro sito funziona pure male e non passa il mio firewall.
Che cosa avranno da insegnare ?
ciao, hal

J2EE.
Se vuoi reperire professionisti seri è meglio che non limiti la ricerca ai neolaureati!
Simone
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb.Net

Come faccio a riprodurre la funzione Cvi (Qbasic) in Vb.Net ?
In Vb6 l'ho riproposta con 2 type e una Lset; un 
vb.net
 le type le ho
sostituite con structure ma la lset non si comporta alla stesso modo.
La funzione Cvi da una stringa 2 caratteri es. AL estrae 2 byte e li scrive
in un integer
A= 65
L= 76
Integer ottenuto = 19521
Grazie

Preciso anche il codice che non riesco a convertire da vb6 a 
vb.net
; la riga
che non riesco a convertire in modo corretto è lset ti=b2
Private Type tag_2byte
   f1 As Byte
   f2 As Byte
End Type
Private Type tag_int
   X As Integer
End Type
Private Function Cvi(s As String) As Integer
   Dim b2 As tag_2byte
   Dim ti As tag_int
   b2.f1 = Asc(Mid(s, 1, 1))
   b2.f2 = Asc(Mid(s, 2, 1))
   LSet ti = b2
   Cvi = ti.X
End Function

End Function
In attesa di idee migliori, puoi valutare questa soluzione:
<codice>
Module Module1
    Sub Main()
        Console.WriteLine(Cvi("AL"))
    End Sub
    Function Cvi(ByVal s As String) As Short
        Dim ch() As Char
        Dim ret As Short
        ch = s.ToCharArray(0, 2)
        Cvi = Convert.ToByte(ch(0)) + Convert.ToByte(ch(1)) * &H100
    End Function
End Module
</codice>
-- 
hth, hal

'// Creo la stringa...
Dim chars() As Char = {Chr(65), Chr(76)}
Dim Cvi As New String(chars)
'// CVI emulator...
Dim value As Int16 =
BitConverter.ToInt16(System.Text.Encoding.ASCII.GetBytes(Cvi), 0)
HTH
--
Corrado Cavalli [Microsoft MVP]
UGIdotNET - 
http://www.ugidotnet.org

> In attesa di idee migliori, puoi valutare questa soluzione:
Grazie dell'aiuto, funziona alla perfezione; x fare il contrario (compattare
un numero intero in una stringa di 2 byte) che funzione devo usare x leggere
i singoli byte di un intero ?
Grazie


Newsgroup: it.comp.lang.visual-basic
Titolo: Errore 7: Out of memory

Salve,
ho questo problema che non riesco a risolvere:
quando installo un'applicazione realizzata in VB che usa un DB Acces, mi
capita spesso che si verifica l'errore n° 7 "Out of Memory". I computer su
cui installo il programma hanno una memoria di 64 MB, quindi non penso che
il vero problema sia l'insufficienza di memoria. Il problema si risolve se
installo Office 97 pro.
Il programma è realizzato in VB 6.0 e l'installazione viene realizzata
mediante "creazione guidata pacchetti di installaizone".
Qualcuno sa' come risolvere questo problema..................GRAZIE
RAFFAELE FIORETTI

 wrote in message
news:8teo8q$9am$1...@lacerta.tiscalinet.it...



Comunque quando installo Office il problema si risolve da solo, ...non è che
dipende da qualche libreria che non viene registrata al momento
dell'installazione del programma?
GRAZIE

 Comunque quando installo Office il problema si risolve da solo, ...non č

Newsgroup: it.comp.lang.visual-basic
Titolo: kernel32

ciao a tutti!
Il mio problema è il seguente:
ho sviluppato un'applicazione in VB6 sp5 su piattaforma Win98 .. e fin qui
nessun problema.
Se eseguo il programma (dall'ambiente di sviluppo) su pc con altri sistemi
operativi (Win2000, Windows Me, Win NT server), su alcune procedure viene
visualizzato un errore di accesso alle librerie vb6a.dll e kernel32.dll. Se
eseguo il programma dopo averlo installato si blocca definitivamente.
che fare?

 eseguo il programma dopo averlo installato si blocca definitivamente.
Innanzitutto capire quali istruzioni provocano l'errore.
Magari debuggando su un S.O. che ti dà problemi.
Se usi funzioni API ricorda che non tutte sono supportate da tutti i S.O.
Ciao

 ha scritto nel messaggio
news:clsp7.47672$7Y3.3...@news2.tin.it...



Se uno ti risponde quotando correttamente sarebbe cortesia imitarlo.
Allora... Nel momento in cui apri il codice va in errore?
Si'? Allora e' un problema sistemistico oppure un bug di VB. Ti conviene
provare su una macchina pulita e se l'errore si ripete copiare il codice in
moduli nuovi in modo da togliere eventuali errori nei .frx.
No? E allora quando? Mentre debugghi ad un certo punto si schianta tutto? In
che punto? Stai usando un'API? Se si' il problema e' al 90% un errore nella
dichiarazione dell'API medesima.
(continua...)
Ciaotutti,
*

Newsgroup: it.comp.lang.visual-basic
Titolo: Scambio di righe

Sono nuovo al linguaggio VB e ho il seguente dubbio...
Ho scritto un'applicazione VB che chiama una Dll scritta in C e
compilata con VStudio, e ho risolto un baco scambiando alcune righe di
codice nella struttura dati in comune fra programma VB e Dll.
Mi è successa un'analoga situazione con programmi scritti in C con un
notevole numero di righe di codice (+ di 6000).
A qualcun'altro è successo la stessa cosa ed eventualmente sapreste
darmi una spiegazione?
Grazie anticipatamente per le vostre risposte.

 ha scritto nel messaggio 
news:1126791428.6...@g44g2000cwa.googlegroups.com...

non so se sia questo il problema ma....
le DLL usano una convenzione di chiamata nella quale c'è l'ordine del 
passaggio dei parametri...
La DLL deve esportare funzioni _stdcall (standard call, l'unica convenzione 
supportata in vb)...
altre convenzioni (c, register, pascal....) non funzionano. A volte le 
sistemi così, altre volte invece si pianta...
Prova a verificare...
Ciao
Ric
Newsgroup: it.comp.lang.visual-basic
Titolo: Differenze tra le varie versione del VisualStudio .NET

Ciao a tutti, ho visto che alcuni rivenditori hanno già a listino il Visual
Studio .NET nelle sue varie versioni (STD, PRO, ENT...)
Sul sito della Microsoft non ho trovato (forse perkè sono stordito io) le
differenze tra le varie versioni.
Potete chiarirmi le idee?
Grazie,
Pusky

http://msdn.microsoft.com/vstudio/prodinfo/overview.asp
ionfondo alla pagina ci sono i 3 link per le 3 versioni
ciao
L2K

 ha scritto nel messaggio
news:a2mdnn$euo$1...@phobos.ibnetwork.net...

Puoi trovare una tabella comparativa qui:
http://msdn.microsoft.com/vstudio/prodinfo/purchase/features.asp
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown


Grazie 1000, ora ci vado
Saluti,
Pusky


Grazie 1000, ora ci vado
Saluti,
Pusky

 ha scritto nel messaggio
news:a2mf6h$123nu9$1...@ID-126178.news.dfncis.de...

Ho guardato la pagina, però non parla della versione standard.
Comunque grazie.
Saluti,
Pusky





minch dai 1000 a 1700$ belal batosta. ma possibile che Micorsoft sia
diventata cosi' ladra?
Ciao
Luther

Newsgroup: it.comp.lang.visual-basic
Titolo: Un tifoso cosi

E' stato un ultrà della Juventus di 28 anni, residente nella provincia 
di Bergamo, a lanciare la bomba carta che durante l'ultimo derby della 
Mole aveva ferito 11 tifosi granata. Il ragazzo è stato arrestato dalla 
Digos di Torino, che nei giorni successivi la partita lo aveva già 
denunciato. Il 28enne era entrato allo stadio riuscendo a eludere i 
controlli. Nell'indagine sono stati raccolti "elementi indiziari di 
rilevante importanza".
L'analisi dei filmati registrati dal sistema di videosorveglianza 
interno e dagli operatori della polizia scientifica hanno consentito 
alla polizia di ricostruire la dinamica del lancio e il luogo di 
partenza, individuato nella parte mediana del settore occupato dalla 
tifoseria bianconera.
 
Le successiva analisi investigative hanno inoltre consentito di 
recuperare numerose immagini nelle quali il 28enne è immortalato con 
armi da taglio e con bombe carta del medesimo tipo di quella esplosa in 
occasione del derby. Il giovane ultrà si trova ora nel carcere torinese 
Lorusso e Cutugno, a disposizione dell'autorità giudiziaria.
 
-- 
Greg
 
 


E il Vb cosa c'entra?
 
Vuoi forse fare un programma per il calcolo delle traiettorie balistiche delle
bombe carta in VB?  :-)
 
 
-- 
ciao
  Stefano

 delle bombe carta in VB?  :-)
 
Avevo subito cancellato dal server, ma tu hai risposto quotando tutto 
:(
 
-- 
Greg
 
 

Il 11/06/15 14:43:50 Greg ha scritto:

E vabbeh, vedo che il post è presente anche su altri server, pazienza.
Comuqneu oggi c'è questa notizia di un matto che entra in uno stadio, 
con diverse bombe carta, mica una sola, senza biglietto, spintonando lo 
steward e subito dopo cambiandosi di abito per non essere riconosciuto.
Perfetto stile black block. Ogni occasione è buona. Spero continuino ad 
ignorare le varie sagre di paese in programma per l'estate :)
 
-- 
Greg
Newsgroup: it.comp.lang.visual-basic
Titolo: Tipo Object...

Salve Ragazzi,
ho da porvi un quesito:
Ho due Dll: A e B, ciscuna delle quali possiede un certo numero di classi.
La dll A ha bisogno di servizi offerti dalla dll B e pertanto in A ho posto
un Riferimento a B.
Per espletare tale Servizio,  B necessita di un parametro: un oggetto
istanza di una classe che appartiene alla Dll A.
Siamo arrivati al problema:
Non potendo inserire riferimenti circolari tra le dll... ho  provato a
passare l'oggetto come:
'Prototipo SUB in Dll B:
Public  Sub NomeSub (Obj as Object)
ma se provo a richiamre una Property Get  di tale oggetto..... arriva
l'errore.. il metodo non si può richiamare.......
Ho fatto un Debug ed ho visto che Obj ricopia fedelmente i contenuti
dell'oggetto istanz. in Dll A ma
i suoi metodi ... non possono essere richiamati ... pena: "Messaggio
d'errore"
Qualcuno può darmi una dritta?
(N.B.: non posso spostare le classi in un unica dll comune....)

 l'errore.. il metodo non si può richiamare.......
[SNIP]
Non ho capito esattamente che messaggio di errore (e in quale dei due
programmi) viene generato, in ogni caso la classe che passi a B e' definita
in A come PublicNotCreatable (o impostazioni superiori)?
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Non potendo inserire riferimenti circolari tra le dll...
L'errore per riferimenti circolari non viene dato per cattiveria del
compilatore, semplicemente l'architettura del tuo progetto è da rivedere.
I riferimenti devono essere piramidali, non circolari.
Lo stesso dovrebbe valere per gli oggetti all'interno dello stesso progetto,
ma VB a differenza di molti altri compilatori più "seri" permette questa
anarchia credendo di fare un piacere al programmatore.
Ciao
--
y = f(
http://neodatatype.interfree.it/index.html
)


Sono pienamente d'accordo sul fatto che non debbano esserci riferimenti
circolari
in un progetto...  e che comunque se dovessero sorgere problemi di questo
tipo ....
bisogna rivedere l'architettura .... ed è in effetti in questo modo che ho
risolto
il problema : ).
Cmq. Grazie ad entrambi per l'aiuto.

Newsgroup: it.comp.lang.visual-basic
Titolo: ADO e MSHFlexGrid

Utilizzo ADO, vorrei poter assegnare ad un controllo MSHFlexGrid i dati
provenienti da un recordset ADODB, qualcosa del tipo:
Dim rec As New ADODB.Recordset
me.MSHFlexGrid1.DataSource = rec.GetRows (o che ?)
Volendo realizzare una griglia con i dati provenienti da ADO, qualcosa di
simile alla sottomaschera di Access, qual'e' il componente migliore da
utilizzare ?

 ha scritto nel messaggio
news:a13r5b$avi$1...@beatles.tilab.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: mshflexgrid

Ho una form con delle MSHflexgrid che riempio con dei dati ricavati da delle
query.
Le griglie vengono popolate con le proprietą datamember e datasource. I dati
vengono "forniti" da una classe.
Tutto funziona o almeno sembra, ad eccezione del fatto che molto spesso la
MSHFlexgrid mostra le prime righe parzialmente coperte di grigio.
E' la MshFlexgrid che ha dei bachi madornali o devo fare qualcosa in
particolare io?.
Ringrazio anticipatamente.

 Le griglie vengono popolate con le proprietŕ datamember e datasource. I


 Le griglie vengono popolate con le proprietà datamember e datasource. I

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6 newbie] leggere codici a barre

Ciao a tutti, il mio problema è questo:
devo interfacciare il mio piccolo gestionale con un lettore di codici a 
barre in emulazione tastiera (già comprato).
Tutto bene ma vorrei che si potesse evitare di premere un tasto 
'inserisci' e che la ricerca se il codice è esatto fosse automatica, 
simulando un 'return' alla fine della lettura.
Ho controllato e il lettore non inserisce il chr$(13) o il segno di 
NewLine, ma semplicemente il codice e basta.
Mi potreste dare una mano?
Dimenticavo, i codici a barre sono prestampati e quindi mi è impossibile 
intervenire per aggiungervi qualche carattere...
Grazie mille
Eugenio


sicuro che il lettore nno possa essere programmato per inserire dei 
caratteri alla fine della scansione ?
tutti ( non tanti ) i lettori che ho avuto per le mani avevano questa 
possibilita' tra le tante
in genere si programmano facendogli leggere dei codici a barre 
'speciali' presenti sul manuale d'uso del lettore



il problema è che il lettore è senza scatola e nessuna indicazione 
riguardo costruttori e simili...
C'è scritto solo:
model number: strike
S/N: ST 3610
date code:
A01
e made in Italy, ma googlando non sono riuscito a trovare nulla...


Mi vergogno un poco, ma butto lì....
In un caso simile, avendo però codici a barre sempre della stessa
lunghezza,
ho risolto come segue:
nell'evento change del textbox conto quanti caratteri digitati
quando è 13, aggiorno database e svuoto textbox.
sarà barbaro, ma funziona.....
dovendo invece fare una cosa simile senza sapere a priori quanto può
essere
lungo il codice, io affrontarei la cosa con qualcosa tipo timer
(se il codice è inserito e da N secondi non viene inserito nulla,
cioè la penna ha smesso di inviare, allora testo e proseguo...)
Credo comunque che altri potrebbero suggerire, facilmente, di meglio...
Nulla è impossibile, per chi non deve farlo....


la seconda , sebbene non proprio semplicissima da realizzare E' la 
strada da seguire
io ne stavo per buttare giu' una pessima:
stampa un etichetta col codice a barre del carattere di return ed usa
quello per confermare l'immissione :-)

Se non puoi modificare il lettore, allora l'unica cosa che ti resta da fare 
(come consigliato anche da ypsylon) č controllare nell'evento change:
If IsNumeric(text1) and len(trim(text)) = 13 then
    SendKeys "{Enter}"
End If
Ciao, Vincenzo 

Risolto tutto a monte...
mi sono procurato un'altra pistola lettore che mette il return!
Comunque grazie a tutti per l'interessamento.
Ciao
VincePik ha scritto:


 mi sono procurato un'altra pistola lettore che mette il return!
Beh, dovendo acquistare una nuova pistola, tanto valeva prenderla USB o 
seriale, così potevi sbattertene di dov'è il focus, poteva funzionare 
perfino con l'applicazione ridotta a icona, potevi fare a meno del 
return, ecc...
Alberto

veramente non ho detto che l'ho comprata, l'ho recuperata in magazzino.
Grazie comunque
Albe V° ha scritto:
