mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: cancellazione records dt una tabella

Vorrei cancellare tutti i record di una tabella e ho usato il seguente
codice che ho visto in diversi manuali :
Adodc1.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data
Source=.\BADGE.mdb;"
Adodc1.RecordSource = "delete * from ingressi "
Adodc1.Refresh
viene effettuata la riga con il REFRESH mi da errore dicendo con un form di
errore riferito ad adodc1
"l'operazione non č consentita se l'oggetto č chiuso"
se forzo la continuazione (da interprete dicendo continua + volte), il
programma continua a dare errore ma la tabella a volte viene cancellata
Dov'č l'errore?
eventualmente esiste un altro modo x risolvere ugualmente (senza cancellare
una riga alla volta, la tabella ha 100.000 recors)?
Grazie anticipatamente a tutti
Andrea

 Adodc1.Refresh
faccio parte del Comitato Contro l'Uso dei Controlli Data-Bound.
:-))
per cui togli quell'adodc1 dal form, aggiungi ADO nei riferimenti e fai
così.
Dim Arc as ADODB.Connection
Set Arc = New ADODB.Connection
Arc.ConnectionString=PROVIDER=Microsoft.Jet.OLEDB.4.0;Data
Source=.\BADGE.mdb;"
Arc.Open
Arc.Execute "delete * from ingressi"
Arc.Close
Set Arc = Nothing
risolvi tutti i tuoi problemi!!!!
good coding!!!
-- 
Alletun
"Io lo so che accadrà. La voce sussurra nei miei pensieri di Jair, Rone,
Allanon e soprattutto nelle Mortombre.
Sussurra segreti che mi sono tenuti nascosti, nella grigia oppressione
di questo giorno e nell'oscurità caliginosa di quello che mi aspetta.
Saremo distrutti. Tutti."
Brin Ohmsford - La Canzone di Shannara - T. Brooks

 Andrea
fallo da codice, e aggiorna il controllo subito dopo:
Private Sub Command1_Click()
    Dim c As New ADODB.Connection, aCmd As New ADODB.Command, sSql As String
    c.Open ("Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=mdb2003.mdb;Persist Security Info=False")
    sSql = "delete * from cens2"
    With aCmd
        .CommandText = sSql
        .CommandType = adCmdText
        .ActiveConnection = c
        .Execute
    End With
    Set aCmd = Nothing
    MsgBox "ok"
    Adodc1.Refresh
End Sub
ciao, j.

 ha scritto nel messaggio
news:c0vanm$1c3e4e$1...@ID-134521.news.uni-berlin.de...


 ha scritto nel messaggio
news:c0vbdf$1bp4bl$1...@ID-51318.news.uni-berlin.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: 2 Controlli unico evento

Salve,
Ho una Form con due bottoni che debbono fare esattamente la stessa cosa.
Mi chiedevo.....e' possibile fare in modo che all'evento click del secondo
bottone venga eseguito l'evento click del primo bottone ?
Ovviamente per risolvere il mio problema potrei semplicemente 
copiare-incollare il codice
dell'evento del primo bottone nel secondo, oppure potrei scrivermi una 
funzione public e richiamarla nei
due eventi...pero' mi e' sorta questa curiosita'.
Se ho gia' un bottone con associato l'evento click, e' possibile che allo 
scatenarsi di Button2.click() venga eseguito Button1.click() ?
 


Private Sub Command2_Click()
    Command1_Click
End Sub
O ancora meglio metti il codice che deve essere eseguito in una sub:
sub miaSUB()
    debug.print "GbC è un pirla!"
end sub
e nei buttons richiami la sub:
Private Sub Command1_Click()
    miaSUB
End Sub
Private Sub Command2_Click()
    miaSUB
End Sub
-- 
-> GbC|
www.gbcweb.com
www.chiappori.com
 


Se usi 
VB.NET
 sě.
Posto che tu abbia fatto creare la sub evento Button1_Click, basta che da 
qualche parte (es. nell'evento Load del form) scrivi: AddHandler 
Button2.Click, AddressOf Button1_Click()
Bye
Raf 


Ah, altra alternativa senza dover usare AddHandler: specificare dopo Handles 
un ulteriore evento da assegnare alla sub.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) _
  Handles Button1.Click, Button2.Click
    MsgBox("Called from " & CType(sender, Button).Name)
End Sub
Bye
Raf 

 Button2.Click, AddressOf Button1_Click()
E' anche più semplice di così,
è infatti sufficiente che nella lista degli eventi del button2 
all'evento click scegli la voce button1_click.
ciao
stefano

 all'evento click scegli la voce button1_click.
Sě ma solo da VS 2005 in su c'č questa shortcut...
Ciao
Raf 

 Raf
Ringrazio tutti per i consigli.
Siccome sono alle prime armi, non e' che avete dei link dove
viene spiegato piu' nel dettaglio l'uso di AddHandler e di AddressOf ?
Grazie ancora. 

 Sě ma solo da VS 2005 in su c'č questa shortcut...
Ah, ecco, buono a sapersi.
Infatti l'ho provato su un VS 2005.
ciao
stefano

 viene spiegato piu' nel dettaglio l'uso di AddHandler e di AddressOf ?
Con .Net? Per due controlli usa Handles imho:
Prova questo codice (fa lo spostamento con i tasti ai keydown di 3 textbox)
	Sub TxtQtaKeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles
txtBarcode.KeyDown ,txtOperatore.KeyDown
 
		If e.KeyCode   =  keys.Enter or e.KeyCode=keys.Down   Then
			Me.SelectNextControl (sender, True, True, False, True)
		Else
			If e.KeyCode=keys.Up   Then
				Me.SelectNextControl (sender, False, True, False, True)
			End If
		End If
	End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: ? controllo dell'evento incolla in una textbox

Non riesco a trovare il modo di controllare le informazioni incollate in una
textbox.
Guardando sulla MSDN ho trovato solo gli eventi DragDrop e DragOver che si
riferiscono a spostamenti di controlli, non di testo. Qualcuno puň aiutarmi?
Grazie,
    Claudio Orlandi, Firenze

 wrote in message 8tjuv9$ah8$1...@nslave2.tin.it...
: Non riesco a trovare il modo di controllare le informazioni incollate in
una
: textbox.
: Guardando sulla MSDN ho trovato solo gli eventi DragDrop e DragOver che si
: riferiscono a spostamenti di controlli, non di testo. Qualcuno puņ

:
:

Newsgroup: it.comp.lang.visual-basic
Titolo: esecuzione programma

