mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Assembler

Sto lavorando per la creazione di un po' di routine fatte bene da poter
ri-utilizzare in seguito...
Qualcuno mi sa indicare come inserire parti di assemble in line in VB?
Ringrazio in anticipo chiunque decida di aiutarmi...

 ha scritto nel messaggio
news:8d9c6a$ief$1...@serv1.albacom.net...

L'unico metodo che mi viene in mente e' quello di usare
PB DLL COMPILER della PowerBasic
ti crei una DLL nativa ( o un exe ) richiamabile da VB .
oppure ti dai al Delphi o al C......
Ciao
Ven.

 wrote in message


Newsgroup: it.comp.lang.visual-basic
Titolo: VBA excel: applicare una macro ad ogni foglio

ho una macro che fa delle modifice alle celle del foglio.
come faccio per fare in modo di applicare quelle modifiche per ogni foglio
del documento, visto che ho circa 100 fogli?
il problema sta anche nel fatto che i nomi dei fogli cambiano di volta in
volta.
servirebbe un comando del tipo "passa al foglio successivo"
grazie





dovresti fare cosě (ma controlla la sintassi)
for each xx in activeworkbook.sheets
    with xx
        ' xx č il foglio che ti interessa, di volta in volta, quindi qui
metti quello che devi mettere.
    end with
next xx
Mario

 ha scritto nel messaggio
news:96jmsv$l9naa$1...@ID-70152.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: compara tabelle

Ho la necessità di comparare tabelle che potrebbero avere strutture
differenti ma mi sono bloccato da parecchi giorni perchè non riesco
ad aggiungere o cancellare fields.
    Do Until alfa = iTotFields1
        iType1 = RsA(alfa).Type
        lSize1 = RsA(alfa).DefinedSize
        Do Until beta = iTotFields2
            iType2 = RsB(beta).Type
            lSize2 = RsB(beta).DefinedSize
            If (RsA(alfa).Name = RsB(beta).Name) And _
                (iType1 = iType2) And _
                (lSize1 = lSize2) And _
                (FieldType(iType1) = FieldType(iType2)) Then
                same(alfa) = True
                Exit Do
            End If
            beta = beta + 1
        Loop
        alfa = alfa + 1
    Loop
Uso questo codice per controllare se i fields sono identici ma poi mi fermo
quà.
Mi potete aiutare ??
grazie Giancarlo
p.s. sarei anche grato se mi potete illustrare come controllare anche gli
indici
ed eventualmente modificarli

ad aggiungere o cancellare fields.
Credo che dovresti usare ADOX se vuoi fare il lavoro da codice vb.
Personalmente preferisco usare script sql per fare questi lavori, lo
trovo molto piu' semplice.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto per tirocinio

 
          Ciao a tutti ho installato or ora visual 
studio.net
 in qaunto vorrei
realizzare una interfaccia grafica. Ho scritto un programma in c e vi chiedo
se realizzo un form come faccio a lanciare l'eseguibile del codice scritto
in c da visual 
stduio.net
 ad esempio quando si preme un pulsante? E se
volessi passare dei parametri al codice scritto in c selezionando alcune
opzioni del form tipo:
valore di a
1) 10
2)20
3)30
e se seleziono la prima passa il valore 10 come argomento della funzione
scritta in c
come si può realizzare questo?
scusate ma sono un principiante. GRazie a chi vorrà aiutrami.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Ho scritto un programma in c
e hai sbagliato ng: qui si parla di visual basic!
-- 
Emanuele Torrenti
http://torrenti.altervista.org

 3)30
Per avviare un eseguibile:
Dim newP As New Process
        newP.StartInfo.FileName = "D:\Prove3.exe"
        newP.StartInfo.Verb = "open"
        newP.Start()
Per i parametri, presumo uno sguardo a
Proprietą StartArguments
Ave
giuseppeD
---
CCR 

 giuseppeD
Andrea

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

Fare da solo è sempre più dura.
Adesso non riesco a capire come aprire un file da un CommonDialog .
Ad esempio, volendo aprire Ciao.txt che si trova sul disco C, come
completare
qui sotto ?
 Dim NomeFile As String
    CommonDialog1.Filter = "File di Testo (*.txt)|*.txt| Word (*.doc)|*.doc"
    CommonDialog1.FilterIndex = 1
    CommonDialog1.ShowOpen
    NomeFile = CommonDialog1.FileName
Grazie.
Mauro


NumFile = freefile    ' reerisco un handle ad un file valido
open path & nomefile for input as #numfile    ' apro un file sequenziale in
modalità lettura
do while not eof(numfile)    ' esegui la routine fino a quando non ho
raggiungo la fine del file
     line input#numfile, paragrafo    ' leggo un paragrafo
    testo = testo & paragrafo & vbcrlf    ' inserisco tutti i paragrafi in
un testo
Loop
close#numfile    ' chiudo il file
Ti consiglio di approfondire l'argomento sui file. Guorda sulla guida in
linea le seguenti istruzioi:
open, close, freefile, get, put, line inut, write, print
Buon lavoro Bruno

    NomeFile = CommonDialog1.FileName
