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

Salve a tutti,
dovendo simulare il comando "Annulla" di un combobox, ho ripescato da un mio
vecchio programma la seguente chiamata API:
Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hWnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Long) As Long
Private Const WM_UNDO = &H304
Public Function undo(myControl As TextBox)
UndoResult = SendMessage(myControl.hWnd, WM_UNDO, 0, 0)
End Function
Funziona ovviamente con le textbox, non con la combo! Suppongo che dovrei
cambiare il valore di WM_UNDO... Solo che non so come devo cambiarlo...
Sapete dirmi perchč non funziona? Cosa devo cambiare?
GRAZIE
Antonio Mirarchi

Prova con EM_UNDO
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

> Prova con EM_UNDO
Niente neanke cosě :-(
Antonio Mirarchi

 ha scritto nel messaggio
news:1q7kb.43287$Zh.1...@tornado.fastwebnet.it...

WM_UNDO č un messaggio riservato alle classi edit control di cui fa parte la
textbox. La CB non supporta questo messaggio e nessun messaggio simile. Devi
crearti un tuo sistema di undo.
Ciao
Michele

 crearti un tuo sistema di undo.
Ahiahiahi... Pessima notizia... Grazie comunque
Antonio Mirarchi

Nope!, risposta errata...
La combobox supporta EM_UNDO solo che bisogna sapere (e Spy++ lo dimostra)
che e' in realta' un controllo composto e che quindi il messaggio va inviato
alla child edit window della combobox e non alla combobox stessa.
Private Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA"
(ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal
lpsz2 As String) As Long
Private Const EM_UNDO As Long = &HC7
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA"
(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As
Any) As Long
Private Sub Command1_Click()
Dim hWnd As Long
hWnd = FindWindowEx(Combo1.hWnd, 0, "Edit", vbNullString)
SendMessage hWnd, EM_UNDO, 0, 0
Provare per credere...


> Provare per credere...
MOOOLTOO Gentile!!! Mi hai risolto un grosso problema, veramente. Grazie!
(Ovviamente funziona...)
Antonio Mirarchi

Newsgroup: it.comp.lang.visual-basic
Titolo: MultiComboBox, come ?

Come?

 Come?
www.it-lang-vb.net


Nella combo puoi memorizzare due valori, uno visibile con AddItem e uno
"nascosto", con ItemData (vedi guida)
Nel sito sono presenti due esempi di combo.ocx dove permettono di
visualizzare più campi.
Potresti costruire la AddItem con Campo1 & "*" & Campo2 & "*" & Campo3 e
nella ItemData il valore da inserire nella Casella.
Potresti inserire i valori in una Flex Visible=False e renderla visibile con
un clic ad un Pulsante.
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Database e DBgrid

Salve,
qualcuno potrebbe farmi un esempio di come trovare un record( in modo
che tutti i controlli vengano aggiornati col record corrente)
semplicemente cliccando su una DBGrid?
Grazie in anticipo.
Robin

 ha scritto

se hai un datacontrol collegato alla griglia, puoi collegargli anche i
controlli con le proprieta' datasource e datafield di ognuno e la cosa viene
automatica.
seno', supposto che tu abbia un campo tipo contatore--
-- con dao, puoi tenere un indice sul contatore e poi fare qc tipo:
dim db as database, rs as recordset
set db=opendatabase("miodb.mdb")
set rs=db.openrecordset("miatabella")
'naturalmente anche la griglia sara' collegata a "miatabella"
ciccio=data1.recordset!contatore
rs.seek "=", ciccio
'--> a questo punto sei sulla scheda che vuoi, puoi caricare tutti i text
ecc.:
textNome = rs!nome
txtCognome= rs!cognome
'ecc.
rs.close : db.close
set rs=nothing : set db=nothing
puoi mettere una cosa del genere nell'evento reposition del dbgrid, a meno
che tu non abbia uno sproposito di campi non e' pesantissima.
-- con sql (ma controlla la sintassi e metti a punto):
ciccio=data1.recordset!contatore
rs = select * from miatabella where contatore= ciccio
'poi di nuovo usi il sistema controllo = rs!campo
se vuoi sul mio sito c'e' pctrix, in vb5, con gestione campi e griglia
insieme, e sorgenti.
hth, pal
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

Newsgroup: it.comp.lang.visual-basic
Titolo: Invio Fax

Salve a tutti coloro che mi potranno dare una mano....
Avrei bisogno si sapere se esiste qualche controllo OCX, per inviare un
report come fax, tramite un modem, come sistema operativo utilizzo WIN98.
Grazie a tutti... per l'aiuto.

 WIN98. 
WinFax. Costa poco, e trovi vari esempi per utilizzarlo da VB.
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

Newsgroup: it.comp.lang.visual-basic
Titolo: <no subject>

Ciao.
Pure io ho avuto lo stesso identico problema.
Ho colpevolizzato il fatto che, in precedenza, avevo installato il VB5
(quello
in prova sui CD). Non so bene se e' stata quella la causa, in ogni modo
+/- da quel giorno mi sono ritrovato nelle tue condizioni.
Come ho superato il problema?
Riformattando il disco, e reinstallando tutto quanto.....
Se trovi qualche soluzione (o qualcuno ti sapra' 
spiegare meglio, ti prego di farmelo sapere.)
Ciao e grazie anticipate.
Stefano  (Forli')
Albonett...@MailCity.com
--
Automatic posted from 
mail.tin.it
 [194.243.154.39]
via Mailgate Server - 
http://www.mailgate.org

via Mailgate Server - 
http://www.mailgate.org
fdsdasf

Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso remoto: AIUTOOOOOOOOOOO!!!!

Ciao a tutti,
qualcuno può dirmi come faccio a lanciare una determinata connessione di
accesso remoto da VB4?
Grazie
Antonio Mirarchi

...



Trovi un esempio sul sito comune, 
http://members.xoom.com/it_lang_vb
Ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260/
http://www.armaditaggia.com/marco
Newsgroup: it.comp.lang.visual-basic
Titolo: [? VB6 SP5] Word e Recordset

Salve a tutti,
due domande al volo e ringrazio in anticipo la vostra pazienza.
Devo recuperare dei dati da un DB e generare un documento Word per poi
mandare in stampa oppure salvarlo.
Esiste qualcosa di office da integrare nelle apllicazioni VB come per
Outlook?
Inoltre volevo sapere la sintassi esatta di ADO per aprire un recordset e
bloccarlo in scrittura.
Nel senso se un utente apre una form con dei dati da modificare dovrei
bloccare in scrittura quel record in modo da non permettere agli altri di
scriverci dentro.
Grazie Mille

 bloccarlo in scrittura.
No.
Ciao :-)

 scriverci dentro.
potresti impostare il blocco pessimistico (rs.locktype = adlockpessimistic)
prima di aprire il recordset: se non ricordo male questa impostazione
"blocca" il record (in access non solo quello...) che è in fase di editing,
fino a che non viene "updatato"
hth
Salutoni
Sergio

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

Salve a tutto l'NG!
E' un po' che non posto una domanda, ma pare giunto il momento di 
tornare a farne qualcuna :)
Nei miei progetti uso sempre Option Explicit, però è giunto il momento 
in cui mi serve disabilitarlo temporaneamente in una sub.
Mi spiego: ho un oggetto WebBrowser dal quale voglio recuperare tutto il 
contenuto HTML:
Browser.Document.All(HTML).OuterHTML
Il problema è prorprio in quell'HTML fra parentesi: scritto così, VB lo 
vede come una variabile non dichiarata, quindi l'utilizzo di Option 
Explicit non mi lascia girare il programma.
Se invece tento di raggirare la cosa dichiarando una variabile HTML di 
tipo String che valga "HTML", mi viene fuori un errore dal controllo 
WebBrowser che non accetta quello che gli voglio fare :)
Come posso fare secondo voi?
Thx in anticipo!!!
-- 
Quando noi ignoranti eravamo di più, tutto era più bello...
(A. Celentano)

 Come posso fare secondo voi?