Avrei bisogno di un aiuto per sapere se e come posso fare per eseguire un
programma (formato .exe) cliccando, per esempio, un oggetto command-botton
da un pgm. scritto in V.B.. Ringrazio fin d'ora quanti vorranno rispondere.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa in VB5

Ciao a tutti,
ho un problema riguardo la stampa in VB5. Sto creando un programma per
stampare le fatture. Quello che devo stampare e' il logo della societą in
alto a siniustra.In alto a destra il nome della societą etc...Dopodiche' gli
articoli da fatturare con accanto le relative cifre.Come posso fare?
Grazie in anticipo a tutti coloro che mi aiuteranno.
Andrea.

 ha scritto nel messaggio
news:987gpt$veq$1...@pegasus.tiscalinet.it...

Non uso piu' VB5, ma in VB6 la si puo' fare utilizzando l'oggetto Printer.
Prova.

 > alto a siniustra.In alto a destra il nome della società etc...Dopodiche'


Newsgroup: it.comp.lang.visual-basic
Titolo: VBScript: aggiungere righe ad una Select!

Salve a tutto il Newsgroup!
Devo creare per l'azienda in cui lavoro una pagina (intranet) con uno
VBScript che mi aggiunga dei dati ad una Combo Box!
In realtà sapete bene che la Combo Box di Visual Basic, in linguaggio
VBScript è una SELECT!
Bene... il problema è che io non ho molta dimestichezza con il VBScript...
ero convinto che aggiungere delle righe di dati ad una Select fosse
semplice... credevo si potesse utilizzare il metodo Additem delle cugine
Combo Box di VB, ma mi sbagliavooo!
Vi chiedo se qualcuno sa come aggiungere righe di dati ad una select... Ho
visto che la select ha il metodo Add invece che Additem, ma non
funzionaaa!!!
Grazie a tutti! Ciao ciao.
Dennis

 ha scritto nel messaggio
news:9eh7r3$p2$1...@nreadB.inwind.it...

Devi usare il tag Option (comunque è HTML non vbscript), nell'esempio
seguente hai 4 scelte di cui la prima selezionata
Ciao VB
<select name "cboScelte" size="4" multiple>
<option SELECTED>Scelta1
option>Scelta2
ption>Scelta3
<option>Scelta4
<option>Scelta5

 ha scritto nel messaggio
news:9eh8mh$200$1...@serv1.albacom.net...



credo che dovresti guardare le proprietà dell'oggetto Select
(è ben documentato nella guida)
sulla guida c'e' un esempio in javascript, ma le proprietà sono le stesse :
var oOption = document.createElement("OPTION");
oOption.text="Apples";
oOption.value="5";
document.all.MyList.add(oOption);
CiaoEnrico
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] etichette e datareport

Sto usando datareport per stampare delle etichette.
Il problema č: setto margini=0, setto le varie dimensioni, stampo, tutto ok.
Sposto su un'altra stampante e mi salta l'ultima riga.
Margini entrambi=0, eppure su alcune stampanti setta comunque un margine.
Sapete darmi qualche dritta?
Grazie in anticipo.

Margini entrambi=0, eppure su alcune stampanti setta comunque un margine.
Ogni stampante ha un proprio margine fisico, nel quale non stampa.
Qualche tempo fa' qualcuno ha detto che forse esistema un modo per
conoscerlo tramite qualche fz. API, ma fino ad ora ...
Io ho fatto una routine per fare etichette, che parte da un DB e
scrive usando direttamente l'oggetto Printer; gli si passano le
coordinate degli elementi, i campi da stampare, in numero e dimensione
delle etichette. Ma il problema del margine fisico rimane sempre!
Inoltre se le etichette sono piccole: o si lasciano inutilizzate
quelle laterali ( a volte anche quelle della prima ed ultima fila),
oppure si debbono mettere dei margini ampi a tutte le etichette, anche
a quelle interne.
ErreBi

Newsgroup: it.comp.lang.visual-basic
Titolo: File txt in fogli excel

Devo realizzare un'applicazione che trasferisce il contenuto di file di
testo (campi dati delimitati da ";") in fogli di excel pre-formati con
griglie ed intestazioni. Qual è la soluzione migliore ? Usare la libreria
di comandi di excel per importare i dati ? Oppure tramite FSO leggere il
contenuto del file di testo e copiarlo nelle celle opportune. Altro modo ?
Grazie.
Stefano
sme...@tin.it
--------------------------------
Inviato via 
http://usenet.iol.it

 contenuto del file di testo e copiarlo nelle celle opportune. Altro modo ?
Lo fa excel da solo.
Vedi "importazione di file csv" o qlc di simile nella guida di excel.
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: HTML su una form... deve essere facile!

Ciao, 
Il problema è molto semplice.
vorrei inserire la visione di un URL all'interndo di una form VB6
enterprise, meglio se senza controlli di avanti/indietro, refresh etc.
chiedo molto? mi sembra di no, ma non ci riesco!
non sono un programmatore, ma un architetto, eppure normalmente me la
cavo per tante cose. ero convinto di non impiegare + di 10 min...
ci ho perso la giornata.
DEVE ESSERE BANALE!
Ma :-( non ci riesco!
Grazie
Claudio Benghi

 wrote in message
usrt8tgg52j2566k2...@4ax.com...

Hai provato con il controllo WebBrowser (Componenti/Microsoft Internet
Control)?
ciao

se inserisci sulla form il controllo WebBrowser ed imposti:
WebBrowser1.Navigate = ("
http://digilander.iol.it/VBItalia/INDICE.html
")
la cosa dovrebbe andare a posto. Inoltre specificando un percorso sull'HD
WebBrowser ti permette di ottenere le anteprime dei files .html che
eventualmente hai memorizzate sul disco.
Ciao!
Andrea
Visual Basic Italia
http://digilander.iol.it/VBItalia/INDICE.html
info: 
vbit...@libero.it
commerciali: 
andr...@libero.it

 Il problema č molto semplice.


Andrea
Ole', Grazie, non avevo il controllo, ma l'ho trovato su MS....
Ti ringrazio infinitamente. Cla.

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6    Excel    ActiveCell

Ho gi� fatto diversi lavori combinando VB6 ed excel.
 
Questa volta mi sembra di annegare in un bicchiere
d'acqua.
 
1) Il programma VB6 comanda l'apertura di un file
    excel in modo visibile.
 
2) L'operatore sposta il cursore in una cella qualsiasi.
 
3) Da VB6 devo conoscere il valore di quella cella.
 
Sembra facile ma non ci riesco.
 
Da un paio d'ore st� provando (ActiveCell, CurrentCell ecc.) riesco solo ad 
ottenere l'errore:
Propriet� non supportata o qualcosa del genere.
 
