mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: chiamata di funzioni VB6 in ASP

ciao a tutti
mi chiedevo se, con ASP, si possono chiamare delle funzioni create in VB6, e
in quale modo.
mi scuso se la domanda č banale, ma la mia esperienza con le pagine ASP si
ferma al codice scritto all'interno delle pagine stesse, per cui, se ASP
offre di piů (come l'interazione con classi Java in JSP), io non lo so.
grazie,
giovanni

 io non lo so.
Il sistema più pulito è quello di incapsulare le funzioni create in VB6 in 
un componente COM (DLL ActiveX) ed istanziare tale oggetto in ASP
Ad esempio:
<%
Set myVB6Obj=Server.CreateObject("nome.componente")
result=myVB6Obj.FaiQualcosa()
response.write result
%>
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca


Grazie della dritta
e come riesco a far si che venga vista la DLL che ho creato? dove la devo
mettere?

 mettere?
ok come non detto, facendo come dici tu, viene riconosciuta la DLL
solo che quando chiamo il metodo della classe che ho istanziato, mi dà
l'errore "proprietà o metodo non supportati dall'oggetto
'nomeMetodo(......)'"
eppure i parametri glieli passo corretti...

 eppure i parametri glieli passo corretti...
ok, continuo con il mio monologo :-) avevo dichiarato la funzione che devo
usare come Private.
Comunque, ancora mi dà un errore di tipo non corrispondente. La funzione in
questione inizia così:
Public Function AlberoJS(id_gruppo As String, Conn2 As ADODB.Connection) As
String
mentre nell'ASP è così:
dim conn
 set conn=server.createobject("adodb.connection")
 conn.connectionstring=[......]
 conn.open
dim a
 Set a=Server.CreateObject("albero.cl_albero")
 Response.Write a.AlberoJS("",conn)
e in quest'ultima riga mi dà l'errore.
idee?


E' un errore un po' subdolo che deriva anche da una cattiva pratica di
programmazione.
VBScript usa solo Variant.
Tu in VB6 hai dichiarato i parametri "ByRef", o meglio (o peggio) non hai
indicato come li volevi.
Il ByRef esige la corrispondenza di tipo.
Soluzioni: dichiari il parametro o Variant o ByVal.
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 mettere?
Ricorda che la dll andrà registrata anche sul server web!


 
non potendo passare come byVal una connessione, ho optato per dichiarare tutto 
variant (input e output) e finalmente funziona :)
Ti do' pienamente ragione riguardo alla dichiarazione dei parametri, purtroppo a 
volte la fretta, e il fatto che VB ti concede di farlo.........
grazie a tutti!
giovanni

Newsgroup: it.comp.lang.visual-basic
Titolo: oggetti refresh

volevo sapere quale ocx devo includere per avere l'oggetto refresh
--------------------------------
Inviato via 
http://usenet.libero.it

devo visualizzare una pagina html
in un form.MI č stato detto che devo utilizzare l'oggetto refresh, qual'č
l'ocx che devo includere, e come si usa l'oggetto refresh?
P.S. se l'oggetto refresh non va bene per quel che mi serve , allora quale
soluzione devo adottare?

Newsgroup: it.comp.lang.visual-basic
Titolo: [SITO COMUNE] Non riesco a scaricare il db dei comuni d'italia con i cap

Come da topic, è da oggi pomeriggio che provo.
--
"Non credo che in tutto il mondo si riuscirebbero a vendere
più di cinque computer".
-- Thomas J. Watson, presidente dell'Ibm, 1943

 Come da topic, è da oggi pomeriggio che provo.
Posso mandarti il mio (MDB, 293 Kb zippati), elaborato da un file di testo
prelevato in rete.
Aggiornato a Marzo 2002.
Contiene: ID, Denominazione, Provincia, Regione, CAP, Prefisso Telefonico,
Codice, Codice Istat.
Fammi sapere (togli xyz dall'indirizzo mail)

 Codice, Codice Istat.
scusate in ufficio dovrei avere gli ultimi DB catastali di agosto , contiene
+ o meno gli stessi codici , puo' interessare ?
lunedi ( se me lo ricordo ) posso vedere la struttura !

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

 possib. in italiano
In questi giorni sto creando un componente vb utilizzando le Windows Socket
API, lottando contro la non propriamente completa documentazione (per un
utilizzo via VB).
Comunque tutto quello che c'e' e' su MSDN (in inglese).
Se hai bisogno di qualche aiuto specifico chiedi pure, se saro' in grado ti
rispondero' volentieri.
Ciao.

Io ho documentazione in inglese abbastanza chiara in formato hlp o html. Si tratta di documentazione delle API ma non contiene cose specifiche per VB (ad esempio le dichiarazioni delle strutture dati di passaggio).
Se la vuoi chiedimela al mio indirizzo. Rimuovi REMOVETHIS dal mio indirizzo.
Antonio

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

Come si fa a leggere il valore di una stringa dal registro di windows e
farla comparire in un textbox ?
Grazie.
E-mail : 
Ja...@wappi.com

 Grazie.
Fai un giro sul sito comune: 
http://www.murialdo.it/it_lang_vb
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale Minerva
mine...@libero.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Record di file excel limitati?

Subject criptico, ma problema complesso ...
Ho un file di excel 97 da cui devo importare dei dati.
Il lavoro lo sto svolgendo in lotus script (vagamente IT) con accesso 
tramite driver ODBC ad excel.
Succede che vengono letti regolarmente i primi 1049 record poi dal 
1050.mo il primo campo viene letto come Null (gli altri campi vengono 
letti regolarmente).
Pensavo fosse un problema di ODBC, quindi mi sono fatto un progettino 
veloce con ADO per leggere il file:
Questa e' la connessione:
Set oConn = New ADODB.Connection
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
             "Data Source=file_excel.xls;" & _
             "Extended Properties=""Excel 8.0;HDR=YES;"""
stesso risultato.
Idem con:
Provider=MSDASQL.1;Persist Security Info=False;Extended 
Properties="DSN=Excel 
Files;DBQ=file_excel.xls;DefaultDir=\Data;DriverId=790;MaxBufferSize=2048;PageTimeout=5;" 
Evidentemente mi sfugge qualcosa ...
Qualcuno sa darmi delle indicazioni?
grazie
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 letti regolarmente).
Questo è solo un post di solidarietà......
a me succede che, se importo più di un certo numero di righe da un foglio
excel, non riesco più a chiudere l'applicazione >:-(
Ripeto: odio excel
Salutoni
Sergio

