mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: si riesce con una sola query?

Ciao,
classico gestionale basato su tabelle Access (VB6 SP5 DAO).
Ho una tabella con articoli, quantità e costo unitario. Filtrando per 
articolo è possibile avere la quantità totale usando l'operatore Sum. Ma 
volendo avere anche il costo totale bisognerebbe riga per riga fare 
quantità * costo e sommare tutto.
Si può fare con una query SQL?
Marco / iw2nzm

 quantità * costo e sommare tutto.
se non ho capito male puoi fare
SUM(quantità * costo)
bye
r

 ha scritto nel messaggio news:YIgnf.81344$65.23...@twister1.libero.it...

in un solo passaggio e' impossibile (a meno di un miracolo da parte di Bill Gates)
prova cosi (sono 2 passaggi in una sola query):
SELECT sumqta*sumcosto, codice_art FROM
(select SUM(qta) as sumqta, SUM(costo_uni) as sumcosto, codice_art FROM articoli group by codice_art)

 (select SUM(qta) as sumqta, SUM(costo_uni) as sumcosto, codice_art FROM articoli group by codice_art)
Giusto, non avevo pensato di usare il risultato di una query come campo 
FROM. Ora non ho VB sotto mano, proverò stasera a vedere se fa il suo 
dovere.
Naturalmente il raggruppamento del "primo passaggio" deve essere la 
chiave primaria così da indentificare una sola riga alla volta, giusto?
Cioè, come esempio qui ho messo codice_art, se avessi anche la data, uso 
entrambe le chiavi. E' corretto?
Grazie!
Marco / iw2nzm

Sembra che Marco Trapanese abbia detto :

Presumo ci sia qualcosa che mi sfugge.
Io avrei fatto un banale group by:
select SUM(qta) as sumqta,
 SUM(costo_uni*qta) as sumcosto,
 codice_art
 FROM articoli
 group by codice_art
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 ha scritto nel messaggio news:mn.64097d5c4...@hotmail.com...



a volte le cose che sembrano piu' complicate sono quelle piu' semplici,
almeno dal punto di vista della coerenza logica
ai posteri l'ardua sentenza! ( o a qualche guru di SQL)
Ciao


secondo me, non ha molto senso moltiplicare la somma delle quantita per 
la somma dei costi unitari, esempio:
q   c q*c
1  10  10
2  10  20
1  10  10
==========
4  30  40
risultato che ottieni con
sum(quantita)*sum(costo) = 120
invece con
sum(quantita * costo) = 40
comunque potresti avere le tue ragioni nascoste per fare quello che 
dici! ;-)
bye
r

 group by codice_art
Non ti sfugge nulla. Funziona benissimo! Sfuggiva a me invece il fatto 
che effettivamente calcolasse riga per riga il sumcosto anche con il 
raggruppamento... thx!
Marco / iw2nzm

 la somma dei costi unitari, esempio:
Infatti non volevo fare ciò :)
La query suggerita da Albe V° è corretta e somma il prodotto costo 
unitario * quantità, come è giusto.
Ciao!
Marco / iw2nzm
Newsgroup: it.comp.lang.visual-basic
Titolo: Si può spegnere il monitor?

La mia domanda è la seguente: posso far spegnere al mio programma il monitor
del computer sul quale sta girando??
Ringrazio tutti coloro che si interesseranno a questa mia curiosità!
Mucca
Enjoy yourself, but don't fuck too much!

 ha scritto nel messaggio
news:Z%146.219657$hk4.8...@news.infostrada.it...


Simpatica risposta, ma il mio programma ancora non lo sa fare eh eh eh!!!
Aspetto altri suggerimenti ragazzi (e perchè no: anche ragazze!!).
Ringrazio nuovamente tutti.
Mucca
Enjoy yourself, but don't fuck too much!
"Ajeje Brazo" <Ajeje...@no.spam> ha scritto nel messaggio
news:92qb2r$n7f$1...@nread2.inwind.it...


 posso far spegnere al mio programma il monitor del computer sul quale sta
