mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Re: colorare righe tabella "a coppie di due"

 nera...)
Dim counter  As Long
Dim colorata As Boolean
Dim col      As String
Dim quante   As Long
'numero di righe contigue con lo stesso colore
quante   = 2
counter  = quante
colorata = False
Do While Not (quellochee.EOF)
    If (counter = 0) Then
    	counter = quante
	colorata = Not colorata
    End If
    If (colorata) Then
        col = "bgcolor='#F2F6E5'"
    Else
        col = "bgcolor='#FFFFFF'"
    End If
    counter = counter - 1
    quellochee.MoveNext
Loop
-- 
ciao, hal

Devo stampare una tabella su file .htm tramite una serie di Print #1
racchiusi in un ciclo while.. wend.
Ho bisogno che le righe di questa tabella siano colorate uguali a coppie di
due.
Putroppo ho trovato solo il modo di colorare diversamente le righe pari
dalle dispari con
    If Val(counter) Mod 2 = 0 Then
    col = "bgcolor='#F2F6E5'"
    Else
    col = "bgcolor='#ffffff'"
    End If
     Print #1, "<TR "; col; ">...
Esiste un modo per colorarle di due in due? (riga 1 e 2 bianca, riga 3 e 4
nera...)
Grazie.

 Loop
Grazie hal!

 nera...)
If Val(counter) Mod 4 <= 1  Then
    col = "bgcolor='#F2F6E5'"
Else
    col = "bgcolor='#ffffff'"
End If
Print #1, "<TR "; col; ">...
Ciao
-- 
Fabio
http://www.codice.it

 ha scritto nel messaggio
news:432f3015$0$8481$5fc...@news.tiscali.it...

Prova così (supponendo che counter parta da 0):
    If (Val(counter) Mod 4) \ 2 = 0 Then
        col = "bgcolor='#F2F6E5'"
    Else
        col = "bgcolor='#ffffff'"
    End If
Bye
Raf

GiGiGi wrote:

puoi modificare cosi' la funzione:
     If (Val(counter) And 2) = 0 Then
     col = "bgcolor='#F2F6E5'"
     Else
     col = "bgcolor='#ffffff'"
     End If
bye
r

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Sito A.Cattaneo disperso ?

Il sito di Cattaneo dedicato all'automazione industriale non risulta più
attivo all'indirizzo
http://members.xoom.it/Cattaneo_Plc/index.html
Ne sapete qualcosa????

 attivo all'indirizzo 
http://members.xoom.it/Cattaneo_Plc/index.html
Casini di xoom dopo virgilio, forse.
Esiste 
http://members.xoom.virgilio.it/Cattaneo_Plc/
 ,
ma c'è praticamente solo il link "torna su". Se hai dei link
vecchi al sito, prova ad aggiungerci "virgilio". Oppure c'era
qualche altro trucco, ma ora non ricordo, sorry. :-(
P.S.: su Google trovi la mail, magari puoi chiedere a lui.
Bye, G.

 Ne sapete qualcosa????
Sě, per l'incendio di XOOM i siti sono operativi, ma vuoti e deve essere lui
a rimettere su TUTTO.
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Barra di caricamento nella barra di stato

Come si può inserire una barra di caricamento (avanzamento) in una barra di
stato? (come per esempio la barra di caricamento di IExplorer).
Ringrazio in anticipo
--
Renzo


Newsgroups: it.comp.lang.visual-basic
Subject: [VBP] la progressbar nella barra di stato
Date: Thu, 26 Oct 2000 11:23:41 +0200
ho fatto un esempio di come emulare la progressbar nella barra di stato
http://spazioweb.inwind.it/xaero/StatusProgress.zip
spero che possa essere utile a qualcuno
...magari se lo volete mettere sul sito comune...

Newsgroup: it.comp.lang.visual-basic
Titolo: programmazione su intranet

Ciao a tutti,
sto per cominciare un programma che dovrebbe utilizzare dei database su
rete intranet.
La domanda è : che tipo di "struttura" devo utilizzare
(ADO, RDO.....) in modo che sia anche possibile l'accesso multiplo da
parte di diversi utenti?
Ringrazio anticipatamente a tutti coloro che mi daranno
un suggerimento.
Andrea
_________________________________________________________
Do You Yahoo!?
Get your free @
yahoo.com
 address at 
http://mail.yahoo.com
--
Posted from 
web203.mail.yahoo.com
 [128.11.68.103]
via Mailgate.ORG Server - 
http://www.mailgate.org

...


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

Chi mi sa dare un esempio su come, con uno script in vb, posso visualizzare
dei dati provenienti da un db su delle pagine html. Il tutto scegliendo da
un pagina principale il record da visualizzare e su un computer solo ?
GRAZIE Enrico


wrote:

TI consiglio di dare un'occhiata all'indirizzo
http://www.constell.net/visualcgi
ci troverai una mia libreria di classi shareware per scrivere CGI in
VB
una dimostrazione delle potenzialita' di questa libreria la trovi
nella mia chat, realizzata tutta in VB5 con l'utilizzo, appunto, della
mia libreria VisualCGI
l'indirizzo della chat e'
http://www.constell.net/chat
Fammi sapere
Ciao
Max
---------------------------------------------------
Dott. Massimo Canducci
Web Developer & WebMaster
e-mail mailto:
cand...@ipsnet.it
       mailto:
cand...@hotmail.com
 
http://www.constell.net
  - devi traslocare?
 
http://www.constell.net/chat
  - una grande chat sul web
 
http://www.constell.net/visualcgi
  - per realizzare CGI con semplicita'
---------------------------------------------------

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto per le date in Access

Potrà sembrarvi semplice e banale ma ormai non ne vengo più fuori,
ho un una tabella con vari campi tra cui uno Data impostato come tipo dati
"Data/ora"
nel momento in cui cerco di caricare i dati in un DBGrid mi appare la
finestra di errore che mi avverte che il tipo di dati non sono
corrispondenti con il criterio assegnato.
questo è il codice che utilizzo per caricare il DBGrid:
strQuery = "SELECT * FROM TabFurgoni WHERE Data =  '" & Text1 & "'"
' nella '" & Text1 & "'" si trova la data del giorno
  Data1.RecordSource = strQuery
  Data1.Refresh
  DBGrid1.Refresh
  DBGrid1.Visible = True   '   query
   strPercorsoFile = App.Path & "\Database.mdb"
   Set dbs = OpenDatabase(strPercorsoFile)
   Set rst = dbs.OpenRecordset(strQuery)
certo che qualcuno mi salverà vi ringrazio anticipatamente MANU

 wrote in message
news:RaCg6.22124$eQ5.4...@twister2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: mandare un'e-mail?

scusate ragazzi non è che avete a portata di HD di un bel e piccolo codice
che permette subito l'invio di una E-Mail?
pica...@labnet.it

...


>scusate ragazzi non č che avete a portata di HD di un bel e piccolo codice


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

He scritto un programma che usa l'oggetto
DataEnvironment di VB 6.0
Questo programma funziona con W95c e W98 mentre va in errore
con W95b
L'errore che si genera nel momento in cui avviene il riferimento al
Data Enviroment e' il seguente:
------------------------------------------------------
Errore di run-time '429':
Il componente ActiveX non può creare l'oggetto.
------------------------------------------------------
non mi aiuta molto ...  ;)
Se qualcuno avesse un'idea
                         TIA