Ripeto: odio excel
Soltanto? Io odio tutto office :-P
-- 
ciao, hal

 
Io invece mi sono preso gli insulti ... :-(
Grazie a tutti per la solidarieta'


 
Solo per testardaggine ho cercato di indagare ...
- Ho creato un file di excel con 2075 righe e vengono lette tutte.
- Aprendo il file incriminato con excel mi sono accorto che in 
corrispondenza alla 1049-1050ma riga c'e' una mutazione:
sino alla 1049ma il primo campo (cella) ha il triangolino verde che 
indica un errore; la cella contiene dei numeri e excel dice che sono 
memorizzati in formato testo.
La 1050ma non riporta errori e viene infatti letta come Null quando 
tento di importarla!
- ho provato in un altro file e se inserisco in una cella dei numeri, 
vengono letti come null!!! (Feature???)
Quindi il problema di questo foglio e' che alcuni dati numerici sono 
stati inseriti su celle che erano state precedentemente formattate come 
testo e vengono lette come campi di testo.
Da una certa riga in poi la formattazione come testo non c'era piu' ed i 
numeri introdotti excel li considera come numeri, ma il driver dati li 
considera come Null!!!
Qualche altro suggerimento ...


 
A quanto pare si tratta di un baco.
Questo riferimento e' a DAO, ma a quanto pare anche ODBC e ADO ne sono 
affetti ...
http://support.microsoft.com/default.aspx?scid=KB;en-us;q194124
:-(

Newsgroup: it.comp.lang.visual-basic
Titolo: ?]chekbok change

Salve a tutti!
Sapete dirmi quale evento sopperisce "change" nella chekbox visto che non
c'č ed il validate non č idoneo nč tantomeno il click?
grazie joe

 visto che non c'è ed il validate non è idoneo nè tantomeno il click?
Il click non è idoneo?

c'č ed il validate non č idoneo nč tantomeno il click?
Cosa c'e' che non va nel click?
-- 
ciao, hal

> Cosa c'e' che non va nel click?
In pratica devo visualizzare dei text box quando il cekbox e' 1
ossia quando scorro dei dati latti da un file  se i vari cek sono attivi
cioe' = 1  (sono molti) devo visualizzare una relativa textbox affiancata ma
non volevo usare un for next in quanto mi rallenta troppo il processo e
appunto se ci fosse un cange .....!
ciao grazie

 appunto se ci fosse un cange .....!
Innanzi tutto non ci fossero tutti questi orrori ortografici e grammaticali
:-(
Da quello che credo di aver capito (ma hai riletto prima di spedire?)
dovrebbe bastarti un
Private Sub Checkbox1_Click()
       TextBoxPincoPallo.Visible = (Checkbox1.Value = vbChecked)
End Sub
Se invece vuoi avere un rapporto automatico tra CheckBox e TextBox,
puoi ricorrere a due array di controlli, i cui indici siano reciprocamente
corrispondenti: al check(0) corrisponde il text(0), al check(1) corrisponde
il text(1)
e cosi' via. Il codice diventerebbe una cosa del genere:
Private Sub Checkbox1_Click(Index As Integer)
       TextBox1(Index).Visible = (Checkbox1(Index).Value = vbChecked)
End Sub
--
hth, hal
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi Vb5!!

Sto sviluppando un progetto di una applicazione gestionale insieme a altri
colleghi.
Abbiamo iniziati lo sviluppo su una macchina NT4 server nel loro ufficio.
Quando porto il progetto sul mio Vb5 con Win'95 non funziona piu' niente mi
da' errori di controlli non registrati e addirittura ultimamente mi dice
anche che non riconosce funzioni tipo STR e MID!!!!
Naturalmente dall'altra parte funziona tutto perfettamente...
Io sono un po' disperato e sto pensando di installare qui da me NT
workstation, magari la situazione migliora (o peggiora???).
Se c'e' qualche anima buona che ha avuto i miei stessi problemi e'
graditissimo un consiglio per vedere di risolvere questa situazione che sta
diventando veramente frustrante, anche perche' il progetto in Vb viene
bene, ma si puo' far funzionare solo sulla macchina dei miei colleghi!!!!
La mia configurazione e' la seguente:
P150 Intel
Mother board Intel ATX
32 Mb Edo Ram
Hd Quantum Fireball 2.5 Gb
Win '95 ORS2 (Settembre '96)
E' possibile contattarmi oltre che sul NG del Vb anche al mio indirizzo
mse...@italway.it
Grazie in anticipo a chi mi puo' dare una mano.
Marco Selmi

 scritto nell'articolo
<01bc9a08$64038760$0100007f@marco>...


Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco queste ocx

Qualcuno mi puņ aiutare cerco queste ocx per far andare un programma
-Progressbar.ocx
-comdlg32.ocx
-mscomctl.ocx
Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Errore 3159: segnalibro non valido

Scusate per il disturbo e lo spreco di banda, ma questa volta sto davvero
per uscire 'insanus'...
Circa un anno fa ho consegnato un programma per la gestione di un magazzino,
tutto e' filato *quasi* liscio (soliti piccoli problemucci e
personalizzazioni varie), fino a tre settimane fa, da allora il pgm si
comporta in modo strano: ogni tanto raddoppia gli articoli inseriti nelle
fatture, apparentemente senza criterio.
Controllando il database, sviluppato direttamente da codice VB, tanto il
Visual Data Manager quanto Access 97 mi generano l'errore 3159: Segnalibro
non valido!
Ma io 'sto segnalibro non lo uso per niente, ho riparato l'archivio
(rigenerato ex-novo e ripristinati i dati con un barbaro copia da tabella
difettosa --> incolla in notepad --> copia da notepad --> incolla in nuova
tabella per essere certo di non portarmi dietro materiale difettoso) e l'ho
riconsegnato, tempo 3-4 giorni e l'errore si e' ripresentato...
Mi (e vi) chiedo, ma e' il mio programma ad incasinare tutto o puo' essere
qualche libreria che ha iniziato a non funzionare correttamente?
Cercando su deja ho trovato dei messaggi su database access che dicevano di
installare il file jetcomp.exe, avete notizie su cosa possa essere e se
realmente valga la pena installarlo?
Scusate ancora per la lunghezza, ecco le caratteristiche del sistema:
VB5, win 95 in ambiente di sviluppo, win 98 in ambiente di utilizzo.
Ciao.


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