Aiuto!
 
Grazie e saluti.
Sauro 
 
 

 3) Da VB6 devo conoscere il valore di quella cella.
 
 
Activecell.value ?

MyXL.Application.ActiveCell.Offset(0, 0).Value
 
Risolto.
 
Non troivavo questo offset
 
 Grazie e saluti.
 Sauro
Newsgroup: it.comp.lang.visual-basic
Titolo: ..visual basic e record set

grrr... allora vediamo dove sto sbagliando (sono certo che il problema č
banale ma non ci arrivo!!)
Set smesse = db.OpenRecordset("SELECT * FROM [Spedizione messaggi] WHERE
Codicesms= codesms ", dbOpenDynaset)
^^^^^^^
bene...
quel maledetto codesms
cosě come la vedete visual basic mi restutuisce...
errore di runtime 3061 parametri insufficenti previsto '1'
..bene..
se la trasformo in questo
Set smesse = db.OpenRecordset("SELECT * FROM [Spedizione messaggi] WHERE
Codicesms= '1.203230202320320230.sms' ", dbOpenDynaset)
^^^^^^^^^^^^^^^^^^^^^^^
non da alcun errore... ma io li ci devo cacciare una variabile...
xchč non gli piace ?? codesms
devo "mettere qualcosa" per fargli capire che č una variabile ??
ovviamente codesms č stato dichiarato...
please help..
roby

> non da alcun errore... ma io li ci devo cacciare una variabile...
Fantastico ...
e come speri che SQL (Standard Query Language) abbia imparato
da solo cosa vuol dire il "comando" codesms??
In 6 anni che scrivo programmi non mi sono mai accorto della
sua esistenza, quindi perchè non premi F1 e provi a leggere come
si passa una variabile ad un qualsiasi comando vb ??
Ti accorgerai che le variabile e i comandi vanno intersecati .,..
come ?? Leggilo ... io ti ho più che messo sulla giusta strada
-- 
Saluti
Andrea Moro

 ha scritto nel messaggio
news:PKVib.36204$Zh.2...@tornado.fastwebnet.it...

dim strSQL as String
dim strRicerca as String
strRicerca=codesms.Text
strSQL = "SELECT * FROM [Spedizione messaggi] WHERE Codicesms LIKE '" &
strRicerca & "*'"
P.S.
Concordo con Andrea Moro
SunRex

devo "mettere qualcosa" per fargli capire che è una variabile ??
Leggi qui:
http://www.itportal.it/developer/vb/numeri/pagina3.asp
<x:termoPilucco>

Ieri non ho più seguito il thread e per fortuna che ti sei corretto.
Non solo è uguale al php, ma è identico a tutti i linguaggi di
programmazione che almeno io conosco.
VB, ASP, Basic, PHP, SQL ...
come vedi delle basi ci devono pure essere ... e devono essere
comuni, altrimenti lametta da barba sul polso e via.
-- 
Saluti
Andrea Moro
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] PER CAPOBECCHINO... A TUTTO IL NG

Caro cugino,
scambiamoci una stretta di mano... finalmente qualcuno con un nick degno del
mio :-)
Gridiamo insieme (io con la terra in bocca e tu con la pala in mano)
SALUTI A TUTTO IL NG DA SOTTERRATOVIVO E CAPOBECCHINO!!!!
ALLEGRIA!!!!!!
ROTFL!

 ALLEGRIA!!!!!!
<spam>
Muahhahhaa non posso che accodarmi come coder di un programma di Gestione
Cimiteriale :ppppp
</spam>
Posso unirmi a voi in questo (estremo?) saluto? :ppp
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

> Posso unirmi a voi in questo (estremo?) saluto? :ppp
Sei il benvenuto :D
muhuahauuauauahauauhauauau :D
Salutoni a tutti
-- 
[CapoBecchino]
www [dot] boundlessminds [dot] it
Da Barzellette.it:
 In una lapide di un cimitero c'è questo epitaffio:
"Qui riposa, per la seconda volta, Ernesto Rossi. Una prece."
Un tizio, incuriosito, chiede informazioni al necroforo che, fra l'altro,
conosceva il defunto e così gli risponde:
- Vede signore, il defunto Rossi in vita lavorava in Comune...
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Salutoni a tutti
Mmmm....... mi fate venire il desiderio di cambiare il nick da Darkbyte 
a DellaMorte DellAmore
-- 
Rivolterò il mondo per trovarlo, e anche se andasse in Indocina uno dei 
nostri starà nascosto in una ciotola di riso pronto a sparargli nel culo.
(Pulp Fiction)

"SotterratoVivo" ha scritto nel messaggio
Ehi, sei ancora vivo ? :-)
Ops, scusa, cioè, insomma... volevo dire... beh, ben ritrovato :-)
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: video e vb

conoscete delle classi che mi permettono di manipolare i fotogrammi di un 
filmato?
Il formato pu� variare
grazie 

 filmato?
...
A prima vista, direi DirectX con tutte le sue componenti.

 ha scritto nel messaggio 
news:4a83e159$0$43592$4faf...@reader1.news.tin.it...

devo manipolare i singoli pixel di ogni fotogramma!
grazie

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

Ho inserito un DataEnvironment in un progetto Visual Basic. Tuttavia
l'installer di Visual Studio non ha inserito nel package le librerie
necessarie per farlo andare e quindi dopo l'installazione il programma
(giustamente...) si pianta. Allora spulciando qua e là ho trovato due dll
che servono al DataEnvironment. Qualcuno poò darmi qualche dritta?
Grazie
Fabio

Hai incluso i riferimenti alle librerie del Dataenvironment nel tuo
progetto?
Ne sono necessarie 2 o 3 ora non ricordo con esattezza.
	Lore.


 ha scritto nel messaggio
news:954lvn$p28$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto con Write

Io vorrei creare un programma che, una volta caricato, crei un file
esempio.txt
ed ogni volta che venga eseguito aggiunga una riga alle precedenti senza
cancellare il
contenuto del file.
Come posso fare?
Io ho agito cosi':
File_Esempio = "Esempio.txt"
MyDate = Date
MyTime = Time
Open File_Esempio For Output As #1
Write #1, "Prova"; MyDate; Time
Dove sbaglio?
Come posso fare perche' ogni volta non venga cancellata la riga scritta
in precedenza?
Dovrebbe infatti risultare cosi':
Prova 1999 02 03 20.00
Prova 1999 03 03 21.00
etc. etc.
Grazie in anticipo a tuti coloro che avranno la cortesia (e la voglia) di
aiutarmi.
Per rispondermi scrivete a: 
adri...@yahoo.com
 