beh.
Per aprire un txt devi innanzitutto mettere un controllodi testo nel form.
poi aggiungi:
open commondialog1.filename for input as #1
text1.text=input( lof (#1) ,#1)
close
Perche' tutto vada bene imposta multiline su true.
Fammi sapere se ti funziona.
Ah per i doc il controllo text non funziona. Non so se ci sia qualche ocx
che li apra.
semmai chiedi in giro.

Newsgroup: it.comp.lang.visual-basic
Titolo: Collegarsi ad un DB in rete

Ciao a tutto il ng,
il mio dubbio consiste nel fatto che ci si possa collegare ad un DB che stà
su una macchina, direttamente da internet.
Mi son spiegato da cane,
allora, io ho la mia applicazione che gira su un pc e che va ad usare un db
presente in una macchina collegata in Internet.
Come devo fare per poter beccare il DB????
Grazie a chiunque mi possa essere d'aiuto.
Mitzuashi

 wrote in message
ek8D9.37331$744.1...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare documenti office su form

Ciao a tutti, volevo sapere se qualcuno di voi usando VB6 ha già avuto
modo di integrare documenti office su un form e come fare.
Il mio interesse è quello di visualizzare su un form il contenuto di un
file di word e/o excel, non necessito di modifiche o altro, solamente che
alla selezione di un file possa far vedere in un oggetto il contenuto del
file scelto a patto che si tratti di excel o word.
Grazie a tutti!
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ciao
Apri una finestra con CommonDIalog, fare scegliere il 
doc.to
  che
vogliono
e poi apri il 
doc.to
  con Shell o SuperShell
Considera che nel CommoDialog.Filter puoi far vedere quello che vuoi
tu....
 
Questa è una soluzione!
Ciao Nadia

 Ciao
Apri una finestra con CommonDIalog, fare scegliere il 
doc.to
  che
vogliono
e poi apri il 
doc.to
  con Shell o SuperShell
Considera che nel CommoDialog.Filter puoi far vedere quello che vuoi
tu....
Questa č una soluzione!
Ciao Nadia
------------------------------
ciao
insersci un oggetto ole dal menu degli strumenti.
appena lo sinserisci ti esce una finestra dove selezioni il tipo di oggetto. 
Premi annulla e non impostare niente
da codice poi esegui:
NomeOggettoOle.CreateEmbed "percorso del file"
quindi potresti miscelare le 2 risposte:
inserisci un oggetto CommonDialog e cerchi il file, lo selezioni e lo passi 
come parametro
al CreateEmbed
Ricordati impostare perņ qualche proprietą in modo il documento non sia 
modificabile.
- Fabio -

Newsgroup: it.comp.lang.visual-basic
Titolo: Intercettare il click...

Scusate come faccio a intercettare il click di ctrl + alt + canc??? e poi a
bloccarlo???
e l'invio....
l'F4???
e x ultimo come tolgo la X in alto a destra con tutta la striscia blu???
se ve lo doveste chiedere: ma come chiudi il programma... beh uso un
semplice bottone... tutte le altre opzione x chiuderlo devono essere
disabilitate... come fare???
--
The mistery of love is greater than the mistery of death.
Oscar Wilde

Sito comune! :)
http://www.it-lang-vb.net
            Ciao
                    Allanon

 disabilitate... come fare???
Anche un F1 su QueryUnload potrebbe aiutare.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: (?) CONTROLLO ESISTENZA PROGRAMMA

devo controllare se un programma fatto da me esiste già nel computer, ma non
ho la più pallidaidea di come fare a cercarlo...
il dir non funziona per le sottodirectory?
ho VB6....
il miniprogramma che cerca il mio prog deve essere lanciato dalla directory
principale di un CD, ma non sò come scriverlo per far si che funzioni anche
su computer dove non sono ancora installati i run-time di vb6...
se avete idee le gradirei possibilmente sulla posta elettronica, nel NG non
ci vengo molte volte....
grazie
EffEPi...@iol.it
EFFEPI SYSTEM

 EFFEPI SYSTEM
-- 
Saluti, Davide.

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Rispondere a un msgbox (domanda newbie) e altra domanda

come faccioa intercettare il click sulle risposte ai msgbox ?
cioè : msbox  "si o no ?"
se scelgo si allora routine
else se scelgo no allora altra routine
ho provato sul manuale e su deja.. ma nulla ..:)
Sant'ugo mi aiuti ? :DDD
forse qualcosa tipo
if msgbox = vbyes then ...
ma mi pare che dia errore ...
altra cosa ..
ho fatto una routine che vede al click di un bottone se uno di tre campi
testo è vuoto ...
quindi ho 
text1.name
 = ciro
text2.name
 = fabio
text3.name
 = gregory
funziona ma volevo mettere anche una msgbox del tipo " attenzione ! il campo
blablabla è vuoto!
come faccio ?
segue spezzone di codice
'---------------Akuma rewl-----
Private Sub Command1_Click()
If Len(Text1.Text) = 0 Then
GoTo 10
ElseIf Len(Combo1.Text) = 0 Then
GoTo 10
ElseIf Len(Combo3.Text) = 0 Then
GoTo 10
10:
Form1.Visible = True
Else
MsgBox "Hai scelto i tuoi settaggi per " & Text1.Text & ": li rendo
effettivi?", vbYesNo, "Mmmh..."
Open "mypg.doc" For Output As #1
'---ovviamente continua ... scrivendo su un file tutte le caption e i testi
....

come faccioa
intercettare...
--------------------------------
Inviato via 
http://usenet.iol.it
 

Molto da Newbie... :)
Risposta= msgbox("Questo é vb?",vbyesno,"VB?")
Puň ritornare i valori vbyes e vbno...
        Ciao
                Allanon

 wrote in message
9f5ceo$ndv$1...@diesel.cu.mi.it...


 segue spezzone di codice
prima prova a eliminare tutti i goto
(escluso il motorista honda)
poi vedrai che qualcuno ti rispondera' :))
meglio ancora, prova a usare una matrice di txtbox (guida ->
array/matrici di controlli) e a lavorare sulla propr index.
ciao, a.


 ma mi pare che dia errore ...
Select Case MsgBox("Vuoi un caffč?", vbYesNo Or vbQuestion)
    Case vbYes
        '[... codice1 ...]
    Case vbNo
        '[... codice2 ...]
    Case Else
        '[... gestione di un caso
        'che non dovrebbe mai verificarsi ...]
End Select
Faber


nooo, domani ci chiederà come interfacciare le matrici Vb col C++...
Scherzi a parte, AkuMa, come vedi rispondono sempre in tanti: segui i
consigli che ti hanno dato e premi quel benedetto F1!!!!!!
ciao
ugo

         'che non dovrebbe mai verificarsi ...]
come sei pignolo... :))

 come sei pignolo... :))
e' l'impostazione corretta, con qualunque tipo di dubbio: select,
if/elseif, ecc.


il giorno in cui cambi il messaggio e vbYesNo con vbOkCancel ne
riparliamo  :)
Faber

Forse non ho capito la domanda... Provo a risponderTi secondo quanto ho
capito.
Tu stai usando la PROCEDURA MsgBox, che non restituisce alcun valore.
Devi invece usare la FUNZIONE :
res = MsgBox("Confermi ?", vbYesNo)
if res = vbYes then
  ' La risposta è SI
end if
Hope it helps
Fabio GRANDE


non è che se fai
MsgBox "Ciao"
stai usando una procedura, mentre se fai
Res = MsgBox("Ciao")
stai usando una funzione...
è *sempre* una funzione, solo che nel primo caso non viene utilizzato il
valore di ritorno (come nel caso di Call MsgBox("Ciao"))
Faber

 blablabla č vuoto!

Newsgroup: it.comp.lang.visual-basic
Titolo: Ado e metodo Find