iniziali.
'maronn, devo essere completamente uscito di testa, non avevo assolutamente
visto la tua risposta ed ho postato un messaggio dove indicavo di avere
trovato (forse) la causa, ma che ignoravo (ed ignoro tuttora) la soluzione!!
Scusa infinitamente se non ho risposto a te, ho cominciato un altro thread
in maniera completamente inutile e folle!!!
Se vuoi leggerlo il titolo e' praticamente lo stesso di questo
[?2] Errore 3159: di nuovo...
cosi' chiudiamo questo thread sfigato e, se vuoi, portiamo avanti l'altro.
Scusate tutti per il mio pessimo comportamento, ma complice il caldo e
l'esaurimento da VB+Win ormai ragiono peggio di un troll in forma
smagliante!
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] un aiuto per Usercontrol e le sue propietà

esempio) come posso fare ?
Devi usare l'istruzione Enum
Esempio:
Nella sezione Generale dell'usercontrol
public enum BellezzaFilm
    Belli = 0
    Bellissimi = 1
    Totò = 2
end enum
dim Voto as BellezzaFilm
per la proprietà in questione:
Public Property Get Voto() As BellezzaFilm
'icche tu ci voi mettere
End Property
Public Property Let Voto(ByVal vNewValue As BellezzaFilm)
'icche tu ci voi mettere
End Property
Ciao
Daniele

questo NG
Posso sapere perchč?
Ciao
Daniele
Newsgroup: it.comp.lang.visual-basic
Titolo: modificare forma del form

Salve, volevo riuscire a modificare la forma dei form, per esempio fare gli
angoli arrotondati, però non so da dove iniziare, potete darmi qualche
dritta o magari fornirmi un link con una spiegazione dettagliata? Su google
trovo solo riferimenti a .Net e io utilizzo VB 6.
Grazie in anticipo
-- 
Un giorno le macchine riusciranno a risolvere tutti i problemi, ma mai
nessuna di esse potrà porne uno [Albert Einstein]
----------------
Linux User 345321 @ Linux Machine 237497

 6.
Sul Sito Comune di questo NG
http://www.it-lang-vb.net/download.asp?file=http://www.it-lang-vb.net/Archiv
io/Binari/FormIrregolari.zip&ID=59
(non provato, OCX senza sorgente)
http://www.it-lang-vb.net/download.asp?file=http://www.it-lang-vb.net/Archiv
io/Sorgenti/finroton.zip&ID=8
(non provato, con sorgente)

Io lo uso da tempo:
www.byalexv.com/VBSFC.html
oppure cerca "VB Shaped Form Creator" su google
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO urgente su CR6

Prima di tutto grazie a chiunque riesca a darmi una mano, il problema è
il seguente:
Ho installato CR6 ho costruito un report e l'unica cosa che sono
riuscito a fare è aprire il report staticamente. Ho la necessità di
filtrare dinamicamente il record, come diavolo faccio ?
Da quel poco che si capisce sul manuale di CR (fatto malissimo a mio
parere) sono riuscito ad aprire il report con l'oggetto CRPEAuto.Report
più o meno così :
Dim CrReport AS CRPEAuto.Report
Dim CrApp As Application
...
CrReport.Preview
Come faccio a cambiare l'SQL dinamicamente (sono disperato) 
Grazie
Michele

Dim CrApp As Application
Scusa ma non conosco la versione 6 di Cristal uso ancora 4.6, ma non esiste
un ocx specifico da usare per la connessione ai report  come per la vesione
da me usata ?
e fare Crr.selectionformula ecc..
Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: [urgente] [?] valore in "long" di "true"

la seguente api:
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal
lpExistingFileName As String, ByVal lpNewFileName As String, ByVal
bFailIfExists As Long) As Long
mi richide il valore o di true o di false in long.
qlc sa dove posso trovare una lista dei flag?
tnx č piuttosto urgente
--
Ciuaz©,
H0m3r S1mps0n     
h0m3r_...@iol.it
----------------------------------------
Free shell, bot permessi, e 5 processi in backgound(!) clicca qui:
http://7.ebsd.com/z/e?acct=hackzx
----------------------------------------
Fuck the FreeConnect [Not 4 All]



tnx č piuttosto urgente
Long(Boolean) č -1, o cumunque <>0.
Passagli pure True o False.
Ci pensa VB a convertire.
Ciao

 Ci pensa VB a convertire.
non va...
ma riprovo..


ma riprovo..

chiamato la funzione API, e' l'unico modo di capirci qualche cosa.
Alcuni dicono sia meglio usare la GetLastError().
Sinceramente non ne ho mai fatto ricorso.
Ciao

 chiamato la funzione API, e' l'unico modo di capirci qualche cosa.
e come faccio?
grazie.
--
CiuazŠ,


 Sinceramente non ne ho mai fatto ricorso.
che differenza c'č?
potete spiegarmene l'uso?
grazie.
--
CiuazŠ,


> chiamato la funzione API, e' l'unico modo di capirci qualche cosa.
Rispondo anche all'altro post: in teoria la err.lastdllerror è un wrapper
dell'api GetLastError().
Il fatto è che essendoci VB tra la GetLastError() e la err.lastDllError,
quest'ultima "potrebbe" non riportare il valore esatto.
Ir risultato di queste comunque è il codice di errore riportato da una
chiamata a dll se questa fallisce.
Ma a quanto sembra tu non riuscivi neanche a chiamarla.
Ciao

 Ma a quanto sembra tu non riuscivi neanche a chiamarla.