Se togliendo l'option explicit sembra funzionare, significa che quando VB
compila la riga
Browser.Document.All(HTML).OuterHTML
esso interpreta HTML come un Variant (empty).
Puoi pertanto lasciare l'Option Explicit e definire HTML come Variant e non
assegnargli nulla.
Non so però se ha un gran senso, visto che All è una collection e il suo
argomento dovrebbe essere l'indice o la chiave di un elemento...
Bye
Raf

 argomento dovrebbe essere l'indice o la chiave di un elemento...
Allora mi sa che ho trovato l'inghippo: HTML deve valere zero. Infatti 
ho provato con All(0).OuterHTML ed ho ottenuto il codice HTML per intero :)
Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione a server con credenziali di dominio

Devo fare una applicazione che accede ad un server SQL-Server su cui le
credenziali di accesso sono quelle di dominio, per cui ogni utente accede
con le stesse credenziali che usa sul proprio PC. Come faccio ad indicare
alla connessione ADO di usare queste credenziali senza che l'utente debba
digitarle nuovamente?
La mia stringa di connessione oggi č:
ADOConnection.Open "Driver={SQL Server};server=" & NomeServer & ";Database="
& NomeDB & ";Uid=" & MioUser & ";Password=" & MiaPwd & ";"
Grazie!!!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 digitarle nuovamente?
Prova a leggere qui:
http://groups.google.com/group/it.comp.lang.visual-basic/browse_thread/thread/ac829ea4002358bf/56572ab66fe05153?lnk=st&q=utente+password+accesso+windows+visual+basic&rnum=3#56572ab66fe05153
o parti da qui:
http://snipurl.com/11f5b
http://groups.google.com/group/it.comp.lang.visual-basic/search?group=it.comp.lang.visual-basic&q=utente+password+accesso+windows&qt_g=1&searchnow=Ricerca+in+questo+gruppo
-- 
DBMS Firebird
VB6 + Ado

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Embedded Visual Tools 3.0

Embedded Visual Tools 3.0 + emulatore del palmare sul pc,
insomma tanto per iniziare un discorso di programmazione
su un palmare, e a tal proposito, essendo piu' di 300 Mb da
scaricare dal sito Microsoft, ho pensato di richiedere il cd alla
Microsoft stessa (al costo di $11.95).
La domanda e': questo Embedded Visual Tools 3.0 che mi
arrivera' su cd sara' a scadenza? Cioe' un trial di 30-40-50-60
o piu' giorni?
Grazie per eventuali risposte.
Alex C.

Quello che scarichi non ha limitazioni di tempo, probabilmente anche il CD
sarà così
Ciao Gabriele
Newsgroup: it.comp.lang.visual-basic
Titolo: chiamare una pagina ASP da VB ?

Vi spiego il problema: ho bisogno di eseguire una pagina ASP su un server da
un form VB. Questa pagina esegue una serie di operazioni di aggionramento du
un DB Access sul server.
Eiste un componente che poterei utilizzare che voi potete consigliarmi ?? In
più dato che mi occorrerebbe conoscere se le operazioni eseguite dalla
pagina ASP sono andate a buon fine, avrei la necessità che questo controllo
possa ricevere un flusso di ritorno da questa pagina .....
Mi potete aiutare ... grazie mille.
--------------------------------
Inviato via 
http://usenet.libero.it

 possa ricevere un flusso di ritorno da questa pagina .....
  Microsoft Internet Transfer Control
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: menù con click tasto dx del mouse

Buon giorno,
     qualcuno mi sà indicare come posso creare un menù
(tipo quello di Windows) quando clicco con il tasto destro?
Mi spiego meglio; io vorrei creare, nel punto in cui mi trovo
con il puntatore del mouse, un menù con alcune voci, tipo
quelle che vengono create dal S.o. quando clicco con il
tasto Dx.
Grazie,
     Matteo.
-- 
Posted from [195.65.162.11] by way of 
law2-oe7.hotmail.com
 [216.32.180.111] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:LAW2-OE7ySsxV...@hotmail.com...


 wrote 
in message 
news:9bmhpu$8a1$1...@fe2.cs.interbusiness.it
...


 ha scritto nel 
  messaggio 
news:LAW2-OE164Ei8...@hotmail.com
...


Messaggio in formato MIME composto da più parti.
  Disabilitate MIME multipart, HTML e quant'altro, che state postando
messaggi elefantiaci!
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"

 ha scritto nel messaggio
news:3adeeef0...@news.galactica.it...


 tasto Dx.