Salve a tutti.
Vorrei una delucidazione: in un oggetto ADODB.Recordset c'è il metodo 
find, che esegue una ricerca tramite un criterio.
Ora... io posso posizionarmi all'interno del recordset e da quel punto 
eseguire la find per ridurre il numero di record controllati. Però se 
voglio che la ricerca venga eseguita in un certo range di record 
piuttosto che sull'intero recordset come faccio?
Thx in anticipo!
-- 
Nella vita una sola cosa è certa: se la storia ci ha insegnato qualcosa, 
è che si può uccidere chiunque. (Micheal Corleone)
Posted from X-Privat Free NNTP server - 
www.x-privat.org

 piuttosto che sull'intero recordset come faccio?
apri il recordset, e prima di fare la .Find usi la .Filter. Quest'ultima
filtra il recordset, limitando i record a solo quelli che soddisfano certi
criteri. Per cui, se all'inizio hai un rs da 15.000 record, applica la
.Filter, ottieni un recordset piů piccolo (se il criterio č giusto,
ovviamente)....
su quest'ultimo, applichi la .Find
good coding!!!
-- 
Alletun
Sorry, ask me if you want to get my e-mail!

Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire la stessa form + volte passando argomenti diversi.

E' possibile aprire la stessa form più volte passando argomenti diversi.
Mi spiego meglio:
Ho una form che mi rilascia una lista di file a seguito di una ricerca,
facendo doppio clic su una voce della lista mi si apre una form con il file
relativo.
Vorrei, per poter fare un confronto tra i vari file, che l'utilizzatore
potesse aprire più form contemporanee dei file presenti nella lista in modo
dinamico.
Esiste un modo per risolvere il problema?
Ciao e grazie
Enzo

 potesse aprire piů form contemporanee dei file presenti nella lista in


 ha scritto nel messaggio