Prova con: Open File_Esempio For Append As #1
Ciao.
    Valter

[...]
Open File_Esempio For Append As #1
La modalita' di accesso "For Output" nell'istruzione "Open" crea un nuovo
file che sostituisce l'eventuale file esistente con lo stesso nome, mentre
quella "For Append", lo dice la parola stessa, "appende" (accoda) ad un file
esistente i nuovi record.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: MSFlexGrid e posizionamento

Qualcuno mi sa dire come posso fare per posizionare il cursore in modo che
l'utente veda la riga selezionata al Top della Grid dopo che si è verificato
un refresh della stessa e quindi mi si è posizionata sulla prima riga!
Grazie a tutti, ciao
Max
massimo...@rccr.cremona.it

Haplo ha scritto nel messaggio ...


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

Salve, per favore mi dite come si fa per mettere un file wav che fa "click"
quando premi un bottone??
Grazie mille in anticipo.
Giovanna

quando premi un bottone??
Option Explicit
Private Declare Function mciSendString Lib "winmm.dll" Alias
"mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As
String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Command1_Click()
    mciSendString "open c:\windows\media\ding.wav type waveaudio alias
ding", 0&, 0, 0
    mciSendString "play ding wait", 0&, 0, 0
    mciSendString "close ding", 0&, 0, 0
End Sub
Ciao ^_^

Newsgroup: it.comp.lang.visual-basic
Titolo: ma ADO funziona????

Salve, ho questo problema:
su sistema operativo win xp italiano mi è già capitato varie
volte che Ado non funzioni.
La versione di ado che è installata è 2.7.
Eseguendo una macro da excel (office xp italiano su pc con win xp
italiano) di questo tipo:
public sub a()
dim rs as adodb.recordset
set rs=new adodb.recordset
end sub
sull'istruzione set rs=new adodb.recordset si spacca con errore: la
classe non supporta l'interfaccia o l'automazione.
lo stesso errore si verifica se uso 
dim rs 
set rs=createobject("adodb.recordset")
grazie, ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 grazie, ciao
Prego,
Andrea

Io uso ADODB 2.7 con WinXP (con VB) regolarmente e non ho mai avuto
problemi.
Non penso che sia dovuto alla lingua con cui ADO è stato installato, ma
bensì se esso è stato installato correttamente in Windows XP.

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

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal report

E' possibile collegarsi ad un DB protetto con crystal report?
Se il DB ha solo la password non c'è problema, ma se ho usato la protezione
a livello utente come faccio?
Grazie
Lorenzo

Chi mi potrebbe dare uno veloce spolverata di cosa bisogna fare per sommare
dei dati in diversi records di un Db e stamparli con Crystal Reports.
--
Grazie
Gabriele F.
gab...@NOSPAMtin.it
Eliminare NOSPAM per scrivere
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Tabelle collegate o no?

internamente Access!?!?!) ?
per l'accesso ho usato un blocco a livello di record in modifica impostato
direttamente da access
Ho usato VB5 e DAO
Ciao stefano

Salve a tutti!!!
Devo fare una piccola applicazione per 3 utenti (PC) utilizzando VB6 + SP3 e
Access 97 con DAO 3.51. Il file MDB sta su uno dei 3 PC che si vedono
attraverso unità di rete. Domanda:
Ho qualche vantaggio a creare per ogni PC un MDB che contenga i collegamenti
alle tabelle del vero MDB? In questo modo ogni PC aprirebbe un MDB in
locale, poi i trasferimenti in rete se li gestirebbe Access. E' una
pazzia??? Inoltre in questo modo è lecito pensare che non otterrò errori di
concorrenze sui record visto che in fondo ogni utente sta utilizzando un MDB
con accesso esclusivo (gli errori eventuali di concorrenza se li gestisce
internamente Access!?!?!) ?
Spero di essere stato chiaro. Grazie a tutti!!!!!
--
Posted from 
relay.infogroup.it
 [195.103.148.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

 ha scritto nel messaggio
news:006d01bf7d53$c18cc910$7c03...@intra.it...


 Spero di essere stato chiaro. Grazie a tutti!!!!!
Chiaramente la tua soluzione si può fare ma se vuoi fare un'applicazione
seria, e perchè no, imparare magari qualcosa di nuovo (sicuramente potresti
fare lezione tu a me ma mi piace pensare di poter aiutare qualcuno) ti
consiglio di valutare le mie idee.
CIAO

in un certo periodo a me e' capitato spesso) devi riaggiornare tutti i pc
E se definiste Un DSN ODBC sulle tre macchine collegato al DB comune residente
su una delle tre?
Non ci sarebbero problemi di replica e problematiche di accesso.

Newsgroup: it.comp.lang.visual-basic
Titolo: Service is running ?

Ciao,
all' inizio di una applicazione VB6 ho la necessita' di sapere se il
servizio Workstation e' RUNNING o no.
come posso fare ?
grazie in anticipo
Moro

 come posso fare ?
Esiste un la funzione EnumServicesStatus (advapi32.dll) che
restituisce un'array di strutture ENUM_SERVICE_STATUS
nelle quali viene riportato lo stato dei servizi attivi.
Occorre prima aprire il Service Control Manager usando la
funzione OpenSCManager alla quale va passato il nome
della macchina da interrogare.
In chiusura, devi usare la funzione CloseServiceHandle
per "liberare" il Service Control Manager dall'impegno.

Newsgroup: it.comp.lang.visual-basic
Titolo: Adding 256 icons to an ImageList

I've added 256 icons to an ImageList to use them in both a Treeview and a
ListView. When I execute the program the icons appear with 16 color only.
When I return to the ImageList in design-time they are already with 16
color only.
How do I resolve the problem?
Thanks already,

Hmmmmm...
Maybe you should set your OS to view 256 colors!?
Peter Larsson
Newsgroup: it.comp.lang.visual-basic
Titolo: Sempre a proposito di libri...

Salve a tutti.
Ho visitato la sezione "libri" del  sito comune del newsgrp, e ne ho trovati
due che dovrebbero soddisfare le mie esegenze:
1)Microsoft visual basic 6, manuale del programmatore, aut. Micorsoft
Corporation, ed. Mondadori informatica
2) Hardcore Visual Basic, aut. B. McKinney, ed. Mondadori informatica
Quale tra i due mi consigliate?
Premetto che ho già esperienze di programmazione in c, ma non ho mai
programmato in vb.
Vi ringrazio,
                                                        Donato.

 wrote in message
news:EG116.165643$hk4.6...@news.infostrada.it...


 programmato in vb.