crea un menu normale con l'Editor di Menu (Ctrl+E), poi utilizza la funzione
PopupMenu() (maggiori info nell'help in linea)
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Icone nella Toolbar

sul libro che ho comprato mi dice di collegare la toolbar con un Imagelist,
ma niente di piů, che cosa č questa image.., non la trovo negli strumenti ?,
e poi č difficile collegare le icone alla toolbar ?
comunque ho VB6 se fa differenza.
Grazie a tutti.

e poi è difficile collegare le icone alla toolbar ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Rnd

Ciao
Perche' se uso il Rnd (Randomize) , si mi crea una sequenza di nr casuali ma
mi ripete sempre la stessa sequenza?
Mi spiego meglio....;-)
Io scrivo:
Label1.Caption = Int(Rnd * 10) + 1
Label2.Caption = Int(Rnd * 20) + 1
Label3.Caption = Int(Rnd * 30) + 1
Nelle label mi da' dei nr casuali, pero' ogni volta che ricomincio la
sequenza
  e' sempre la stessa, perche' o meglio come faccio ad usare il Rnd
  in modo che la sequenza sia "sempre" casuale??
Sono stato capito, mi ho spiegato ?? ;-))
Ringrazio voi ,sicuramente piu' esperti di me, per l'eventuale risposta
--
ANTISpam-"Togliti i calzini per mandarmi un e-mail"
Alf

 mi ripete sempre la stessa sequenza?
Perché non hai premuto il tasto F1, mentre eri nell'editor di VB,
con il cursore sulla parola Rnd.
Prova a farlo, ti si schiuderà un mondo nuovo.
Un Paperino "ah, sì, la firma stavolta ci vuole".
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

 mi ripete sempre la stessa sequenza?
E' tutto spiegato nella pagina dell'help di Rnd (e di Randomize)
Ciao
Leggiamola questa guida ogni tanto: l'hanno scritta apposta :)
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Prova a farlo, ti si schiuderą un mondo nuovo.
Alf

 di scrivermi 2 righe,potevate aggiungere qualche aiuto...
Seriamente, il tasto F1 non puoi non averlo e c'è scritto tutto quel che
serve.

 Seriamente, il tasto F1 non puoi non averlo ......
Seriamente ;-))))
Alf

 Seriamente ;-))))
Non hai la guida? ... sei capitato in un brutto posto...

 di scrivermi 2 righe,potevate aggiungere qualche aiuto...
Scusa, più "aiuto" di così, cosa vuoi ? Seguendo le istruzioni
che ti ho dato, non solo arrivi a scoprire la risposta in italiano
alla tua domanda, ma impari anche a cercare altre risposte
ad altre future domande...
Per darti istruzioni ancora più esplicite avrei dovuto scrivere:
**********
"Alza il braccio destro (il sinistro se sei mancino) e posa
la mano sul mouse. Muovi il mouse sul piano della scrivania
(o sul mousepad se ne hai uno) allo scopo di far muovere
il puntatore sullo schermo (quello che di solito è a forma
di freccia), e posizionarlo in modo che vada a coincidere con..."
**********
Preferivi qualcosa del genere ?
Bye, G.


Alf
--


 ha scritto nel messaggio
news:xQJea.96485$pG1.2...@news1.tin.it...


 Ti ho scritto in pvt.....
Menomale che lo hai detto, quella casella è una spam-trap :-)
Ho ripescato la tua mail, l'unico consiglio che ti posso dare è
http://msdn.microsoft.com
, e tanti ma tanti auguri... per un
non-iniziato in principio è un labirinto, e c'è tanta roba da
perdersi facilmente, anche se negli ultimi tempi l'usabilità del
sito è molto migliorata.
Bye, G.

prova ad aggiungere "randomize timer" nella runtime
Credo che nella "runtime" di vb la funzione Randomize ci sia gia' ;-)
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Vendo VB6 Pro IT

Completo di scatola e tutti i cd, manuali ... originali
E' stato registrato ma ho chiamato stamattina la Microsoft (02 70 398 398) e
mi hanno confermato che si può vendere ma non registrare un'altra volta.
Faccio fattura Euro 416,66 + iva (=500,00)
Se interessati contattare in privato
Grazie
Ciao
Luca

 Luca
Andrea

 wrote in message 2jqu7nF...@uni-berlin.de...


 si può fare solo perché con 
VB.NET
 Standard non hai i wizard.
l'ho venduta alla mia ditta per passare al Net, costo 200Euro ( ma sono
stato abbastanza ladro, abbassa il prezzo e forse lo trovi a vendere. )
-- 
<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/

Newsgroup: it.comp.lang.visual-basic
Titolo: [? VB6 SP 5]Check Box Nelle ListBox

Salve a tutti,
una domanda che mi sta facendo impazzire. Nel controllo ListBox Standard si
posso attivare delle caselle di ckeck. Però non ho trovato nessun modo per
gestirle. In Pratica dovrei verificare se la casellina è spuntata oppu no e
scrivere il dato in un database. Inoltre quando ricarico il dato dal
database, devo spuntare da codice la casellina e magari selezionare la riga.
Inoltre se fosse possibile indicare al controllo di tenerle spuntata una
sola su tutta la listbox.
Grazie in anticipo.
Marco

 ha scritto nel messaggio
news:D%3G9.11802$fa.3...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire Un Foglio Excel Esistente e Passare dei dati

Sono riuscito a crearmi un file excel da VB passandogli dei dati ma
siccome con questo sistema dovrei tramite codice rifarmi tutte le
formule trovo molto più comodo aprire un foglio già esistente e
passargli i dati che mi occorrono nelle relative celle solo che non sono
riuscito a farlo. Immagino che non sia molto difficile ma sul manuale in
linea del VB5 mi sembra che non sia spiegato molto bene o probabilmente
da per scontato qualche cosa che mi sfugge. E' possibile o devo
rinunciarci?

passargli i dati che mi occorrono nelle relative celle solo che non sono
Non sono sicuro sia la strada migliore, prova a:
Dim MyXL As Object
Set MyXL = GetObject("C:\MyDoc.xls")
e poi a modificare le celle usandi Range(m,n)
Ciauz.
manuel 'fmf' ferrero
Newsgroup: it.comp.lang.visual-basic
Titolo: Eliminare lettere duplicate da stringa

