mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Creare plug-in, ovvero componenti non registrati.

Ciao a tutti,
vorrei aggiungere ad un mio applicativo la possibilità di usare dei
"plug - in" ovvero delle dll esterne che possano essere chiamate con
un metodo uguale per tutte, che restituiscano un certo tipo di dati
(anche questi uguali per tutti i plug - in), ma che non siano
installate insieme all'eseguibile principale, e di cui non conosco
nemmeno i nomi.
Se fosse possibile dichiarare una dll a livello di codice, usando
anche variabili potrei avere una ricerca dei plugin installati e poi
dar la possibilità all'utente di avviarne uno, dichiarando al volo la
dll relativa.
Vorrei evitare di aprire una seconda applicazione con una shell,
questi plug in sarebbero in genere alcune finestre di dialogo che
svolgfano operazioni di vario tipo installate però DOPO l'applicazione
chiamante.
Avete per caso un'idea su come si possa realizzare una cosa simile in
VB6 (enterprise edition)?
Questi plugin sarebbero scritti da un numero ristrettissimo di
persone, perfettamente a conoscenza del sorgente dell'applicazione
base. In genere si tratterebbe di Autocomposizioni o comunque finestre
di dialogo aggiuntive, che agiscano su di un array di dati, immessi
dall'utente o passato dall'applicazione chiamante, restituendo altri
dati, non agiscono direttamente sull'applicazione base.
Lo scopo è quello di aggiungere funzionalità all'applicazione già
installata e di differenziare agevolmente le versioni installate,
rendendo disponibili a diversi clienti diversi plug - in.
Un ringraziamento anticipato a tutti i guru che sapranno aiutarmi.
Luca
Rimuovi _ABC dall'indirizzo per rispondere
Mail different: try "Pegasus mail" absolutely FREEWARE (
www.pegasus.usa.com
)

Mail different: try "Pegasus mail" absolutely FREEWARE
(
www.pegasus.usa.com
)
Un sistema potrebbe essere quello di creare i plug-in come componenti
ActiveX (dll o exe); in ogni caso dal programma base userai sempre il "late
bound", quindi niente riferimenti ma solo un CreateObject("XXX.XXX") della
classe principale che tutti i plug-in dovranno esporre e che dovrà essere
necessariamente uguale per tutti come interfaccia; il ProgID della classe da
creare invece puo' essere memorizzato in un file,db o nel registry e quindi
non deve necessariamente essere noto a priori.
Ciao.
--
Luca Dormio
l...@ifminfomaster.com
ldo...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: (?)Griglia con righe a più colori

Salve, avete qualche idea di come potrei realizzare una griglia che ha le
righe multicolore?
e se possibile far lampegiare una riga?
grazie

Se usi il controllo MsFlexGrid lo puoi fare facilmente (non il flash, che
comunque puoi implementare).
----------------------------------------------------------------------
Stefano Minardi
Zetesis: 
zet...@mclink.it
----------------------------------------------------------------------

Mi potresti fare un esempio?
grazie

Non so se chiedevi a me perché ho avuto un gap nei messaggi. Comunque, se ti
riferisci sempre al flexgrid, guarda le proprietà CellBackColor,
CellForeColor, CellFontBold etc.


 wrote in message
bN3C4.446$i4....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: pazzo per stringa SQL

scusate ma sto impazzendo... probabilmente su una stupidata...
devo fare una statistica di questo tipo:
da una tabella access nella quale sono presenti i movimenti di vendita
di un agente estraggo i dati che mi interessano selezionando:
- agente
- fornitore
- da data
. a data
e visualizzo il risultato in un DataGrid.......
con le date mi da il seguente errore:
errore di runtime '3464'
tipi di dati non corrispondenti nell'espressione criterio
e la stringa sql è la seguente
strsql = "INSERT INTO STAT SELECT [file movimenti].*,"
strsql = strsql + " [file movimenti righe].* FROM [file movimenti] "
strsql = strsql + "INNER JOIN [file movimenti righe] ON ([file
movimenti].[Codice agente] = [file movimenti righe].[Codice agente
righe]) "
strsql = strsql + "AND ([file movimenti].Anno = [file movimenti
righe].[Anno righe]) AND ([file movimenti].[Numero documento] = [file
movimenti righe].[Numero documento righe]) "
strsql = strsql + "WHERE ((([file movimenti].[Codice agente])='" &
agente & "') AND (([file movimenti].[Data movimento])>= '" &
CDate(Text4.Text) & "'"
strsql = strsql + "And ([file movimenti].[Data movimento])<='" &
CDate(Text5.Text) & "') AND (([file movimenti].[Codice fornitore])='"
& fornitore & "'))"
Rec.SQL = strsql
Rec.Execute
l'errore è sicuramente sulle date perchè la stringa sql senza filtro
per data funziona correttamente
ah dimenticavo nella tabella access i campi data sono di tipo data/ora
nel formato gg/mm/aa
aiutatemi!!!!!