news:10084211...@tiglio.venaria.marelli.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] [Meeting] Mi dispiace: bidone :(

Come da subject...
Mi dispiace tantissimo...
Sarei proprio voluto venire, ma porka di quella... con 38,5° di febbre non é
proprio il caso...
Mi dispiace tanto :(((
Vi avrei avvertiti prima... se l'avessi saputo!!!! :(
Questo pomeriggio mi sentivo un relitto e non sono andato a lavorare. Mi
sono addormentato sul divano, ho provato ora la febbre...
Sarà per la prossima volta!
Fatemi sapere se devo versare comunque la mia quota (anzi, manderò mio padre
a farmi rimborsare il biglietto del treno! :( )
                        Ciao & alla prossima...
                                            Allanon
P.S. = Che sf_ _ a, che sf_ _ a, che sf_ _ a!!!! Ma perché proprio a
me?!?!?!?!?

 Mi dispiace tantissimo...
Anche a me.   :-((
Buon meeting a tutti!
Passatevi una bella giornata, una bella magnata e non
spaccatevi la testa con Billie (che non ne vale la pena!).
ciao
ugo

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

Ciao a tutti.
In un controllo ListBox aggiungi gli item con "AddItem"
Ogni volta che inserisco un item il controllo ListBox lo inserisce in fondo
alla lista di item esistenti, se necessario visualizza la barra di
scorrimento, ma presenta sempre gli item dal primo all'ultimo.
E' possibile avere la lista visualizzata sempre con l'ultimo elemento a
video ?
.....per capirci, come la visualizzazione di una qualsiasi chat, che
"appende" l'ultimo item alla lista degli item esistenti
Ciao e grazie
Stef

List1.AddItem "QuelloCheTiPare"
List1.ListIndex = List1.ListCount - 1
Tutto qui.
Questa pratica comunque rallenta enormemente il processo di riempimento di una
listbox.
Usalo solo se hai pochi elementi e ne aggiungi di rado...
--
GbC
http://www.chiappori.net
http://www.gbcweb.com
--



La butto lě: hai provato a settare la listindex su quello appena aggiunto (l'ultimo)? Cosě magai č
obbligato a mostrartelo...
fammi sapere...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

Basta impostare l'ultimo come quello attivo
Lista.listindex=lista.newindex (o newitem non ricord più!)
    Ciao
            Allanon

 wrote in message
9bpaq7$a7hgd$1...@ID-67444.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Compilazione condizionale

Se io ho nel codice:
#If Dm = True Then
   MsgBox "Prova"
#Else
   'Non fare niente
#End If
E poi setto Dm = 0 (in Proprietà progetto > Crea > Argomenti...),
nel compilato resta qualche *traccia*
del codice sopra, o è come se non avessi scritto nulla?
Ciao

 del codice sopra, o è come se non avessi scritto nulla?
Se è stato fatto come in tutti gli altri linguaggi*, la seconda che hai
detto.
L'unico modo per esserne certi è mettere una barcata di istruzioni in una
condizione, compilare nelle due modalità e verificare che le lunghezze
degli eseguibili siano inconfutabilmente differenti.
termoPilucco
*con M$ non si sa mai
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Mi risulta che la parte false non venga inserita nel compilato
esattamente cone i commenti.
Ciao
Piero


Ho provato in questo modo:
2 exe uguali, praticamente vuoti.
Ho inserito stringhe di testo (che normalmente sono
leggibili in un exe vb aperto con un editor) .
In un caso c'erano e nell'altro no.
Presumibilmente non resta allora alcuna traccia.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema stringa SQL

Salve a tutti, scusate il disturbo....
Come da oggetto ho un grosso problema con una stringa SQL; il giochetto che
dovrebbe fare la mia combobox è quello di riempire i campi di un form
prendendo il testo appunto da se stessa.
Ecco qi il codice incriminato:
Private Sub cmbRiepilogo_Click()
Dim rsRicerca As Recordset
Dim c As Control
Dim Valore As String
Call Carica_Lista_Contatti                        ' Qui riempio la mia
combobox
    Valore = frmContatti.cmbRiepilogo.Text
    Set rsRicerca = dbAZIENDA.OpenRecordset("SELECT * From Contatti WHERE
(((Contatti.Società)=" & frmContatti.cmbRiepilogo.Text & "));")
    For Each c In frmContatti.Controls
        If TypeOf c Is TextBox Then
            If IsNull(rsRicerca(c.DataField)) Then
                c.Text = ""
            Else
                c.Text = rsRicerca(c.DataField)
            End If
        End If
    frmContatti.cmbRiepilogo.Text = ""   ' Tolgo la ragione sociale dalla
combobox (so di per certo che il problema non sta qui)
    Next c
    rsRicerca.Close
    Set rsRicerca = Nothing
End Sub
Ho povato a sostituire anche la stringa sql con ...."SELECT * From Contatti
WHERE (([Contatti.Società] =" & Cstr(frmcontatti.txtRagioneSociale.text) &
"));"..... (poi alla fine dovrebbe essere la stessa cosa) ma niente da fare!
Qualcuno di voi potrebbe gentilmente spiegarmi come mai l' errore che mi
compare è: " Errore di sintassi (operatore mancante) nell' espressione della
query '(((Contatti.Società)=Testo combobox))'

 prendendo il testo appunto da se stessa.
Un paio di precisazioni...
Non hai detto che DB usi, per cui potresti mettere in difficoltà chi ti
vuole aiutare, visto che proprio la sintassi SQL è quello che differenzia
l'accesso ad un DB piuttosto che ad un altro.
Se usi Access, hai impiegato, per scrivere il post, molto più tempo di
quanto avresti impiegato per scoprire da solo il problema. Access, infatti,
offre un wizard di creazione delle query, con cui avresti trovato subito il
problema.
Comunque, dal mio punto di vista, il problema di fondo è che
Contatti.Società è di tipo testo, ma tu lo inserisci nella query come se
fosse numerico. Per i campi testo, prima e dopo del valore ci vugliono gli
apicini '.
Ciao
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Help su FileSystemObject

Saluti al News.
Avrei bisogno di un aiuto per copiare con istruzioni VB una directory da un
pc ad un altro. Devo far funzionare il tutto da un modulo e non attraverso
controlli inseriti in una form. Ho trovato sulla guida l'utilizzo
dell'oggetto FileSystemObject e del CopyFolder, ma ho qualche problema a
farla funzionare.
Dim obj_dir
Set obj_dir = CreateObject("Scripting.FileSystemObject")
obj_dir.CopyFolder [origine], [destinazione]
Mi restituisce l'errore 76 "impossibile tovare il percorso", ma ho
contollato le path, e sono corrette.
Qualcuno puo' aiutarmi?
Grazie
Tiziano

 Qualcuno puo' aiutarmi?
sono corrette per windows ma non per la copyfolder forse, vediamo se
indovino,
copyfolder non accetta percorsi di rete col doppio slash "\\" ?
per curiosita' monta una cartella di rete con il tuo percorso e vedi se va
es:
da
copyfolder "c:\test\*", "\\server\c\"
a
copyfolder "c:\test\*", "Z:\"
dove Z e' una cartella di rete che punta a \\server\c
-- 
-Gigio@Work(?)-
Newsgroup: it.comp.lang.visual-basic
Titolo: Compatibilita' VB4->VB5

Ciao a tutti,
Mi domandavo se i programmi prodotti con VB4 possono essere caricati 
ed editati col VB5.
Se qualcuno ha usato il VB5, vorrei anche sapere quali grosse 
differenze ci sono, oltre alla velocita', con la versione precedente.
Ciao e grazie.
Vittorio

Vittorio
Ciao
REMO FRANCESCHELLI - ITIAV 4a Info.
http://www.geocities.com/SiliconValley/Lakes/7668
(Programmazione in Pascal)
** Concentrazione = Forza **

Newsgroup: it.comp.lang.visual-basic
Titolo: Andare a l'ultima riga di rich text box

Come si fa ad andare a l'ultima riga di rich text box!?!
In modo da scrivere nell'ultima linea!?!
Grazie

 wrote in message
87k4kb$nta$1...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Sfondo trasparente

Dovrei poter disegnare in una picturebox un qualcosa e poi rendere di questo
disegno lo sfondo trasparente in modo tale da poterlo sovrapporre ad altre
immagini... come potrei fare?
Io un'idea l'ho già... però devo ancora metterla in pratica e volevo prima
sentire altri suggerimenti!
Grazie a tuti
beli e bruti.
(G. Weah)
^_^ Gianni

 disegno lo sfondo trasparente in modo tale da poterlo sovrapporre ad altre
è più difficile di come sembri: devi usare le api per cambiare pixel per
pixel se del colore "raro" usato per lo sfondo (tipo il violetto). funziona
per un form. per un controllo image non saprei.
CreateRectRgn
GetPixel
CombineRgn
SetWindowRgn
più DeleteObject per liberare preziose risorse di sistema
il codice completo free lo trovi forse da qualche parte in net

SetWindowRgn
No, credo sia molto più semplice.
Serve solo una picture che faccia da maschera, la BitBlt() o la
StretchBlt().
C'è anche un esempio sul CD di VB, e se sui MSDN cerchi "Transtarent Bitmap"
o simili, ne trovi almeno una decina.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [M$] Win98 bug

Leggendo il post +ACI-Ma Win98 a voi come va ?+ACI- mi +AOg- venuto in mente che forse +AOg-
il caso di divulgare il pi+APk- possibile questa notizia. Spesso, a causa di
questo bug, si possono verificare rallentamenti del computer o peggio
ancora, nel 25+ACU- dei casi, dei crash di sistema.
Spero apprezziate.
Windows 98 durante l'installazione si dimentica di copiare i seguenti
driver:
VDD.VXD
NTKERN.VXD
VCOMM.VXD
VMOUSE.VXD
CONFIGMG.VXD
VDMAD.VXD
I suddetti file vanno estratti dal file WIN98+AF8-45.CAB presente sul CD-ROM di
installazione e tutti copiati nella cartella WINDOWS+AFw-SYSTEM+AFw-VMM32+AFw- tranne i
primi due file (VDD.VXD e NTKERN.VXD) che vanno copiati nella cartella
WINDOWS+AFw-SYSTEM+AFw-
Zeross

Ehm... qualche problemuccio... ho spedito il file in formato UUEncoded
invece che MIME.
Ecco il messaggio leggibile (almeno spero) ^__^
------------------------------------------------------------
Leggendo il post "Ma Win98 a voi come va ?" mi è venuto in mente che forse è
il caso di divulgare il più possibile questa notizia. Spesso, a causa di
questo bug, si possono verificare rallentamenti del computer o peggio
ancora, nel 25% dei casi, dei crash di sistema.
Spero apprezziate.
Windows 98 durante l'installazione si dimentica di copiare i seguenti
driver:
VDD.VXD
NTKERN.VXD
VCOMM.VXD
VMOUSE.VXD
CONFIGMG.VXD
VDMAD.VXD
I suddetti file vanno estratti dal file WIN98_45.CAB presente sul CD-ROM di
installazione e tutti copiati nella cartella WINDOWS\SYSTEM\VMM32\ tranne i
primi due file (VDD.VXD e NTKERN.VXD) che vanno copiati nella cartella
WINDOWS\SYSTEM\>
Zeross

VDMAD.VXD
Grazie ....... Cecco

Ho trovato da qualche parte un articolo che indicava questo ed altri
bug di W98 (o meglio mancanze nell'installazione), rimediabili
procedendo all'installazione manuale di diversi componenti.... se lo
ritrovo ve lo posto...
Ciao,
งirri#@
tin.it
(togliete "#" dall'indirizzo e sostituite "ง" con "s")


Riassunto della situazione (per la serie: cosa potrebbe dire M$):
- se alla fine dell'installazione Win98 parte e da' problemi E' UN MIRACOLO!
- se non parte e' colpa dell'hardware
- se parte e NON da problemi... questa eventualita' non e' stata contemplata
dal reparto Marketing...
--
Roal Zanazzi
z...@iol.it

L'articolo che vi dicevo (incluso quello che dice Zeross, lo trovate
su Chip di Novembre.
Per chi non lo avesse, farņ un piccolo riassunto e lo posterņ...
Ciao,
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
Newsgroup: it.comp.lang.visual-basic
Titolo: problema con i cassetti della stampante

ciao a tutti,
  io ho creato un programma di stampa fatture in visual basic 5, che
però non mi riconosce i cassetti della stampante. Mi spiego meglio:
nel common dialog che si interfaccia con la stampante, la gestione
dei cassetti della stampante c'è ma non funziona.
La stampante è una HP Laserjet serie 8000, con driver pcl6.
Ho fatto la prova di stampare un doc word selezionando il secondo
cassetto e me lo riconosce, facendo la stessa cosa col mio programma
in vb5 prende sempre e comunque i fogli dal primo cassetto.
non so, esiste qualche aggiornamento, o qualunque cosa per risolvere
il mio problema?
ciao e grazie
Robby

 ha scritto nel messaggio
news:99pgok$jdi$1...@pinco.nettuno.it...

Mi sembra che ci fosse un bug noto in VB5 per quanto riguarda le stampanti
.. che servicepack hai ?
Saluti

 Saluti
sp3.
ciao e grazie
Robby

Newsgroup: it.comp.lang.visual-basic
Titolo: spezzare un file di testo

Ciao a tutti,
ho fatto un programmino che apre un file di testo (destinato ad una
rsa a controllo numerico), lo elabora (sostituisce o alimina alcune
stringe, spazi, etc.) e poi lo salva con nome.
In tale prg e' necessario anche poter spezzare il file in piu' parti
per farlo entrare su diversi floppy e non so come fare.
Mi potete aiutare :-))
Ciao da Francesco
P.S. penso sia utile che vi dica che i file da elaborare sono tutti
formati da una serie di righe terminate dall'invio.
Es:
N41191  Y27.527 Z-120.958
N41192  Y27.766 Z-119.651
N41193  Y27.794 Z-119.
N41194  Z-73.908
.
.
.
Grazie :-)

 wrote in message
27j26sg7eok5es8bq...@4ax.com...



Puoi provare con questi due modi.
Primo. Crei, su ogni floppy, un file di dimensioni leggermente inferiori a
quelle
massime possibili, in modo di avere spazio per un file aggiuntivo che
contiene
informazioni tipo dimensione del file dati, numero di disco, ecc.
Secondo. Nomini i file sui vari dischi con nomi progressivi (es. prova.001,
prova.002, ecc.)
e durante la scrittura, quando lo spazio sta per finire, scrivi un tuo
codice per indicare
che i dati proseguono su di un'altro disco.
Personalmente ho usato il secondo metodo per salvare dei dati su floppy
e il sistema funziona bene. Naturalmente il programma che poi leggerà i
floppy
con il file spezzettato dovrai scriverlo tu, per fargli riconoscere il
particolare
codice che hai usato.
Spero di esserti stato utile.
Samuele.
Newsgroup: it.comp.lang.visual-basic
Titolo: altro problema con le immagini

come si può salvare una selezione di un'immagine? (un po come fanno i varii
programmi di grafica in circolo)

 programmi di grafica in circolo)
Dai un occhio a Picturebox.PaintPicture
--
Math Parser : 
http://www.neodatatype.net
FlowChart   : 
http://www.neodatatype.net/dump/flowchart/dir.asp
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] ole32.dll oleaut32.dll

Mi sono trovato a doverla aggiornare su pc con win95 perchè dei programmi
davano errore, idem per la libreria oleaut32.dll
Qualcuno sa queste due DLL cosa fanno? A cosa servono?
-- 
Per diventare grandi non bisogna avere paura di essere piccoli
Per rispondere in privato elimina dall'indirizzo "togliquesto"
MasterDavidex - David Ruscelli

 Qualcuno sa queste due DLL cosa fanno? A cosa servono?
Fanno muovere VB.
Ciao,
Andrea


Speravo in qualcosa di più, che funzioni contengono?
Poi non mi quadra quello che dici, visto che la ole32.dll l'ho dovuta
aggiornare per far girare un programma fatto in gupta32.


 dovuta aggiornare per far girare un programma fatto in gupta32.
Evidentemente anche Gupta32 usa l'OLE Automation come base.
Ole32 ed OleAut.dll sono necessarie perché contengono tutto il
codice di base per far funzionare COM ed OLE.
Ciao,
Andrea

 ha scritto nel messaggio
news:hl9Jc.1718$kk5....@news4.tin.it...

Cos'è ole?
Cos'è ole automation?


 Cos'è ole automation?
su google ho trovato questo
O chiedi Hole o chiedi OLE.
OLE è una vecchia tecnologia microsoft il cui acronimo significa "Object
Linked and Embedded". Permette ad una applicazione di comunicare o di
incorporare un oggetto server esterno e utilizzarne le funzionalità che
esporta. Tecnologia poi diventata obsoleta con activex. Leggevo in un
manuale di programmazione che qualche tecnico microsoft aveva sminuito la
funzionalità di OLE dicendo che ole è... una parola che si pronuncia olé...
E' esatto?
cosa si intende per "incorporare un oggetto server esterno"?


 Cos'è ole automation?
le ole sono quelle cose che fanno gli spettatori allo stadio.
object linking and embedding.
ad esempio, quando in vb usi l'object model di word, stai usando l'ole.
(almeno, questo è quello che ho capito io)
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 server esterno"?
Vabbeh, visto che nessuno ti ha risposto, lo
faccio io ora.
Dunque, hai presente quando richiami Word e
stampi un documento di Word tramite la tua
applicazione? Ecco, quando tu scrivi
Dim WordApp as Word.Application
stai incorporando un COM server( Word ) nella tua
applicazione.
OLE Automation è quello che ti consente di
interagire con gli oggetti COM.
Adesso non posso spiegarti tutto, però questo
dovrebbe un pò schiarirti le idee!
Ciao,
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Update batch ADO

Volevo fare l'aggiornamento di 100 records circa i un colpo solo usando il
metodo updatebatch, ma non so come scrivere il codice
Grazie

 fai
    with dataenvitonment.rsnomedelrecordset
            .addnew
            .field("Nomecampo1).value = valore..
            ecc....
            .addnew
            .updatebatch
    end with
ricordati che se usi ADO il cursore deve essere client e il blocco dei
record su ottimisticobatch
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa da file

come stampare un file "stampato con Stampa su file", con visual Basic?
grazie

Ciao:
  puoi provare ad usare il progetto PrintFil che ho inviato al Sito
Comune e reperibile anche a:  
http://members.xoom.it/flanguasco/
Attento a scegliere la routine giusta di stampa (in mnuStampa) in
funzione dell' S.O. che usi (Windows 98 o NT).
Ciao e fammi sapere se e' quello che ti serve.
Franco


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

ciao a tutti, vorrei fare una piccola applicazione che faccia suonare lo
speaker del pc. Ho guardato l'help e ho usato la funzione beep, il problema
è che mi emette un suono con la sound blaster. Qualcuno potrebbe darmi una
dritta?
Grazie mille.
Andrea.

Andy ha scritto:

http://makeashorterlink.com/?F4D912A92
Leggi tutto.

 ha scritto nel messaggio
news:SzJF9.7011$fa.2...@news1.tin.it...

La api di windows o la funzione beep del vb (che penso sfrutti la api
comunque) esegue il suono sullo speaker solo su sistemi a tecnologia NT.
Esiste comunque una Dll che implementa la funzione in modo da essere
usata appieno anche su 98-95, la trovi sul sito comune.
si chiama winbeep.dll
Ciao

 è che mi emette un suono con la sound blaster.
in una mia applicazione sto usando con successo questa:
'--- fa emettere un Beep allo speaker del pc (senza passare dalla scheda
audio) ---
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal
dwDuration As Long) As Long
Public Sub myBeep()
  Beep 1300, 50
  Beep 1, 500
  Beep 1300, 100
End Sub

non con sistemi win9x, immagino (questa api viene ignorata)

 
http://makeashorterlink.com/?F4D912A92
Scusa se mi permetto, ma visto che usi degli accorcialink, hai mai provato
il mio?
Non c'č la pagina di mezzo e, aggiungendolo ai preferiti, č molto + veloce
di makeashorterlink
Sappimi dire se ti piace.
--
L'uka su KTM LC4 Supermoto "T'ormento"
Prova l'accorcialink -> 
http://www.slimmit.com
e l'HDD condiviso!!! - > 
http://www.lucamerega.it
 sezione HardDisk Condiviso
Trafila per attivazione linea ADSL -> 
http://www.lucamerega.it
 sezione Alice

 Sappimi dire se ti piace.
Evabbeeeeene, proverò. :-)
Newsgroup: it.comp.lang.visual-basic
Titolo: RollBackTrans

Situazione:
Nel corso di una sub, eseguo alcune cose, poi apro una transazione, eseguo
altre cose, poi eseguo il commit ed esco.
Il problema nasce se avviene un errore: se tale errore avviene dopo avere
aperto la transaction, nel gestore d'errore voglio eseguire il
RollBackTrans, altrimenti no.
Avevo pensato di mettere, nel gestore d'errore, un On Error Resume Next e
poi il RollBackTrans, ma se la transazione non era aperta l'errore che si
genera non č superabile dal Resume Next.
Per il momento faccio cosě:
Private Sub ....
On Error Goto Errore_Normale
    ....operazioni varie
Ccn.Begintrans
On Error Goto Errore_Transazione
    ....operazioni varie 2
Ccn.CommitTrans
Exit Sub
Errore_Transazione:
Ccn.RollBacktrans
Errore_Normale:
On error resume next
....scrittura su log...
End Sub
Tuttavia mi sembra un po' macchinoso.
In alternativa, potrei creare una variabile globale Transazioni_Aperte, e
fare +1 ogni volta che faccio un BeginTrans, e -1 ogni volta che faccio un
Commit o un RollBack. Nel gestore errore, dovrei a questo punto solo mettere
If >0 then RollBack.
Altrimenti, e sarebbe la soluzione piů bella, trovare il modo di rilevare se
c'č o meno una transaction aperta (senza andare a leggere gli spid di
Sql-Server). Forse, fra i tanti Parameters della Connection, potrebbe
essercene qualcuno che mi dice il numero di transazioni aperte su tale
connection, ma veramente non riesco a trovarlo da nessuna parte.
Altre idee?
Ciao
Alberto

 connection, ma veramente non riesco a trovarlo da nessuna parte.
Se ne era già parlato .. purtroppo sembra che non ci sia modo di rilevare lo
stato e il livello della trasazione direttamente dall'oggetto connection.
Io  uso contatori in caso di transazioni incapsulate (ma cerco sempre di
evitare tale situazione) oppure un banale boolean in caso di singole
transazioni.
Ne approfitto per proporti una particolare situazione di errore
nell'utilizzo delle transazioni con ADO.
Sembra non sia possibile eseguire le seguenti operazioni con la seguente
successione :
1) Aprire un recordset
2) Aprire una trasazione
3) Elaborare il Recordset
4) Chiudere la transazione
5) Elaborare il Recordset (tipo Find oppure MoveNext ecc)
quest'ultima operazione causa un errore dovuta al fatto che si accede ad un
oggetto il cui stato è ignoto perchè sottoposto ad una operazione di
iTransaction::Commit o iTransaction::Abort (questo è l'errore proposto da
MS) ...
se la cosa interessa forse è meglio aprire un altro thread ...
(adesso Lupo mi dirà che lancio il sasso e ritraggo la mano:))
Saluti
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB & .NET] DAO350.dll