Ciao a tutti,
devo fare una cosa abbastanza banale, in pratica ho una stringa da cui devo
eliminare le lettere duplicate.
Es:
"ABCDA"	--> "ABCD"
"AAAAA" --> "A"
"AABBC" --> "ABC"
Avevo provato una cosa del genere, ma il parametro INIZIO della replace$
non mi pare funzionare benissimo :\, infatti è come se ripartisse
dall'inizio e quindi esce sempre "".
Inoltre anche se funzionasse non mi piace usare la Len che varia in un For.
    For i = 1 To Len(mySTR) - 1  
      mySTR = Replace$(mySTR, Mid(mySTR, i, 1), "", i + 1) 
    Next
La cosa banale che mi viene in mente è usare una stringa di appoggio e ci
metto i valori solo se l'Instr è =0, ma magari c'è qualocosa di meglio. In
ogni caso le prestazioni non mi interessano, si parla di pochi caratteri
(max 20).
Ho googlato ma ho trovato solo roba attinente ai Record Duplicati, e non
alle normali stringe :\
Grazie a tutti
-- 
DBMS Firebird
VB6 + Ado

i sembra facile:
un loop con un test che dice "se il carattere X e il carattere X+1 sono 
uguali ne elimina uno altrimenti incrementa X"
ma forse non ho capito il problema.
Ciao
"Andrea [Work]" <nos...@invalid.invalid> ha scritto nel messaggio 
news:nsfwntq0gd9o$.1a58gwkg5016n$.dlg@40tude.net...


 ma forse non ho capito il problema.
Per ora ho fatto cosě e mi sembra abbastanza pulito alla fine:
    sAppo = ""
    For i = 1 To Len(IndenUsate)   
      If InStr(sAppo, Mid$(IndenUsate, i, 1)) = 0 Then
        sAppo = sAppo & Mid$(IndenUsate, i, 1)
      End If
    Next
    IndenUsate = sAppo
Tnx


 Tnx
Una cosa del genere:
Private Function CalcolaStringa(s As String) As String
    Dim x As Integer
    Do While True
        If (s = "") Or (Len(s) = 1) Then
            If Len(s) = 1 Then CalcolaStringa = CalcolaStringa & s
            Exit Do
        End If
        CalcolaStringa = CalcolaStringa & Left(s, 1)
        s = Replace(Mid(s, 2), Right(CalcolaStringa, 1), "", , ,
vbTextCompare)
    Loop
End Function
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Refresh di un datareport

Ho creato un datareport che prende i dati da un dataenvironment su quale ho
creato un command con la query desiderata.
La stampa funziona correttamente quando la lancio la prima volta.
Quando la lancio una seconda volta (droppando la tabella contenente i dati e
ricreandola con dati diversi) il report continuua a
visualizzare la stampa con i dati precedenti.
Sembra che il command memorizzi la situazione di partenza e non senta le
modifiche.
Ho provato a settare il Cursorlocation a "Server" e il CursorType a
"Ottimistico", ma non succede niente.
Aiutatemi please !!!!!

 wrote in message
news:9ek1lp$pfq$1...@pegasus.tiscalinet.it...


 wrote in message
news:fKmP6.10726$VT1.1...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: principiante

Stò cercando di seguire il corso di Visual Basic 6,dal libro
di Greg Perry,ma sono già in difficoltà alla prima lezione:
Ho creato un form con 3 controlli(una etichetta,un pulsante di comando
e un controllo immagine)
inserito questo codice nel form:
frmMioPrimo.Left = (Screen.Width - frmMioPrimo.Width) / 2
frmMioPrimo.Top = (Screen.Width - frmMioPrimo.Height) / 2
e questo,sul pulsante di comando:
img.Felice.Picture = LoadPicture("\Programmi\Microsoft Visual
Studio\Common\Graphics\Bitmaps\Assorted\Happy.bmp ")
ma cliccando il pulsante mi da ( errore run-time 424  necessario oggetto)
Qualche suggerimento?
Grazie
Dario



COme si chiama il controllo immagine?
Presumo ImgFElice...
hai messo un "punto" (".") di troppo => lui non conosce l'oggetto "img"...
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, era proprio quello l'errore
ciao
Dario


Newsgroup: it.comp.lang.visual-basic
Titolo: URGENTE *** Codifica MIME ***

Salve a tutti,
in una applicazione che sto scrivendo sto scaricando della posta da un
server POP3 tramite il winsock.
Il problema è la codifica MIME, dove posso trovare documentazione, su come
decodificare tutti gli header che ho all'interno del messaggio?
Grazie per l'aiuto.
Luca

Ciao,
puoi trovare notizie sul sito
http://www.dsi.unive.it/~franz/reti/so/smtp/mime.htlm
beppe


qui trovi tutte le rfc che ti servono per la codifica mime.
Buona fortuna.
http://www.oac.uci.edu/indiv/ehood/MIME/MIME.html
Newsgroup: it.comp.lang.visual-basic
Titolo: Temperatura CPU

Ottimo NG, č da poco che vi frequento e mi sembra che i carrier del NG siano
tutti OK.
Piccolo problemino, qualcuno č mai riuscito a leggere runtime la temperatura
di una CPU tipo P3 o P4 tramite qualche OCX o altro?.
Io per ora mi limito a vedere la freq. del processore (direttamente legata).
Thanks
JoePetrix

Il 05/12/2003 16.34, Joe Petrix scrisse:

http://www.tsgroup.it/smbus/index.htm
o anche 
groups.google.com
 ...
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 JoePetrix
Allora nuovo amico....
hai bisogno di 2 cose...
la più ovvia ...una motherboard che abbia il sensore di temperatura...la mia
è vecchia non ce l'ha!
la seconda detta e ridetta...WMI
con queste 2 cose dai un occhiata qui....
http://www.mvps.org/vbnet/index.html?code/wmi/wmiprocessor.htm
una cosa :
WMI è potentissimo....anche troppo!!!!
ci cambi anche le license key di xp per dirtene una!
una hacker-tip usava proprio wmi per installre SP1 sulla famosissima
corporate di xp segata da M$ !!!
solo che wmi è usato pochissimo.....
parecchi manco sanno che è!!!
http://www.microsoft.com/technet/treeview/default.asp?url=/technet/prodtechnol/windowsserver2003/proddocs/entserver/windows_wmi_overview.asp
Bye man!
:-)
-- 
Il Wodkino Nazionale è a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 Quotefix e altro:
http://www.martek.it/go.asp?portamia=4
Usr: ICLVB Pw: amici
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] BitBlt , dove diavolo sbaglio ?