esatto :-(
--
Ciuaz©,


ho risolto grazie al tuo primo consiglio,
gli ho passato True
ed ha funzionato... tnx
--
Ciuaz©,


tnx č piuttosto urgente
Passagli 1 (uno)
Ciao
Aldo

Ooops, non avevo visto l' altro thread ...
Scusate :(
Ciao
Aldo

o true o flase, ma l'api mi chiede un long!!!
]zac[
Newsgroup: it.comp.lang.visual-basic
Titolo: Codice SQL

Sto sviluppando un'applicazione  che lavora con un database su SQL (uso una
connessione ADO)  ed ho necessità di inserire un campo (che chiamerò codice)
che sia univoco e di tipo alfanumerico. Vorrei trovare un modo efficiente
per avvertire l'utente al momento dell'immissione del codice (quando vengono
salvati i dati inseriti nel form di immissione) se il codice immesso è già
presente nel database.
Non vorrei dovere scandire tutto il database per confrontare il codice
immesso dall'utente con tutti i codici presenti nel database. Si può fare in
modo che SQL restituisca un errore (intercettabile)  se si cerca di salvare
un campo alfanumerico duplicato?
Tra l'altro ho il dubbio che su SQLnon si possa definire come univoco un
campo alfanunerico, ma solo degli indici numerici (però di questo non sono
sicuro).
Se qualcuno può darmi una dritta....

 wrote in message
8096vo$226u$1...@stargate1.inet.it...


Puoi definire un campo univoco con incremento automatico solo se numerico;
però se non è a incremento automatico puoi creare qualsiasi indice, numerico
o alfanumerico che sia; puoi creare indice univoco anche composto da X
campi.
Sicuramente segnala errore se tenti di duplicare un campo univoco, ma non ho
mai provato a gestire gli errori in inserimento dati sql.
Se metti un on error e sei sicuro che l'unico errore che può capitare è
quello allora è fatta (però non è sicuramente la strada migliore, può
esserci p.e. la rete bloccata).

Supponiamo che il tuo campo univoco si chiami PIPPO e la tua tabella
PLUTO (che fantasia, eh??)
Allora il test e' semplice: ti apri un recordset temporaneo con questa
query:
SELECT COUNT(PIPPO) As NumPippo FROM PLUTO 
WHERE PIPPO = <qui ci metti il codice da verificare>
Questa query ti restituisce una tabella con un solo record avente un
solo campo NumPippo che contiene il numero di ricorrenze presenti
nella tabella... ovvio che se tale numero e' 0, allora il codice non
esiste e lo puoi tranquillamente inserire.
Se la query deve essere su piu' campi, basta complicare leggermente la
condizione WHERE. NOTA nel caso in cui il tuo codice univoco sia
alfanumerico, ricorda i doppi apici!!!
Ciao!
Luca Menegotto.


 wrote in message
8096vo$226u$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Acquisizione dati da DB3

Ciao a Tutti !!
Vorrei sapere come si può fare una procedura che acquisisca un file in
formato DBF (DB3) e lo accodi ad una tabella Access 97.
Aiutatemi ???
--
Solo risposte sul news



Basta allegare la tabella DB3 sul database Access.
Poi la tabella allegata è accessibile da VB come una qualsiasi tabella
Access (solo con istruzioni SQL tipo Select, Update, Delete etc..)
Se ti serve accodare i dati una tantum, basta una query Access di
accodamento, sempre dopo aver allegato la tabella DB3.
Fabrizio Filippini

Puoi essere più chiaro ???
Inoltre io vorrei fare il tutto senza Access 97.
Ciao

Ciao
per collegare una tabella DB3 in un DB ACCESS
Public Sub ConnessioneDB_III(TabOrigine As String, _
                            Percorso_Origine As String, _
                            dbDestinazione As String, _
                            TabDestinazione As String, _
                            Percorso_Destinazione As String)
    On Error GoTo Gest_Errori
    Dim db As Database
    Dim Td As TableDef
    Set db = DBEngine.OpenDatabase(Percorso_Destinazione & "\" &
dbDestinazione)
    Set Td = db.CreateTableDef(TabDestinazione)
        Td.Connect = "dBase III;DATABASE=" & Percorso_Origine
        Td.SourceTableName = TabOrigine
        db.TableDefs.Append Td
    db.Close
    Exit Sub
Gest_Errori:
    If Err.Number = 3012 Then
        db.Execute "DROP TABLE " & TabDestinazione
        Resume
    Else
        MsgBox "Connessione non completata, dati errati", , "Connessione DB
III"
        db.Close
        Exit Sub
    End If
End Sub
Senza ACCESS Perň credo tu debba crearti tutto il DBase (VEDI createdatabase
nell'help)
Newsgroup: it.comp.lang.visual-basic
Titolo: Scusate la mia ignoranza

Sono un neofita un aiuto ????
con un metodo EXECUTE su un database immetto un nuovo record
c'e' un metodo per pescare il valore ID corrispondente a questo record in un 
tabella di Access
grazie mille.
PS gran bel newsgroup

 record in un tabella di Access
Con ADO:
SELECT @@IDENTITY FROM Miatabella...
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

scusa se insisto ma uso DAO

 scusa se insisto ma uso DAO
Provala comunque, non so se possa funzionare, ma ad occhio dovrebbe essere
una normale select.
Altrimenti se sei in singolo utente puoi fare una "select
Max(campocontatore) from tabella"
-- 
DBMS Firebird
VB6 + Ado

"Andrea" <nos...@invalid.invalid> ha scritto nel messaggio 
news:3655r968sou2$.10f63b2c7bpu6$.dlg@40tude.net...

Sono in ambiente multiutente e su msdn non trovo nulla su IDENTITY
help i need your help (beatles) 

 Sono in ambiente multiutente e su msdn non trovo nulla su IDENTITY
Praticamente non ricordo DAO, ma una normale select come la fai?
Hai comunque oggetti recordset ecc.
Allora prova a lanciare quella.
Con Ado:
Dim Cn as adodb.connection
Dim Rs as adodb.recordset
set Cn=New adodb.connection
Cn.Open
Set rs=new adodb.recordset
Set rs.activeconnection=Cn
Rs.source="SELECT PIPPO FROM TABELLA"
e in questo caso
rs.source="SELECT @@IDENTITY FROM TABELLA"
rs.open
msgbox Rs(0).value
rs.close


"Andrea" <nos...@invalid.invalid> ha scritto nel messaggio 
news:eqyfov0otgg7$.1mkly2r59mlwm.dlg@40tude.net...

Provo al volo comunque grazie 1.000.000.000ecc.ecc. 

"Andrea" <nos...@invalid.invalid> ha scritto nel messaggio 
news:eqyfov0otgg7$.1mkly2r59mlwm.dlg@40tude.net...

Sembra che funzioni siete grandi, insostituibili, unici, impareggiabili. 
grazie 

 grazie
Ma LOL...;)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Servizi NT con VB

E' possibile fare un servizio NT con VB5?
Uno di quei servizzi attivi anche senza fare il Logon?
Se si, qualcuno l'ha mai fatto? Qualcuno sa come fare?
Grazie a tutti
--
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

Se si, qualcuno l'ha mai fatto? Qualcuno sa come fare?
Prova a guardare qui:
http://vb.duke.net/howto/service.html
Buona Pasqua!

E' possibile fare un servizio NT con VB5?
su 
http://vb.duke.net
 trovi del materiale. Questo sito e' citato
nell'articolo MSDN "Creating an Agent NT Service with VB".
Con minor fatica, forse, puoi provare ad usare l'utility SrvAny.exe del
Resource Kit in grado di lanciare qualsiasi programma come servizio.
Dovrebbe essere disponibile sul sito MS (che ha reso disponibili alcune
parti del RK), se non hai il RK o un abbonamento MSDN pro o univ.
Ciao
Gian Michele Bertoni
homepage: 
http://space.tin.it/computer/gbertoni
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report

Salve a tutti,
qualcuno conosce un esempio per usare il Crystal con il Print Engine ??
Ho dato una rapida occhiata al vecchio help di Vb 4, e volevo sapere se
quando chiamo un report mi devo costruire la query con il linguaggio del
Crystal
Grazie a tutti



Newsgroup: it.comp.lang.visual-basic
Titolo: idea su barcode...

Devo sviluppare una applicazione che fa uso di barcode... volevo delle
delucidazioni... su:
1) come in effetti funzionano
2) che tipo di codice è il migliore (ho letto di codici bidirezionali)
3) sono facilmente gestibili?
4) altro....
Ciao grazie
max