girando??
Non lo so ma penso che se lo puo` fare Windows allora dovrebbe poterlo fare
anche il tuo programma, che ne dici?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 ha scritto nel messaggio
news:92qm9n$83rvs$1...@ID-52090.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: datareport

ciao
ho un riassuntivo dati visualizzati all'interno di un listview, non
caricato da nessuna tabella. Per stampare questi dati, esiste un modo
senza caricarli su una tabella d'appoggio per poi farli prelevare dal
modulo del datareport?
Eventualmente e' possibile salverli all'interno di un file di testo e
poi caricarli nel datareport?
grazie

 poi caricarli nel datareport?
afaik devi comunque avere un recordset, per utilizzare il datareport, perň
puoi farti un recordset dsisconnesso, senza che sia presente in un db.
Salutoni
Sergio


quello che pensavo, mi puoi dare una dritta di come posso creare un
rst disconnesso
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO questo sconosciuto

ciao a tutti, vorrei sapere come si fà ad aprire un db access 2000 con
VB6sp5,
con dao io mettevo un controllo data ed il gioco era fatto, con ADO, c'è
l'ado data, ma a me non piace, xciò sono passato alla conssione e apertura
db con il codice puro, ma non ci riesco; a questo punto vi chiedo se c'è
qualche anima PIA che mi sappia fare un esempio di apertura DB e ADDNEW
GRAZIE  A TUTTI

 ha scritto

Non ho niente sotto mano al momento, ma........ :)))
Come risolvere un problema? Dove trovare informazioni?
1) Per prima cosa consultate la guida in linea.
*  Premere il tasto [F1] in alto a sinistra sulla vostra tastiera.
2) Seconda fonte di informazione: l'MSDN online.
*  
http://msdn.microsoft.com/
3) Terza fonte di informazione: cercate tra i vecchi post di questo
newsgroup: quasi tutti i temi sono stati già ampiamente trattati e risolti.
*  
http://groups.google.com/groups?group=it.comp.lang.visual-basic
4) Quarta fonte di informazione: il Sito Comune(SC) di questo NewsGroup.
*  
http://www.it-lang-vb.net/
5) Quinta fonte di informazione: cercate tra i sorgenti già scritti e pronti che al 99%
risolvono quello su cui state lavorando e con minime modifiche.
*  
http://www.it-lang-vb.net/
  (Sezione sorgenti)
*  
http://www.planet-source-code.com/vb/
6) Per ultima, se non avete ancora trovato nulla: chiedete al newsgroup.
*  Ricordatevi di leggere il Manifesto di questo Gruppo di Discussione:
 
http://www.it-lang-vb.net/docs/Manifesto.txt
--- Per approfondire... -------------------------------------------
Sommario:
¯¯¯¯¯¯¯¯
[API]
[SOCKET]
Contenuto:
¯¯¯¯¯¯¯¯¯
[API]
http://www.allapi.net/
[SOCKET]
http://www.vbip.com
http://www.socketwrench.com

ho visto dei codici nel sito comune, ma tutti si riferiscono a office 97,
con office 2000 a me non funzionano.

 con office 2000 a me non funzionano.
Se i codici che hai visto usano DAO, allora penso che tu abbia dei problemi. Strano se
erano codici scritti in ADO. Hai installato ADO 2.6, vero? cerca sul sito pricrosoft,
sezione sviluppatori, sezione "data" (dall'inglese: nel senso di tutto cio' che ha a
vedere con i dati) e scaricati l'mdac_typ + recente

Newsgroup: it.comp.lang.visual-basic
Titolo: [vb.net] Database

Devo connettermi a un file mdb ora uso questo comando:
Dim myConnection As New
OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Application.UserAppDataPath & "\base.mdb")
Dim myCommand As New OleDb.OleDbCommand("Select * from ics", myConnection)
Dim myReader As OleDb.OleDbDataReader
myConnection.Open()
myReader = myCommand.ExecuteReader
Do Until myReader.Read = False
If myReader("chiavi") = mat(2) Then
ris = myReader("tempo")
End If
Loop
myReader.Close()
myConnection.Close()
Come posso usare un datagrid?
Ci sono metodi più veloci per cercare nel db?
Come posso aggiungere un record?
Aiutatemi è importante.

 Come posso aggiungere un record?
nel modo + "naturale" per un DB: ossia con SQL. Componi il tuo statement
(INSERT INTO/UPDATE SET) e sparalo al DB con un OleDbCommand
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org

 > Ci sono metodi piů veloci per cercare nel db?

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione in ?uro ??

Ciao a tutti, secondo voi faccio bene a ricavarmi il valore ?uro in questa
maniera ?
dim txtIMPORTO as Currency
txtIMPORTO= Format((txtIMPORTO/ 1936.27), "#####.00")
Ho sentito in giro che non è semplice come sembra.....
Grazie
Ciao 8)


Intanto, se lo dichiari come currency, perché poi lo formatti come un
testo?
Creati due variabili, una Currency e una Testo.
Dim txtImporto as String, curImporto as Currency
txtIMPORTO= Format(curIMPORTO / 1936.27, "###,###,###.00")
Poi, immagino tu faccia immettere il valore da qualche parte,
probabilmente un textbox:
Dim curImporto as Currency
txtboxIMPORTO= Format(ccur(txtboxIMPORTO) / 1936.27, "###,###,###.00")
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

Newsgroup: it.comp.lang.visual-basic
Titolo: ruotare le control

vorrei inserire su un cerchio alcune check box. Il problema č:
come faccio a far ruotare le check e come faccio a ripeterle piu volte in forma
circolare??
Grazie
-- 
Posted from  [80.16.155.110] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 circolare??
Questo è quello che mi sono fatto io con delle label (ho dovuto ripassarmi
trigonometria :P)
    MaxSize = Min(picCiclo.ScaleWidth, picCiclo.ScaleHeight) ' per tenere il
cerchio "rotondo"
        For a = 4 To 360 Step 4 ' 1 label ogni 4 gradi (90 label)
            W = lblCiclo((a \ 4)).Width
            H = lblCiclo(a \ 4).Height
            Call GrGetPtOnCircle((MaxSize - W) \ 2, (MaxSize - H) \ 2,
(MaxSize - (BORD \ 2)) \ 2, (MaxSize - (BORD \ 2)) \ 2, 360 - a, p1)
            lblCiclo((a \ 4)).Top = p1.Y
            lblCiclo((a \ 4)).Left = p1.X
            lblCiclo((a \ 4)).Tag = a
        Next a
Const pi = 3.14159265358979
Public Sub GrGetPtOnCircle(CenterX As Long, CenterY As Long, RadiusX As
Long, RadiusY As Long, ByVal Angle As Integer, DestPt As POINTAPI)
    Dim R As Double
    R = pi / 180#
    DestPt.x = CenterX - (Sin(Angle * R) * RadiusX)
    DestPt.y = CenterY - (Sin((90 - Angle) * R) * RadiusY)
End Sub
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: VAI AL RECORN NR. ....

Cari Amici,
aprendo un database quale comando o funzione devo impostare per far spostare
il puntatore ad un determitao record (es. record 10) ?
Grazie Mimmo
mr.k...@tiscalinet.it

 
mr.k...@tiscalinet.it
recordset.MoveLast	'per riempire il recordset
recordset.AbsolutePosition = 9	'(il conteggio parte da 0)
Daniele
----------------------------------
mailto:
dfaz...@tin.it
http://space.tin.it/io/ffazziol
----------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: [1/2OT] Eliminare Segnalazione del problema a Microsoft

 "Segnalazione del problema a Microsoft" "ecc."
installando linux :)
vorrei tanto anch'io... c'e' da dire che di default lo mettono anche
firefox, pshop e tanti altri.
gia' mi basterebbe che quando c'e' un msgbox simile con ok/annulla, se uno
per sbaglio preme esc non partisse il debugger di vs. questa e' veramente
una cosa idiota.
ciao, j.

 cerca in google.. :-)
solo per xp ?

 
l'ho gisuto fatto ieri tramite un programmino chiamato XP-AntiSpy
(o qualcosa di simile)
cerca in google.. :-)
Daniele

Salve a tutti,
come è possibile eliminare la visualizzazione  dell'avviso:
"Si è verificato un problema che ha richiesto la chiusura di Esplora
risorse"
"Segnalazione del problema a Microsoft" "ecc."
Grazie
giuseppeD
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 giuseppeD
Su XP:
Click destro su Risorse del Computer -> Proptieta' -> Avanzate : In basso
c'e' Segnalazione Errori .
Spero sia questo il tuo problema!
Ciao

Ciube ha scritto:


Windows Server 2003
Dovrebbe essere la finestra corretta,
infatti gestisce gli errori da inviare alla Microsoft.
Abilito (Disabilita segnalazione errori)


 
boh

 Abilito (Disabilita segnalazione errori)
a proposito di win 2003, subito dopo l'installazione dei sistema operativo
ho rimontato anche un hard disk su cui conservo parte del mio archivio.
In gestione periferiche windows lo vede, ma in risorse del computer no.
Per caso hai un link verso qualche How-To e dintorni che mi dia una mano a
risolvere il problema?
Thanks in advance....
                Iw7

Iw7 ha scritto:


Se puņ esserti di aiuto:
http://search.microsoft.com/search/results.aspx?st=b&na=88&View=en-us&qu=windows+2003+hard+disk
Ave



Merēi, vado a vedere, scate ancora aumento del livello di OT.
Ciao ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: problemi con fillist

Ho un programma in cui uso una fillist, metto una directory e nella fillist
mi compaiono i file in essa contenuti. Il problema e' che: qual e' il numero
massimo di file che puo' contenere??
Perche' ho una directory che contiene 62000 file, la mia fillist riesce a
visualizzarmeli ma quando chiedo quanti sono con la proprieta' listcount non
ce la fa.
Come posso fare
Ciao e grazie
Chiara

 ha scritto

francamente ero convinto potesse arrivare ai 32k di un integer. sei sicura
che te li visualizzi tutti ? se nella dir hai un file zzz.zzz te lo fa
vedere ?
in alternativa puoi caricare, via dir$(), un listbox o un listview, ma
sospetto che il limite sia simile.
forse la cosa migliore e' una griglia tipo flexgrid, che per rows ha un
long.
considera comunque che 62k * 254 caratteri potenziali di ogni file = 1.5 mb
che dedichi solo all'elenco. anche explorer ansima quando i file sono 2-5k,
non oso pensare uno scandisk del tuo hd. se hai win9 e spegni male, al boot
fai giornata... non riesci a suddividere la directory ?

sospetto che il limite sia simile.
Per la ListBox confermo: il limite é 327XX
Il controllo Treeview ha lo stesso limite...
L'unica soluzione che mi viene in mente... é un bel frame con dentro un
bell'array di label, una VScrollBar (e se vuole pure un array di image, ma
dopo la gestione diventa un po' complessa...). Per completare l'opera un
bell'array dinamico di stringhe con magari anche qualche bella funzioncina
che allochi più di una stringa per volta perché la lettura della directory
sarà pesante di suo e non é necessario appesantirla ulteriormente
dichiarando 1 string per volta, direi che da un minimo di 10 ad un massimo
di 200 potrebbe essere bene... O forse usare una sola stringa e poi fare la
split in un variant (usando come divisore un carattere illegale nei nomi di
file tipo "/"), ma credo che sia più pesante... :-((
Certo la soluzione migliore sarebbe ridurre il numero di file per
directory...
            Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] Evitare istanze multiple di OCX

Salve!
Tempo fa ho postato un msg sul NG, ma probabilmente é passato "inosservato".
Lo ripropongo.
Ho creato un OCX. Devo evitare che in fase di utilizzo, a design-time, ne
venga instanziato più di uno. Quale codice devo inserire:
Premetto che utilizzando Ambient.DisplayName, nell'evento Initialize posso
realizzare che si sta instanziando un secondo controllo, ma come prevenre la
creazione dello stesso.
Forse devo generare un errore, ma mi sfugge qualcosa...
A voi...
Genesio

...

Newsgroup: it.comp.lang.visual-basic
Titolo: MDIChild in DLL

Ciao a tutti.
In una classica applicazione .EXE scritta in Visual basic 6 ho un form MDI.
Quando l'utente fa click su alcuni pulsanti di una toolbar nell'MDI, mostro
un form con la proprietą MDIChild impostata su True.
Il form viene visualizzato all'interno del form MDI.
Vorrei gentilmente sapere se č possibile rimuovere il form dal progetto ed
inserirlo il un modulo di classe e compilare questa classe in una DLL
ActiveX.
La DLL, logicamente, dovrą avere un metodo che consentirą la visualizzazione
del form, ma vorrei che questo form venga visualizzato all'interno dell'MDI
che perņ fa parte di un progetto diverso (visto che si trova nell'EXE).
Per quel che ne sņ con gli strumento "normali" di VB questo non č possibile,
ma vorrei sapere se tramite qualche "trucchetto" (magari passando l'handle
dell'MDI alla DLL e lavorando con le API) questa cosa puņ essere fattibile.
Grazie in anticipo.
Maurizio
coffi...@secoges.com


Non e' possibile, ma non tanto per VB ma perche' tutto cio non ha senso ed
e' Windows stesso che giustamente non lo permette.
Una domanda: perche' vuoi fare cio?
Un consiglio: a parte che son convinto che non sia possibile in una DLL/COM
inserire finestre, evita cmq di visualizzare Form ed addirittura messaggi
nei server, anche se questi sono poi compilati con eseguibili.
Saluti ...aldo martini

 ha scritto nel
messaggio news:newscache$m0bezg$9l8$1...@listsrv01.csi.it...


 ha scritto nel
messaggio news:newscache$m0bezg$9l8$1...@listsrv01.csi.it...

In realta' non ha mai parlato di server... il suggerimento di evitare
finestre e messaggi puo' essere valido se parliamo di componenti DCOM, dove
l'istanza di programma e' attiva per l'appunto sulla macchina server, ma mi
pare che Maurizio non volesse fare questo, bensi un normale componente COM
da eseguire insieme all'applicazione principale.
In questo caso si possono tranquillamente inserire e visualizzare finestra;
un caso un po' piu' complesso e soggetto a qualche problemino e'
effettivamente proprio quello di includere form da trasformare in MDIChild
child, ma e' possibile anche questo
Esiste per esempio un componente (a pagamento) di cui si e' parlato gia sul
NG, MDIExtender, che pare funzioni bene ... si trova qui
http://www.devcomponents.com/
Alcuni componenti free e/o sorgenti si trovano su
http://www.planetsourcecode.com/
 cercando "MDI DLL"
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown


Grazie. aldo martini

 
http://www.planetsourcecode.com/
 cercando "MDI DLL"
Cerca un mio post precedente... c'era il link a un sito tedesco dove trovavi
i sorgenti di un ocx che ti permetteva di farlo... sembra funzionare
piuttosto bene ma non devi premere mai stop quando fai debug... altrimenti a
causa della api utilizzate VB va in crash! ;)

Grazie mille Luca
Ho scaricato MDIChildMaker dal link che mi hai dato ed č perfetto.
Ciao
Maurizio
coffi...@secoges.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Programma SHAREWARE e pagamento

Sto per pubblicare su internet un mio programma shareware ma non so ancora
come fare a farmi pagare (carta di credito, vaglia, bonifico, ecc..).
Esiste un sito dove posso trovare tutte queste informazioni?
Tantissimi ringraziamenti a tutti e buona giornata
Dm

Potresti fare con carta di credito
Chiedi alla tua banca come puoi fare.
In genere ti danno la possibilità di utilizzare i loro servizi (a pagamento
of course) ma sei abbastanza sicuro (certo, se uno ti rifila un numero di
carta rubato te la prendi in bofice).
Non devi fare altro che mettere nel tuo sito un po' di codice ed hai
connessioni protette,...
Per altre modalità di pagamento non saprei...
Spero di averti aiutato (almeno un pochino :) )
CiaoZ
SebaMix
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con API, Help

Sto utilizzando l'API "Toolhelp32ReadProcessMemory" per verificare quali
sono gli indirizzi di memoria delle seriali e delle parallele installate sul
pc.
Tutto funziona perfettamente con WIN95..98 ma non con WIN2K e XP.
Ho girato un pò per internet ma non ho trovato nulla a proposito.
Qualcuno si è gia imbattuto in questo problema? Mi potete aiutare?
In ogni caso auguro a tutti delle felicissime vacanze di natale e un
fantastico anno nuovo.
Sabrina

prova a vedere se su 
www.allapi.net
 trovi qualcosa... personalmente non
saprei come aiutarti, ma lì ho trovato tante cose interessanti ogni
volta che ne ho avuto bisogno

Newsgroup: it.comp.lang.visual-basic
Titolo: Vb Real-Time

Salve a Tutti,
mi chiedevo se era possibile sapere se, in generale, si potevano
realizzare applicazioni real-time con Visual-Basic oppure si deve
per forza utilizzare linux e programmare in C/C++.
Il programma in questione dovrebbe prelevare dalla seriale, dei dati
esadecimali
o delle stringhe, fare dei calcoli e visualizzarli su un Monitor.
la velocità di acquisizione dovrebbe essere di 100Hz (100 cicli al secondo).
Esiste una soluzione o devo passare a C/C++?
Grazie a tutti per l'interessamento di questo Thread
Marco

 la velocità di acquisizione dovrebbe essere di 100Hz (100 cicli al
secondo).
E allora a cosa ti serve un programma realtime?
Non vorrai mica metterti in polling sulla seriale!
Queste cose si facevano vent'anni fa.
Tra l'altro ho dei dubbi sulla capacità fisica della seriale di sopportare
quelle velocità.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net


Prima di tutto dipende dalla quantità di dati da acquisire, ovvero le
stringhe in questione che lunghezza hanno?
Poi ti fai due conti rapidi e approssimativi sul baud-rate minimo che devi
impostare sulla seriale, il resto dipende da quanto è complesso il
trattamento che i dati devono subire e come li devi rappresentare, ovvero se
li devi mettere su di un grafico oppure li devi scrivere in un file, le due
operazioni è ovvio che richiedono tempi di esecuzione diversi.
Puoi guadagnare tempo aumentando il più possibile la velocità della porta
sprecando così meno tempo per il trasferimento, dò per scontato che tu abbia
pieno controllo della periferica da cui acquisire.
Gli ultimi punti che devi considerare sono quanto "bene" riesci a scrivere
il codice e la potenza di calcolo che hai a disposizione.
Spero di essere stao d'aiuto.
Ciao ciao e buon lavoro.

 per forza utilizzare linux e programmare in C/C++.
Windows non è un sistema operativo real-time per cui non è possibile
creare applicazioni real-time, indipendentemente dal linguaggio
utilizzato.
Neppure linux (a parte qualche distribuzione specifica) è un sistema
real-time per cui vale lo stesso discorso.
Ciao.
-- 
BSD is for UNIX lovers -- linux is for Windows haters.
Newsgroup: it.comp.lang.visual-basic
Titolo: Casella combinata.....

Come si fà a popolora una casella combinata con dati prelevati da un
database di access.?!
Grazie a tutti.
Gianni_B

 database di access.?!
Ipotizzando di avere il recordset compilato e posizionato,
Combo1.AddItem rs!nome_campo

 ha scritto nel messaggio
news:bpsh0o$1seg19$1...@ID-174464.news.uni-berlin.de...

Grazie Lupo vado a provare Subbito
Ciao ti faccio sapere.
Gianni_B

 ha scritto nel messaggio
news:bpsh0o$1seg19$1...@ID-174464.news.uni-berlin.de...

Scusa che vuol dire " Ipotizzando di avere il recordset compilato e
posizionato," Lo so credo che per te sia una domanda che ti farà ridere ma a
me leggendo bene mi fà rizzare i capelli.....
Ciao
Gianni_B

[*Gianni_B* = 
gia...@bluewin.ch
 in 
news:3fc27...@news.bluewin.ch
] ha
scritto:

Vuol dire che disponi già dei dati prelevati dal database e messi in un
recordset.
Tu hai detto "...con dati prelevati da un database di access..."
Se sai farlo, mi capirai, se no ... dobbiamo cominciare da un'altra parte...
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] persistenza delle variabili

mi e' venuto uno stupido dubbio:
in una sub come questa
Private Sub cboIndex_Click()
    On Error GoTo errman
    Dim bk
    bk = dbFLD.Recordset.Bookmark
    dbFLD.Recordset.Index = cboIndex
    dbFLD.Recordset.Bookmark = bk
    Exit Sub
errman: MsgBox Error: Resume Next
End Sub
viene creata una variant "bk" ogni volta che si fa clic ?
e la memoria utilizzata si incrementa ogni volta ?
per eliminarla dovrei fare un set bk=nothing (come quando si fa dim rs / set
rs ... / rs.close / set rs = nothing) ?
dovrei usare una static ?
in teoria lo spreco potrebbe essere piccolo, ma se uno ha molte tabelle, con
molti indici, e tiene aperto un prg per un bel po' ...
grazie, a.





 dovrei usare una static ?
Dubbio Amletico ! :-))
Riporto quanto citato in MSDN :
Variables Used Within a Procedure.
Procedure-level variables are recognized only in the procedure in which
they're declared. These are also known as local variables. You declare them
with the Dim or Static keywords. For example:
Dim intTemp As Integer
-or-
Static intPermanent As Integer
Values in local variables declared with Static exist the ENTIRE time your
application is running while variables declared with Dim exist only AS LONG
AS  the procedure is executing.
Local variables are a good choice for any kind of temporary calculation. For
example, you can create a dozen different procedures containing a variable
called intTemp. As long as each intTemp is declared as a local variable,
each procedure recognizes only its own version of intTemp. Any one procedure
can alter the value in its local intTemp without affecting intTemp variables
in other procedures.
Spero possa essere utile per risolvere il dubbio !
Ciao
Lorenzo

 Spero possa essere utile per risolvere il dubbio !
si', infatti.
solo che me ne ha fatto venire un altro... :)
ciao, a.


ciao

 dichiarato con dim ?
Un recordset e' un oggetto ben piu' dispendioso in termini di risorse
rispetto a una semplice variabile, inoltre ha a che fare con le connessioni
ad un db, e quindi e' consigliabile, una volta terminato l'uso, distruggerlo
onde evitare possibili spiacevoli effetti...collaterali.
Ciao.
Lorenzo

 in teoria lo spreco potrebbe essere piccolo, ma se uno ha
molte tabelle, con molti indici, e tiene aperto un prg per un
bel po' ...
Il resto mi sembra sia stato esaurientemente trattato negli
altri interventi.
--
Ciao.
Maurizio

La variabile che usi ha una validità solo per quella procedura quindi ogni
volta che premi il pulsante viene creata la var bk, gli viene fatto tutto
quello che dici e quanto la funzione ritorna la variabile viene cancellata
quindi sarebbe inutile impostarla a nothing. Se invece la dichiaravi come
public in un modulo allora terminava la sua esistenza al termine
dell'applicazione (non ricordo se terminando con il bottone di VB o con la X
sia la stessa cosa)...
Se usi una variabile static invece credo che la sua area di validità sia per
l'intera durata del programma (ovviamente è solo a disposizione della
procedura dichiarante)...
-------
Ciao grande capo
Sabba
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Aiuto semplice EXCEL

Scusate se posto OT ma non saprei sinceramente qual è il NG corretto per
mandare questo messaggio........
sono sicuro che qualcuno di voi mi potrà dare questo semplice aiuto:
Quando in excel ho degli importi in colonna ed effettuo un filtro automatico
per selezionare ad esempio solo gli importi relativi ad una determinata
provincia, come faccio a calcolare e visualizzare il totale solo di quella
provincia?
Grazi anticipatamente
MAt

 provincia?
Ordinare per provincia e fare i subtotali?

Ciao Provo a dirti l'escamotage che mi è venuto in mente :
Intercettando l'evento di variazione sul filtro Potresti riempire la cella
"Somma" con una Funzione come Qsta
(non ho messo tutto ma solo il nocciolo)
Sub PROVA()
    Dim i As Integer
    Dim somma As Long
    For i = 2 To 220         (220 sostituisce per semplicità la variabile n°
righe)
    If Cells(i, 5).Height > 0 Then
    somma = somma + Cells(i, 5).Value
    End If
    Next i
    Cells(221, 5).Value = somma      (come sopra 221 è variabile n°righe+1)
End Sub

 Ordinare per provincia e fare i subtotali?
Scusa ma non posso ordinare per provincia perchè ci sono altri
filtri..............
 volevo sapere se posso in una cella fuori della tabella far spuntare la
somma delle celle visualizzate dopo i vari filtri
Grazie
MAt

 MAt
L'unica volta che ho avuto a che fare con una cosa del genere ho usato
SOMMA.SE
, ma non so se ti vabene.
Ciao

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

a

e per scrivere B c'era bisogno di tutta quella intestazione, nome, societa,
indirizzi vari, unaltro poco mettevi pure il bilancio... ::)))))))))))))

Newsgroup: it.comp.lang.visual-basic
Titolo: C1P8 sono sempre alf@ per convertire il progda Pascal a VBA

Come faccio a inviarti il programma?
Non si puň allegare niente?
--------------------------------
Inviato via 
http://usenet.libero.it

Questa non è una grigliata estiva in un cortile interno.
Leggere il Manifesto

 Si fa, si fa... anche in maniera piuttosto immediata.
beh.... il linguaggio è + o - simile.... il cambiamento "radicale" è
trasformare un programma sequenziale (dos) in uno ad eventi (win & simili).
Purtroppo esiste:
1) convertitore da QBASIC a PASCAL
2) convertitore da VISUAL BASIC a DELPHI (il nome è Delux e io ce l'ho), che
funziona abbastanza bene.
io non ho detto che ho un programma che converte un progetto Pascal in uno
VB (vba è ancora più improbabile) semplicemente perchè non esiste.
Poi io il pascal lo uso a scuola e quindi non so se ti posso aiutare
molto.....
Se alleghi un file costringi tutti gli altri utenti a scaricarlo e non è il
massimo (penso....)
L'unica soluzione è di farlo manualmente....ci impiegherai delle ore se il
programma in pascal è complesso :-((
buon lavoro!
Newsgroup: it.comp.lang.visual-basic
Titolo: setup

Quando creo il setup di un programma mi da un errore strano....mi si blocca
su un file
msado20.tlb
dicendomi errore durante la registrazione del suddetto file
come mai??
oppure mi da errori sulla registrazione dell'ocx di crystal report!!
Grazie Ciao!!

 come mai??
Perchè hai un po' di confusione........................
Su Progetto/Riferimenti devi togliere il riferimento a Microsoft Activex
Data Object 2.0
e imposta quella a 2.1
Poi su Creazioni Pacchetti dove c'è il file msado20.tlb toglilo
pure.........
Ciao
Sirjo

Newsgroup: it.comp.lang.visual-basic
Titolo: L'applicazione si blocca

Sto creando un'applicazione con VB6 SP6 che va a lavorare su un db access,
per la gestione del DB uso il dataEnvironment con i connection e command
vari, il problema che appena avvio l'applicazione per provarla e clicco sui
bottoni che mi sono creato si blocca. Qualcuno ha qualche possibile
spiegazione? Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Franck wrote:
Se non dici di che colore sono i bottoni, come facciamo a saperlo?
--
Gulp
....forse mi sono perso qualcosa !

Newsgroup: it.comp.lang.visual-basic
Titolo: altra domandina...

Ciao a tutti,
In generale, come faccio a sapere in quale cartella risiede un programma che
viene eseguito?
Grazie hyppos

app.path
--
GbC
--

Newsgroup: it.comp.lang.visual-basic
Titolo: DBF - ODBC - connection

Sto frequentando un corso di VB che per il momento tratta soltanto dei data
base MDB Access.
Ho fatto qualche programmino di prova ed ora vorrei provare a fare qualche
programma ausiliario per una applicazione su dei files DBF.
Ho provato a leggere quà e la' senza riuscire a trovare un esempio chiaro e
completo dall'inizio alla fine.
Intanto non ho capito come si ottenga questo DSN di cui si parla (viene
sempre nominato questo ODBC, ma io non so come funziona).
Qualche suggerimento?
O, ancora meglio, qualcuno potrebbe mandarmi o segnalarmi dove trovare una
piccolissima applicazione che possa servirmi da esempio.
Se qualcuno vorrà segnalarmi qualche indirizzo Internet, Lo prego di
aggiungere qualche nota perchè di solito nel sito indicato non riesco mai a
trovare quello che mi serve.
Grazie e saluti.
Sauro

 sempre nominato questo ODBC, ma io non so come funziona).
Beh per collegarsi ai dbf non è necessario ODBC comunque se vuoi creare un
collegamento ODBC puoi andare sul pannello di controllo di windows
(cambia un pochino da versione a versione ma sempre nel pannello lo trovi)
dove trovi  qualcosa del tipo Origine dati ODBC, se usi il 2000 lo trovi
in Strumenti di Amministrazione.
Quel pannello lì serve per creare le sorgenti ODBC da utilizzare.

Newsgroup: it.comp.lang.visual-basic
Titolo: Dao e select...

Scusate se vi faccio perdere tempo, nonostante abbia scavato sull'msdn, nel
SC e un po in giro su internet, non sono riuscito a capire come creare una
query in DAO che mi restituisca un recordset contenente tutti i record di
una tabella che abbiano i valori di 2 colonne in comune: mi spiego meglio,
ho una tabella "miaTabella" che tra i vari campi ha anche un "CampoData" e
un "CampoAttività", a me serve avere una query che mi restituisca tutti i
record che hanno in comune una determinata data e una determinata attività
da me inserite!
Grazie per l'aiuto e scusate se la domanda è OT
PS
Se invece di rispondere avete siti dove poter reperire queste informazioni
sono ugualmente contento!

 Grazie per l'aiuto e scusate se la domanda è OT
Non è OT, semmai non così difficile da risolvere...
Se guardi su msdn (o sulla guida di access) la clausola "WHERE" di Sql avrai
la risposta...
ciao
ugo

 ugo
innanzitutto grazie per la risposta, in secondo luogo ho fatto come mi hai
consigliato, ma continuo ad avere delle difficoltà,
ho provato con questa stringa, ma non mi da nessun risultato, dove sbaglio?
Set qdfCassaGiornaliera = Dbase.CreateQueryDef("")
qdfCassaGiornaliera.SQL = "SELECT Contabilità.*, Data FROM Contabilità WHERE
(Data = " & calendar1.Value & ")"
Set rsCassaGiornaliera = qdfCassaGiornaliera.OpenRecordset
Grazie ancora!

Set rsCassaGiornaliera = qdfCassaGiornaliera.OpenRecordset
Bisogna formattare la data, cioe' il calendar1.Value.
Il formato standard odbc, compreso da tutti i db, o quasi, e' YYYY-MM-DD.
Se il db e' access potrebbe essere opportuno formattare #MM/DD/YYYY#.
Quindi il sql diventa:
qdfCassaGiornaliera.SQL = "SELECT Contabilità.*, Data FROM Contabilità WHERE
(Data = '" & Format$(calendar1.Value, "yyyy-mm-dd") & "')" 
oppure, per gli mdb:
qdfCassaGiornaliera.SQL = "SELECT Contabilità.*, Data FROM Contabilità WHERE
(Data = #" & Format$(calendar1.Value, "MM/DD/YYYY") & "#)"
-- 
hth, hal

 ha scritto nel messaggio
news:a4jgks$fci$1...@newsreader.mailgate.org...

Grazie 1000! ora si che funziona!
se però posso permettermi di disturbare ancora, esiste un modo per ampliare
la query ad un intero mese? mi spiego, con il mio controllo calendar1.Value
ottengo giustamente tutti i record del giorno che scelgo, ma se volessi
tutti i record di un determinato record?
Grazie ancora a tutti!


 qdfCassaGiornaliera.SQL = "SELECT Contabilità.*, Data FROM Contabilità
WHERE
MONTH(Data) = " & TRIM(STR(MONTH(calendar1.Value)))
ciao
ugo

 ha scritto nel messaggio
news:a4l8du$11li8$1...@ID-96367.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Toolbar volanti

Ciao a tutti,
                  č un po di tempo che ho un dubbio, č possibile in VB
creare "Toolbars Volanti", cioč che, se trascinate sul form si trasformino
da toolbar agganciate ad un bordo del form in finestre volanti conteneti una
toolbar come in office?
Esiste qualche componente OCX che lo facia o il codice sorgente per
costruirlo?
Ciao!
Tom

 creare "Toolbars Volanti", cioè che, se trascinate sul form si trasformino

Newsgroup: it.comp.lang.visual-basic
Titolo: ListBox e ricerca stringa

Salve a tutti.
Forse è cosi evidente che non riesco a vedere la cosa. In Visual c++ esiste
una funzione adeguata per ricercare una stringa all'interno di un listbox.
Come mai in vb ho trovato solo istruzioni per la ricerca dell'indice e non
della stringa ?
Grazie.

Grazie per l'info.
Leonardo.
Newsgroup: it.comp.lang.visual-basic
Titolo: Forse OT: un buon contratto di licenza d'uso

Forse questo argomento è un po' OT, ma ci provo ugualmente:
Mi sono più volte posto il problema di cosa può e non può contenere un buon
contratto di licenza d'uso per il software. Non so se ci avete mai pensato,
ma per chi scrive software "commerciale" (inteso come non free) questo è un
punto rilevante.
In particolare mi interessano le clausole di limitazione della
responsabilità: non so se sia sufficiente inserire una clausola di
limitazione di responsabilità perché questa funzioni realmente, in
particolare nel caso in cui il software venga usato dall'acquirente del
programma per fornire servizi ai SUOI "clienti" basandosi sugli output del
sw. stesso. Una possibile soluzione potrebbe secondo voi essere la
limitazione dei danni al costo del software?
In ogni caso anche per il software "free" si porrebbe a parer mio lo stesso
problema, anche se certamente in questo contesto il "buon senso"
indicherebbe di stare tranquilli. Ma oltre che con il buon senso, si può
stare tranquilli anche per il diritto?
Scusate se vi ho solamente annoiati.
Forse dite che è meglio aggiustare un po' il tiro e postare su it.diritto?
:)

 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: scannere con porta dedicata e dll

ho comprato tempo fa uno scanner un po particolare con un software non male
ma migliorabile
il sw funziona sotto win 31 succ (95 e 98 testato) ora pero avrei la
necessità tramite vb di migliorare il sw
in modo da aumentare ed ottimizzare la produzione.
ricordo che una volta non ricordo come, facendo doppio click su una
determinata dll apparivano tutti i comandi o
funzioni
ora ne con nt ne con 95,98 ne con 2000 risco a vedere la dll
esiste un modo per poter fare questo sw ?
ps lo scanner possiede una scheda di collegamento dedicata, con bus isa e la
cosa ovviamente + drammatica
è che ovviamente non possiede drivers twain
grazie in anticipo x l'aiuto
--
Marco G. 
marco....@tiscalinet.it

Che scanner è?
Che interfaccia è?
Come fai ad essere certo che non ci siano drivers TWAIN?
E gli ISIS? Ci sono? Sono programmabili...
-> GbC

 ha scritto nel messaggio
news:%mMo7.70072$ul3.2...@news.infostrada.it...


la marca di entrambi, please...
scanner e controller...
sviluppavo sw per imaging anni fa...
-> GbC
http://www.chiappori.net
http://www.gbcweb.com

 ha scritto nel messaggio
news:Ajop7.84220$ul3.3...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP] Datagrid

Qualcuno sa se sia possibile impostare la proprietą BackColor solo per
una colonna specifica di un DataGrid?
Grazie e Ciao, Ivan


Urka IVAN,,, potrebbe interessarmi... saputo qualche cosa?
Sarebbe interessante anche 2 colori a linee orizzontali alternate...tanto
per non perdere il posto... :-)))
Grazie per ev. info.
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

Nada! :( Ho fatto ancora qualche prova ma non ne vengo fuori... :(((
Ciao, Ivan



io ero riuscito a cambiare il colore di una singola cella in un dbgrid se ti
può interessare vado acerca i sorgent epoi ti faccio sapere
comunque si trattava di una propietà di un insieme.


Mi interessa eccome! Se mi puoi fare questa cortesia...
Grazie e Ciao
Ivan

> Qualcuno sa se sia possibile impostare la proprietà BackColor solo per


 Ivan
ok li vado a cercare

mi sono sbagliato purtroppo era per un msflexgrigrid infatti per aggirare
problema io caricavo la tabella in un msflexgrid e poi con un textbox che
spuntava in corrispondenza del della cella in cui cliccavo cambiavo il
contenuto
per mettere una immagine in una cella:
Set MSFlexGrid1.CellPicture = LoadPicture(App.Path & "\net12.ico")
MSFlexGrid1.CellPictureAlignment = 3
per cambiare il colore della cella e può servire anche il bold del
carattere:
          MSFlexGrid1.CellBackColor = vbred
          MSFlexGrid1.CellFontBold = True
spero che dal basso della mia abissale ignoranza di poterti essere stato
d'aiuto.
Ciao alla prossima.

Ora ci ragiono sopra. Ignorante? Non credo proprio!
Grazie 1000 e ciao
Ivan 
Ti farò sapere come è andata...


Newsgroup: it.comp.lang.visual-basic
Titolo: problema con dim

ecco qua o messo una variabile di un imput e no vuole accetare vuole un
numero perche
c = InputBox("entrare un numero")
Dim Ad(c) As integer
errore constante domandata ligna di errore
Private Sub Command1_Click()
se metto un numero al posto della letera c a dim funziona


    Tu provare questo:
    Dim c As Integer
    c = InputBox("entrare un numero")
    Dim Ad() As Integer
    ReDim Ad(c)

Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere su un'immagine

Ciao a tutti da un newbie,
č possibile scrivere su di un'immagine, in modo che possa salvare
l'immagine cosě come appare a video (con la scritta).
Grazie
Sugar Bee

l'immagine cosě come appare a video (con la scritta).
SavePicture
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT][SQL] query e join

ciao a tutti!
son tornato finalmente con un nuovo news server...
scusate l'OT
mi sono bloccato davanti ad una stupida query SQL:
due tabelle:
warehouses        campi: whID, whName
foodmovements    campi: fmStartWhID,fmDestWhID,fmDispatchDate...
su una grid vorrei visualizzare la tabella foodMovements
ma per i campi fmStartWhID e fmDestWhID non voglio far vedere il numero ID
ma il nome, quindi il campo whName...
e mi son bloccato...
per il fatto che son due
suggeritemi qualcosa!
grazie a tutti!!
ciao
marco

 ha scritto nel messaggio 
news:d3c1ij$55h$1...@area.cu.mi.it...

select a.whName,b.whName,foodmovements.fmDispatchDate
from foodmovements, warehouses a, warehouses b
where a.whid=foodmovements.fmStartWhID and b.whid=foodmovements.fmDestWhID
Ciao
Elef
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con aggiornamento archivi

Innanzi tutto vorrei una conferma. Usando archivi Access è del tutto inutile
usare Archivi.BeginTrans e Archivi.CommitTrans in quanto Jet non supporta le
transazioni? (questo è quanto si legge nella guida)
A prescindere dalla risposta, non riesco a trovare l'errore nella seguente
routine:
Private Function ModificaArchivi()
   If Stampato = 1 Then
      Call Stampa    ' Si procede alla stampa dell'ordine
   End If
   Archivi.BeginTrans
   TotVenDitta = 0
   TotComCliente = 0
   TotProvv = 0
   ' Ordtemp è una tabella in cui si inserisce l'ordine
   Do While OrdTemp.EOF = False
      Prodotti.MoveFirst
      Prodotti.Find "cdcp = " & OrdTemp!codp
      If Prodotti.EOF = True Then MsgBox ("Errore su ricerca prodotto:
codice prodotto non trovato" & OrdTemp!codp)
      If OrdTemp!tota > 0 Then
          Prodotti!vven = Prodotti!vven + OrdTemp!tota + 0
      End If
      Prodotti!qven = Prodotti!qven + OrdTemp!quan + 0
      Prodotti!dum = OrdTemp!dat
      Prodotti.Update
      TotVenDitta = TotVenDitta + OrdTemp!tota
      TotProvv = TotProvv + OrdTemp!pvv
      OrdTemp.MoveNext
   Loop
   Codici!cto = Codici!cto + TotVenDitta
   Codici.Update
   OrdTemp.MoveLast
   TotComCliente = TotVenDitta
   Ditte.MoveFirst
   Ditte.Find "cdc = " & OrdTemp!codd
   Ditte!ven = Ditte!ven + TotVenDitta + 0
   Ditte!prm = Ditte!prm + TotProvv + 0
   Ditte!duo = OrdTemp!dat
   Ditte!prg = ProgDitta
   Ditte.Update
   Clienti.Find "cod = " & OrdTemp!codc
   Clienti!COM = Clienti!COM + TotComCliente + 0
   Clienti!DUA = OrdTemp!dat
   Clienti.Update
   OrdDati.AddNew
   OrdDati!dpr = txtGenOrd(6)
   OrdDati!ddata = OrdTemp!dat
   OrdDati!dcli = Clienti!cod
   OrdDati!ddit = Ditte!cdc
   OrdDati!dsuba = CodSuba
   OrdDati!dtota = TotComCliente + 0
   OrdDati!dde1 = Trim(txtGenOrd(2))
   OrdDati!dluc = Trim(txtGenOrd(3))
   OrdDati!dpag = Left(Trim(cmbPagamento.Text), 20)
   OrdDati!dsco = CSng(txtGenOrd(5))
   If chkConsegna.Value = True Then
      OrdDati!dcop = True
      Else
         OrdDati!dcop = False
         If IsDate(txtGenOrd(4).Text) = True Then
            OrdDati!dcon = CDate(txtGenOrd(4))
         End If
   End If
   If Stampato = 1 Then OrdDati!dsta = True
   OrdDati.Update
   OrdDati.Requery
   Archivi.Execute "INSERT INTO ordini SELECT * FROM ordtemp"
   Archivi.Execute "DELETE * FROM OrdTemp"
   Archivi.CommitTrans
   OrdTemp.Requery
   VisOrdini.Requery
   TotVenDitta = 0
   TotComCliente = 0
   TotProvv = 0
End Function
L'errore consiste che ogni tanto, non riesco a definire in quali occasioni,
Ditte!ven = Ditte!ven + TotVenDitta + 0
genera un importo scorretto tant'è che sulla scheda della ditta trovo
importi incomprensibili.
Scusate l'esempio lungo che sicuramente denota scarse capacità, ma per il
momento ho questo.
Se poi qualcuno può darmi una dritta su come fare le stesse cose in maniera
migliore....sarei grato.
Grazie.

 A prescindere dalla risposta, non riesco a trovare l'errore
nella seguente routine:
[...]
Passo.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Debug con VB 6

Qualcuno di voi ha idea di come eseguire il debug di un programma realizzato
in VB6, ma al di fuori della fase di progettazione? In pratica vi sono
alcune anomalie del programma che non si riescono ad intercettare in fase di
progettazione, ma avvengono solo in esecuzione. In Cobol esiste una
istruzione Trace che lista su di un file passo-passo le varie routine che il
programma va a toccare, ma non ho trovato niente di simile in VB6. Dato che
il programma e' abbastanza grosso da poter pensare di mettere delle msgbox
in tutta la sua lunghezza, qualcuno ha qualche suggerimento da darmi?
Grazie.
Raoul

...


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

Se eseguo un filecopy, Vb aspetta che
il file sia stato copiato prima di eseguire
il codice successivo?
thanks

...


...

Non penso.
il problema č questo:
eseguo il filecopy di un file pippo.doc.
Subito dopo lo apro con WORD da VB.
Su un Pentium 75 o 100 nessun problema.
Su un celeron 300 word mi dice
 "file pippo.doc non trovato".
Allora faccio aspettare l'apertura di WORD per qualche secondo e tutto
funziona.
Ne evinco che il celeron č troppo veloce ad aprire Word
e che il filecoy non č ancora terminato.
O no?

IO ho VB6, ed ho avuto lo stesso problema, il mio è un 166mmx
...
per risolverlo ho usato filecopy seguito da un loop di attesa che il file
fosse completamente copiato...
es:
        FileCopy "A:\myFile", FileImb & "myFile"
    While "myFile" <> Dir(FileImb & "myFile")
    Wend
se il file è parecchio grosso potresti usare un controllo sulla grandezza
del file, se il file(però a questo punto dovresti fare anche
l'intercettamento degli errori nel caso il dischetto fosse difettoso,
altrimenti entri in loop infinito
...GooD LooK...
EffEPi SySteM
EffEPi...@iol.it
Fabrizio Parrella
 - VB6 -


Newsgroup: it.comp.lang.visual-basic
Titolo: Icona di un Activex control

Quando creo un ActiveX control, Visual Basic 5.0 gli associa un'icona di
default che è poi quella che verrà visualizzata nella toolbox fra le
icone dei control classici: ebbene come si fa a cambiare questa icona e
a mettergli un'altra personalizzata visto che se creo due ActiveX
control e li uso tutti e due contemporaneamente mi ritrovo due icone
uguali nella toolbox?
Se c'e' qualcuno che mi può aiutare gliene sarei parecchio grato.
Ciao!

 uguali nella toolbox?
Disegna o scegli una bitmap (attenzione: un file bmp, non .ico),
preferibilmente di 16x15 pixel (altrimenti viene ridimensionata dal VB con
effetti non sempre accettabili) e indicala nella proprietà ToolboxBitmap
che trovi nella finestra delle proprietà.
Domenico
Newsgroup: it.comp.lang.visual-basic
Titolo: I DAO di VBA in Win 98 non funzionano ?

Ho installato Windows 98 e quando eseguo del codice excel VBA, alla prima
istanza di un oggetto Dao, mi compare l'avviso "Il componente ActiveX non è
in grado di creare l'oggetto". Preciso che le librerie DAO sono regolarmente
aggiunte nei Riferimenti e regolarmente registrate nel Registro di
configurazione, in quanto paragonando quest'ultimo al Registro di win 95 le
chiavi e valori sono tutte presenti. Ringrazio.
--
Posted from 
mail.dex-net.com
 [194.184.44.19]
via Mailgate.ORG Server - 
http://www.mailgate.org

istanza di un oggetto Dao, mi compare l'avviso "Il componente ActiveX non č


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

Ho necessità di zippare un DB dalla mia applicazione, per farlo ho
utilizzato il comando pkzip di DOS, senza trovare eccessivi problemi.
Tuttavia vorrei sapere se esiste un metodo più flessibile per farlo ....
Grazie a tutti

Se ti interessa,ti posso spedire un OCX fatto da me che serve a comprimere e
decomprimere con VB.
N.B.: La compressione però non è allo stesso livello del WINZIP
ma second me offre buoni risultati.
Bye Omar (VI)
Gianluca Tassone ha scritto nel messaggio ...


interesserebbe anche a me!!!
dimmi, non puoi mandarmelo?
te ne sarei mooolto grato!
IMPARO! IMPARO! IMPARO!!!!!!
Ciao!

Non scervellati in OCX e affini, la mamma MS mette a disposizione CABARC.exe
MAKECAB.EXE etc,etc con rispettive dll  o semplici esecuzioni in modalità
DOS autochiudenti. Comprime meglio dello ZIP ed è inoltre compatibile con
quest'ultimo.
Saluti, Leonardo Orazi.