Ciao a tutti !!
Devo "ritagliare" una parte di un form di un programma, per poterla poi
copiare su una picturebox per poter poi stamparla.
Per far questo uso l'API BitBlt, solo che sembra non funzionare...
dunque.. tralasciando tutta la parte di dichiarazioni, che ormai sapranno
tutti a memoria, passo direttamente alla chiamata :
Call BitBlt(Picture1.hDC, 0, 0, 800, 20, Form1.hDC, 0, 0, SRCCOPY)
Vorrei tagliare un rettangolo 800X20 a partire da 0,0 e copiarlo nella
picturebox. Cavoli ma non funziona !! Vedo sempre la picturebox grigia..
Dove sto sbagliando ? Forse che non posso passargli un Form come parametro
ma solo un contenitore di immagini ?
Help me please !
Ciao e grazie, DaVe

 wrote

mi sembrava che un frm glielo si potesse passare.
- prima domanda (prob stupida -- scusa, e' tardi e sono un po' stanco): il
form non e' grigio, vero ?
- seconda: lasciando la stessa sintassi, se come source gli metti un
picturebox delle dimensioni richieste (almeno) e con un'immagine, funziona ?
qui sotto piastrello un pic src su un pic dest -- la sintassi mi sembra la
stessa, a parte il call che io non uso mai e al cui posto qui sotto e' un
long restituito da bitblt.
fammi sapere, ciao, a.
(la procedura e' quella degli sfondi in "v" nel mio sito.)
Public Sub TilePic()
    On Error GoTo errman
    Dim TileIt As Long
    Dim x As Integer, Y As Integer
    Dim MaxX As Integer, MaxY As Integer
    Dim TileW As Integer, TileH As Integer
    Dim NumOfImg As Integer
    time1 = Timer
    With frmV
        .picBacks.Cls
        .picSrc.Picture = LoadPicture(MyFile)
        TileW = .picSrc.Width \ SX
        TileH = .picSrc.Height \ SY
        MaxX = .picBacks.ScaleWidth \ SX
        MaxY = .picBacks.ScaleHeight \ SY
        For Y = 0 To MaxY Step TileH
            For x = 0 To MaxX Step TileW
                TileIt = BitBlt(.picBacks.hDC, x, Y, TileW, TileH,
.picSrc.hDC, 0, 0, SRCCOPY)
                NumOfImg = NumOfImg + 1
            Next
        Next
       .Status.Panels(9) = NumOfImg & " imgs -- " & _
            Format(Timer - time1, "###,###,##0.###") & " secs"
    End With
    Exit Sub
errman:    MsgBox Error
End Sub

ma solo un contenitore di immagini ?
Assicurati che laPictureBox abbia Autoredraw = true
Ciao

 picturebox delle dimensioni richieste (almeno) e con un'immagine, funziona
?
[SNAP]

 form che ho problemi.. uhmm..
con quello che dice zanna va o continuiamo ad arrovellarci ?

 ha scritto nel messaggio
news:862drf$2eu$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Schede Magnetiche e VB

Sapete dirmi dove posso trovare schede magnetiche e un apparecchiatura in
grado di leggere/scrivere che comunichi con la seriale rs232?


Badge magnetici ISO posso fartene avere, per quanto riguarda la
magnetizzazione utilizzo un magnetizzatore incorporato nella
stampante...quindi su parallela, per la lettura un lettore ad emulazione
tastiera...se è materiale che puo' interessarti fammi sapere.
Ciao Marco

 tastiera...se è materiale che puo' interessarti fammi sapere.
una curiosità .... quanto può costare un lettore e un magnetizzatore di
badge ?


un lettore poco....tra 50 e 150 Euro :-))) (gennaio si avvicina)
un magnetizzatore intorno ai 1000/1500 Euro
ciao Marco

 un magnetizzatore intorno ai 1000/1500 Euro
grazie

 un magnetizzatore intorno ai 1000/1500 Euro
......
Non ti sembra un pò troppo?

 ha scritto nel messaggio
news:9uo86t$7ji$1...@pegasus.tiscalinet.it...

Non saprei... ai miei clienti consegno lettori Jarltech che leggono tutte e
3 le tracce ISO e ti posso assicurare che costano anche qualcosa in più.
Per quanto riguarda il magnetizzatore non so che esiste un qualcosa di
manuale ed economico, nel senso che devi passare tu la scheda da
magnetizzare....ma non mi fiderei più di tanto a garantire una velocità
giusta e costante.
Poi dipende dall'uso che devi farne di questi strumenti.
Personalmente stampo a sublimazione termica, magnetizzo card e inizializzo
smartcard.
Preferisco spendere qualcosa in più per un prodotto valido e il più
automatico possibile che tenere una persona ad infilare ad una ad una un
migliaio di cards per volta.
Anche perchè mi ricorderebbe Fantozzi quando inumidiva i francobolli :-)))
Se deve solo fare qualche prova, c'e' la ditta Futura Elettronica che ha
qualcosa in kit di montaggio...
materiale molto economico...ma se ricordo bene legge solo la traccia 2.
Ciao Marco

.....
In effetti anche io mi riferivo alla traccia due.
Cmq so che da poco è uscito un lettore - scrittore automatico di tessere
magnetiche che esce direttamente in usb, senza bisogno di alcuna interfaccia
o scheda di controllo. Il costo si dovrebbe aggirare sui 500 ?.
Io fornisco ai miei clienti un magnetizzatore (quindi non solo il lettore e
scrittore, ma anche la scheda di controllo) a circa 1100 ?, con l'uso di
lettori Omron. Però si tratta solo della traccia 2.
Ciao... Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: scheda multi io

ragazzi  ho una scheda  isa  funzione  di interfaccia IO  64 out 64 input
indirizzo della scheda &250 esadecimale
come  si gestiscono   le vecchie istruzioni basic  in 250.xxx   out250,xxx
in visual basic  chi ha orecchie  intenda
Bye Bye

a prescindere da VB6 a seconda del sis op

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