ho il seguente problema: dopo avere installato il framework .NET 1.1
(ridistribuibile) e l'SDK .NET, non rieco piů ad avviare l'IDE di VB 6.0
perchč al momento del lancio di qualsivoglia progetto, mi viene sollevata
una finestra di avv. con indicato:
"Impossibile individuare il file DAO350.dll"
Mi sapreste indicare il motivo e come riuscire a ripristinare l'ambiente di
sviluppo VB ??
grazie.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 sviluppo VB ??
La risposta piů ovvia č provare un'installazione di ripristino di VB6.
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 La risposta più ovvia è provare un'installazione di ripristino di VB6.
come si esegue ?? basta riavviare il processo di installazione di Visual
Studio ??


.. ho provato a registrare la dll DAO350.dll e tutto è tornato a funzionare
correttamente.
Mi piacerebbe comunque riuscire a capire cosa possa essere accaduto in
particolar modo se la cosa sia dovuta all'installazione del Framework o meno
.... D'altronde la cosa si è sollevata subito dopo l'installazione dello
stesso per cui .....


 stesso per cui .....
Come dicevo tutto č possibile, ma tenderei ad escluderlo perchč il framework
non va a toccare dao ne ado.
Inoltre ho installato il framework su piů macchine con VS6 senza avere
problemi.
L'installazione di riparazione si fa rieseguendo il setup.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: ADO molto lento