se sai programmare bene in c ti consiglio
di non passare al vb (di solito si fa il contrario...).
magari passa al vc++
ma è solo un mio consiglio :)
--
H0m3r S1mps0n
home...@libero.it
hom...@tiscalinet.it
http://homersimp.tsx.org
 (In costruzione)

 ma è solo un mio consiglio :)
Ciao by
Claudio
Newsgroup: it.comp.lang.visual-basic
Titolo: Listview colorato

Ciao a tutti
Ho un problema con il controllo Listview in modalità Report.
Avrei pensato di popolare il controllo colorando gli elementi per mettere in
evidenza una
certa caratteristica, però mi colora solo la prima colonna e vorrei, se
possibile, che anche
i vari SubItems appaiano colorati.
Il codice che uso è:
 Set itmx = ListView1.listitems.add(,,Elemento)
 itmx.subitems(1)=Colonna2
 itmx.subitems(2)=Colonna3
 itmx.subitems(3)=Colonna4
 itmx.forecolor=vbBlue
Se faccio itmx.subitems(1).forecolor mi segnala errore.
Dove sbaglio?
Io uso VB6 con il Service Pack 5
Grazie
Riccardo

 Se faccio itmx.subitems(1).forecolor mi segnala errore.
Prova con:
itmx.ListItems(riga).ListSubItems.Item(colonna).ForeColor = ...

 itmx.ListItems(riga).ListSubItems.Item(colonna).ForeColor = ...
Hai ragione. Cosě funziona.
Ciao e grazie
Riccardo

Newsgroup: it.comp.lang.visual-basic
Titolo: list divisa in sezioni....

ciao a tutti,
mi sapreste dire come posso dividere la listbox in sezioni, ad esempio come
si fa per l'utility trova di windows
| nome | dimensione | etc. |
--------------------------------------
ciao     |  423             | ...     |
come posso fare?
grazie mille
ToM_

 ha scritto

devi usare un listview (la parte destra di esplora risorse).
progetto / componenti / ms windows common controls.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Api e pulsanti

Con quale API si rileva l'handle di un Pulsante?

 ha scritto nel messaggio
news:sqmb5.1647$KD3....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ancora pacchetti di installazione e problemi

Salve a tutti ancora non sono riuscito a trovare il modo di far funzionare
il mio programma su di una macchina esterna ...
L'errore era ed č tuttora
"adodc1"
"Impossibile trovare il provider.č possibile che non sia installato
corretamente"
Adesso ho piů o meno capito cosa sia un provider sono  riuscito ad
aggiungere il file mdb al file cab per i file relativi al metodo jet non
sapendo quali essi siano ho usato (almeno per provare ) un metodo spartano
ho inserito un form con un controllo dao con collegamento jet in quanto ho
letto che l'autocomposizione riconosce Dao e installa le librerie in
automatico
io in generale mi collego con mi collego con Ado ecco una stringa
connection = "Provider=Microsoft.Jet.OLEDB.3.51;Data
Source=C:\palestra\palestra.mdb;Persist Security Info=False"
Adoscadenze_c.ConnectionString = connection
Adesso ho provato ad aggiungere manualmete alcuni file msjet35 e altri con
il numero 35 in quanto con dao sembrava chiamare msjet40 (penso che uno
fosse 4.0 e l'altro3.51)
Installo anche Dcom98 ma per ora non ha mai funzionato
Qualcuno sarebbe cosě gentile da dirmi quali file aggiungere per far sě che
lui trovi questo cavolo di provider !!!
Ho trovato meno problemi a fare il programma che il pacchetto di
installlazione !!  : - (
Grazie Adriano

C'è un file che si chiama "Vb6dep.ini"
nella directory di Visual Studio in cui sono elencate
tutte le dipendenze delle varie Dll.
Ovvero se il tuo progetto include una certa Dll,
es. Dao350.dll, in questo file vedrai che sotto la voce Dao350.dll
ci sono altre dll che servono per un corretto funzionamento
della principale (dao350.dll).
Spero che tu abbia capito.
Ciao
Oz
--
Carè Walter SIA SOFTWORK S.R.L.
Via Zanardelli, 13/A - 25062 Concesio (BS) Italy
Tel. 0039-30-2008135/0039-30-2091057  Fax. 0039-30-2004911
Web: 
http://www.siasoftwork.it
 - E.mai:- 
ca...@siasoftwork.it

UDITE UDITE !!!!!!
Sono finalmente riuscito a capire perchè non funziona MAI sto ca**o di
provider OLE DB Jet 3.51 quando si distribuiscono le applicazioni.
Quando si installa MDAC (2.1 o 2.5) non viene installato il driver OLE DB
Jet 3.51
Per risolvere il problema si debbono aggiungere due DLL nel programma
di "Creazione Guidata Pacchetti di Installazione" (CGPI)
Quando il programma CGPI mostra la lista delle DLL da distribuire, scegliete
AGGIUNGI
e aggiungete queste due DLL:
C:\WINDOWS\SYSTEM\MSJT4JLT.DLL
C:\PROGRAMMI\FILE COMUNI\SYSTEM\OLE DB\MSJTOR35.DLL
Proseguite con il programma CGPI e quando vi mostra la lista di dove
verranno installate
le vostre DLL, ponete il cursore sulla voce MSJTOR35.DLL e modificate la
directory
denominata "Posizione installazione" in:
$(CommonFilesSys)\ole db
Spero di aver fatto cosa gradita a più di una persona
Ciao
Sir Jo
P.S. Questo messaggio ne vale almeno 4 di Pal e 4 di Hal

SIIIIIIIIIIIIIIIIIIII

 P.S. Questo messaggio ne vale almeno 4 di Pal e 4 di Hal
Anche perche' il piu' delle volte siamo ot :-)

 intende :)
Proporrei di mettere il mio messaggio nelle FAQ del SC
Ciao
Sir Jo
Newsgroup: it.comp.lang.visual-basic
Titolo: Form Irregolari & Skinnabili