Ragazzi, vorrei cortesemente un aiuto in merito as una stringa sql.
Mi occorre fare una selezione di Records tramite il comando LIKE
il Database è Access 2000
io scrivo qualcosa del genere:
"Select * from Articoli where Descrizione LIKE '*PIATTO*' order by codice;"
Su access mi selezione mentra lanciando la query da Visual Basic non succede
nulla...
Vi ringrazio Anticipatamente.

 il Database č Access 2000


Prova così:
"Select * from Articoli where Descrizione LIKE '%PIATTO%' order by codice"
Ciao, Luciano.

Ragazzi, Vi ringrazio... siete stati fantastici!!!
Michele

 wrote in message
af9df2$59c$1...@monty.lombardiacom.it...


 perchè non mettere ; alla fine?
Perché in VB non serve.
--
Er Roscio.

Newsgroup: it.comp.lang.visual-basic
Titolo: ricerca stringhe

Di sicuro voi riuscite ad aiutarmi, ho caricato un file di testo 
all'interno di una listbox, ed avrei bisogno di ricercare delle stringhe 
all'interno di questo
Avete idea di come affrontare il problema?
Ciao a tutti, e grazie in anticipo

portesi.ruggero ha scritto:

Cerca la funzione InStr
ciao
stefano

Stefano Ferrari ha scritto:

grazie 1000
oggi appena la bimba dorme, ci provo
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: DOCUMENTAZIONE API DI WINDOWS

Dove posso trovare la suddetta documentazione?
Grazie
Focala

> Dove posso trovare la suddetta documentazione?
Sui CD di MSDN.
Se non hai i CD, anche on-line al sito
http://msdn.microsoft.com/library/

Newsgroup: it.comp.lang.visual-basic
Titolo: Menù query

Ciao, sono molto inesperto di vb, volevo chiedervi a cosa serve il menů
query della barra degli strumenti e perchč non si attiva mai. Sapete per
caso dove posso recuperare un bel esempio che mi permetta di capire come
funziona quel menů ??
Grazie e ciao
Luca

 Luca
Il menu si attiva solamente quando hai aperto la finestra di progettazione
DataEnvironment per creare connessioni o comandi ad un database. In quel
momento ti da la possibilità di cambiare il tipo di query che puoi
creare(accodamento, modifica, ecc...). In sostanza risulta molto simile al
funzionamento di Access quando crei una query partendo dalla sua struttura.
Spero di essere stato utile.
Ciao
Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: Fermare una form

Ringrazio gią chi aiuta il newbie fresco
fresco.
In una routine chiamo una funzione che
mi deve restituire il
command button premuto in una form.
Se imposto la proprietą visible=true, la
funzione non
attende l'avvenuta scelta di un command
button e non ho
trovato niente di meglio che scrivervi.
L'Help on-line
non mi dice nulla!!
Come posso fare per arrestare
temporaneamente l'esecuzione?
Grazie
mari...@protec.it
N.B.: non posso usare una msgbox.

Grazie
  Ci sono alcuni modi ma che senso ha utilizzarli? Mi sa che stai
ragionando secondo la logica della programmazione "sequenziale", non
secondo quella ad eventi tipica del VB...
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

Newsgroup: it.comp.lang.visual-basic
Titolo: utilizzo Dao da Access97 a Access2000

    Ho provato a passare un'applicazione scritta in VB4 con database
Access97 a VB6 con database Access2000, continuando ad utilizzare la
tecnologia Dao. Il datacontrol, pero', pur avendo nel reference la
versione 3.6 di Dao non riconosce come database il formato Access2000.
Devo per forza convertire tutto in Ado o c'e' un'altra strada piu'
breve?
                                                Grazie
                                                                Gabriele

Copio-incollo da MSDN. Da me ha funzionato (dao3.6 + datacontrol); spero che
ti sia utile ;-)
Bye
Andrea Basso
Intrinsic Data Control Is Usable with Access 2000 Databases
At design time, trying to bind the Data control to a Microsoft Access 2000
database will result in an error: "Unrecognized database format." The Data
control can still be used, however, by following the example below:
On the Project menu, click References. Clear the Microsoft DAO 3.51 Object
Library check box.
Set a reference to the Microsoft DAO 3.6 Object Library.
Draw a Data control and a TextBox control on a form.
On the Properties window, set the TextBox control's DataSource property to
the Data control.
Type the name of the field CompanyName into the DataField property box.
Insert code similar to the following into the code window:
Option Explicit
Private daoDB36 As Database
Private rs As Recordset
Dim sPath As String
Private Sub Form_Load()
    sPath = _
    "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb"
    Set daoDB36 = DBEngine.OpenDatabase(sPath)
    Set rs = daoDB36.OpenRecordset("Customers")
    Set Data1.Recordset = rs
End Sub


Newsgroup: it.comp.lang.visual-basic
Titolo: Microsoft Fax

Non riesco ad automatizzare l'invio di un fax con Microsoft Fax !!!!!
Aiutatemi.............

Microsoft Fax dovrebbe essere visto come una stampante. L'automatismo lo fa
lui stesso.
Prova ad indicare come stampante corrente M$ Fax e stampa con Printer.Print
xxxxx. Dopo ti dovrebbe chiedere il numero di fax a cui inviare....
Fabio Guerrazzi
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Come tenere in memoria i dati di un progetto?

Devo creare un progetto VB6 che mi gestisce una serie (non grande) di dati.
Volevo sapere quali sono i metodi per tenere in memoria del programma i dati
che l'utente aggiungerà, eliminerà o modificherà. Devo per forza creare un
file(txt per esempio) dal quale recuperare i dati, ci sono altri metodi?
Grazie anticipatamente per l'aiuto.
Ciao MatteoC.
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:213Z26Z161Z136Y...@usenet.libero.it...


I dati sono pochi , circa 100/150 record, possono aumentare e diminuire ma
non di molto. Credo che access sia un po troppo!!?? Cosa dici?


Credo che access sia un po troppo!!?? Cosa dici?
vedi tu... d'altra parte access è semplicissimo da usare... non metterei 150
record nei registri.
... e metterli su file è abbastanza complesso da gestire

 Devo creare un progetto VB6 che mi gestisce una serie (non grande) di
dati.
Magari ho capito male. Usare degli array?
_____________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

*MatteoC.*
guarda potresti usare un file INI con le relative api per leggerci e
scriverci , alla fine il codice e' molto leggibile e facile da manutenere.
il file di testo e' troppo confusionale , un file binario organizzato con
record a campi fissi gia' va meglio , il registro lo lascerei pulito e
access non lo scomoderei !
Ciao valuta tu , per ulteriori info cerca ini sul sito comune ( penultima
pagina )
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Estendere proprietà MDI Children