--
Posted from 
fusilla.abanet.it
 [212.28.160.10]
via Mailgate.ORG Server - 
http://www.mailgate.org

Il problema non è nel programma ma nel registro di configurazione della
macchina. E non sempre è risolvibile.

Installa DCOM95 (lo trovo nel cd di VB)
Bye
Newsgroup: it.comp.lang.visual-basic
Titolo: OCX creati con VB / utilizzati con AC

Come da oggetto, se creo un ocx con vb6 poi per utilizzarlo in access o
qualunque altro applicativo devo inserire nel pacchetto di installazione
anche il mega e mezzo dei runtime di vb?
Ciao, omnitow


Certo.
Si chiamano 'Dipendenze'
:-)
Ciao
Alberto

 ha scritto nel messaggio
news:TZJ6a.154831$ZE.45...@twister2.libero.it...

Ciao Alberto,
scusa se insisto ma, così su due piedi, non ho la possibilità di fare delle
prove...
e se nel progetto non utilizzo alcun oggetto e funzione di vb, ma solamente
oggetti della libreria di access?
ti chiedo questo perchè spesso sulla rete si trovano dei semplici
programmini (anche se non so in che linguaggio siano stati scritti) che
girano senza richiedere alcuna installazione precedente...
omnitow

 che girano senza richiedere alcuna installazione precedente...