3) sono facilmente gestibili?
Si sono facili da gestire:
La decodifica e' fatta dal lettore tu devi solo recuperare i dati in seriale
o se in emulazione di tastiera non devi fare nulla
Guarda gli esempi sul sito comune per le stampe. In ogni caso se ti procuri
qualche libro sull'argomento anche la codifica da zero non e'
particolarmente difficile
Ciao stefano

4) altro....
Buon lavoro

Newsgroup: it.comp.lang.visual-basic
Titolo: Riconoscere il sistema operativo...

Salve a tutti...
Mi piacerebbe fare un programmino che riconosca il sistema operativo
utilizzato... (Windows 95, 98, ME, 2000, XP Home, XP Prof, NT)...
So che esistono due funzioni GetVersionEx e GetVersion... ma come le posso
utilizzare per ottenere un riconoscimento stabile?
Grazie a tutti...

Il 05/01/2004 15.58, Tempesta forte scrisse:

http://vbnet.mvps.org/index.html?code/helpers/iswinversion.htm
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

utilizzare per ottenere un riconoscimento stabile?
Sul newsgroup ed in rete ci sono molti esempi, alcuni ben fatti, altri
meno: non so come stai usando tali funzioni.
Cosa intendi con "riconoscimento stabile"?
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Microsoft

Spulciando nel sito della microsoft ho visto che sarebbe interessante
provare vari software in versione trial 30 o 60 giorni , magari prima di
acquistarli ...
In America , facendo una semplice richiesta online è possibile farsi spedire
dei CD o DVD con questi software trial .
In Italia come posso fare per averli ? A chi mi devo rivolgere ?
Grazie

 ha scritto nel
messaggio news:igO0b.253426$
Ny5.7...@twister2.libero.it


 ha scritto nel messaggio
news:bi0ekf$40c2o$1...@ID-61006.news.uni-berlin.de...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: Quesito excel

Buonasera,
Ringrazio quanti potranno aiutarmi.
Ho due fogli di excel, in uno un elenco di 1200  nomi , indirizzi e un
codice numerico di riferimento (8 cifre).
Nell'altro foglio per es.: 938  codici di riferimento con a fianco delle
date.
E' possibile in qualche modo far coincidere i codici di riferimento con le
date con i loro codici corrispondenti
nel primo foglio?
Ho provato spulciando tutte le funzioni di excel ma on ne ho cavato piede.
Potete aiutarmi?
Grazie.
Raban

 E' possibile in qualche modo far coincidere i codici di riferimento con le
date con i loro codici corrispondenti nel primo foglio?
La risposta e` sicuramente positiva ma non e` chiaro dalla tua esposizione
come tu voglia ottenere il risultato. Il mezzo consiste nell'uso di una o
piu` funzioni della categoria "Ricerca e riferimento", il come dipende da
dove vuoi che tali risultati appaiano. Per esempio:
Foglio1
A1: Nome
B1: Indirizzo
C1: CNDR
A2: Paolino Pippo
B2: 12345 PAPEROPOLI DL, Via della Sfiga 13
C2: 12345678
A3: Paperon De' Paperoni
B3: 12345 PAPEROPOLI DL, Largo Deposito 1
C3: 87654321
Foglio2
A1: CNDR
B1: Data
A2: 86754321
B2: 01/01/2001
I dati di Foglio1 relativi al codice in Foglio2!A2 potresti ottenerli con
formule che facciano uso combinato delle funzioni:
    CONFRONTA(valore;matrice;corrisp)
    INDICE(matrice;riga;col)
Per esempio il valore di "Indirizzo" relativamente al "CDRN" in Foglio2!A2
lo potresti ottenere con una formula del tipo:
    =INDICE(Foglio1!$A:$C;CONFRONTA(A2;Foglio1!$C:$C;0);2)
Ma se tu riorganizzassi Foglio1 in questo modo:
A1: CNDR
B2: Nome
C3: Indirizzo
ovvero con quello che hai chiamato "Codice di riferimento numerico" posto
nella prima colonna dell'elenco, allora potresti usare, piu` semplicemente,
la funzione:
    CERCA.VERT(valore;matrice_tabella;indice;intervallo)