Ciao a tutti,
Sto realizzando una applicazione MDI in VB .NET. Nel form MDIParent possono
essere aperte numerose finestre MDIChild. Il mio problema è che ognuna di
queste finestre MDIChild porta con se' delle informazioni (necessario al mio
programma) e non so' dove salvarle...
In VB6 avevo creato un array con un elemento per ogni MDIChild e ogni volta
che creavo una nuova MDIChild, aumentavo l'UBound dell'array. In 
VB.NET
,
invece, qual è la soluzione migliore? Io avevo pensato di estendere la
generica classe MiaChild (se questo è il nome della form child) con la
proprietà che mi servono. Ma come si fa ad estendere la classe di una form?
Qualche riferimento?
Grazie!
Luc

 classe di una form?
dipende da quello che vuoi farci, ma comunque, come in vb6, puoi aggiungere
metodi e funzioni pubbliche.
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 proprietà che mi servono. Ma come si fa ad estendere la classe di una form?
Come ogni normalissima classe.
Ciao

 metodi e funzioni pubbliche.
Devo aggiungere alcune proprietà (es. .FileName, .IsChanged, etc.), in modo
da non doverle salvare in un array globale. Quando scarico la MDIChild,
vorrei controllare MiaChild.IsChanged e, nel caso, mostrare un messaggio di
conferma chiusura.
Oppure c'è un metodo migliore per salvare le proprie informazioni in una
Form?
Grazie!
Luc

 Form?
Credo che tu faccia un uso improprio del verbo "salvare".
Definisci meglio: su disco?
in memoria?
tra l proprietà del form?
Ciao

 tra l proprietà del form?
Non su disco. Intendo salvare in memoria (eventualmente tra le proprietà del
form) le informazioni aggiuntive (che poi serviranno al mio programma)
relative ad ogni form...
Grazie,
Luc

 
Allora prendi per buono quanto detto prima: ti fai il tuo form MDIChild 
di base con tutte le proprietà che ti servono e instanzi quello, oppure 
se hai degli MDIChild che si comportano in modo diverso ma che devono 
avere tutte le stesse proprietà di base fai qualcosa tipo:
Public MustInherit Class MyMDIChislBase
	Inherits MDIChild ' non so se la classe base si chiama così,
			    non ho ancora usato form MDI
	Protected Sub New
		' Protected per allinearsi al MustInherit
	End Sub
	Public Property IsChanged As Boolean
	...
	End Property
End class
Public Class MyMDIChildType1
	Inherits MyMDIChild
	...
	' Form di tipo 1
End class
Public Class MyMDIChildType2
	Inherits MyMDIChild
	...
	' Form di tipo 2
End class
Dim f1 As New MyMDIChildType1
Dim f2 As New MyMDIChildType2
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: AriCercasi Modo veloce per disegnare Pixels a Video

AriCiao a tutti!
L'ammetto che nel precedente messaggio non sono stato di grande chiarezza
su cosa volevo.
Rimedio subito.
Mi serve un Metodo veloce che dato in Input un Array di Pixels(Long) mi dia
in Output una BitMap da poter visualizzare in una Picture o in una Form.
Vi ringrazio di nuovo anticipatamente.
GIULIANO
E-MAIL : 
GIO...@MBI.IT
P.S. Non vorrei utilizzare le DirectDraw (o altre librerie che utilizzano
l'Hardware di una Scheda Video).

in Output una BitMap da poter visualizzare in una Picture o in una Form.
Io ho usato GetDIBits e StretchDIBits per leggere e per scrivere un bitmap e
le funzioni Immagine2Buffer e Buffer2Immagine per copiare il bitmap in e da
una matrice Buffer1(dimx,dimy).
Allego le funzioni
Ciao, Stefano
Option Explicit
Type BITMAPINFOHEADER
  biSize As Long
  biWidth As Long
  biHeight As Long
  biPlanes As Integer
  biBitCount As Integer
  biCompression As Long
  biSizeImage As Long
  biXPelsPerMeter As Long
  biYPelsPerMeter As Long
  biClrUsed As Long
  biClrImportant As Long
End Type
Type RGBQUAD
  rgbBlue As Byte
  rgbGreen As Byte
  rgbRed As Byte
  rgbReserved As Byte
End Type
Type BITMAPINFO
  bmiHeader As BITMAPINFOHEADER
  bmiColors(0 To 255) As RGBQUAD
End Type
Declare Function GetDIBits Lib "gdi32" (ByVal aHDC As Long, ByVal hBitmap As
Long, _
        ByVal nStartScan As Long, ByVal nNumScans As Long, ByRef lpBits As
Any, lpBI As BITMAPINFO, _
        ByVal wUsage As Long) As Long
Declare Function StretchDIBits Lib "gdi32" (ByVal hDC As Long, ByVal x As
Long, _
        ByVal y As Long, ByVal dx As Long, ByVal dy As Long, ByVal SrcX As
Long, ByVal SrcY As Long, _
        ByVal wSrcWidth As Long, ByVal wSrcHeight As Long, ByRef lpBits As
Any, lpBitsInfo As BITMAPINFO, _
        ByVal wUsage As Long, ByVal dwRop As Long) As Long
Public Const SRCCOPY = &HCC0020
Public Const BI_RGB = 0&
Public Const DIB_RGB_COLORS = 0&
Global Buffer1() As Byte          'buffer sorgente per i filtri (picPrima)
Global BmpInfo As BITMAPINFO
Sub Immagine2Buffer()
  Dim r As Long
  Dim DimX As Long, DimY As Long
  DimX = Picture1.ScaleWidth
  DimY = Picture1.ScaleHeight
  'copio il bitmap in Buffer1() in true color
  BmpInfo.bmiHeader.biSize = 40
  BmpInfo.bmiHeader.biWidth = DimX
  BmpInfo.bmiHeader.biHeight = DimY
  BmpInfo.bmiHeader.biPlanes = 1
  BmpInfo.bmiHeader.biBitCount = 24
  BmpInfo.bmiHeader.biCompression = BI_RGB
  ReDim Buffer1(1 To (DimX * 3 + 3) And &HFFFC, 1 To DimY)
  r = GetDIBits(Picture1.hDC, Picture1.Image, 0&, _
        DimY, Buffer1(1, 1), BmpInfo, DIB_RGB_COLORS)
End Sub
Sub Buffer2Immagine()
  Dim r As Long
  Dim sl As Single, st As Single, sw As Single, sh As Single
  With Picture1
  sl = .ScaleLeft: st = .ScaleTop: sw = .ScaleWidth: sh = .ScaleHeight
  .ScaleMode = 3
  r = StretchDIBits(.hDC, 0, 0, .Width, .Height, 0, 0, Picture1.ScaleWidth,
Picture1.ScaleHeight, _
        Buffer1(1, 1), BmpInfo, DIB_RGB_COLORS, SRCCOPY)
  .ScaleLeft = sl: .ScaleTop = st: .ScaleWidth = sw: .ScaleHeight = sh
  .Refresh
  End With
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Compilare files

Stò sviluppano un programma che permette di creare Screen Saver
personalizzati. Qualcuno sa indicarmi come posso compilare il file .SCR
dalla mia applicazione?
GRAZIE!
CIAO!
--------------------------------
Inviato via 
http://usenet.iol.it

 dalla mia applicazione?
i files .SCR sono normalissimi exe a cui è stata cambiata l'estensione :)
stai quindi creando in VB un compilatore per VB? :P
--
Fibia "Sakamoto" FBI

Fibia "Sakamoto" FBI



Mi viene da piangere...
Non so come tu legga il tuo reply ma ti asicuro che da OE fa veramente
schifo...
Se ne hai modo, non usare dei servizi di news via web, sono illeggibili per
il 90% degli utenti.
Ora, a te serve VB: il fatto e' che VB non e' un linguaggio di
programmazione standard, e' tecnologia proprietaria M$ e non esistono
compilatori free come invece avviene per il C.
Devi acquistare VB dallo zio bill (o dal tuo marocchino di fiducia ma fatti
*almeno* dare l'MSDN altrimenti inizierai a postare sul NG chiedendo come si
fa a far comparire un form modale e ti troverai una masnada di programmatori
imbufaliti che ti vengono a cercare sotto casa :P) e a quel punto potrai
compilare il tuo bel progetto VB.
Ciaotutti,
*

 compilare il tuo bel progetto VB.
aggiungiamo pure che anche se possiedi una licenza di VB (legale o no)
non sei autorizzato a darla ad altri insieme al tuo programma :))
IMHO dovresti trovare qualche specifica..
forse potresti attaccare uno stub di un vero screen saver ad una
serie di istruzioni del tuo programma.. però non so dirti come fare..
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Alignment di sola lettura?