1)
E' possibile inserire il runtime di VB all'interno dello stesso exe, ma non
si riduce la dimensione complessiva
2)
E' anche possibile, ma non ti so dire che tool usare, compilare in modo da
incorporare tutte le funzioni che ti servono in un solo exe
3)
Spesso questi applicativi usano il runtime di VisualC, che è installato
assieme ad Internet Explorer, per cui funzionano come gli ocx fatti in VB,
ma tu non te ne accorgi perchè msvcrt è già presente nel PC (verifica,
vedrai che c'è anche nel tuo...)
Ciao
Alberto

 ha scritto nel messaggio
news:5rK6a.153854$YG2.4...@twister1.libero.it...

Ok, sei stato più che chiaro ed esaustivo
Ciao e grazie
omnitow

Newsgroup: it.comp.lang.visual-basic
Titolo: errore runtime

cerco qualcuno che mi aiuti:
quando cerco di esportare i miei giochini in VB (5)
il computer ospitante mi manda un messaggio di errore:
<<errore di run time 336
componente registrato non correttamente>>
cosa debbo fare?
grazie a chi mi darà risposta
paolo

 wrote in message 8jitqe$qlm$1...@serv1.iunet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: chi mi aiuta?

Come posso fare per avere il controllo common dialog disponibilie visto che
la mia versione di VB non lo rende tale?
grazie
Paolo

...



Newsgroup: it.comp.lang.visual-basic
Titolo: curiosità emulatore virtualpc/vmware

Ho una curiosità:
E' possibile far capire al mio programma quando sta girando su una
macchina emulata e quando no?
Questi software lasciano qualche "traccia" per dire che il computer è
emulato?
Ciao!

 ha scritto nel messaggio
news:1192902013.5...@v29g2000prd.googlegroups.com...

Ciao!
Che io sappia una VM è esattamente come una macchina reale per il SW che
gira sotto.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Daniele ha spiegato il 20/10/2007 :

Teoricamente il sistema operativo virtuale non sa di essere tale.
Ma una scheda di rete che si chiama "VMWare Ethernet Adapter" non è una 
scheda fisica.
E lo stesso vale per la scheda video, e altre periferiche.
Quindi, sfrugugliando in mezzo alla configurazione hardware del 
sistema, ci dovresti saltare fuori.
Ciao
Alberto
-- 
Carlo Rubbia: Siamo su un treno che va a trecento chilometri all'ora, 
non sappiamo dove ci sta portando e, soprattutto, ci siamo accorti che 
non c'è il macchinista.


ok, quindi è necessario verificare i nomi dei componenti hardware.
Provo, grazie!


Questi 2 esempi sono in C++ pero' al limite puoi compilarli in una DLL
esterna
http://www.codeproject.com/system/VmDetect.asp
Ciao


non c'è niente di meglio di una cosa già pronta ;)
Grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: Unofficial meeting ....ritrovarsi

Stasera mi sono messo a spippolare con le api v3 di google maps
Ho tirato fuori una pagina web dove ho segnato: 
il punto di incontro 
il ristorante
il negozio di biscotti
...già che c'ero c'ho messo un grezzissimo guestbook....
LINK
http://www.martek.it/meeting/
segnalatemi a che ora arrivate per favore ....grazie!
Per GbC che c'ha la mattonella di jobs....la mappa è con le api v3 + javascript...google dice che le nuove api si azzeccano bene con navigatori e smartphone....
Siccome io sono un "antico" che usa il telefono solo per telefonare e il caffè se lo fa ancora con la macchinetta invece che con l'iphone...se non funziona non te la rifare con me!

segnalatemi a che ora arrivate per favore ....grazie!
************************************************
Monica ed io siamo al punto di ritrovo per le 12.00.
Se siamo gli unici a scegliere questa soluzione,
per non essere di intralcio a nessuno,
possiamo anche venire direttamente al ristorante.
Marco ti mando un sms con il mio cellulare.
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/

L'unica cosa Zio GbC non risponde alle email!
.......è sparito.....che l'abbiano rapito gli alieni????
va beh un posto in più si trova!....chi ha il numero lo avverta....che fa da buca proprio lui???

Io dovrei essere al punto di ritrovo per le 12.00 circa (traffico e
bimbo permettendo).
ho segnato il tuo numero, se ci sono problemi ti chiamo prima.
Ciao,
Nicola
Newsgroup: it.comp.lang.visual-basic
Titolo: Menu' da Dentro programma

Vorrei appena entrato poter leggeree tutti i menu disponibili per poter
cosi' fare una procedura di accessi o ůdi controlli.
L'unica cosa che son riuscito a fare e' stato quando clikko sul menu
vedere su quale sono...l'index etc tec..
 ma ioi vorrei vederli TUTTI e prima di ogni altra cosa ...come potrei
fare???
Grazie

 cosi' fare una procedura di accessi o ùdi controlli.

Newsgroup: it.comp.lang.visual-basic
Titolo: Help msdn vba6

Ho una versoine del vba6 senza Msdn!!! Dove lo posso trovare????
Grazie
--
                                Marco


http://msdn.microsoft.com
gia' , ma da li' non si puo' scaricare!
Non esiste nessun pacchetto gia' pronto scaricabile dalla rete?

Mistotroglo ha scritto nel messaggio ...

Ripeto: se hai _regolarmente_ acquistato VB o Visual Studio, i CD di MSDN
dovresti averli, se non li hai fatteli spedire da Microsoft.
Altrimenti, cicca.
Se dell'MSDN ti serve solo la documentazione dell'API, puoi trovare su vari
siti l'help (in formato winhelp) dell'SDK, lo stesso fornito con i prodotti
Borland (Delphi, C++Builder).
Roal Zanazzi

Newsgroup: it.comp.lang.visual-basic
Titolo: Importare Tabelle da Oracle ad Access da codice

Ciao Lista
ho un problemino...Uso ADO per collegarmi ad un DB Oracle remoto evorrei, da
codice, importare le tabelle che mi interessano, mi sapreste suggerire un
modo per far ciň in modo da aprire in locale le tabelle con access?
grazie mille

 ha scritto nel messaggio
news:buuegt$m2oo8$1...@ID-216634.news.uni-berlin.de...

Una letta,
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=ado%2Baccess%2Btabe
lle&meta=group%3Dit.comp.lang.visual-basic
giuseppeD

Newsgroup: it.comp.lang.visual-basic
Titolo: indirizzo e-mail o www...

salve
avevo visto da qualche parte il modo di mettere in una label (mi sembra) vb6
l'indirizzo e-mail o l'indirizzo www.. in modo da poterci cliccare sopra ed
andare al link...
consigli??
grazie
Andrea Montanari
a_mon...@libero.it
http://utenti.tripod.it/a_montanari/dbamgr.html
(my vb6+sql-dmo little try to provide M$ MSDE a visual interface) ver 0.0.20

 andare al link...
sta cosa si e' vista oltre 9000 volte
c'e' un esempio pressocche' su tutti i siti
Vedi il sito comune
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: VuslaBasic 2.0

Need  Visual Basic 2.0 for sudy purpose.Need help for locating/purchasing
/using VB 2.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

/using VB 2.
[...]
From
http://www.ifi.unicamp.br/~cyrillo/pages/vb.htm
you can download Visual Basic 5 Control Creation Edition.
It's a good start to learn VB.
Look at my web pages, you can find a lot of links to free code, tutorials
and other VB resources!
Ciao
--
-
MIX (VB5SP3)
110 links to VB sites
http://www.tempolibero.com/user/mix/
http://space.tin.it/computer/gaais
  (mirror)
( PLEASE USE IE )
-

Newsgroup: it.comp.lang.visual-basic
Titolo: Win NT SP6 - Explorer 5 - Vb6 SP3

Se apro e mando i un progetto già creato precedentemente e lo mando in
esecuzione Vb si chiude in automatico.
Il problema credi che sia Explorer 5. Per chè senza di lui tutto funziona.
Fortuna che in SP3 di Vb6 dice di Installare Explorer 5 !!!!!
Qualcuno ne sa qualcosa?

 wrote in message 86envk$lgj$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: scripting in Visual Basic

Dovrei aggiungere ad un programma che sto scrivendo la possibilità di
inserire funzioni matematiche ed espressioni mediante Visual Basic
Scripting.
Ho installato sotto Windows XP Home il Microsoft Script Engine 5.6 e il
controllo Microsoft Script Control 1.0 .
Il tutto dovrebbe funzionare anche con Visual basic 5, ma quando cerco
di inserire il controllo in un Form compare il messaggio "Errore
imprevisto".
Qualcuno può aiutarmi?
Saluti.   Alessandro
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Qualcuno può aiutarmi?
Forse il seguente ?:
http://www.msdn.microsoft.com/library/default.asp?url=/nhp/default.asp?conte
ntid=28001169
giuseppeD

Grazie.
Ho fatto altri tentativi ed ho scoperto che il file msscript.ocx che
usavo non era il piů recente nel mio sistema.
Ne ho usato un altro e adesso funziona.
Alessandro.


Newsgroup: it.comp.lang.visual-basic
Titolo: Anteprima foto

Come faccio ad inserire nella mia applicazione l'oggetto filelistbox
visualizzando l'anteprima delle immagini?
Grazie
Luca

Luca
Ciao 
Aran Banjo
-- 
web: 
www.ponchio.it
 (non aspettatevi molto)
Replay to: *[[banjo]]spamdim..@**
ponchio.it
**
"E' un vero peccato che tutte le persone che sanno come far
funzionare il paese siano troppo occupate a guidare taxi o
a tagliare capelli" - George Burns

Newsgroup: it.comp.lang.visual-basic
Titolo: Masterizzare un file database Access97

Nell'eseguire l'operazione descritta il database masterizzato risulta di
sola lettura, anche dopo averlo copiato dal CD ad un altro HD ......perchè
???? Vi risulta...???
Come si può evitare ? Tenete presente che il database originario è ad
accesso condiviso e protetto da password.
Vi ringrazio
--
--------------- sergio galbiati ---------------
--------- E-Mail fmo...@tin.it---------


Tutti i file presenti sui CD sono di sola lettura, indipendenteente
dalla loro natura e da dove vengono copiati, perchè il CD è un supporto
di sola lettura (ammenochè non sia un riscrivibile, allora gli attributi
non cambiano). Non si può evitare, ma si può far sì che durante
un'installazione o simili venga cambiato l'attributo del file togliendo
la sola lettura (se non scoccia si può fare manualmente).
ciao
degra

Come si può evitare ? 
Rimuovendo l' attributo di sola lettura dopo la copia sull' hard disk.
hth, hal


"Tutti sanno che i chitarristi sono dei burloni,e questa
é una delle cose più importanti a mio avviso" (Thomas \"Doc\").
Newsgroup: it.comp.lang.visual-basic
Titolo: dialog per scelta directory

Scusate l'ignoranza, ma sono un "esordiente totale" (come direbbe 
Fantozzi) di Visual Basic 6 (non .NET, con quello è tutto troppo facile 
eh eh)
Avrei bisogno con una certa urgenza far comparire un dialog tipo il 
CommonDialog.ShowSave ma l'utente deve solo scegliere una directory.
Su Google e affini non ho trovato una cippa...
-- 
  -- + Setaceous Pig + --