sto provando a migrare da gestioni di recordset con DAO verso gestioni ADO e
trovo molto più lento l'accesso al DB e nel recupero dei record la nuova
tecnologia, come mai? andando avanti non si dovrebbe migliorare?
grazie anticipatamente a chiunque risponda



Avevo già inoltrato il problema io, se vedi, dovrebbe esserci un post,
spedito questo mese, sull' argomento postato da me :))
Comunque si, ADO è più lento di DAO, soprattutto per accesso a
database locali.
Saluti...

 ha scritto nel messaggio
news:AKn36.1433$jT6....@twister2.tin.it...



Non ho visto quella gran differenza di prestazioni fra ado e dao. Anzi, du
db piuttosto consistenti, ho riscontrato il contrario.
Poi, ado o dao non ha importanza, dipende come viene gestito l' accesso ai
dati.
Una
SELECT * FROM <nome_tabella >
con cursore aggiornabile sara' piu' lenta (e inutile se in realta' cerchiamo
alcuni di campi di un solo record) rispetto a
SELECT <lista_campi> FROM <nome_tabella> WHERE <lista_condizioni>
con cursore read-only e forward-only, dove i campi citati nella WHERE siano
pure indicizzati.
Il dao (e soprattutto il datacontrol) ha permesso di lavorare con i db anche
con tecniche poco efficienti, che vengono clamorosamente a galla usando
invece un approccio piu' generico client-server con db remoto.
Buon Anno
Aldo

 ha scritto nel messaggio