La guida dice che per TextBox, CheckBox e OptionButton la proprietà
Alignment è di sola lettura.
Non è vero.
Che sia stata "liberata" da qualche SP (un po' come la MultiLine prima
necessaria per allineare e ora non più)?


lo si legge qui :
mk:@MSITStore:C:\Programmi\Microsoft%20Visual%20Studio\MSDN98\98VS\1040\vb98
.chm::/html/vbproalignment.htm
il file vb98,chm che ho io e' aggiornato al lunedì 8 giugno 1998, tu per
curiosita' che data hai ?
-- 
-Gigio@Work(?)-

 per curiosita' che data hai ?
Stessa data, 1.849.790 bytes
Ma il punto è: Qualcuno conferma che quelle limitazioni sono scomparse,
almeno con VB6+SP5?

 scomparse, almeno con VB6+SP5?
Bho !
-- 
-Gigio@Work(?)-

 ha scritto nel messaggio
news:2lhpkgF...@uni-berlin.de...

Anche io ho VB6+SP5 e l'allineamento a destra delle textbox funziona senza
la MultiLine che prima era necessaria.
Carmelo

 almeno con VB6+SP5?
La proprietà Alignment a me funziona benissimo anche in scrittura a
run-time, sicuramente fin dal SP3.
ciao
GC
Newsgroup: it.comp.lang.visual-basic
Titolo: bof e eof

Salve a tutti.
Io ho una tabella con 3 elementi e la voglio scorrere con dei bottoni
che ho fatto io (primo record, record precedente, record successivo e
ultimo record).
Il flusso del programma è il seguente:
All'inizio della form apro la tabella e popolo il recordset e mi si
posiziona sul primo elemento.
Dopodichè eseguo una procedura che abilita/disabilita i bottoni a
seconda della posizione del cursore della tabella e infine inserisco i
valori del record nella form.
Il problema è che quando parte sia BOF che EOF mi tornano false.
Come faccio a priori a sapere se il record precedente è il primo oppure
se è l'ultimo?
Infatti se faccio una "Rec.MoveFirst" il recordset si sposta
effettivamente sul primo record, ma la BOF mi torna false.
Non Esiste qualche metodo del tipo BOF-1 o simili???
Ringrazio anticipatamente chi vorrà aiutarmi con questo problema!
Max
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Non Esiste qualche metodo del tipo BOF-1 o simili???
Per quanto ricorda il mio mononeurone, le proprietà BOF e EOF diventano vere se
sei, rispettivamente, *prima* del primo record o *dopo* l'ultimo record, quindi
per implementare quanto da te richiesto credo non siano proprietà utili....
Se è un recordset statico, per cui sono utilizzabili la proprietà recordcount e
absoluteposition, potresti verificare quelle, cioè se absoluteposition è 1 vuol
dire che non puoi più andare indietro, se è uguale a recordcount non puoi più
andare in avanti.
Mi accorgo solo ora di essere partito dal presupposto che tu stia utilizzando un
recordset ADO.....
Vabbuo... hth :-)
Salutoni
Sergio

 Salve a tutti.
CUT
se fai movefirst...non hai bisogno di sapere se sei al primo record...ci
sei!
se fai movelast...non hai bisogno di sapere se sei all'ultimo record...ci
sei!
Hai bisogno di sapere (AD OGNI SPOSTAMENTO) se sei OLTRE i limiti del
recordset o se la tabella NON HA record!
Prova questo!
rs.movefirst
msgbox "Tanto per fare scena"
rs.moveprevious
    if rs.bof then
        beep
        msgbox "non ci vado no no!"
        rs.movefirst
    end if
' qui visualizza sicuramente il primo record!