http://www.jroller.com/page/megadix/

 Su Google e affini non ho trovato una cippa...
hai provato a cercare shbrowseforfolder?
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 
Ehm...grazie, ma...veramente bisogna fare tutti 'sti giri per scegliere 
un folder del c@##o ? Grazie al tuo suggerimento ho trovato anche un 
articolo molto ben fatto:
http://www.codeguru.com/vb/controls/vb_shell/article.php/c3051/
Ma la domanda si pone: veramente in TUTTA la gigantesca libreria di VB & 
company non esiste un metodino schifosino schifosino per scegliere una 
directory invece che un file ?
Scusate, non voglio offendere nessuno, ma venendo da Java e .Net ogni 
tanto mi incazzo con VB6


 scegliere un folder del c@##o ?
volendo, puoi anche fare la ricerca omettendo le prime due lettere.
dovresti arrivare a
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/objects/shell/browseforfolder.asp
vedi tu cosa preferisci.


 ha scritto nel messaggio
news:c8fmla$t36$1...@tok.cu.mi.it...

Se non ho capito male dovresti utilizzare il componente DirListBox

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione a file Fox Pro

Qualcuno mi sa spiegare perchè se apro un DB Fox Pro con
OpenDatabase("DIRECTORY",false,false,"fox pro 2.0") mi viene fuori l'errore
"Impossibile trovare ISAM installabile"?
Grazie e saluti al NG.


se fai una ricerca con la frase "ISAM installabile" su google dovresti 
trovare parecchio materiale, stessa cosa sulla KB della Microsoft. il 
problema puo' saltare fuori per vari motivi a seconda del software e 
delle versioni installate sul tuo PC.
ciao
Marco
Newsgroup: it.comp.lang.visual-basic
Titolo: COPIA SU FILE!!!!!!!!!

Premesso che probabilmente il problema   non  risultera' molto chiaro viso
che mi e' stato detto via tel.
Il prob. e' il seguente:
Su win 3.1 (quindi su VB 3) mia zia programmatrice di banca vorrebbe fare na
funzione che dati 2 files formato  testo li apre e li mette insieme in un
terzo file *sempre formato testo) che poi viene salvato.
Come peotrebbe essere un abbbozzo di listato
grazie
Vi][oZ

...

Dim NumFileSource As Integer, NumFileDest As Integer
Dim Paragrafo As String
NumFileSource = FreeFile: Open "c:\source1.txt" For Input As #NumFileSource
NumFileDest = FreeFile: Open "c:\dest.txt" For Output As #NumFileDest
Do While Not EOF(NumFileSource)
    Line Input #NumFileSource, Paragrafo     ' leggo il paragrafo
    Print #NumFileDest, Paragrafo          ' scrivo il paragrafo
Loop
Close #NumFileSource
Open "c:\source2.txt" For Input As #NumFileSource
Do While Not EOF(NumFileSource)
    Line Input #NumFileSource, Paragrafo     ' leggo il paragrafo
    Print #NumFileDest, Paragrafo          ' scrivo il paragrafo
Loop
Close #NumFileSource
Close #NumFileDest
ciao Bruno

terzo file *sempre formato testo) che poi viene salvato.
Un comando dos no???
copy FileOrigine1.txt+FileOrigine2.txt FileDestinazione.txt
Bye.
Greg
gbia...@computering.it
gy...@geocities.com
http://www.geocities.com/Athens/Aegean/3276/
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Winsock e ADO

Ciao a tutti
Ho un problema che non riesco assolutamente a risolvere e non so + dove
guardare.
2 pc in rete, via winsock il primo spedisce una stringa con campi separati
da "pipe"
dall'altra li ricevo correttamente e li metto su un'Array.
Dopo alcuni controlli (verifico che sia un record inesistente in un database
Acces),
lancio la procedura di scrittura dei campi nel DB di cui sopra ma alla mi
compare
subito il messaggio "Errore di run-time '-
2147217887
(80040e21)': Si sono
verificati errori in un'operazione composta da più passaggi. Controllare i
singoli
passaggi" trovo il messaggio assolutamente oscuro inquanto, non ho altre
procedure in esecuzione e il collegamento winsock l'ho chiuso a fine
ricezione.
Se provo a mettere dei campi fissi al posto dell'Array tutto funziona.
Qualche idea ?
Form Load()
.....
    With wnskClent
        .RemoteHost = "10.1.1.140"
        .RemotePort = 101
        .Bind 100
    End With
End Sub
Private Sub wnskClent_DataArrival(ByVal bytesTotal As Long)
    Dim m_DataInput As String
    wnskClent.GetData m_DataInput, vbString
    Form1.TextWnsock.Text = m_DataInput
    wnskClient.Close
End Sub
LETTURA DATI RICEVUTI
Function ReadData() As Boolean
    Dim m_idx   As Integer
    Dim res     As Integer
    Dim I       As Integer
    Dim J       As Integer
    I = 1
    J = 0
    Do
        res = InStr(I, Form1.TextWnsock.Text, "|")
        If res = 0 Then
            g_ArrData(J) = Mid(Form1.TextWnsock.Text, m_idx + 1,
Len(Form1.TextWnsock.Text) - m_idx)
            Exit Do
        Else
            m_idx = res
            g_ArrData(J) = Mid(Form1.TextWnsock.Text, I, m_idx - I)
            J = J + 1
            I = m_idx + 1
        End If
    Loop Until res = 0
    If g_ArrData(3) = "" Then
        ReadData = False
    Else
        ReadData = True
    End If