Qualcuno di voi sa come fare in VB form irregolari & skinnabili?
Aspettate, non precipitatevi a rispondere. ;)
So skinnare una form subclassandola, non c'e' problema. 
So creare form irregolari, delle forme geometriche piu' disparate:
Ellissi, cerchi, "ciambelle", stelle, o a forma di "Hello World!" in
Tahoma o il font che vi pare.
Ma vorrei fare qualcosa di simile a K-Jofol o WMP7, ad esempio.
Ovvero, data una immagine bitmap, con un colore predefinito come
"trasparente", modellare la forma della form su quella bitmap.
All'inizio avevo semplicemente pensato, subclassando la finestra, di
lasciarla puramente rettangolare, e disegnarci sopra l'immagine
ottenuta dal desktop+ la bitmap, ovviamente evitando il colore di
trasparenza.
Al di la' di alcuni problemi che possono incorrere nella
realizzazione, e quindi renderla magari non tanto fattibile, c'era il
fatto che, se io per ipotesi "cliccavo" su un area che sarebbe dovuta
essere trasparente, de facto davo sempre il focus alla finestra
skinnata. Mentre in realta' avrei dovuto dare il focus agli oggetti
sottostanti.
Ovviamente posso gestire tutta una serie di eccezioni, ma mi sembrebbe
di mettere toppe su toppe.
L'unica altra idea che mi veniva in mente, era creare una path
seguendo il contorno dell'immagine, e poi trasformarla in region.
Ma anche questa mi sembra una teoria un po' azzardata. Suggerimenti?
--
C'ya, 
  |
  |
'/|\'
\\O//
//"\\
'\ /'
________________________________________TagLine___
"Quanti Angeli danzano sulla punta di uno spillo?"

C'č un programma chiamato ActiveSkin che fa proprio quello che vuoi. Include
un editor che genera files di tipo .skn, che tramite un ocx vanno
posizionati sul form vb, occupandosi di tutto il resto. Ti permette di
creare programmi come Winamp; oltre a cambiare la grafica del form in se, ti
permette di personalizzare l'aspetto di tutti i controlli standard, come
bottono, listbox, textbox e cosě via.
Funziona davvero bene, tanto che mi sembra che si stato premiato come il
miglior plug-in di vb.
Io lo uso in tutti i miei programmi e mi sento di consigliartelo!!!
Provalo, magari ci sentiamo per e-mail.
--
Damiani "Alletun" Igor
ico...@simcity.it
Newsgroup: it.comp.lang.visual-basic
Titolo: comboBox simile ad Access

salve, vorrei accedere ad un DB tipo access e mi servirebbe una specie di
casella combinata che pero' non abbia il menu' a tendina ma che supporti la
funzione di expand (completa il nome,se esiste nella lista) come quella di
Access
si puo' fare in qualche modo?
--
Ciao
      Alessio
---
If you want to replay by mail, please remove --####-- from
the e-mail address