per esempio, cosi`:
    =CERCA.VERT(A2;Foglio1!$A:$C;3;FALSO)
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DAO - Proprietà tabella

Ciao a tutti
Avrei bisogno di modificare una proprietà di una tabella Access2000, ma 
non riesco a capire come fare.
Pensavo di usare l'oggetto TableDef, ma (sembra che) non accede alle 
proprietà di cui ho bisogno.
Io ho bisogno di modificare quelle proprietà che saltano fuori facendo 
click di destra - proprietà sulla finestra della struttura di una 
tabella, e in particolare la proprietà "Nome Foglio Dati secondario".
Qualcuno ha un'idea di come fare?
Grazie, ciao

 ha scritto nel messaggio
news:bnt939$15qe7v$1...@ID-184808.news.uni-berlin.de...

che prove hai già fatto? ci sto giusto lavorando tra ieri e oggi con DAO e
ADO, magari ti sono d'aiuto. così a occhio, otteni un riferimento TableDef
alla tabella che vuoi, poi prova a ciclare l'insieme Properties, facendoti
visualizzare il nome di ogni proprietà......
magari la trovi lì!!
good coding!!!
-- 
Alletun
Sorry, ask me if you want to get my e-mail!

 Grazie, ciao

 visualizzare il nome di ogni proprietà......
Beh, questa è stata la mia prima preoccupazione, prima di scrivere qui :)
Ciao

 un'aggiunta dell'applicativo Ms Access...
Spero di no, perchč a quanto pare questa proprietą incide sulle 
prestazioni del DB.
Per questo volevo eliminarla da tutte le tabelle.
Ciao

[*Zanna* = 
znt....@virgilio.it
 in
news:bnt9vo$15qe7v$
3...@ID-184808.news.uni-berlin.de
] ha scritto:

Ora mi incuriosisci...
Puoi citare qualcosa della guida o di MSDN che la cita? Con che nome
(inglese, suppongo)?
Io, allo stato, non saprei dove cercarla...

 Io, allo stato, non saprei dove cercarla...
In realtà non sapevo nemmeno della sua esistenza.
E' stato un cliente "tocchino" che ci ha detto che togliendo quella 
relazione il programma girava più velocemente.
E ora stiamo facendo delle prove.
Per la cronaca credo di aver trovato: non è una proprietà standard, ma 
viene aggiunta alla TableDef solo quando da access selezioni una tabella 
"relazionata".
Le proprietà create sono:
TableDef.Properties("SubdatasheetName")
TableDef.Properties("LinkChildFields")
Ciao

 Ciao
ciaociao

Nel mare di messaggi non letti ho visto che Zanna ha scritto:
Mi introduco con un [OT]!
Ti ho rispo in mail privata se non ricevi ancora (stavolta ho inviato da
jumpy!)
passa in negozio o chiama alla JOKER SRL e chiedi di Alessandro.
-- 
Alex
"Fare programmi oggi e' una corsa fra gli ingegneri del software che si
sforzano di sviluppare programmi migliori e a prova di idiota, e
l'Universo che si sforza di produrre idioti sempre piu' grossi. Per ora
l'Universo sta vincendo." (Rich Cook)
Posted from X-Privat Free NNTP server - 
www.x-privat.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Database in VB6

Potete dirmi cosa sbaglio in questa istruzione?
 Le ho provate tutte, ma continua a darmi errore
dato = "Spese varie"
Set rds = db.OpenRecordset("SELECT * FROM pippo  WHERE cayegoria  LIKE
" & dato &  ";")
Sbaglio forse nel non mettere qualcosa per delimitare l' inizio e la
fine della variabile dato ? Ho provato con ' ma mi da errore.
potete spiegarmi come impostarla correttamente?
Ringrazio, Gianni

 " & dato &  ";")
Mancano gli apici:
Set rds = db.OpenRecordset("SELECT * FROM pippo  WHERE cayegoria  LIKE '" & dato &  "' ;")
---
News2000 1.0b Beta tester version 
http://socket2000.8m.com

 potete spiegarmi come impostarla correttamente?
prova cosi'
dato = Chr$(34) + "Spese varie*" + Chr$(34)
Set rds = db.OpenRecordset("SELECT * FROM pippo  WHERE cayegoria  LIKE " &
dato &  ";")
ma c'e' anche la "cayegoria" che forse e' "categoria"
o e' un refuso di copiatura?
Saluti
Roberto

 Ringrazio, Gianni


Se continua a darti errore prova pure a togliere il ";" , non so se funziona
con, ma funziona sicuramente senza
Ciao,
Fabrizio

Newsgroup: it.comp.lang.visual-basic
Titolo: API per cestino

Quale è l'API per spostare file nel cestino?
--
Katred
SUPREME FIDDer #10, The Creator
(WebMaster Gruppo 2)

>Quale è l'API per spostare file nel cestino?
Ecco il codice di esempio da copiare in modulo:
.........................................................................
Option Explicit
Private Type SHFILEOPSTRUCT
  hwnd As Long
  wFunc As Long
  pFrom As String
  pTo As String
  fFlags As Integer
  fAnyOperationsAborted As Boolean
  hNameMappings As Long
  lpszProgressTitle As String
End Type
Private Declare Function SHFileOperation Lib "shell32.dll" Alias _
  "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Private Const FO_DELETE = &H3
Private Const FOF_ALLOWUNDO = &H40
Private Const FOF_NOCONFIRMATION As Long = &H10
'// ===========================================
Public Function DeleteToRecycleBin(ByVal a_strFullPathName As String, _
                            ByVal a_flgAskForConfirmation As Boolean _
                            ) As Long
 
    Dim fo As SHFILEOPSTRUCT
 
    With fo
        .wFunc = FO_DELETE
        .pFrom = a_strFullPathName
        If (a_flgAskForConfirmation) Then
            .fFlags = FOF_ALLOWUNDO
        Else
            .fFlags = FOF_ALLOWUNDO Or FOF_NOCONFIRMATION
        End If
    End With
    DeleteToRecycleBin = SHFileOperation(fo)
 
End Function
 
........................................................................
questa e' la sub da chiamare dall' immediate window per provare
Public Sub Test()
    Debug.Print DeleteToRecycleBin("I:\Temp\Tabetipo.dat", True)
End Sub
ovviamente il nome di file e' da sostituire con uno esistente sul proprio pc, 
mentre il flag True/False consente o inibisce la richiesta di conferma
all' utente.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini e maschere!

Salve a tutti
Il problema che devo risolvere e questo.
Ho due immagini bmp che dovrei inserire in due pictureclip. Una conterrebbe
l'immagine vera e propria mentre l'altra una immagine che serve a fare da
maschera alla prima. In pratica la seconda consente di visualizzare solo
l'oggetto ed eliminare tutto il resto (bordo bianco).
Come posso fare per realizzare una cosa del genere? Ho scoperto che esistono
delle api (trasparentblt mi pare) ma funziona solo su NT. E comunque senza
disturbare le api come potrei fare?
Grazie a tutti!
DD

Dovrebbe bastare PaintPicture con l' opzione raster adatta.
Vedi un po' sull' help perche' non mi ricordo mai, e' l' ultimo parametro.
Ciao
Aldo

DD ha scritto nel messaggio ...

Cerca sull'MSDN "Bitmap Transparent" e "Bitmap Transparency". Ci troverai
anche degli esempi VB (più o meno complessi).
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: libro

Ciao a tutti,
mi sto lentamente avvicinando al mondo del Visual Basic.
Potreste per favore darmi un consiglio su quale libro sia meglio acquistare per un semi principiante (ho fatto qualcosina in C a livello universitario, ma niente di trascendentale).
Ho visto le recensioni sul Sito Comune (a proposito: complimenti!), ma si parla bene di parecchi libri e non so quale scegliere.
Ringrazio anticipatamente tutti coloro che mi aiuteranno.
Ciao
Gordon
------------------------------------------------------------
--== Sent via Deja.com ==--
http://www.deja.com/
-- 
Posted from [62.122.10.164] by way of 
mail15.bigmailbox.com
 [209.132.220.46] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ringrazio anticipatamente tutti coloro che mi aiuteranno.
dai un'occhiata sil Sito Comune
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Grazie per la risposta, ma forse non mi sono spiegato bene: ho gia' guardato sul Sito Comune, tuttavia per principianti (perche' di questo si tratta) ci sono parecchi titoli con buone recensioni, sicche' non so cosa scegliere.
Di conseguenza chiedevo un suggerimento al NG.
Se puoi darmi una dritta ti sarei grato. A presto!
Gordon
------------------------------------------------------------
--== Sent via Deja.com ==--
http://www.deja.com/
-- 
Posted from [195.223.241.55] by way of 
mail1.bigmailbox.com
 [209.132.220.32] 


 Moreno
???????????
Ciao VB

^^^^^^^^^^^^^^^^^^^^^^^^^
eh eh... ;-PPP
Visto cosa vuol dire non leggere attentamente i post??? ;-P
La decisione finale spetta a te: le recensioni ti aiutano dandoti un giudizio (soggettivo) ed una
descrizione dei cntenuto (oggettiva); in base a queste solo tu sai esattamente cosa vuoi ottenere e,
cosa più importante, quale metodo di trattare un argomento ti riulta migliore, più semplice, più
efficace. Quindi usa il SC per scegliere i 2-3 libri che secondo te possono fare al caso tuo (visto
che diversi trattano più o meno gli stessi argomenti), quindi fai un salto in libreria e prova a
leggere un passo, per vedere se ti risulta comprensibile, se ti piace come scrive l'autore e se il
metodo di apprendimento suggerito dal testo può fare al caso tuo.
Questo passaggio si potrebbe forse evitare avendo a disposizione non solo l'opinione personale del
recensore ma anche da altri: invito quindi a contattare il WebMaster del Sito Comune per commentare
i libri recensiti (i moduli non funzionano ancora...)

Newsgroup: it.comp.lang.visual-basic
Titolo: DLL ActiveX & segmentazione eseguibili.

Semplicemente una grossa questione:
Un mio grosso problema ( ma anche quello di molti alri postanti ->
vedi Sigma, ecc.) è quello della segmentazione di grossi eseguibili in
moduli più piccoli e gestibili. 
Questo dovrebbe essere uno di quei classici problemi che comunemente
vengono definiti "architetturali",  no? Qualcuno potrebbe indicare a
tutti gli interessati dove poter reperire informazioni utili alla
questione? Dove si può trovare qualche esempio? Sul sito comune c'è
qualcosa?
Grazie!
Giuseppe
P.S. Ah, dimenticavo, cosa si intende per compatibilità binaria tra
controlli ActiveX?
Giuseppe

 wrote in message
3aa1184a...@news.tiscalinet.it...


 Lorenzo
Ho fatto una prova e il mio eseguibile di 2.8Mb è diventato 1.6Mb ed
è anche più veloce a compilarlo.
Volevo però sapere se c'è una possibilità che il programma
venga decompilato e/o crakkato e se la velocità di esecuzione
rimane la stessa.
Grazie e ciao
Sir Jo


Ok. Ma se (non vado per ipotesi ma è il mio caso concreto) compilo già l'EXE
in P-Code e arriva a una dimensione di 12-13 Mb (ma è in continua
evoluzione) e utilizzo già una ActiveX DLL compilata in codice nativo di 8
Mb, cosa faccio? Riallacciandomi al quesito posto all'inizio del post, il
problema della segmentazione di grossi eseguibili in moduli più piccoli e
gestibili non dovrebbe essere uno di quei classici problemi che comunemente
vengono definiti "architetturali",  no?
Mi pare non ci siano una grossa disponibilità di informazioni in giro... a
quanto pare per chi sviluppa, come nel caso della ditta per cui lavoro,
interi gestionali per aziende in VB... ma gli altri linguaggi di
programmazione sono + avanzati? come risolvono questo problema?
ciao a tutti
Davide

 ha scritto nel messaggio
news:ta6hj82...@corp.supernews.com...



Prima fonte di informazione: MSDE cerca sotto ottimizzazione e poi
Applicazioni segmentate, ti allego l'inizio giusto per darti un'idea:
Applicazioni segmentate
Con Visual Basic è possibile considerare l'architettura di un'applicazione
in termini nuovi. Anziché un unico eseguibile di grandi dimensioni, è
possibile scrivere un'applicazione costituita da un eseguibile principale
front-end supportato da vari componenti ActiveX. Questo approccio offre vari
vantaggi significativi in fatto di ottimizzazione:  etc etc etc
Ciao VB


Per quanto riguarda la velocità di esecuzione in teoria il P-Code è più
lento in quanto durante l'esecuzione il P-Code deve venire tradotto in
codice nativo senza poter sfruttare le eventuali ottimizzazioni, per quanto
riguarda la sicurezza, non credo che con un semplice editor si possa
decompilare il programma forse con qualche strumento più avanzato è
possibile.
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb2005] dove finisce un programma pubblicato

Ciao a tutti, quando installo su un pc un programma di cui
ho creato la pubblicazione da vb2005, questo dove finisce?
non mi trovo il file EXE da qualke parte...
Lo chiedo anche perchè non vorrei che un programma
installato su un pc di un cliente possa poi essere 'rubato'...
Grazie,
Pusky re delle rane ladre... 

 non mi trovo il file EXE da qualke parte...
Prova a leggere questo:
http://www.microsoft.com/italy/msdn/risorsemsdn/netframework/clickonce.mspx
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 
http://www.microsoft.com/italy/msdn/risorsemsdn/netframework/clickonce.mspx
Grazie Vitriol, ho dato giusto una lettura veloce ma ora ho le idee
un po' più chiare.
Saluti.
Pusky re delle rane

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi installazione Sql 2000

Ciao, a tutti.
Sto installando SQL 2000 su pc con XP PRO SP1.
No si avvia SQL SERVER.
Si è verificato l'errore 1069.
(in seguito non è stato avviato a causa di un errore in fase di accesso)
durante l'esecuzione dei questa operazione di servizio nel servizio
MSSQLSERVER.
Cosa posso fare ?

 ha scritto nel messaggio
news:cdfvbg$lmc$1...@lacerta.tiscalinet.it...

l'errore 1069 e' un errore un po' generico...
prova a verificare che l'account che esegue i servizi SQL Server e SQL
Server Agent sia corretto
saluti
-- 
Andrea Montanari (Microsoft MVP - SQL Server)
http://www.asql.biz/DbaMgr.shtm
 
http://italy.mvps.org
DbaMgr2k ver 0.8.0  -  DbaMgr ver 0.54.0
(my vb6+sql-dmo little try to provide MS MSDE 1.0 and MSDE 2000 a visual
interface)
--------- remove DMO to reply

 ha scritto nel messaggio
news:2m4v13F...@uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: associare funzione ad evento

Sono un neofita di VB e un po so programmare in access.
Per la gestione degli eventi nelle form (in access) trovavo comodo
un piccolo espediente, che non so se è possibile anche in VB.
E' il seguente: creare una function pubblica "fittizzia", nel senso
che il suo scopo non è tanto quello di rilasciare un valore,
quanto più di eseguire una serie di istruzioni contestualizzate.
Il vantaggio è che nella scheda di proprietà di un controllo di un
form,
anche selezionando più controlli (selezione multipla), posso associare
in un solo "colpo" più eventi, senza l'inconveniente di avere una
procedura associata all'evento nella classe del form, per ogni
controllo.
E' ovvio che devo creare una function in grado di gestire l'evento
indipendentemente
dal controllo che l'ha generata. Per esempio se volessi cambiare
colore
ad un controllo all'evento enter, scriverei un modulo esterno con una
function così:
    Public Function CambiaColore(ByVal intColore As Integer) As
integer
        Form.ActiveForm.ActiveControl.BackColor = intColore
        CambiaColore=0
    End Function
Nella casella dell'evento enter, scriverei:
=CambiaColore(255)
con il segno di uguale. Non mi ritrovo nessun evento nel codice della
form,
se faccio copia incolla mi porto dietro l'evento, posso usare la
selezione multipla,
se faccio delle modifiche/migliorie nella function, automaticamete le
faccio ovunque.
Penso che siano tutti bei vantaggi.
Ho provato ma non accetta funzioni negli eventi. Alternative??
Grazie, spero di essere stato chiaro.


Sei stato chiaro ma il modello ad Oggetti di VB6 è diverso, ed anch'esso
corredato di HELP come quello di Access.
Questo era sbagliato anche in Access:
    Form.ActiveForm.ActiveControl.BackColor
Così era giusto:
Screen.ActiveForm.ActiveControl.BackColor
In ogni caso su EVENTO chiama la Funzione passando il Controllo ed il
colore...
VBA e VB6 differiscono quasi in tutto nella gestione degli OGGETTI, meno
nelle funzioni generiche.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 nelle funzioni generiche.
Questa è una cosa che si avvicina a quello che chiedevo io:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click, Button2.Click
' Add event-handler code here.
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Dialogo con Porta Stampante

Buongiorno a tutti voi,
ho creato un piccolo programmino che gestisce un database acces con alcuni 
dati
da trattare e variare a piacimento. Questi dati, una volta salvati, dovrei 
inviarli
ad un dispositivo che aspetta questi parametri per funzionare, e il 
collegamento
avviene attraverso la porta stampante.
Come posso gestire il flusso dati in uscita? Come faccio ad inviarli al 
dispositivo
che pur essendo collegato alla posta stampante una stampante non č?!  :-(
C'č qualche controllo ocx ? Ignoranza riconosciuta ma sono alle prime armi o 
quasi!
Grazie per l'aiuto (se me lo darete)
Va

 Grazie per l'aiuto (se me lo darete)
prova a cercare, con google gruppi, una serie di post inviati da gbc che
spiegano come interagire con la porta parallela.
nel post il tutto era finalizzato ad accendere una lampadina, ma penso che
come base di partenza potrebbe essere comunque utile
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:gPDmd.346300$35.15...@news4.tin.it...


quasi!
Guarda questi links:
 
http://www.logix4u.net/parallelport1.htm
 
http://www.internals.com/utilities_main.htm
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Semplicemente .....Aiuto....

Estraggo un recordset da una tabella e questo e' "updatabile" con edit
Set re = db.OpenRecordset("select  * from fatture", dbOpenDynaset)
Estraggo un recordset da 2 tabelle e questo non e' "updatabile" con edit
Set re = db.OpenRecordset("select  * from fatture inner join clienti on fatture.cliente=clienti.nome", dbOpenDynaset)
PERCHE??????
Grazie per l'eventuale risposta..
-----------------------------------------------------------------
Get free personalized email from Lycos at 
http://it.lycosmail.com
--
Posted from 
rmx07.iname.net
 [165.251.8.75]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
news:9909221258...@weba7.iname.net...