End Function
SCRITTURA SU DATABASE
(CONNESSIONE GIA' APERTA E OK)
Function AddRecord()
    Dim I       As Integer
    RS.AddNew
    For I = 0 To 5
        RS.Fields(I) = g_ArrData(I) <--- Punto dove si genera l'errore
    Next
    RS.Update
End Function
Ciao e grazie
JKLJKL

 ha scritto nel messaggio
news:3dbe...@news.cis.it...
(snippone)
l'errore non ha, imho, nulla a che vedere con il winsock, prova a verificare
che la lunghezza dei dati che cerchi di mettere nel db non sia superiore
alla dimensione dei campi (č una delle condizioni che genera l'errore da te
rilevato)
Salutoni
Sergio


Grazie Sergio
Avevo la soluzione sotto il naso e non la vedevo (arrivava il 1° campo
"data" di 10
char mentre sulla tabella è impostatato a 8)
SONO UN POLLO
jkljkl
Newsgroup: it.comp.lang.visual-basic
Titolo: textbox ridimensionabile

Salve a tutti
sono alle prime armi e vorrei porre al NG una domanda per cui non sono in 
grado di trovare risposta
ho una form con 2 textbox ,  vorrei che allargando la form i controlli si 
ridimensionassero in modo automatico.
grazie a tutti
roby 

 ridimensionassero in modo automatico.
quando una form viene ridimensionata, si "scatena" l'evento resize.
all'interno del gestore di evento, puoi riposizionare/ridimenzionare le
text box (o qualsiasi altro controllo) tramite il metodo move
occhio, l'evento si scatena anche quando la form viene ridotta a icona, e
in quel caso il ridimensionamento dei controlli potrebbe generare qualche
errore di run time: verifica prima la proprietą windowstate della tua form.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: ADODC e SQL2000

Salve a tutti/E...
ho installato la Versione in prova di SQL Server 2000, e
creato il Database, importandop le tabelle da un Database
di Access 2000.La mia LAN è sotto dominio di Win2003
server.Il mio problema è questo, ho sempre sviluppato
Programmi con il controllo DATA (DAO), e DBASE di Access
97/2000, quindi usavo questo codice per
selzionare i record:
With Data1
..RecordSource = "Select * from Tab where CAMPO='PIPPO'"
..Refresh
..Recordset.MoveFirst
End With
ora mi trovo ad utilizzare un SQL Server 2000, quindi ho
detto, Basta
sostituire i DATA con gli ADODC (ADO) creando il DSN per
collegarmi al
server SQL....e il gioco è fatto. Ma invece...
lascio stare il codice, e faccio una semplice FORM con
ADODC1 e
DATAGRID1 (Collegata all'ADODC1), collego l'ADO col DSN
poi avvio il
progetto e apro la form, non mi da nessun errore, però
nella griglia
non si vede nessun record, e l'ADO è disabilitato...
Se invece, utilizzo il mio bel MDB con all'interno i vari
collegamenti
alle tabelle utilizzando il DSN.. Tutto funge...
In Cosa Sbaglio?
Grazie a tutti e buon lavoro...

 Grazie a tutti e buon lavoro...
Sto spolverando la sfera, aspetta

 ha scritto nel messaggio
news:tn4Uc.144718$5D1.7...@news4.tin.it...


 dati...
La stringa di connessione? Potrebbe essere quello il problema. il DB hai
detto che un Access, ma anche SQLServer?
Personalente non collego le tabelle direttametne ai dati, ma creo la stringa
di connessione e poi eseguo delle query o StoreProcedures su SQLServer,
molto più veloce e flessiible se dev cambiare DB od altro. Mi viene in mente
anche la possibilità dei permessi. Quando accedi al DB SQLServer, che utente
usi? Ha i diritti di eseguire SELECT sulla tabella di origine dei dati?
Probabilmente no, per cui non ti fa vedere i dati, anche se non ti crea
errori.


 ha scritto nel messaggio
news:0EhUc.113374$OR2.5...@news3.tin.it...

In che senso?



Nel senso che leggo il recordset con i dati che mi interessano.
In pratica passo una stringa SQL che mi restituisce i dati (un recordset)
che voglio (oppure una storeprocedure se i dati sono veramente incasinati
tra più tabelle)
E poi scrivo ogni record nella tabella MSFlexGrid od altro così poi formatto
e controllo i dati  ocme voglio (codici colori, colonne nascoste ed altro)
Newsgroup: it.comp.lang.visual-basic
Titolo: Barra degli strumenti

Salve,
ho la necessità di nascondere la barra degli strumenti di Windows, in modo
tale che non venga richiamata dal tasto Menu, quello con l'iconcina di
Windows disegnata sopra.
Esiste un modo per nascondere la barra degli strumenti?
Ciao!

Guarda il codice seguente preso da un esempio su
www.allapi.net
 in cui si spiega come nascondere il tasto di
avvio (l'esempio e' relativo all'api GetWindow)
Saluti
locaduck
Const SWP_HIDEWINDOW = &H80
Const SWP_SHOWWINDOW = &H40
Const GW_CHILD = 5
Const GW_HWNDNEXT = 2
Private Declare Function SetWindowPos Lib "user32" (ByVal
hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As
Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long,
ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32"
Alias "FindWindowA" (ByVal lpClassName As String, ByVal
lpWindowName As String) As Long
Private Declare Function GetWindow Lib "user32" (ByVal hwnd
As Long, ByVal wCmd As Long) As Long
Private Declare Function GetClassName Lib "user32"
Alias "GetClassNameA" (ByVal hwnd As Long, ByVal
lpClassName As String, ByVal nMaxCount As Long) As Long
Dim tWnd As Long, bWnd As Long, sSave As String * 250
Private Sub Form_Load()
    'KPD-Team 1999
    'URL: 
http://www.allapi.net/
    'E-Mail: KPD...@Allapi.net
    'This code will hide the Start-button
    'Find the taskbar's handle
    tWnd = FindWindow("Shell_traywnd", vbNullString)
    'Search for a child window
    bWnd = GetWindow(tWnd, GW_CHILD)
    Do
        'get the child window's classname
        GetClassName bWnd, sSave, 250
        'We have the handle of the Start button If the
classname is 'button'
        If LCase(Left$(sSave, 6)) = "button" Then Exit Do
        'Search the next child
        bWnd = GetWindow(bWnd, GW_HWNDNEXT)
    Loop
    'Hide the start button
    SetWindowPos bWnd, 0, 0, 0, 0, 0, SWP_HIDEWINDOW
End Sub
Private Sub Form_Unload(Cancel As Integer)
    'Show the start button
    SetWindowPos bWnd, 0, 0, 0, 0, 0, SWP_SHOWWINDOW
End Sub
* Sent from AltaVista 
http://www.altavista.com
 Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping.  Smart is Beautiful

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Visual Basic Journal

Salve sono nuovo in Visual Basic e ho letto nel NG che esiste una Rivista
chiamata Visual Basic Journal, sarei interessato ad abbonarmi:
Sapete come fare???
E' una rivista valida anche per i non esperti?
E la fatidica domanda il prezzo?
Ringraziando anticipatamente
Cordialita Gianluca
gvde...@iol.it

...


Dimenticavo una cosa importante!
All'indirizzo 
ftp://ftp.infomedia.it/pub/VBJ/
 trovi il codice che
normalmente viene allegato in un floppy alla rivista. E' disponibile FREE
per 25 numeri !
RiCiao


E la fatidica domanda il prezzo?
Non ho sotto mano un numero di VBJ, comunque il prezzo dell'abbonamento (che
conviene, rispetto all'acquisto dei numeri singoli) e' decisamente
abbordabile (costa circa come un libro). inoltre dovrebbero esserci forme di
abbonamenti "multiplo" a VBJ, CP e DEV, con buoni sconti.
--
Roal Zanazzi
z...@iol.it

E la fatidica domanda il prezzo?

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con vb e jsp

Utilizzando l'oggetto WebBrowser  di Visual Basic 6 per simulare un
inserimento all'interno di una pagina JSP, dopo aver simulato il click sul
bottone submit, appare un messaggio generato dalla pagina JSP tramite il tag
<script language='JavaScript1.1' > alert('messaggio')</script>.
Questo messaggio ferma il flusso  del codice aspettando un input
dall'utente.
Il mio problema è trovare un evento che mi segnali l'apertura del seguente
messaggio il testo e generare un evento che lo chiuda.
Saluti
Ricardo

 messaggio il testo e generare un evento che lo chiuda.
Ciao...
Così su due piedi ti dico: non puoi...
Però potresti fare il parsing dell'HTML prima di metterlo nel controllo.
cerchi l'alert e lo sostituisci con altro codice...
                                Ciao
                                                        Allanon
-- 
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità

Newsgroup: it.comp.lang.visual-basic
Titolo: query di selezione

un saluto a tutto il ng
Vi propongo il seguente quesito
Supponiamo di avere un form, un database (aperto tramite dao) e vari
controlli sul form  (in particolare una textbox ed un combobox). Supponiamo
pure che nella tabella1 del database ci siano 3 campi e che in base a
"mio_criterio" applicato al campo1 corrispondano due o piu' elementi nel
campo2
Se applico il seguente codice:
..................
Set rs = db.OpenRecordset("select * from tabella1 where com = '
mio_criterio'")
Text1.Text = Text1.Text & "  " & rs!comu
io ottengo solo il primo elemento della ricerca (in access invece con una
query simile ottengo la selezione di tutti i campi che soddisfano il
criterio).
Come debbo modificare il codice per ottenere la selezione di tutti i campi?
ciao e grazie
e.

Forse perchè usi una textbox per restituire la ricerca. Prova a usare una
listbox.
--
Francesco "Sevarf2" Vèssia
3D Graphic
http://www.creativision.it

Set rs = db.OpenRecordset("select * from tabella1 where com = '
mio_criterio'")
while not rs.eof
Text1.Text = Text1.Text & "  " & rs!comu
(se il text1 e multiline usa Text1.Text = Text1.Text & "  " & rs!comu &
vbcrlf
rs.movenext
wend
Ciao carmelo
"elio" <eli...@NOSPAM.it> ha scritto nel messaggio
news:9i70b4$j0v$1...@usenet.inwind.it...


  wrote:
Ti ringrazio molto dell'aiuto.....avevo capito che era necessario qualche
ciclo ma senza masticare "sql" era difficile arrivarci.
Grazie
Ps:
in un altro msg che ho appena postato ho un problemino inerente un passo
successivo....l'appetito vien mangiando (capirai il perche' della
selezione...)
Newsgroup: it.comp.lang.visual-basic
Titolo: Datemi un consiglio!

Ciao a tutti
Ho un cliente che ha 2 agenzie a cui devo sviluppare un gestionale (vb e
sql)
Dopo aver sentito le sue richieste credo di impiegarci 20 gg di lavoro
compresi test e debug
Avendo 2 agenzie ha 2 pc server e 2 client in ogni agenzia
totale sarebbe 2 licenze server
e 4 licence client
ora che prezzo fare?
ho sempre lavorato come dipendente..
ma ora che mi sono messo in proprio..non ho idea..e avrai paura di sbagliare
a valutare
e quindi chiedere o troppo poko o troppo :)
mi ha chiesto sia il prezzo per la licenza d'uso
sia per i sorgenti!
datemi un consiglio!
grazie

 datemi un consiglio!
Senza sorgenti, io farei:
250 euri al di' per 20 giornate = 5000 euri a cui io sommerei 2/3 mezze
giornate (500/750 euri + spese) per installazione/avviamento.
Con sorgenti il discorso è meno automatico, dipende da quanta mancata
assistenza pensi comporti, da che vantaggi ne trae il cliente ecc.. il
doppio rispetto all'applicazione senza sorgenti potrebbe essere una cifra
adeguata.

 adeguata.
Boh ragazzi ...
io non so come la vedete voi .,.
ma credo che NESSUN privato voglia pagare 10 milioni di lire
per un programma che ai suoi occhi , sara' sempre meno importante di quello
che è ...
e' un discorso difficile ma che va affrontato.
So che sbaglio , ma io sto facendo un programma multiclient che utilizza
winsock ... codice puro senza oggetti di terze parti,
credo di venderlo  a 300 euro al massimo ...
Ci ho messo una ventina di giorni ... ma non posso chied3ere davvero 5000
euro !
che ne pensate ?
I prezzi per un sw attuali sono davvero troppo alti per un privato...

 e' un discorso difficile ma che va affrontato.
AKUMA, se ne è già parlato....
Il discorso, alla fine è:
Quanto ci hai messo a sviluppare il programma?
Quanto devi guadagnare, per ogni ora del tuo lavoro, per vivere?
Quante copie del programma puoi (realisticamente) vendere?
Da questo calcolo spannometrico hai il prezzo ragionevole (dal tuo punto di
vista) al quale vendere il programma
per altro bisogna considerare:
Quanto costano i programmi della "concorrenza"?
Quanto è disposto a pagare il cliente?
Se il risultato di queste considerazioni è almeno paragonabile a quanto emerge
da quelle precedenti tutto ok, altrimenti, sul serio, è meglio cambiare
mestiere, perchè non ci vivi, e fino a prova contraria un mestiere serve a
viverci.
Se poi non vivi di programmazione.... fai come meglio credi, ma aggiungi sempre
un piccolo disclaimer a quanto da te prodotto: il software è fornito "as is",
altrimenti l'impegno per la manutenzione del codice ti ucciderà
Tutto quanto sopra imho, ovviamente.
Salutoni
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta OT

 Funziona VB6 Enterprise SP5 su WinXp?
Non sei OT, ma la domanda e' una FAQ, usa google e fai una ricerca sui
gruppi per domande simili in futuro.
La risposta e' "assolutamente si". Non solo funziona, ma puoi anche
installare Visual Studio 6.0 e Visual Studio .NET _contemporaneamente_ senza
alcun conflitto su WinXP/2000/ecc. .
hth,
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org



--
 Grazie tante per la celerissima riposta, mi conforta non essere OT e che VB
vada bene anche con W.XP.
Questo vuol dire che ho un problema.
ciao
Fabio.

 Questo vuol dire che ho un problema.
Aspetta a formattare (pare che vada di moda con XP, specialmente se
craccato): Ho XP Pro (non ho ancora montato SP1) e VB6 SP5, nessun problema.
Piuttosto (lo so che mi tirerò un'altra zappata sui piedi) sega il Norton.
Quanto, anche costoro, mi stanno laggiù!

 VB6 SP5, nessun problema.
Idem io ho anche 
VB.NET
 installato.



Grazie per il consiglio ma credo solo di avere qualche problema con ActiveX
Data Objet Library 2.6, infatti provando da qui a casa mia con Win98 e
togliendo tale riferimento dal progetto ottengo lo stesso errore, domani
vedrň in ufficio.
By
Fabio

 Occhio che il SP1 non si puo' montare su XP Pro crackato ;)
Oh, giusto per chiarire, il mio XP Pro non è crackato.

Piuttosto (lo so che mi tirerň un'altra zappata sui piedi) sega il Norton.
Tutti gli antivirus prima o poi si rivelano dannosi.
Io non ne uso da parecchio tempo e mi trovo benissimo. :-)
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: elenco applicazioni attive

ciao ragazzi,
avrei bisogno di ricavare l'elenco delle applicazioni attive sulla mia
macchina da vb. Mi spiego meglio, non voglio vedere le cartelle aperte
etc etc ma solo le applicazioni. Quelle in pratica che compaiono in
pratica nella folder applicazioni del tak manager di win NT/XP. Tutto
questo in 9x (meglio se funziona anche su nt/xp) :P e' possibile? ho
in rete degli esempi che ricavano tutti i prog aperti con la
enumwindows ma a me servono solo le applicazioni, e non so come
ricavarele... consigli? 
grazie a tutti x l'attenzione
Ciaoooo
Dade

 macchina da vb.
HOWTO: List tunning processes
http://support.microsoft.com/default.aspx?scid=KB;en-us;q187913
--
hth, hal
--------------------------------
Inviato via 
http://usenet.libero.it


http://support.microsoft.com/default.aspx?scid=KB;en-us;q187913
intanto grazie per l'interesse. pero' ancora non ho risolto, il codice
nell'howto mostra tutti processi e non le sole applicazioni aperte
dall'utente. Vorrei avere una lista tipo: Word, IExplorer etc... non
so forse mi sono spiegato male (molto probabile :P)
grazieee
Dade
Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere indirizzo fisico della scheda di rete?

Salve a tutti, c'è qualcuno che sa dirmi come posso leggere l'indirizzo
fisico della scheda di rete (in C o in VB)?? Attenzione,non voglio leggere
l'indirizzo IP.
Grazie anticipatamente per il vostro interesse. Daniele.

 ha scritto nel messaggio
news:8h3fvn$gpv$1...@sirmdpsin16.inwind.it...


Grazie tantissimo. Daniele

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Driver ODBC

Salve a tutti.
Qualcuno ha idea di come installare nuovi driver ODBC?
In particolare mi interessa l'ODBC per la connessione ad un db Access2000
(su alcune macchine ho solo il 97 e la base dati è in formato 2000; vi
accedo da codice ASP con PWS).
Spero di essere stato chiaro.
Grazie per l'attenzione.
mc

 accedo da codice ASP con PWS).
prova ad installare l'MDAC 2.6
--
Fibia "Sakamoto" FBI
URL: 
www.geocities.com/fibiafbi
E-Mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Membro #25 delle Brigate Takahashi Sez. Sud

Una volta qui avevamo risolto spulciando il sito della microsoft....
a te l'arduo compito ;;))

 wrote in message
news:915lsi$s1$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: libreria see4vb

Ciao,
sto testando la libreria see4VB per la gestione da VB della posta
elettronica tramite i protocolli SMTP/POP3, ma non riesco a capire come
poter fare per salvare i messaggi inviati. Per ovviare ho pensato di
inviarli in CC a me stesso, per poterli salvare in una directory,
cancellandoli dal server, ma mi sembra poco elegante. Qualcuno mi aiuti, per
favore.
EP


non conosco quella libreria, ma c' e' una cosa che non capisco:
se sei tu che mandi i messaggi, hai gia' il testo originale: dov' e'
quindi il problema ?
ciao, hal

 ha scritto nel messaggio
news:9clvin$egtuc$1...@ID-56381.news.dfncis.de...


stato correttamente inviato, 
Non avevi forse scritto:
sto testando la libreria see4VB per la gestione da VB della 
posta elettronica tramite i protocolli SMTP/POP3, 
ma non riesco a capire come poter fare per 
salvare i messaggi inviati.
^^^^^^^
Tra "salvare" e "sapere se e' arrivato" c'e' una bella differenza !
 
ciao, hal

 ha scritto nel messaggio
news:9cm191$dkv09$1...@ID-56381.news.dfncis.de...


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

 Appena vado a capo Me.Top = 0 diventa Me.tOp = 0
Me.Left diventa  Me.left
Cosa gli è successo?
-- 
Greg

 Cosa gli è successo?
VB6?
Devi avere qualche variabile dichiarata come tOp o come left in giro.
Se no, ridichiarane 2 con il nome corretto in modo che VB si ripigli e poi 
cancellale.
Ciao 

 e poi cancellale.
Si, facendo come da te suggerito è tornato tutto a posto. Grazie :)
-- 
Greg
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con la grafica

Ciao a tutti!
Ho un problema con la grafica in Visual Basic. In un form visualizzo
un'immagine. Pe dare un'animazione all'immagine ho dato alla stessa un
width = 0 dopodichè sull'evento click di un pulsante ho inserito questo
codice:
Private Sub Command1_Click()
  Timer1.Enabled = True  
End Sub
E nell'evento Timer del controllo Timer1 (Timer1 è un controllo, come
avrete già capito, Timer) ho inserito questo codice:
Private Sub tmInfo_Timer()
 
  Image1.Width = Image1.Width + 200
  If Image1.Width >= 6630 Then
    Image1.Width = 6630
    Timer1.Enabled = False
  End If
 
End Sub
Purtroppo questo mi crea l'animazione ridisegnando a video ad un
intervallo di tempo uguale a 10 millisecondi l'immagine sempre + grande,
ma mi crea anche un fastidioso sfarfallio.
Qualcuno mi sa dire un metodo migliore per fare grafica animata in
Visual Basic?
Ciao e grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

ciao
controlla la proprietà strech...
l'immagine contenuta nell'oggetto Image ( es. pippo.jpg )
ha grandezza fissa e tu ridimensioni solo l'oggetto image?
oppure ridimensioni l'oggetto Image che a sua volta ridimensiona anche
l'immagine pippo.jpg? (proprietà Strech=True)
credo dipenda dalla macchina cmq...! esistono le api di windows che
ridisegnano a video un immagine... ma dovresti anche riuscirci con le
semplici PSet e PointPicture degli oggetti PictureBox...
ciao

 Visual Basic?
Con un FOR ..NEXT STEP qualcosa che cicla sulle dimensioni di .height
e .width

 ma mi crea anche un fastidioso sfarfallio.
Supponiamo che tu stia lavorando con VB6 (non hai specificato, ma parlando 
di Image dovrebbe essere cosě), non puoi evitare lo sfarfallio se lavori con 
i controlli.
Perň puoi aggirare il problema cosě:
- Metti il form a AutoRedraw = true, il che abilita il double bufferig del 
redisegno.
nel timer anzichč agire sul controllo Image, che invece terrai nascosto, fai 
qualcosa tipo
w = w + 1
Form1.PaintPicture Image1.Picture, 10, 100, w, Image1.Height
Ciao
-- 
www.neodatatype.net
 

Ho provato a fare come mi hai detto...e devo dire che ha funzionato! :-)
Grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: Msflexgrid ?

 msflexgrid
Prima devi definire il numero di righe e di colonne della tua flexgrid: il
numero puň essere naturalmente variato da programma (per le righe potresti
impostare una flag a seconda del numero di righe che ti servono, il dato puň
essere variato a piacimento). La prima riga č la 0, cosě pure la prima
colonna.
grid1.rows =  flag
grid1.cols = z
poi, riga per riga, magari con un loop, devi impostare dapprima il numero di
riga in cui inserire i dato, e poi, definita la riga, inserire i dati nelle
varie colonne della riga (finchč non imposterai un'altra riga, le colonne si
intenderanno sempre della riga impostata):
Grid1.Row = a
Grid1.Col = 0: Grid1.Text = pippo$
Grid1.Col = 1: Grid1.Text = pluto$
Grid1.Col = 2: Grid1.Text = paperino$
ecc. ecc.
ciao

COme si fa a fare in modo di poter inserire dei dati nelle celle di una
msflexgrid 
(cioè che io posso scrivere nella cella di una msflexgrid come
in quella di un foglio excel). 
Posso includere una combobox in una
cella di una msflexgrid? 
GRAziE  1000
Buone feste a tutti.
--------------------------------
Inviato via 
http://usenet.iol.it

mmmm, abbi pazienza, rileggendo la tua domanda mi pare di non aver centrato
la risposta: vuoi scrivere direttamente nella cella... non credo che sia
possibile, per quanto ne sappia...

 ha scritto nel messaggio
news:62Z205Z151Z243Y...@usenet.iol.it...


 msflexgrid
Crea un form con una FlexGrid e una casella di testo (hidden) e poi incolla
questo codice
Buon Lavoro!
Dim GrigliaCol As Integer
Dim GrigliaRow As Integer
Private Sub text1_GotFocus()
    MSFlexGrid1.ScrollBars = flexScrollBarNone
End Sub
Private Sub text1_LostFocus()
    With MSFlexGrid1
            .TextMatrix(GrigliaRow, GrigliaCol) = Text1.Text
    End With
End Sub
Private Sub MSFlexGrid1_Click()
Dim i%
    With Me.MSFlexGrid1
            GrigliaCol = .Col
            GrigliaRow = .Row
            Text1.Left = .ColPos(.Col) + .Left + 30
            Text1.Top = .RowPos(.Row) + .Top + 30
            Text1.Width = .ColWidth(.Col)
            Text1.Text = .Text
            Text1.Height = .RowHeight(.Row) - 60
            Text1.Visible = True
            Text1.SetFocus
    End With
End Sub




 che funziona benissimo con ADO,mentre msflexgrid e' incompatibile con ado
                            ^
                             |_______ Benissimo ??????????!!? sei un
miracolato forse ?!!? a me la datagrid da un sacco di rogne !
CIAO

> msflexgrid
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: OT

Scusate l'OT 

 Scusate l'OT 
Grazie a me, puoi rientrare in topic.

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] [GDI+] problema con GetHeigth

Ciao a tutti.
Ho fatto una belal scoperta: se utilizzo un programma tipo JPEGCleaner 
per rimuovere le info inutili dai file jpg e poi controllo le proprietą 
del file, noto che altezza e larghezza sono a 0.
Con qualunque programma di grafica (tranne ACDSee che ogni tanto si 
blocca) (ed aggiundo che funge anche con internet explorer) l'immagine 
mi viene ugualmente caricata; utilizzando GetHeight e GetWidth mi 
restituisce giustamente 0, ma visto che la devo ridimensionare per farne 
un thumbnail non so come ottenere queste informazioni.
Avete delle idee?
grazie
Daniele

 Daniele
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
No. Perderei tutta la velocitą che attualmente ha (5 secondi 200-400 
immagini da 1-3 megapixel)