si puo' fare in qualche modo?
Ti compri la TrueDBList di Apex, oppure te lo costruisci come
controllo a costo di diventarci deficente, oppure crea delle false
colonne usando un carattere a spaziatura fissa e costruisci dei campi
allineati con la divisoria verticale (non viene un gran che ma
funziona ed e' piuttosto semplice da fare).
--------------------------------------------------------
Paolo Hölzl
Metis Informatica s.a.s technical manager (Ferrara)
----------------------------------------------------------
ATTENTION!, antispam 
For reply, substitute xxxx.xxxxxxx.xx with 
mail.asianet.it

sul sito comune nell'applicativo per il calcolo del codice fiscale puoi
trovare una routine che credo faccia al caso tuo.(riguarda l'inserimento del
comune di nascita, e si autocompleta con l'uso di trim , credo)

...


Newsgroup: it.comp.lang.visual-basic
Titolo: ruotare immagine.

Come si fa a ruotare un immagine in visual basic 6?
Grazie Alberto

 wrote in message
news:Gn0x6.12097$E01.1...@news.infostrada.it...


 Come si fa a ruotare un immagine in visual basic 6?
Ti riposto un commento che avevo scritto qualche messagio fa in merito:
Se ti accontenti di essere compatibile solo con Win NT da 3.1 in su (quindi
anche Win 2000, ma nè Win 95 nè Win 98), c'è l'API SetWorldTransform che
applica il giusto calcolo matriciale ad ogni punto del device context che
contiene la tua immagine.
Se invece hai mire di massima compatibilità, devi fare i calcoli a manina.
Posto che l'angolo sia A, devi applicare le seguenti trasformazioni alla
coordinata X e Y di ciascun punto della tua bitmap:
x' = (x * cos A) - (y * sin A)
y' = (x * sin A) + (y * cos A)
Altrimenti usi le DirectX che hanno il metodo SetRotation. Ma in questo caso
è tutto un altro paio di maniche (e non è neppure il mio campo).
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Implementare split bar

Che voi sappiate esistono dei controlli freeware o dei moduli di codice
che permettano l'implementazione di split bar?
Ciao e grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Voglio uccider il processo winoldap!

Salve a tutti, c'e' qualcuno che mi sa dire come faccio ad uccidere il
processo winoldap che si genera quando utilizzo il comando Shell per
eseguire un file batch all'interno di un programma scritto con VB 5.0?
Il fatto e' che ogni volta che eseguo quell'istruzione mi si genera un
processo winoldap che alla lunga mi crea dei problemi.
Grazie anticipatamente a chi puo' risolvermi il problema.
Max

 processo winoldap che alla lunga mi crea dei problemi.
ogni prompt DOS può avere una configurazione, che riguarda l'uso della
memoria, del video ecc. e queste informazioni vengono memorizzate in un file
.PIF
Anche un file .BAT può avere questa configurazione (essendo effettivamente
un prompt) quindi ti basterà impostare nel  file .BAT la proprietà "Chiudi
all' uscita".
Prova a lanciare la shell in modo visibile (non hidden), dovresti vedere la
finestra che rimane aperta con la barra di titolo su cui c'è scritto
"Esecuzione terminata".
se hai altri dubbi scrivimi pure
--
Starman




Ciao stefano, il tuo metodo funziona.
Ti ringrazio tanto.
Ciao.
Max

Newsgroup: it.comp.lang.visual-basic
Titolo: Listbox con campi

 - Sito Web

 arrivo.
Una griglia


listview la trovi in microsoft common control (componenti vb)
setta la proprieta view= 3 (report)
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Far comunicare fara di loro due exe e' possibile?

Salve ; Il mio problema e' questo
sto scrivendo un programma di statistica e questo deve passare dei dati
ad un altro che si occupa di disegrare i grafici a video
ora come posso fare a scambiare i dati da uno all'altro
o piu' semplicemente:
come devo fareperche  il prog1 dica al progr2 di  fare avanzare una
progressbar?
spero di essere stato abbastanza chiaro grazie a tutti
De...@netbusiness.it

 wrote in message
7q1m4j$gqa$1...@fe1.cs.interbusiness.it...


Ci sono varie tecniche. Quelle che guarderei sono
OLE
MMF
Secondo me ti convengono i memory Mapped File, (usando la Copymemory) perchè
FORSE sono + prestanti. Infatti windows usa questa tecnica per caricarsi in
memoria DLL.
COM (OLE) è + facile da implementare,però devi stare attento a non
modificare troppo l'intefraccia degli oggetti. Un'altro punto a vantaggio di
questa tecnologia è che tu potresti creare il primo programma che esponga
un'interfaccia COM ed installarlo su una macchina, il secondo programma lo
installi su un'altra macchina in rete (o perchè tramite Internet)  e leggi i
dati del primo programma in remoto. In questo caso si parla di DCOM e guarda
caso sto proprio facendo la stessa identica cosa.
CIAO



DDE ha _qualche_ difetto.
Il peggiore dei quali e' che non ha futuro, dato che M$ punta molto su
OLE/COM.
--
Roal Zanazzi
z...@iol.it

 wrote in message
viex3.24682$M%1.6...@typhoon.libero.it...


ora come posso fare a scambiare i dati da uno all'altro
Un modo è utilizzare le Pipeline gestibili attraverso delle API. Credo che
con quelle puoi anche far scambiare dati tra applicazioni che girano su pc
diversi in rete. Però l'applicazione che invia i dati (Pipe server) deve
girare su winNT altrimenti non va.
Ciao ciao
~~~~~~~~
   Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: Attach Database SQL 2005 Express

Salve, sto cercando di effettuare l'attach di un database tramite vb6
con la seguente istruzione:
CREATE DATABASE AdventureWorks
ON (FILENAME = 'C:\Programmi\Microsoft SQL Server\MSSQL.1\MSSQL\Data
\nomedb.mdf')
FOR ATTACH;
ma mi restutuisce il seguente errore:
Impossibile aprire il file fisico "'C:\Programmi\Microsoft SQL Server
\MSSQL.1\MSSQL\Data\nomedb.mdf'" Errore del sistema operativo 5:
"5(Accesso Negato)
qualcuno saprebbe aiutarmi?
grazie

salve,

stai per caso utilizzando "User Instances"?... in questo caso, le User 
Instances non hanno privilegi sufficiente a livello di file system per poter 
accedere a quelle cartelle..
saluti
-- 
Andrea Montanari (Microsoft MVP - SQL Server)
http://www.asql.biz
 
http://italy.mvps.org
DbaMgr2k ver 0.21.0 - DbaMgr ver 0.65.0 and further SQL Tools
--------- remove DMO to reply 

 accedere a quelle cartelle..
non sono molto bravo. come faccio a verificare se sto utilizzando
"User Instances".


le User Instances sono un modo di utilizzo "completamente privato" di 
SQLExpress 2005, attivabile tramite stringa di connessione.. 
http://msdn2.microsoft.com/en-us/library/bb264564.aspx


 saluti
"User instances" a parte, io stò cercando di fare un'operazione forse
impossibile. cioè fare l'attach di un database creato con SQL 7.0 su
una macchina che ha SQL Server 2005 Express e il sistema operativo
Vista. se questa operazione non è possibile come potrei risolvere?

 Vista. se questa operazione non è possibile come potrei risolvere?
l'in-place upgrade di un database utente versione SQL Server 7.0 tramite 
attach e' supportato..


Newsgroup: it.comp.lang.visual-basic
Titolo: Domanda semplice su Crystal Report..

 un essere umano e una basedati.
Ok, ti seguo, fin qui ci sono, ma perchè tutti si agganciano a questo 
programma qua?
Saluti, ciao ciao.
-- 
Posted from 212.29.130.187 by way of 
smtp4.libero.it
 [193.70.192.54] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ok, ti seguo, fin qui ci sono, ma perchè tutti si agganciano a questo
programma qua?
ipotesi 1. prima del datareport di vb6, o cr o vbnull.
ipotesi 2. costa zero, cioe' abbastanza meno di active reports e altri
equivalenti.
ipotesi 3. perche' prob ti risparmia del tempo. se ci badi, molti di quelli
che arrivano a vb da access chiedono come recuperare i loro report. perche'
poi per anni ms li abbia previsti in access ma non in vb, va chiesto a bill.
Newsgroup: it.comp.lang.visual-basic
Titolo: Socket & co.

Premessa: non sono un programmatore Visual Basic
Domanda: avrei la necessità di chiamare da un programma Visual Basic una
pagina web passando anche i valori di alcune variabili (il risultato
dovrebbe essere una cosa del genere "sample.php?var1=val1&var2=val2...") non
mi interessa l'output della pagina... mi basta solo chiamarla. Qualcuno
sarebbe così gentile da passarmi le righe di codice necessarie? Grazie
anticipatamente

"Mario Cartia" <braw...@NOSPAMlibero.it> ha scritto nel messaggio
news:bbpsff$sdo$1...@newsreader.mailgate.org...

...guarda il controllo inet ed il metodo navigate. fa il caso tuo.

 una pagina web passando anche i valori di alcune variabili
Se ti accontenti del browser predefinito puoi usare ShellExecute:
Private Declare Function ShellExecute Lib "shell32.dll" _
      Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation _
      As String, ByVal lpFile As String, ByVal lpParameters As String, _
      ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Call ShellExecute(0&, vbNullString, "...sample.php?var1=val1&var2=val2...",
_
vbNullString,  vbNullString, vbNormalFocus)
--
Ciao, Silv:o)

 ha scritto nel messaggio
news:bbq658$btpsd$1...@ID-77234.news.dfncis.de...

Si... sembrerebbe quello che mi serve... vi spiego il problema preciso: il
programma (si tratta di "print logger") logga le stampe fatte sulle
stampanti "monitorate" in un file... a me serve anche inviarle ad uno script
php. La parte di codice da modificare è questa
---------
Public Sub WriteLog(j As PTPrnJob)
    OpenLog
    Print #LOGFN, j.JobID; vbTab; j.PrinterName; vbTab;
    Print #LOGFN, j.MachineName; vbTab; j.UserName; vbTab;
    Print #LOGFN, j.Document; vbTab; j.TotalPages; vbTab;
    Print #LOGFN, j.Priority; vbTab; j.Datatype; vbTab;
    Print #LOGFN, j.Submitted
    CloseLog
End Sub
---------
mi serve passare allo script j.MachineName, j.PrinterName e j.TotalPages
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]- SAPI, a quando la 5.0

Salve !
Sto realizzando un PRG che utilizza i le SAPI, tramite OCX, che aggiunge
funzionalità vocali ai programmi, che può comandare un menù, attivare
applicazioni, ecc.
Sapete quando verranno rilasciate le SAPI 5.0, visto che attualmente la ver
4.0 supporta solo l'inglese e che quindi i comandi si devono "italianizzare"
( cudee = chiudi ) ??
A proposito, quando lo finirò, il tutto sarà free, se interessa a
qualcuno.... :-)))
Saluti
Genesio