certo, tu stai aggiungendo una data a una stringa!
Le date vengono gestite cos':
WHERE MIADATA>#01/01/2000#
quindi
AND (([file movimenti].[Data movimento])>= #" & > Text4.Text & "#'"
ammesso che Text4.text sia una data valida.
sennò fai le correzioni del caso
ciao
ugo

CUT
Prova ad aggiungere un apice prima e dopo della 2 date.
della serie
file.movimenti >= '12-10-99'
Se te lo specificavo nella stringa non capivi niente.
Ciao
Oz

 ah dimenticavo nella tabella access i campi data sono di
tipo data/ora nel formato gg/mm/aa
Non e` rilevante il formato di visualizzazione dei dati.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

Opps.
Ho canato.
Scusa
Ciao Oz

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]VB6sp2 su cdrom?

Qualcuno ha trovavato il service pack 2 in qualche cd-rom allegato alle
riviste d'informatica o da qualche altra parte? Se si, potete scrivere per
favore il nome e numero della rivista?
Grazie
Luciano
E-mail:  
val...@faenza.queen.it

favore il nome e numero della rivista?
ma i service pack di VS6 aggiungono qualche miglioramento a Visual
Basic?
Aranar
e-mail: 
ro...@geocities.com
http://www.nettaxi.com/citizens/Aranar/
   (above all VgaPlanets)
http://www.tempolibero.com/user/aranar
    (sopratutto VgaPlanets)

 Basic?
Certo, visto che VB6 fa parte di VS6.
Per quanto riguarda VB6 è indifferente installare il VS6 SP1 o il VS6 SP2
dato che in quest'ultimo nulla cambia per il VB6 rispetto alla patch SP1.
Zeross
Newsgroup: it.comp.lang.visual-basic
Titolo: PROBLEMI DI STAMPA

Ringrazio in anticipo chiumque mi saprà dire
che relazione intercorre tra
- il formato della carta (es. A3)
- e le dimensioni di un form
questo perche'
in una stampa con il metodo "printform"
non riesco a stampare l'intero foglio.
quanto detto come si puo' unire alla variazione della grandezza del form
e alla variazione della scala di disegno?
grazie
Tommaso

La stampa di un form, ti permette di stampare esclusivamente la parte
visibile del form
se prorpio vuoi stampare con il metodo printform, usa la massima risoluzione
che puoi
in modo da vedere il form in tutta la sua interezza.
Altrimenti ti conviene utilizzare l'oggetto printer.
ciao Jury.
tommaso ha scritto nel messaggio ...


 - e le dimensioni di un form
In linea di massima non c'é alcuna relazione diretta.
Cioè tra pixel e centimetri non esiste (non può esistere).
Dipende dalla risoluzione sia del monitor che della stampante. Infatti
un'immagine che a monitor appare di una determinata dimensione può essere
stampata con dimensioni diverse a seconda del numero di dpi sulla stampante.
In genere la risoluzione in dpi (da non confondere con quella in pixel) di
un monitor è di 72 punti per pollice, mentre quella di una stampante può
essere ad esmpio di 300 o 600 dpi.
Questo significa che per passare da una dimensione in pixel ad una
corrispondente tradotta in centimetri bisogna avere come parametro la
risoluzione di entrambe le periferiche (monitor e stampante).
In genere per questo tipo di problemi io lavoro con le proprietà ScaleMode,
ScaleWidth (e "sorelle").
Spero di esserti stato utile
Ciao :-)
--
___________________________________________
                             Davide Deidda
URL      
http://web.tiscalinet.it/meridies
E-Mail          
davide...@tiscalinet.it
___________________________________________

Ringrazio in anticipo chiumque mi saprà dire
che relazione intercorre tra
- il formato della carta (es. A3)
- e le dimensioni di un form
questo perche'


Newsgroup: it.comp.lang.visual-basic
Titolo: Esempio di ShellExecute è corretto

Dovrei aprire un file autocad con un click
public sub OpenDisegno(frm As Form, ByVal pathDisegno As String)
Dim ret as long
On Error Resume Next
   ret=ShellExecute(frm,"open",pathDisegno,"","",1)
End Sub
private sub tasto_click()
   call OpenDisegno(ME,text1.text)
end sub
Grazie ReDiCuori


sostituirei cosě:
public sub OpenDisegno(ByVal lgnhWnd As Long, ByVal pathDisegno As
String)
   ShellExecute lnghWnd,"open",pathDisegno,vbNullString,vbNullString,1)
End Sub
private sub tasto_click()
   call OpenDisegno(ME.hWnd,text1.text)
end sub
Ciao
Faber

End Sub
Eh eh, questa e' una finezza :)
L' importante, adesso, e' che ReDiCuori si documenti sull' uso costante vbNullString
suggerita dal buon Faber ;-)
ciao, hal


Se poi la dichiarazione e' As Any addirittura
ShellExecute lnghWnd,"open",pathDisegno, ByVal 0&, ByVal 0&,1)
Cmq "1" non mi piace proprio per nulla :P
Una bella costante WS_qualcosa dichiarata in sede opportuna e' sicuramente
meglio :)
Ciaotutti,
Asterix


se č per questo va bene anche il normalissimo vbNormalFocus, insieme ai
suoi amici  :)
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto Word e menù/toolbar invisibili

Nel mio programma uso un oggetto Word per aprire un documento di stampa
unione ed eseguire la stampa unione.
Quando rendo visibile e massimizzato Word, mi appare la finestra con il
documento ma senza menů e senza barre degli strumenti!!!
La cosa brutta č che non succede su tutti i PC.
Avete qualche idea di cosa puň essere?
Grazie
Skysurfer

 news:b2j41p$p9f$1...@serv1.iunet.it...

[...]
    No ma...
    ... noi si potrebbe fare una verifica se tu ci dicessi nome e
versione del s.o. e versione di word con cui succede;
    ... noi si potrebbe esprimere un parere se si potesse vedere il
codice che hai scritto;
    ... perche' non verifichi se menu' e barre sono visibili e in caso
contrario le rendi visibili?... O hai gia' provato e non funziona e ti
sei dimenticato di dircelo?...
    ... a che ti servono menu' e barre per eseguire una stampa unione da
codice? Ovvero perche' hai bisogno di visualizzare il documento? E
perche' quello di stampa unione invece del documento di unione (lettera
tipo o quel che e')? Forse per permettere un intervento dell'utente? Di
che tipo di intervento si tratta, che tu non possa governarlo con una
*tua* maschera? Selezione? Aggiunta di testo? (Perche'?...) Impostazioni
di stampa?...
-- 
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Query con combo

Salve a tutti,
ho un combo con la quale digitando un cognome (che mi dovrebbe comparire
premendo le prime lettere) deve effettuare una query in un database Access.
Inoltre deve farmi vedere, sempre nella stessa combo altri campi del record.
Es. quando nella combo scrivo R lui dovrebbe scrivermi Rossi (che per
esempio nel database č il primo cognome che inizia per R) e premendo nella
freccietta si dovrebbe aprire la finestrina della combo in questo modo:
Rossi       |Mario    |19/01/80
Rossi       |Simone  |24/11/70
Rossoni   |Alberto  |11/07/88
e cosě via....
dove nome e data sono altri campi del record.
Ciao.
Grazie.

 ha scritto nel messaggio
news:8q9qiq$3q5$1...@fe2.cs.interbusiness.it...

Cosa vuoi sapere???

 dove nome e data sono altri campi del record.
Prova cosě, non servono API ne Controlli aggiuntivi sono poche righe di
codice su evento keyup del combo
prova a fare un form con un combobox e incolla queste righe di codice
Private Sub Combo1_KeyUp(KeyCode As Integer, Shift As Integer)
Print KeyCode
' filtro key TAB e Key Del per consentire edit del combo
If KeyCode = 8 Then
   If Combo1.SelLength <> 0 Then
        Combo1.Text = Mid(Combo1.Text, 1, Combo1.SelStart - 1)
        KeyCode = 0
    End If
    ElseIf KeyCode = 46 Then
        If Combo1.SelLength <> 0 And Combo1.SelStart <> 0 Then
        Combo1.Text = ""
        KeyCode = 0
        End If '
     Else
    ' selezione e scrittura text del combo
    Dim pos As Long
    Dim TESTO As String
    Dim A As Integer
    ' passo alla function dolo il testo editato
    A = TROVAELEMENTO(Left(Combo1.Text, Combo1.SelStart + 1))
'SendMessage(Combo1.hWnd, &H18F, -1, ByVal CStr(Left(Combo1.Text,
Combo1.SelStart)))
    TESTO = Combo1.List(A)
    ' scrivo il text nel combo
    pos = Combo1.SelStart
    Combo1.Text = TESTO
    Combo1.SelStart = pos
    Combo1.SelLength = Len(Combo1.Text) - pos
End If
End Sub
Private Sub Form_Load()
' apertura del form popolo gli elementi del combo
Combo1.AddItem "pippo"
Combo1.AddItem "topolino"
Combo1.AddItem "qui quo qua"
Combo1.AddItem "paperino"
Combo1.AddItem "gambadilegno"
Combo1.AddItem "archimede"
Combo1.AddItem "paperogas"
Combo1.AddItem "pluto"
End Sub
' questa function e dedicata al combo1 del form ma puo essere modificata per
un combo generico
Function TROVAELEMENTO(TESTO As String) As Integer
Dim A As Integer
'scansione elemenmti del combo
For A = 1 To Combo1.ListCount
    If Left(Combo1.List(A - 1), Len(TESTO)) = TESTO Then Exit For
Next
TROVAELEMENTO = A - 1
End Function
Ciao stefano

 > dove nome e data sono altri campi del record.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]ADO e debug in vb6

Ciao a tutti!
Da un paio di giorni mi sto scontrando con un problema che non e'
insormontabile ma e' particolarmente fastidioso perche', come avrete
modo di capire se avrete la pazienza di leggere il resto del
messaggio, rallenta parecchio il mio lavoro.
Allora, io ho costruito due progetti: il primo dei due, di tipo
standard, svolge le funzioni di processo controllore, ossia fornisce
l'interfaccia utente, le maschere di setup, apre la base dati e cosi'
via; il secondo e' un modello di progetto per la realizzazione di
moduli aggiuntivi che si occupa di prendere quanto fornito dal
processo controllore (in particolare: la connessione ADO alla base
dati) per fare le sue elaborazioni. Non so se la cosa possa servire,
ma uso gli ADO in versione 2.1 e il mio e' un VB6 SP1.
Il problema mi si presenta nel momento in cui io cerco di fare il
debug da ambiente integrato. Come il solito, fornisco il nome del
processo chiamante, le variabili di riga di comando, lancio il
debugger e, quando cerco di creare un Command e di fornire la
connessione che mi e' stata passata, mi esce un bel run-time error
3001 che recita: "The application is using arguments of the wrong
type, are out of acceptable range, or are in conflict with one
another.". Inutile dire che se io compilo entrambi i progetti e eseguo
la cosa da riga di comando, tutto funziona perfettamente (come
peraltro dovrebbe anche nell'IDE).
So che la questione e' _molto_ specifica, ma mi domandavo se qualcuno
di voi ha mai avuto lo stesso problema, se e' riuscito a risolverlo e,
se si, come.
Grazie in anticipo.
Ciao!
Luca Menegotto.


Purtroppo la tua descrizione non ha elementi sufficienti per diagnosticare
in modo preciso il problema.
Innanzitutto, posta le righe di codice dove avviene l'errore.
Poi, come consigli generali:
- installa il SP3 di VB6 (non si sa mai)
- assicurati che il progetto referenzi gli oggetti ADO della versione
corretta (magari hai installato altre versioni piu' vecchie, etc...)
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: creare archivi

Qualcuno sa dove posso trovare sorgenti di un prog vb per creare dei file
archivio contenenti altri file? (es. i file mpq di diablo o i file pak di
quake)
Grazie 1000!!!
Yuri
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 quake)
sul sito comune mi pare ci sia qualcosa per zippare...
apè..
eccolo...
http://www.it-lang-vb.net/download.asp?file=http://www.it-lang-vb.net/Archivio/Sorgenti/FileSuite.zip&ID=646
quello che interessa a te è il winpack, ci sono anche i sorgenti per cui
puoi prendere spunto da lì...
-- 
Le persone non sono il proprio comportamento: devi sempre andare oltre,
essere flessibile, capire il punto di vista degli altri, interpretarne i
comportamenti ed intuirne le esigenze.
Per rispondere in privato elimina
dall'indirizzo "togliquesto"
MasterDavidex
David Ruscelli

 puoi prendere spunto da lě...
Grandioso!!! e' proprio quello che mi serviva!!!1
Grazie 1000!!
--
Acquistapace Yuri
yuripace DOT mutande AT libero DOT it
Per scrivermi toglimi le mutande...

Newsgroup: it.comp.lang.visual-basic
Titolo: Combobox

Non riesco a trovare il modo di cambiare gli attributi (es. colore del
testo) di un singolo item di una combobox.
Inoltre il controllo non genera un evento un evento Change selezionando un
item della lista, ma soltanto se modifico da tastiera il testo.
E' vero?
Grazie per il gradito aiuto
giampiero

Selezionando un item generi un evento click
scrivendo generi un evento change
giampiero ha scritto nel messaggio <01bd3cb1$e42d64a0$2a88b8c2@giampiero>...


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Problemi collegamento sito comune.

Da ieri non riesco a vedere il sito comune.
Capita anche a voi?
Mi è sfuggito qualcosa (lavori in corso)?

stessa cosa



Pure a me


Ah, allora non sono io...

 wrote in message
news:rjyX3.50065$s17.5...@typhoon.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: dove sbaglio ??

salve a tutti
creo un file dove registro una matrice di byte
Open nomefile For Append Access Write As #1
Put #1, , miamatrice
Close #1
quando tento di aggiungere altre matrice con queste istruzioni:
Open nomefile For Append Access Write As #1
Put #1, , miamatrice
Close #1
viene fuori  errore " modalita file non valida"

CIao,
ho appena provato...
con APPEND mi dà l'errore
ho provato con BINARY (che mi sembra la più usuale) e tutto corre lisci come
l'olio!!!!!!!!
By Gianni.

 ha scritto nel messaggio
news:qqC66.448$1c.2...@twister2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: ... IF è un numero intero Then

Ciao a tutti...
Vorrei sapere se esiste una istrizione (Se si, quale) che mi permette di
controllare un numero in una text e poi capisca se č un numero intero o
decimale:
If text1= Decimale then
...
...
else
...
...
...
Spero di essermi spiegato e grazie...

 controllare un numero in una text e poi capisca se è un numero intero o


 endif
Non va prima convertito in valore?
Ciao
Bald0z

 wrote in message
news:YaMZ6.96595$Uo3.2...@news6.giganews.com...


 > controllare un numero in una text e poi capisca se č un numero intero o


 conversione implicita dei tipi :)
un po' come tentare di passare la dogana con un cadavere
nel portabagagli.. bleaghhh..
<freccia>non esistono piu' i buoni coder</freccia>
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud
Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione simile a inkey$

Ciao, esiste in vb una funzione simile a inkey$.
simona

Ciao, esiste in vb una funzione simile a inkey$.
  No e non avrebbe alcun senso: poiche' VB e' event driven devi
scrivere le routine in modo che rispondano agli eventi che ti
interessano.
-- 
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire "micio" con "mc"

 Ciao, esiste in vb una funzione simile a inkey$.
Che fa inkey$ ?

simona
Secondo me ti sbagli.
termoPilucco


se non ricordo male la funzione Inkey$ er la funzione di in QBasic che
catturava il codice dei
tasti battuti da tastiera, in VB lo stesso si puo ottenere monitorando gli
eventi di
KeyPress abbinati ai vari oggetti di VBasic
spero di esserti stato utile
Buon lavoro
G. Sanna


Come già sottolineato da altre Re:, la funzione inkey$ non esiste in VB, ma
per gestire la tastiera
puoi usare gli eventi KeyPress e per i tasti speciali KeyUp e KeyDown,
questi eventi
sono generati dall'oggetto che ha il focus nel momento della pressione di un
tasto, per
gertire la tastiera a livello di form è sufficente impostare a True la
proprietà KeyPreview
del form, in questo modo tutti gli eventi della tastiera passano prima dal
KeyPress,KeyUp e
KeyDown del form, e poi inviati al controllo col focus, attenzione: asistono
alcune eccezioni
descritte nell'help di VB.
Ciao..

Mi spiego meglio, il mio problema che ho un ciclo do while che va a leggere
i record di una tabella.
Come posso fare a bloccare il ciclo con un tasto oppure con un pulsante ?
ciao
Simona

 Come posso fare a bloccare il ciclo con un tasto oppure con un pulsante ?
all'interno del ciclo metti una riga con scritto:
 DoEvents

Newsgroup: it.comp.lang.visual-basic
Titolo: programma per masterizzare

E' possibile realizzare con VB2005ee una windows application per 
masterizzare
su CD una serie di file presenti in HD ? E' una cosa molto complicata o
ci sono delle classi apposta che svolgono questo tipo di compiti ?
Grazie. 



Non so, ma ci sono software gratuiti e senza bisogno di installazione, che
masterizzano (es. DeepBurner).
Comunque in 2min ho trovato (a te la lettura):
http://groups.google.com/group/it.comp.lang.visual-basic/browse_thread/thread/2e34618cf9489194/48f5fcbcd218e60e?lnk=st&q=masterizzare+vb2005&rnum=4#48f5fcbcd218e60e
http://www.visual-basic.it/articoli/adsNeroNet.htm

Newsgroup: it.comp.lang.visual-basic
Titolo: VB e interfaccia web

Salve a tutti, siccome devo sviluppare alcuni progetti in visual basic su 
interfaccia web, ovvero form che girano su interfaccia web....qualcuno 
saprebbe darmi una dritta su come o dove documentarmi per l'interfaccia web.
Grazie per l'aiuto
Massimo P. 

 saprebbe darmi una dritta su come o dove documentarmi per l'interfaccia
web.
Prima di tutto... che versione di VB?
VB o VBScript?
Lato client o server?
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 ha scritto nel messaggio 
news:4374d6d5$0$27600$4faf...@reader1.news.tin.it...


 access..... presumo lato client...
Se usi 
vb.net
 o sei lato server o non sei web.

Newsgroup: it.comp.lang.visual-basic
Titolo: [!] Connessione ADO ad un DB sul Web. RISPOSTA FINALE???

Ecco cosa mi ha scritto atal da un NG inglese riguardo alla connessione ADO
ad un DB remoto (sul web) per leggere e fare modifiche.
Siccome so che questa cosa non sta a cuore solo a me, ve la giro anche a
voi.
ATAL HA SCRITTO:
Sebastiano:
The only product that I know of is the
UniversalDataExchanger. It creates a local ODBC DSN
for the remote daatabase. And hence, your VB
application access the local DSN (as if available
locally) but the information will be coming from the
remote dB).
http://www.chetu.com
Contact me if you have more questions.
There is a live demo. on our site wherein we have a VB
appplication that access remote a remote database
using this technology.
http://www.chetu.com
Best regards,
Atal
+------------+
Intanto proverò con questa soluzione, se qualcuno ne trova un'altra, faccia
un fischio!
Ciao
Sebastiano


Grazie per aver girato a tutti questo messaggio, ho provato a collegarmi al
sito, ho scaricato la demo sembra carino ma i costi non sono un po' alti
(secondo gli esempi che ci sono sul sito), hai altre informazioni in
proposito? hai fatto delle prove particolari?
Grazie Rita

 Intanto proverň con questa soluzione, se qualcuno ne trova un'altra,

Newsgroup: it.comp.lang.visual-basic
Titolo: numeri random

Devo generare numeri random su 2000 numeri
randomize
rando = (rnd(2000)
Come e' possibile generare numeri sempre diversi senza rischiare che mi
rigenera lo stesso numero?
Cioe' se la prima volta mi da 150 come posso dire di escludere il numero
dalle successive volte?
Grazie
Ciao, Chiara


-- 
manuel 'fmf' ferrero

 wrote in message
news:hfifft0dvt1e3mrr5...@4ax.com...


 wrote in message
news:gNPJ6.43$Bq3....@nreader2.kpnqwest.net...


 wrote in message
9d8qd3$c6l$1...@fe1.cs.interbusiness.it...


Ottimo, sicuramente piu' efficiente della mia soluzione...:)
Mic
"la soluzione non e' nel codice ma nella banda"...:)

 estrai un nuovo numero e fai lo stesso controllo.
Non dovrebbe servire: se uno fa una cosa tipo cosi' risparmia un po' di
passaggi: occhio che l'ho provato, ma l'ho riscritto senza provare...
'mi pare che che rnd voglia un single
Dim Arr(1 To 2000) As Integer
dim S as single
dim I as integer
'popolo un array con i numeri
For i = 1 To 2000
    Arr(i) = i
Next i
'faccio una ricorsione alla rovescia, per prendere il max random. Se il
valore
'pescato non e' pari a i, cioe' non e' l'ultimo, ma per esempio il
500esimo,
'sostituisco quello pescato con l'ultimo, per mantenere sempre popolati i
'valori sino a I. Se e' l'ultimo, invece, non serve
For i = 2000 To 1 Step -1
    S = Int(i * Rnd(i) + 1)
         'qui ho il numero
         Debug.Print Arr(S)
    If S < i Then
        Arr(S) = Arr(i)
    End If    
Next i
'Inizializzare rnd() secondo prescrizione del medico :-)
-- 
 Pastrano

:) se  non ho capito male non generi il numero da scrivere nell'array in
modo Random ma sposti i numeri generati randomicamente all'interno
dell'array...
good!
mic
"la soluzione non e' nel codice... sta nella banda!!!"

 modo Random ma sposti i numeri generati randomicamente all'interno
dell'array...
Si', per evitare di dover controllare se il numero e' gia' uscito...
-- 
 Pastrano

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con imagebox

Ciao a tutti.
Ho un array (0 to 99) di oggetti imagebox, nei quali con un ciclo ricorsivo
desidero caricare delle immagini casuali tra quelle che ho inserito in una
sottocartella del programma
Le imamgini hanno come nome "SP" seguito da un numero intero compreso tra 0
e 6.
Durante il form_load, inizializzo le imamgini con un ciclo for, ma
restituisce un errore "Object required" nella linea di assegnazione
dell'immagine. Ho controllato la ricostruzione del path, ma non pare
presentare errori, ed ho provato perfino disegnando manualmente tutti gli
oggetti sul form, dando index oportuni. Cosa sbalgio?
Private Sub InitBoard()
Dim i As Integer, x, p
Randomize Timer
For i = 0 To 99
    x = CInt(Rnd * 6)
    p = App.Path & "\Immagini\SP" & CStr(x) & ".bmp"
    imgBoard(i).Picture = p
Next i
End Sub

     imgBoard(i).Picture = LoadPicture(p)

 ha scritto nel messaggio
news:GIOxb.118951$hV.42...@news2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Download Installshield

Ciao a tutti,
qualcuno sa dirmi dove posso trovare il programma Installshield per
windows 95 o 3.11?
Grazie
Antonio Mirarchi

 Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Email con winsock

Ciao a tutti,
sto sviluppando in software per l'invio in automatico di email con file .zip
allegato, mi capita che alcuni file zippati
che prima dell'invio sono leggebili quando mi arrivano nella casella di
posta non sono piů utilizzabili e questo mi capita
solo per i file zip con all'interno alcuni tipi di file:
    file zippato        .bmp/.dat/.txt/.ico      nella casella di posta dopo
la spedizione riesco ad utilizzarli
    file zippato        .snp/.jpg                    nella casella di posta
dopo la spedizione non riesco ad utilizzarlo e mi danno errore
                                                            "missing xx
bytes in zip files......."
qualcuno a qualche dritta per risolvere il mio problema.
VB 5.0 sp3
Windows XP
Office XP
Exchange 5.5 sp4
Ringrazio tutti in anticipo.
Ciao.

 Exchange 5.5 sp4
Sei sicuro che tra il momento che il tuo programma crei/invii la e-mail e
quella che exchange la assembla e la invia per davvero, il file zip non sia
stato alterato?
Metti che exchange si tiene in pancia per 2 minuti l'email senza averla
ancora codificata (uuencode) unendola con gli allegati: se tu in questi 2
minuti cambi alteri il file ZIP è probabile che l'e-mail parte con uno ZIP
che non era quello previsto.
Altre idee nn ne ho.
Ciao
Ettore Maronese, il Mes

 ha scritto nel messaggio
news:alni3a$rt1$1...@lacerta.tiscalinet.it...


 Exchange 5.5 sp4
Visto che hai office, perchè la mail non la fai spedire ad outlook? Se vuoi
dti dico come fare, almeno così devi solo creare il messaggio, inserire
destinatario, oggetto, testo ed allegati e spedirlo.
Il resto lo fa tutto lui.
--------------------------------
Inviato via 
http://usenet.libero.it

 dti dico come fare, almeno cosě devi solo creare il messaggio, inserire


   Close 1
Sostituiscilo con un
Open FilesAtt For Binary Access Read As 1
bin = space$(LOF(1))
bin = get #1,,bin
Close 1
e facci sapere se funziona


 Close 1
Ettore Maronese, il Mes

 ha scritto nel messaggio
news:alpjof$ql3$1...@lacerta.tiscalinet.it...


 utenti (2/3), quindi volevo bypassare l'utilizzo di outlook.
Ma quando istanzi l'oggetto outlook, lui apre la connessione con l'exchange
e non serve che ci sia aperto l'outlook (quello che si vede). Poi ti puoi
loggare con l'utenza che vuoi tu, scivendolo nel codice.


 ha scritto nel messaggio
news:3d7e...@news.cis.it...


 ha scritto nel messaggio
news:193Z203Z230Z22Y...@usenet.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Gestire un db residente su web

Devo gestire da un programma in VB un db access residente su internet.
E' possibile ? e se si mi date una dritta anche solo un piccolo esempio  o
dove trovarlo ?
Grazie 1000
Roberto

 ha scritto nel messaggio
news:Wkfm6.62356$k55.1...@news.infostrada.it...


Se ti può dare uno spunto...
Con il seguente codice viene visualizzata la finestra di dialogo Stampa
quando l'utente fa clic sul pulsante di comando
Command1:
Private Sub Command1_Click ()
 Dim BeginPage, EndPage, NumCopies, i
 ' Imposta Annulla su True.
 CommonDialog1.CancelError = True
 On Error GoTo ErrHandler
 ' Visualizza la finestra di dialogo Stampa.
 CommonDialog1.ShowPrinter
 ' Recupera i valori selezionati dall'utente
 ' dalla finestra.
 BeginPage = CommonDialog1.FromPage
 EndPage   = CommonDialog1.ToPage
 NumCopies = CommonDialog1.Copies
 For i = 1 to NumCopies
 ' Inserire il codice per l'invio di dati alla
 ' stampante.
 Next
 Exit Sub
ErrHandler:
 ' L'utente ha scelto il pulsante Annulla.
 Exit Sub
Ciao!

comunque un valido aiuto!
E perché non lo puoi dare? Perché non funge! :-(( Hai dato un'occhiata all'esempio che ti ho
mandato? Scoperto niente di nuovo?
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
---------------------------------------------------------------------------

 wrote in message
usek9tc3jto0qgupn...@4ax.com...


 mandato? Scoperto niente di nuovo?
Funge eccome! Non quello dell'ASP/XML e Access ma il discorso della pagina
asp che apre un DataBase che gli mandi su e travasa i dati nel DB
principale.
Il programma è quasi concluso. Purtroppo è proprietà del mio datore di
lavoro... :( In un attimo di tempo ne riscrivo le parti salienti e faccio un
piccolo tutorial che magari mando al sito comune.
Mi dispiace veramente!!! :(((
un CiaoZ triste triste...
SebaMix

 oggetto ado/dao.recordset una tabella del db?
Moreno, Moreno... non sei stato attento! ;)
Io ho un DB in locale ed uno sul server web che è sincronizzato con quello
in locale!!!
Tutte le modifiche che faccio in locale (cancellazione, inserimento,
modifica) le sparo su via FTP sotto forma di DataBase di aggiornamento. La
pagina ASP che richiamo dopo questa procedura analizza il contenuto del
database di aggiornamento e sincronizza di conseguenza il DB in remoto.
Giusto oggi stiamo testando il prodotto + o - finito.
Comunque riesco a gestire un catalogo on line con Articoli, novità,... e
relative foto pure!!! (adesso capite xchè ho provato ad usare la libreria
della Intel ;).
CiaoZ
SebaMix



mmm...... se riuscissi a preparare un esempietto...  ;-P


Appena ho una pausa tra i progetti vari magari preparo un esempio per il
sito comune... ;)
CiaoZ
SebaMix
[...]

sito comune... ;)
Che bravo ragazzo... ;-PP

Newsgroup: it.comp.lang.visual-basic
Titolo: COMCTL32.OCX

Scusate la domanda. Ho scritto un'apllicazione con VB5 utilizzando questo
controllo sul mio vecchio PC e tutto funzionava bene. Ho cambiato macchina e
ho reinstallato il VB5 e la mia applicazione ma quando tento di caricarla mi
dice che non può caricare COMCTL32.OCX. Ho già riregistrato l'OCX con il
REGSVR32.EXE ma niente. Cosa posso fare ?
Grazie Mauro

 Scusate la domanda. 
Il newsgroup e' fatto apposta!

Probabilmente la versione di Windows che hai installato sul nuovo PC è diversa da quella presente sul vecchio, quindi è probabile che il file ComCtl32.dll necessario all'ocx sia una versione diversa da quella che l'ocx si aspetta.
Ora se la versione del ComCtl32.dll di Windows e' piu' vecchia di quella della tua (vedi sulla macchina utilizzata per lo sviluppo) basta sovrascriverla, riavviare il pc e registrare l'ocx.
Se la versione e' piu' recente ti sconsiglio di sovrascriverla con una piu' vecchia e puoi risolvere il problema copiando sia la dll che l'ocx nella directory del tuo exe e poi registrare l'ocx in quella directory.
Ciao
Riccardo

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.net

Domandona?
Ho appena istallato 
vb.net
.
Ho capito come funziona la maggior parte del programma, ma mi mancano due
cose fondamentali.
1) la vecchia msflexgrid o mshflexgrid(non ricordo il nome) dove sono finite
o in cosa si sono trasformate?
2) dopo aver generato la soluzione, per istallare il software su di un altro
pc, come si fà?

 pc, come si fà?
puoi farti una banale copia della cartella \bin, oppure crearti i files 
.cab (cerca sulla toolbar).
Inoltre non so se la tua versione lo permette, dovresti avere il tipo di 
progetto per i pacchetti di installazione.
Ci si risente su tutto il resto che hai già capito ;)
Ciao

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

 Grazie.
Sono riusciti ad incasinare anche il caro Wizard di Setup in .Net :-p
In pratica devi creare un progetto apposito, ti consiglio di leggere questa
pagina, per me e' stata utilissima:
http://www.dotnethell.it/articles/article.aspx?ArticleID=100
Ciao
Stefano "HappyMan" (Lake Maggiore - Italy)
-- 
http://www.sgr.info
Email happyman69 (at) 
despammed.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Ho bisogno di un consiglio

Ciao,sto cercando di aprire un file txt costituito da parole separate da
spazi,asterischi, trattini, tutto su di un'unica riga.Questo file
potrebbe avere qualsiasi dimensione,non lo so a priori, e devo arrivare
fino alla fine del testo.Allora ho scritto queste righe :
open fileditesto for input as #1
testocompleto = input (LOF(1),1)
Però ho sempre il messaggio "Input oltre la fine del file". Invece se
scrivo,per esempio
testocompleto = input (10000,1)
la cosa funziona e riesco a leggere fino alla riga 10000, o quanto
voglio.Qualcuno può darmi un aiuto per leggere tutto il testo del file ?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


usa un ciclo tipo questo
do until eof(numfile)
'leggi
loop

 wrote in message
news:SF5ba.46600$
zo2.1...@news2.tin.it



 sbaglio bisogna usare anche una o piů variabili)  potrei fare cosi ?
E' un file di testo, hai detto, ovvero ogni riga, pur a lunghezza variabile,
č conclusa da CR+NL.
Se cosě č:
Dim canale As Integer
Dim riga As String
canale=FreeFile
Open percorso_e_nome_file For Input Shared As #canale
Do
    If Eof(canale) Then Exit Do
    Line Input #canale, riga
'        Ora elabora come vuoi la riga... Vedi Instr, Left, Mid, Right, Val
e varie funzioni sulle stringhe
'        ...
Loop
Close canale

 da spazi,asterischi, trattini, tutto su di un'unica riga.
In questi casi io preferisco leggermi tutto il file in una unica variabile
in memoria e poi parsarlo con le classiche funzioni stringa (Instr e Mid).
Per leggerlo usa questa funzione passandogli il pathname del file:
Public Function LeggiFileInMemoria(ByRef sNomeFile as string) as string
   Dim lNumFile as long
   lNumFile = FreeFile
   Open sNomeFile For Binary Access Read As #lNumFile
   LeggiFileInMemoria = String(LOF(lNumFile), Chr(32))
   Get #lNumFile, 1, LeggiFileInMemoria
   Close lNumFile
End function
Questa funzione va bene sia per file di testo che per file binari. Puoi
leggerci anche gli eseguibili, per intendersi. :-)
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: programmi scientifici in visual basic

Sapete se c'č qualche sito che si occupa della realizzazione di programmi di
simulazione di fisica in visual basic ?
grazie per l'eventuale risposta
Gabriela

NON ne conosco, ma se ne vieni a conoscenza fammi il forward, sono
interessato anch'io.
Grazie
Giorgio Spinolo

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere le funzioni da una dll

Salve a tutto l'NG
esiste il modo di "aprire" una dll (scritta in C) e leggere il nome delle
function contenute con relativi parametri?
Ho un portatile sul quale il passaggio del video fra LCD e uscita TV va
fatto manualmente (che palle!) e ho scoperto che viene utilizzata una
funzione contenuta in una certa DLL..... mi piacerebbe sapere che funzione
è, come si chiama, quali sono i parametri, come si esporta (declare function
ecc.)
Potete darmi una mano?
Ciao a tutti e grazie
::::: KrOnO :::::

 function contenute con relativi parametri?
Dal sorgente o dalla documentazione.
Se non hai nessuna delle due puoi sapere il nome delle funzioni e la firma
dei parametri (che è ben lontana dall'essere una descrizione dei parametri)
utilizzando varie utility.
Una di queste è distribuita insieme a Visual Studio, ma non ricordo il nome.
termoPilucco.

....trovata. Ma leggo solo il nome delle funzioni....
Non c'è un metodo standard per far passare dalla visualizzazione LCD a
quella TV?
uhm... Forse chiedo troppo...
comunque grazie 1000
::::: KrOnO :::::

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

opro un file di testo e la riga che importo è composta da più voci
separate da tabulazioni! Io devo riuscire a identificarle una per una
Con il comando:
  Line Input #1, riga
mi ricavo la riga ma poi come faccio a ricavarmi le varie voci presenti?
Penso con:
g = InStr(riga,*** )
Ma come si identifica la tabulazione??
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


usa la funzione split con vbtab
ciao.
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.visual-basic
Titolo: Perdersi sulle cose semplici...

Dopo aver passato una giornata buona a tirar giu' un algoritmo ed
implemetarlo correttamente, mi inchiodo sulle cose piu' stupide.
Come lo salvo e lo ricarico un array di stringhe?
L'array e' dichiarato: rngArray() as string
Ho provato a fare come pare logico leggendo l'help, ma ottengo un po'
di errori vari ed eventuali...
(se provo con Random, mi dice che non ho la dimensione giusta del
record, se inserisco il parametro Len mi dice che per la mia variabile
non posso calcolare il Len(), se uso il Binary non da errori ma quando
ricarico l'array e' vuoto...)

 Come lo salvo e lo ricarico un array di stringhe?
Istruzioni join e split.
Con join costruisci un'unica variabile le cui stringhe sono concatenate 
con quell che vuoi tu (; ad esempio)
Con split fai l'operazione inversa.
Buon lavoro

 ha scritto nel messaggio

Dipende.
Se l'array è dinamico ti basta una Open For Binary + Put/Get dell'array, 
senza dover specificare niente (vb si salva nel file tutte le info 
necessarie).
Sempre che la memoria non mi tradisca :)
Ciao 

Il vettore che hai dichiarato è dinamico.
Per far cio' dovresti utilizzare la seguente istruzione
Open For Binary + Put o Get
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 L'array e' dichiarato: rngArray() as string
VB6-NET
l'array e' monodimensionale ?
allora salva ogni item per riga anche su un file di testo
e poi lo rileggi e ricarichi sempre riga per riga
pluridimensionale o concateni la stringa come ti han detto ed hai sempre una 
semplice LISTA da salvare
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Vb su w98 e w2000

Ciao a tutti,
ho il riscontrato il seguente problema, ho un applicativo fatto in vb6
che installato su w95,w98 ed è nt nn presenta anomalie grafiche, su
WinMe e W2000 ha i colori dei form e dei frame sballati, ho usato le
tonalità di grigio classiche che per altro sono quelle di dafault, ma
niente da fare ... sapete darmi una mano per cortesia ?
ciao grazie
dato che è urgente mi potreste mandare una mail se sapete di cosa
tratta a 
polif...@supereva.it
tnk!

 ha scritto

su w2000 ho dovuto ritoccare molti vbp, i grigi effettivamente non
combaciavano piu'.
non so se w2000 visualizza i milioni di colori. su 95/98 non me ne ero
accorto, comunque. wme mi manca.
risolto rimettendo in tutti quelli che avevo alterato i colori non di
palette ma di sistema:
form: back = immagine pulsante, fore = testo pulsante.
ecc.

 ha scritto nel messaggio
news:c8de5054.01062...@posting.google.com...

Setta a Windows Classic la combinazione di colori di win: 2000 e Me usano
uno standard + chiaro.
Laprossima volta, dai retta a Pal: non usare una palette ma i colori di
sistema.
ciao
ugo

 niente da fare ... sapete darmi una mano per cortesia ?
Come ti diceva pal, il problema e' che probabilmente non hai usato il
default, hai proprio usato il *grigio*; il vero default e' quello definito
nel pannello di controllo e che in VB e' rappresentato dalle costanti
vbButtonFace per quanto riguarda lo sfondo e vbButtonText per il testo.
Stessa cosa quando apri il combo delle proprieta'; sono i colori raggruppati
sotto il tab 'Systema' non su quello 'Tavolozza'.
Nota che il problema si puo' verificare con tutte le versioni di Windows, a
casa per esempio non ho il grigio come impostazione predefinita e avrei
visto le tue form "rovinate" anche con Win98...
Ciao
--
Luca Dormio
luca....@tin.it

...

k ragazzi prima di tutto tnk per i consigli, io ho sempre selezionato
dei colori che sono nella tavolozza, ma senza mai crearne uno..
prendendo quelli di default, ora ci litigo e vi faccio sapere !
buon lavoro e tnk ancora :)
Polifemore

buon lavoro e tnk ancora :)
conso'lati, non sei il solo che ci e' rimasto sotto :(
in win 2k  prova, ad esempio, ad avviare l' hyperterminal ...
con il mondo che gira in una nuvola quadrata grigio scuro :(
ciao, hal

...

HE he he ... WinZoz nn si smentisce mai :) Ora sembra che i colori
siano corretti anche se la realta' è che nn ho scelto colori
particolari, ma la palette dei due sistemi nn è la stessa, quindi
quello che ho come risultato è che il programma ha una resa grafica
uguale a quella del SO ma nn ha gli stessi toni di colore che aveva in
precedenza... e vabbe' ...
Cmq ora sto' litigando con i command buttom che che se sono
selezionait hanno un colore,se no ne hanno uno leggermente diverso!!!
che via crucis !!!
Ciao buona giornata rigazzi !!! :)

Ecco perchè le img delle toolbar dei miei prg iniziati in win98
passando a win2000 avevano un grigio diverso....
Ciao,
	Salvo


 precedenza... e vabbe' ...
Come ti ho già detto, usa la combinazione "Windows classic".
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Passare funzioni

Ri-ri-ri- buon giorno
mi sa che devo aumentare l'offerta da un caffe', ad un pranzo in trattoria
(menu fisso 6.50 euro) :-)
Questo per me e' davvero troppo.....
Per chi si fosse perso le puntate precedenti, un breve riepilogo:
sto utilizzando una DLL per comandare una scheda che decodifica file MPEG2.
Questa scheda puo' mandare degli eventi, i quali pero' devono essere prima
abilitati e bisogna fornire alla dll, il nome della funzione che dovra'
essere chiamata quando questo evento scattera'.
Per far questo, c'e' una funzione nella DLL (funzione
RegisterEventCallBack())
Provo a scrivere quello che leggo sulla documentazione (da ricordare che
la dll e' in C)
int RegisterEventCallBack (EventFunction function, CALLBACKPARAM param);
(traduco dalla documentazione):
Questa funzione registra una funzione di callback che deve essere chiamata
quando avviene un evento abilitato.
Ora, prima cosa da fare e' dichiarare la funzione della dll tramite un
Declare Function in un modulo bas, ma come passare la funzione MiaFunzione
che dovrebbe essere chiamata quando un dato evento avviene?
O forse non ci ho capito niente io?
Ciao... Maurizio  
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

prova con
AddressOf  MiaFunzione
ciao


 AddressOf  MiaFunzione
...
Per un attimo e' balenato in mente anche a me, ma in questo caso io vado a
passargli un long con l'handle della mia funzione, giusto?
E lui si aspettava proprio questo?
Ciao e grazie... Maurizio 


AddressOf ti ritorna un Long che è appunto l'handle della tua funzione


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo OCX numerico (per gli amministartori del NG)

Intanto ringrazio tutto il NG e unisco i miei auguri agli altri.
Ho trovato validi aiuti su questo NG.
Ora, nel mio piccolo, vorrei contribuire anch'io.
Ho realizzato un controllo OCX che mi sembra abbastanza ben riuscito e
vorrei metterlo in comune.
E' un textbox per l'introduzione di un numero in cui:
- il numero delle cifre totali e dei decimali e stabilito da due proprietą.
- comprende una proprietą (Valore) come double.
- č richiamabile (Maiusc+F9) una calcolatrice che, dopo aver fatto eventuali
calcoli, permette di memorizzare il risultato nel controllo medesimo.
Aspetto, se di interesse, eventuali istruzioni.
Saluti a tutti, Sauro

 vorrei metterlo in comune.
(snip)
vai sul sito comune del ng (
http://www.it-lang-vb.net/
) e segui le istruzioni della
sezione "contribuire"
Grazie, comunque....
Salutoni & auguri
Sergio
P.S. Amministratori del N.G.?

P.S. Amministratori del N.G.?
Del S.C., caso mai, visto che il N.G. e' libero e felice
senza padroni ne' moderatori :-)
-- 
ciao, hal

 senza padroni ne' moderatori :-)
Invecie il S.C. ha come "padroni" tutti coloro che contribuiscono
(mantenimento, materiale, idee e anche i soldi non vengono scartati :PPP).
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"
Newsgroup: it.comp.lang.visual-basic
Titolo: CreateObject

Sto cercando di creare una istanza dell'oggetto
FILESYSTEM.
Ciň che ho fatto č inserire un pezzo di codice del tipo 
    Set fs = GetObject(, "Scripting.FileSystemObject")
    If err <> 0 Then
        Set fs = CreateObject("Scripting.FileSystemObject")
    End If
dove prima trova se c'č una istanza e la referenzia oppure se da errore ne crea una!
Il problema č che questo codice lo eseguo su di una macchina con il VB installato funziona tutto bene.
Se faccio invece il SETUP (con i cab etc etc...) e lo faccio funzionare su di un'altra macchina mi da l'errore 
Run-time error '429':   
ActiveX component can't create object
Questo (forse č dovuto al fatto che su quei PC non trova l'istanza della classe che io sto creando ovvero "Scripting.FileSystemObject".
Ho fatto anche un'altra prova: ovvero ho creato un file che aggiorna il registro su quelle macchine dove non funziona  inserendo la voce che si trova sulle macchine col VB INSTALLATO, ovvero:
[HKEY_CLASSES_ROOT\\Scripting.FileSystemObject]
@ = "FileSystem Object"
[HKEY_CLASSES_ROOT\\Scripting.FileSystemObject\\CLSID]
@ = "{0D43FE01-F093-11CF-8940-00A0C9054228}"
ma purtroppo NIENTE DI NIENTE..continuo a farlo funzionare sulle macchine con il VB installato, ma sulle altre (cioč il 99%) NISBA NIENTE NUT NOTHING!!!
AIUUUUUUUUTTTTOOO: cosa mi suggerite???
Grazie
Gianluca
SU NG o anche via mail come preferite (
mr...@altern.org
)
--
Posted from host101.a-272.99.66.209.in-addr.arpa [209.66.99.101] (may be forged)
via Mailgate.ORG Server - 
http://www.mailgate.org

Hai installato (e registrato) la Scrun.dll sulle macchine client?
Ciao,
Corrado