news:92n2ld$79g0j$1...@ID-56381.news.dfncis.de...


 Continuo con DAO o Passo definitivaente ad ADO?
DAO non dovrebbe piu' essere supportato.
Ciao
Aldo

conosci un metodo veloce e preciso per la migrazione?
grazie e tanti auguri


 grazie e tanti auguri
Mi spiace, ho lavorato pochissimo col dao da vb. :-(
Contraccambio gli auguri
Aldo




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


Ciaotutti,
Alessandro

 Cognome.Text = .strCognome
dovrebbero essere...
Nome.Text = NomeCognome.strNome
Cognome.Text = NomeCognome.strCognome
Inoltre essendo un file random dovresti controllare se esiste prima di
aprirlo poichè altrimenti l'apertura provaca anche la creazione ma senza
record. Quando poi tenti di leggere hai un errore.
Ciao Andrea

 Uhm... Da quanto lavori con prodotti M$? :)))
Da parecchi anni :-((     - purtroppo -    Forse è per questo che mi sono
rotto!
Più crescono le conoscenze più ti rendi conto dei casini che combina MS,
delle imprecisioni, delle assurdità!
Certi passaggi della documentazione MS (soprattutto in C) assomigliano più a
romanzi o fiabe pittusto che a rigorosi principi logici di funzionamnento.
Un esempio su tutto: la miglior guida alla win32 l'ha scritta Borland... No
Comment!
Ciao.
--
Princi, 
princ...@programmer.net
--------------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,

Newsgroup: it.comp.lang.visual-basic
Titolo: [Newbie] Invio come Tab ?

Salve a tutti,
sono nuovo qui, e sono un gran Newbie in VB, ma qualcosa la sto già facendo.
Allora, ho il mio stupendo form con diverse textbox, e l'utente deve
riempirle tutte prima di poter premere il pulsante "Calcola". E' possibile
utilizzare Invio oltre che Tab per passare da un campo all'altro?
    Grazie anticipato a tutti.
Francesco

 ha scritto nel messaggio
news:0YUab.89735$hE5.3...@news1.tin.it...

Una letta al seguente:
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&threadm=dlJF8.79580%24US3
.
1800207%
40twister1.libero.it
&rnum=10&prev=/groups%3Fhl%3Dit%26lr%3D%26ie%3DI
SO-8859-1%26q%3Dinvio%26meta%3Dgroup%253Dit.comp.lang.visual-basic
oppure:
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=invio&meta=group%3D
it.comp.lang.visual-basic
Ave
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Crystal Report + Access

Sto costruendo un'applicazione che usa un DB Access e Crystal Report 7.
Nell'applicazione uso ADO per connettermi al DB tramite JET.
La stringa di connessione è dinamica quindi ovunque risieda il programma,
esso trova il db che è nella stessa directory del programma.
Per connettere Crystal Report al DB uso anche qui OLE Db - jet ma mi riciede
di inserire l'esatto path del DB.
Se devo distribuire il software, è probabile che il path cambi e che i
report non trovino piu' il DB.
Come posso fare?
Simone

 wrote in message
97489798...@tango.comm2000.it...


report non trovino piu' il DB.
Quando crei il report con Crystal, vai sul menu Database, Set
Location, scegli le diverse tabelle e clicchi su  Same As Report.
Così le tabelle sono cercate nella stessa cartella dove c'è il file
.rpt
ErreBi
Newsgroup: it.comp.lang.visual-basic
Titolo: formato valuta di textbox da access a vb2008

Ho cercato su forum e sui gruppi, forse ho trovato una soluzione ma ho 
ancora qualche dubbio.
Database access 2003 campo IMPORTO formattato come valuta.
in vb2008 express voglio che in digitazione o visualizzazione, la textbox 
dell'importo sia visibile in formato valuta con decimali.
scrivo il seguente codice:
Dim VALUE As Decimal
VALUE = IMPORTO.Text
IMPORTO.Text = VALUE.ToString("C", _
New CultureInfo("IT-IT"))
Non e' possibile evitare la creazione di una variabile associata alla 
textbox. importo facendo la tostring direttamente su di essa? Io non ci sono 
riuscito e mi da errore.
Qualcuno se ha tempo, mi puo' mettere sulla strada giusta?
Grazie

 Qualcuno se ha tempo, mi puo' mettere sulla strada giusta?
ho trovato la strada giusta, il formatnumber con l'aggiunta di una stringa 
"?" , oppure il formatcurrency che mette direttamente il simbolo euro.
Grazie a tutti

Newsgroup: it.comp.lang.visual-basic
Titolo: per pal e altri:VB in biblioteca

lemme know, a.
eh...eh... codice?adesso posso usare solo Excel
97...per il resto posso solo confessare che le mie
conoscenze informatiche si riducono alla conoscenza
del Fortran 77 che conoscevo bene ma adesso non credo
mi sia utile...e purtroppo non conosco dao. ve' un po'
come sono messo :-(
ma perche' VB complica cosi' le cose?Per esempio,
perche' queste righe non girano come dovrebbero e non
giusto 16 righe?
Sub ripetizione()
Dim classe As Long
Dim riga As Long
Dim d As Long
Dim k As Long
classe = 100
dewey = 1
k = 0
riga = 1
For riga = 1 To 16
If range("A" & riga).Value < 100 Then
range("C" & dewey).Value = classe
range("D" & dewey).Value = k + 1
riga = riga + 1
Else
classe = classe + 100
dewey = dewey + 1
End If
Next riga
End Sub
mistero, mistero...
saluti a tutti!
fabio
fza...@yahoo.it
______________________________________________________________________
Do You Yahoo!?
Il tuo indirizzo gratis e per sempre @
yahoo.it
 su 
http://mail.yahoo.it
-- 
Posted from 
web9609.mail.yahoo.com
 [216.136.129.188] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:2000121509175...@web9609.mail.yahoo.com...


 mistero, mistero...
dunque: sono 16 righe campione con alcune cdd, no ?
non conosco vba di excel, ci faccio solo un po' di conti, ma se il campo te
lo tiene testo _forse_ devi usare qualcosa come
    val( range("A" & riga).Value )
cioe' convertire il contenuto della cella in un valore, seno' il "minore di"
funziona mica molto...
se il listato sebina non e' enorme, mandamelo in zip all'indirizzo qui
sotto.
ciao, a.
--
andrea....@tin.it
free/vb sw -- 
http://www.comune.modena.it/cittadini/apal
news://it.comp.lang.visual.basic
please use plain text, not html, in your messages !


Se non hai ancora risolto, forse posso darti una mano col VBA di Excel. Se
mi posti un estratto della tua cartella mi tolgo qualche dubbio sul
formato dei dati (quanti thread, non ci capisco piů nulla!!!).
Ciao, Giorgio
Fabio Zauli ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: Formattazione data assegnata ad una MaskEdbox

Ciao a tutti, ho questo problema:
ho un programma in VB4 in cui asegno a una MaskEdbox una data in
automatico utilizzando la seguente funzione:
consegna.Text = Format$(Now, "dd/mm/yy")
Su di un pc avente windows xp sembra che la format non riesca più a
tradurre l'istruzione e invece di rendere la data es. 20/11/2006 ritona
la stringa di formattazione dd/mm/yy mandando in errore il control "380
Invalid property value"
Quancuno mi può aiutare a trovare la causa o fornirmi una soluzione
alternativa al propblema?
Grazie.

DYD666 ha scritto:

io proverei:
consegna.Text = Format(Date, "dd/mm/yyyy")
vedere anche le impostazioni del campo ....
lascia vuoti il format e il mask
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: chi lavora con registratori di cassa?

qualcuno lavora allo sviluppo di ocx per il collegamento di registratori di
cassa al computer?

 cassa al computer?
non lo so, ma penso sia difficile, considerando che ogni registratore è un
mondo a parte e non esiste uno standard.
Ciao

 cassa al computer?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

non si può fare un ocx per tutti i tipi la rch per i sui modelli li
fornisce

cassa al computer?
Io lavoro con i registratori di cassa....
Aran

Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] caratteri outlook express

scusate il fuori tema, chiedo qui x' mi sembra che parecchi usino outlook,
al quale sono passato adesso da ms mail. lo sto usando per mandare questo
messaggio.
i miei corrispondenti si lamentano che invece di maggiore, esclam,
underscore, chiocciola ecc. gli arrivano schifezze tipo +-ACE- +-AD4pG- ecc.
io ho provato a cambiare le impostazioni dei caratteri un po' dappertutto
senza saltarci fuori.
per favore qualcuno puo' salvare la vista dei miei corrispondenti?
grazie in anticipo, pal
--
Andrea Palazzi
pal+
AEA-zelig.mo.it
e' cedoc non zelig

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Quanto è grande il mio programma!!!

Sono al mio primo programma, si tratta di una decina di form, un modulo, e
due file.Dat dove memorizzo alcuni dati.
Tutto quì il file progetto e tutti i file form, ecc. occupano solo 500 Kb
La prima volta mentre creavo il pacchetto di istallazione ho tolto tutti i
componenti che mi consigliave di mettere dentro, è ventuo fuori un solo
dischetto, ma qualdo l'ho istallato su un altro PC questo mi chiedeva
"dllmsvbvm60.DLL", allora ho pensato di mettere tutto quello che mi
consigliava la creazione giudata del pacchetto di istallazione di VB6
Ma quando ho costruito il pacchetto "Completo" sono venuti fuori la bellezza
di 7 file.cab da 1.4 MB ciasuno, setup.exe e una cartella "Support" di ben
10 MB solo lei con dentro molti file.dll e un paio di .exe.
 In tutto misura la modica cifra di 20 MB, può essere mai ?
ho costruito un mostro ?
Forse c'è qualcosa che posso evitare di mettere mentre altro no ?
Potete indirizzarmi ?
P.S. tra l'altro mi vergogno di portare 15 dischetti di istallazione per un
programma abbastanda modesto.
Grazie 20'000 Byte

La cartella "support" non serve basta copiare solo i cabs... (basta per modo
di dire)
Putroppo è così; VB non genera un codice eseguibile a tutti gli effetti ha
purtroppo bisogno delle librerie per il supporto runtime!

Newsgroup: it.comp.lang.visual-basic
Titolo: [vb.net] Creare un database

Utilizzavo questo metodo in VB6
Sub CreaNuovoDatabase(Name As String)
Dim Db As Database
Dim prpNuovo As Property
Dim strNome As String
    Set Db = CreateDatabase(Name, dbLangGeneral)
    strNome = "V1xNullBehavior"
    Set prpNuovo = Db.CreateProperty(strNome, dbBoolean, False)
    Db.Properties.Append prpNuovo
    Db.Close
End Sub
Mi piacerebbe farlo in sql, ho letto qualche cosa ma la vedo veramente dura 
(sql express)
ma almeno farlo con un comando oledb visto che create database sembra 
sparito dalla guida in linea
salute a tutti

 ha scritto nel messaggio 
news:fFmLj.54647$FR.2...@twister1.libero.it...


 ha scritto nel messaggio 
news:47fe55f0$0$41655$4faf...@reader4.news.tin.it...