Genesio Conti <gen...@NOSPAMsofthome.net> wrote in message
dH%I4.121696$pn3.1...@news.infostrada.it...

Ok non lo faccio più..  :-((  ( come volevasi dimostrare il NG é sempre più
it.comp.visual-basic-database-odbc-ado-bot-cct) Pace e amen
Sempre mi
genesio

 ( cudee = chiudi ) ??
SAPI 5.0 sarà incluso nello Speech API SDK che farà parte
sia di MSDN che di Platform SDK. L'uscita è prevista per
l'autunno di quest'anno.
Il "Narrator" di Windows 2000 sarà probabilmente aggiornato
con il secondo ServicePack del sistema.
E' prevista la distribuzione di oggetti Activex e plug-in per l'implementazione
Web-oriented dello Speech Engine.
Ulteriori informazioni (o beta test) possono essere richieste al
team di sviluppo: 
sap...@microsoft.com

 wrote in message 8di6nb$pqs$1...@nmaster.tin.it...

Grazie infinite, sei una mosca bianca.....
Genesio

Newsgroup: it.comp.lang.visual-basic
Titolo: MDI e gestione dei form

Ho una MDI e molti form figli. Io devo essere sicuro che l'utente non possa
aprire più di un form alla volta dentro l'MDI, se lo fa il form precedente
deve chiudersi.
Potete dirmi come si può ottenere questo?
Grazie mille a chi vorrà rispondere!

 Potete dirmi come si può ottenere questo?
Piu' di un form in assoluto, o piu' di un form dello stesso tipo?
Nel primo caso si riduce molto semplicemente a:
Unload Me.ActiveForm
Nel secondo puoi per esempio sfruttare la collection Forms per verificare
che la form che stai per caricare non sia della stessa classe (=stesso tipo
di variabile oppure stesso nome di form, quindi sfruttando TypeName(f)
oppure f.Name) di una gia' presente nella collection
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Come promuovere i propri lavori....

Ciao, vorrei sapere se esiste un sito sul quale proporre i propri lavori in
VB, un sito cioe', sul quale ci si possa fare un po' di pubblicita' nella
speranza che qualcuno sia interessato alla visione e successivo acquisto dei
propri progetti.
Ultimamente sto lavorando su controlli OCX e credo, anche se e' da poco che
lavoro in VB, che possano interessare.
Ciao e grazie.

 wrote in message
s9rD8.48747$zW3.6...@news1.tin.it...

Il mio consiglio č di rivolgerti al pubblico degli sviluppatori dimostrando
il valore dei tuoi lavori.
Io proporrei di creare delle versioni dimostrative (leggi NON LIMITATE),
magari con sorgente a fronte e di proporre, tramite un buon sito Internet,
le tue personali soluzioni.
Offrire supporto ed esperienza, condividere la conoscenza con altri
sviluppatori č, a mio avviso, il modo piů proficuo per conquistare la
fiducia e la stima di altri professionisti.
Buona fortuna.

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO! VB5 e memoria GDI! Bug o ignoranza?

 Ringrazio in anticipo per qualsiasi idea o suggerimento!.
Provato con il service pack 2???
MArco Selmi

> (soprattutto abbellimenti grafici), DAO e ODBC. Da alcuni giorni ho
Quando chiudi le finestre usi "unload me" ?
~~
Roberto Colmegna
roberto...@login.it
Newsgroup: it.comp.lang.visual-basic
Titolo: data report

Ciao a tutti.
Ho fatto un report col data report inserito nel vb.
Nella sezione che ripete i valori alla fine della pagina per tutte le
pagine del report (scusate ma non mi ricordo come si chiama) devo
inserire 2 etichette.
Niente di difficile e l'ho fatto.
Il problema e' che la prima etichetta deve vedersi per tutte le pagine
(e questo lo fa da solo) mentre la seconda deve essere vuota o
invisibile sempre meno che nell'ultima pagina.
Come posso fare?
n.b.
Le due etichette devono essere allineate orizzontalmente e sono dentro
ad un shape  rettangolare quindi la seconda non la posso mettere nella
sezione pie' di report o come si chiama.......
Grazie a tutti
Riccardo

 sezione pie' di report o come si chiama.......
Effettivamente quella sarebbe la soluzione piů semplice.
Tuttavia, probabilmente puoi agire a livello di codice.
Il datareport ha diversi eventi. non li conosco, ma provo a ipotizzare: se
esistesse un evento simile a CreatePage, che avvenga ad ogni creazione di
una nuova pagina del report, potresti inserire in questa sub qualcosa tipo
If Pagina_Corrente=Ultima_Pagina then Picture1.Visible=true
Ma devi navigare un po' negli eventi del datareport.
Ciao
Alberto

 Ma devi navigare un po' negli eventi del datareport.
Anche questo ^_^!
Alex

...

Ho provato ma oltre a non esserci gli eventi (c'e' inizialize,
terminate e pochi altri) non ti permette di modificare le label del
report dopo la creazione........ :(
Riccardo

 report dopo la creazione........ :(
Diciamo che non è possibile modificare le label dopo la generazione del
report, ossia alla fine del secondo step (1:Dati, 2:Generazione, 3:Stampa).
E purtroppo, l'evento che indica che si sta elaborando pagina n è un evento
del terzo step, ossia solamente durante la stampa riesci a discriminare fra
due pagine dello stesso report. Ma, ormai, la pagina è già pronta, visto che
la preparazione avviene nella fase 2.
Sia nell'Initialize che nell'Activate puoi tranquillamente cambiare le
label, ma label123 è una sola, sia essa in pagina 1 o pagina 1000, visto che
di fatto operi sull'object model della struttura, e non del report già
generato.
Ciao
Alberto

...

Quindi per farla breve mi attacco al primo tram che passa......
ma porc!@#]?^
Riccardo :)

 Quindi per farla breve mi attacco al primo tram che passa......
Più o meno...
Altrimenti, studia un modo, graficamente accettabile, per cui la label di
'ultima pagina' possa stare leggermente più alta della label di piè di
pagina.
Calcolando il numero di record che entrano in una pagina, e conoscendo il
numero complessivo di record da stampare, saprai anche a che altezza
comincia la sezione 5 (piè di report). Quindi, imposti la proprietà Top
della label di fine report, in modo che si posizioni esattamente un twip
sopra alla sezione di piè di pagina.
Ciao
Alberto