mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: VBS che parte non non esegue tutto

Salve, vi espongo il mio problema. Dovrei creare degli zip di un certo file
tutti i giorni ed in automatico creare il nome del file secondo questa
regola:
Bk<giorno><mese><anno>.zip
Es:
bk010103.zip
Per questo mi sono creato un vbs del genere:
Dim ss
Dim stringaappo
dim stringa
stringappo=Trim(date)
stringa = mid (stringappo,1,2)
stringa = stringa & mid (stringappo,4,2)
stringa = stringa & mid (stringappo,9,2)
stringa="BK" & stringa & ".zip"
Set ss = CreateObject("WScript.Shell")
ss.run "pkzip.exe -ex -a " & stringa & " nomefile"
Set ss = nothing
Lo faccio partire tutti i giorni ad una determinata ora. Il programma parte,
ma crea solo un file zip di 1 Kb e si ferma subito. Uso Windows 2000 prof.
Secondo voi dove è l'errore? Il vbs è sulla cartella dove risiede il file da
comprimere.
Vi ringrazio in anticipo, rispondetemi anche in privato.

 comprimere.
Da dove si dedurrebbe, da questo codice, che deve/dovrebbe creare piů di un
file?
Vedi For-Next e/o Do-Loop
Al prossimo Cross-Posting verrai plonkato.

 Al prossimo Cross-Posting verrai plonkato.
Non capisco... che male c'é a fare un crosspost?
                            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à

 Non capisco... che male c'é a fare un crosspost?
A parte quello che la netiquette ovunque racconta, a me ruga non sapere dove
vado a scrivere.
Mi ruga ancor di piů ricevere messaggi del tipo "impossibile risolvere
l'indirizzo..."
Inoltre (e in breve) mi pare come dire a "n" ragazze, insieme e tutte
presenti, "chi verrebbe a cena con me?" ;-)

 ha scritto nel messaggio
news:v%zKa.144332$pR3.3...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: un consiglio

salve a tutti
volevo sapere se è possibile scaricare da internet qualke giuda su come
imparare bene e veloce i visual basic 6......grazie per l'attenzione
                                            un saluto
                                       ciaooooooooooo!!

 volevo sapere se è possibile scaricare da internet qualke giuda
ekkomi...
trenta denaren, preko.
-- 

 ha scritto nel messaggio
news:lpMCe.4477$B6.1...@twister1.libero.it...

Prima di scaricare la guida di VB, secondo me dovresti leggere qualche
regola di comportamento (netiquette) e successivamente aprire Google o
Google gruppi e cercare "guida Visual Basic".
Già che ci sei controlla anche la tastiera!
Ciao, Vincenzo

 ha scritto nel messaggio
news:eWMCe.24524$b93....@tornado.fastwebnet.it...

straROTFL!
Ciao, Vincenzo

 imparare bene e veloce i visual basic 6......grazie per l'attenzione
No, non è possibile.
Ciao 

 No, non č possibile.
che fai, io tradisco e tu rinneghi prima del canto
del gallo? ;-P
-- 
ciao, a

 del gallo? ;-P
Più che traditore sei un millantatore che fa concorrenza sleale ;)
Ciao 

 ha scritto nel messaggio news:lpMCe.4477$B6.1...@twister1.libero.it...

ribadisco!
sei un ARTISTA

 imparare bene e veloce i visual basic 6......grazie per l'attenzione
certo che si,
cerca nel portafogli la credit card, vai su ibbiesse e compkprati
programmare visual basic 6 di frank ceteceo a settantackinqkue eurizzi.
kiao,
--
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
Webmaster di The Total Site (
http://www.tekkentag.altervista.org/
 )
Webmaster di SceptilePage (
http://www.sceptilepage.altervista.org/
 )
Account Messenger: 
thetot...@msn.com
MyBLOG (NEW!!) 
http://spaces.msn.com/members/itanet/

 kiao,
IMHO, sei peggiorato... ;) "kiao"?...
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

> IMHO, sei peggiorato... ;) "kiao"?...
;) l' OP diceva tutto con la K... era per dire qualcosa di più che Bye o
Ciao o "a to ciap"...
Cmq, per finire la storiella di prima, eccola ancora iù divertente (per
me...) :
kcerto ke kshi,
kerka knel kontafogli kla kredit kard, vai ksu ibbiesse o kiedi ad un
amazzone, o rubalo kda un kmulo con la ksigla p2p, kper i kprimi kdue
comprkarti "Programmare Kvisual Kbasic K6" kdi frank cetaceo a
schektanktakinkue keurizzi.
... Kscrivo ktutto kon la kappa... che mi sia venuta la kstessa ksindrome
khe kci è kvenuta khai kprogrammatori di KDE ? :)
Bye, Kiao, Ciao o A to Ciap a seconda dei casi,

Newsgroup: it.comp.lang.visual-basic
Titolo: Il tasto F2

Come faccio a far eseguire un qualcosa es. command7_click quando in una
form premo il tasto funzione F2 (tipo F1 per gli help.....)
Tank.........
Antonello

form premo il tasto funzione F2 (tipo F1 per gli help.....)
Devi intercettare l'evento KeyPress opp. KeyDown opp. KeyUp dell'oggetto
form e controllare il valore del parametro dell'evento stesso che si chiama
KeyAscii + qualcos'altro.
Enjoy!

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF2     Then
      ciň che vuoi eseguire
End if
End sub



puoi ricopiarti questo esempio
Private Sub Form_KeyPress(KeyAscii As Integer)
    Select Case keyascci
        Case vbKeyF1
            'fai qualcosa
        Case vbKeyF2
            Command7_click
 
 
    End Select
End Sub

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] larghezza colonne griglia=contenuto del testo

Ciao, come faccio ad impostare la larghezza della mia dbgrid in modo che ci
stia dentro il testo o comunque la larghezza del campo ?
Grazie
bob
ham...@hotmail.com

 wrote in message
n8KH5.56053$Nz.15...@news.infostrada.it...


 wrote in message
8sonu4$ljp$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: metodi show

Qualcuno mi sa dire a che dll di windows fa riferimento visual basic nei
metodi:
-showfont
-showprinter
-showcolor
-showsave
-showopen

 ha scritto nel messaggio
news:9cc5q7$9kf$1...@fe1.cs.interbusiness.it...


 ha scritto nel messaggio
news:9ccsp4$n9n$1...@lacerta.tiscalinet.it...

Avevo già risposto io q.che post più indietro.....
E io ODIO la comdlg32.ocx, uso,invece, la clsCommonDialog...
Ciao
--
Timothy Redaelli
timothy....@email.it


Concordo , ma non mi sento di consigliare a qualcuno di lavorare su Api e
classi se non conosce un ocx.
Ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Controllo buchi numerazione

Ciao a tutti,
googlando qua e la non sono riuscito a trovare ciò che mi interessa: un
modo per trovare eventuale buchi in una numerazione progressiva. Qualche
idea?
Tiziano

1
WHERE 
B.ID
 IS NULL
Questo restituisce tutti gli elementi che NON hanno un precedente.
Se mancano n elementi consecutivi, viene comunque restituito un solo 
record, ossia il primo da cui riprende la numerazione.
Ciao
Alberto
-- 
Konrad Adenauer: All'intelligenza Dio ha posto limiti, alla stupidità 
no.

 record, ossia il primo da cui riprende la numerazione.
La numerazione di cui parlo risiede in una tabella di un DB Access.
Ho provato la tua query ma mi restituisce l'errore: "Espressione join non
supportata"... non ci capisco + 'na mazza :)
Tiziano

Tiziano ha scritto:

Prendo spunto da una vecchia conoscenza del NG, mi riferisco a Maurizio
Borrelli che ha
proposto questo:
SELECT
 
T1.ID
 AS ID1
          , (
            SELECT First(
T2.ID
)
            FROM Tabella1 AS T2
            WHERE (
T2.ID
 > 
T1.ID
)
            ORDER BY First(
T2.ID
) ASC
            )     AS ID2
        FROM Tabella1 AS T1
        WHERE (
                (
                  (
                    SELECT First(
T2.ID
)
                    FROM Tabella1 AS T2
                    WHERE (
T2.ID
 > 
T1.ID
)
                    ORDER BY First(
T2.ID
) ASC
                  )
                  -
                  [T1].[ID]
                ) > 1
              )
        ORDER BY 
T1.ID
Restituisce i Buchi...!
Alternativa sempre a questo è quanto suggerito da Giorgio Rancati, dà
una composizione leggermente differente, ma equivalente...!
SELECT T1.Id+1 AS Da,
       (SELECT TOP 1 Id
        FROM Tabella1
        WHERE Id>T1.Id+1
        ORDER BY Id)-1 AS A
FROM   (Select TOP 1 0 AS Id FROM Tabella1
        UNION
        SELECT Id
        FROM Tabella1) AS T1
  LEFT JOIN Tabella1 AS T2 ON T1.Id+1=T2.Id
WHERE T2.Id IS NULL
ORDER BY T1.Id
Entrambe fanno uso delle tabelle derivate, quindi se non hai molta
esperienza con SQL ti sembreranno poco comprensibili...., ma in
sostanza devi solo inserire al posto di Tabella1
il nome della tua Tabella, e, nel 2° esempio al posto di [id] il nome
del campo Counter o Progressivo....
@Alex

Tiziano ha spiegato il 12/01/2007 :

Beh, Access utilizza un dialetto SQL molto sui generis. Quando trovi 
delle query su internet, devi sempre adattarla alla sintassi di Jet.
Ad esempio, può essere (ma è un esempio), che si scriva Left Join 
anzichè Left Outer Join.
Devi vedere tu.
Ciao
Alberto
-- 
Ho spiegato a mio nipote cos'è il compromesso: se per le vacanze tua 
madre vuole andare al mare e tuo padre invece in montagna, il 
compromesso è che si va al mare, ma il papà può portarsi gli sci.



Grazie a tutti e due... ora ho qualche idea in più su come fare
Tiziano
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Ordinare un campo espressione

Uso DAO con access e devo ordinare questa query:
SELECT (Sum(Magazzino.Carico)-Sum(Magazzino.Scarico)) AS Giacenza, 
(Magazzino.Prezzo*Giacenza) AS Valore ORDER BY cosa?
Se metto ORDER BY Giacenza oppure Valore mi da errore.
Se invece faccio una WHERE Giacenza oppure Valore = a... mi ritorna il 
risultato giusto.
Carmelo 

 risultato giusto.
Strano, di solito si fa con Having, non con Where.
Ma Access è un mondo molto particolare, oramai non mi stupisco di 
niente.
Alberto
-- 
L'economia sa tutto di te e tu non sai niente dell'economia. La tua 
banca sa tutto di te, di quanti soldi hai, e quando li spendi; ma tu 
non sai niente di cosa fa la banca dei tuoi soldi e dove li mette, e se 
ce li ha!

 Se metto ORDER BY Giacenza oppure Valore mi da errore.
Prova con ORDER BY 1

 ha scritto nel messaggio 
news:49c8bc37$1...@news.x-privat.org...

Per 1 intendi l'ordine del campi?
Nella fattispecie 0 per giacenza e 1 per valore?
Carmelo 

 Nella fattispecie 0 per giacenza e 1 per valore?
A volte si può specificare il numero di colonna anzichè il nome. Mi pare
sia 1 based e non 0 based.
E' utile quando fai una select UNION, quando due colonne non è detto
abbiano lo stesso nome.

"Andrea [Work]" <andrea.isw...@gmail.invalid> ha scritto nel 
messaggio news:1dvlmf0uk07jm.c...@40tude.net...

Vero base 1 ho provato e funziona
Carmelo 

 Nella fattispecie 0 per giacenza e 1 per valore?
No, 1 per giacenza e 2 per valore.
Con questo sistema ti svincoli dai nomi (o dagli alias) ed usi un criterio
basato sulla posizione.
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Collegamento ipertestuale c'è

scusate me non riesco a trovare il collegamento ipertestuale da mettere su
un form per chiamarmene un'altra, mi sembre strano che non ci sia visto che
access la porta.
E' nascosta da qualche parte o devo fare con le etichette e mettere qualcosa
sull'evento mouse giů ?
Grazie.
tuareg

...

La seconda che hai detto :)
Sub Label1_Click()
    Form2.Show
End Sub
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Hot Key

Anyone know a way to make a GLOBAL hot key??
WITHOUT a Timer, and Without getasynckeystate?
I am looking for a WindowsHook method of making a global
hot key    Any ideas?
Joe!



Take a look to my site or to the "Sito Comune": if you don't speak italian:
Local HotKey: 
ftp://ftp.morenosoft.com/pub/MSVBSite/Progetti/HotKey.zip
Global HotKey: 
http://www.murialdo.it/it_lang_vb/PRJ/HookKeyb.zip
http://www.murialdo.it/it_lang_vb/PRJ/SysHook.zip
http://www.murialdo.it/it_lang_vb/PRJ/HotKeys.zip
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Try-Catch-Finally e Exit Sub

ciao
uso VB 2005 express e avrei un quesito.
Try
...
connessione.Open( )
...
if qualcosa then
   exit sub
end if
...
Catch
   MsgBox("errore")
Finally
connessione.Close( )
In caso di exit sub il ramo Finally viene comunque eseguito ? 


lo puoi testare facendo una semplice msgbox... comunque si, viene eseguito
Ciao,
Max
 

"Massimo Piubelli" <massim...@accessgroup.it.invalid> ha scritto nel 
messaggio news:fah625$lv$1...@tdi.cu.mi.it...
lo puoi testare facendo una semplice msgbox... comunque si, viene eseguito
Ciao,
Max
Grazie mille :)

Newsgroup: it.comp.lang.visual-basic
Titolo: OT:convertire i file

scusate l'intrusione, non sapevo a chi chiederlo e cosě  ho pensato a chi ne
sa di vb, visto che č il linguaggio chiave del win:
come faccio a convertire un file zip spedito in piů pezzi tramite email e
completamente scritto in caratteri senza un'apparente senso?
grazie e scusate ancora

completamente scritto in caratteri senza un'apparente senso?
W. la chiarezza di pensiero!
Ma cosa hai chiesto?
1) il verbo convertire pretende due argomenti: sorgente e destinazione.
2) certo che lo zip è scritto in caratteri "senza senso": è compresso in
formato binario.
3) il fatto che un file venga inviato tramite e-mail è irrilevante.
4) forse vuoi ripristinare il file originale... hai provato con pkunzip e/o
WinZip? (ma se è questo perchè non chiederlo direttamente a chi te lo ha
inviato?)
Ciao.
(scusa se sono stato un po' "scortese" ma... li rileggete i messaggi prima
di inviarli? :) )


Ehm, scusa, ma potresti essere un po' piu' chiaro?
Ah, forse ho capito...
Ti hanno spedito un file ZIP, ma e' spezzato su piu' messaggi e-mail, ed e'
(molto probabilmente) uuencoded.
Visto che stai usando Outlook Express, guarda il menu Strumenti, Combina e
Decifra (vedi nell'help per ulteriori informazioni.
O devi farlo da un programma VB?
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione in Euro

Ciao.
Qualcuno mi sa indicare un sito in cui trovare informazioni utili per la
conversione da Lire ad Euro in un'applicazione?
Mi interessa soprattutto sapere come devo convertire i fattori di una
moltiplicazione.
Se per esempio ho:
Lire 12500 X metri 432.85 = Lire 5.410.625
Devo convertire in Euro solo l'importo unitario (12.500 Lire) e ripetere la
moltiplicazione (ottenendo un risultato di 2.796,21 Euro) o convertire anche
il totale (ottenendo cosi' 2.794,35 Euro)???
Grazie.
Skysurfer

Dovresti forse usare una precisione maggiore... tipo un double...
Cosě dovrebbe venirti lo stesso risultato...
                    Ciao
                                Allanon

 wrote in message
9ibp5o$hjvde$2...@ID-67444.news.dfncis.de...


Skysurfer
--------------------------------
Inviato via 
http://usenet.iol.it
 

 wrote in message
news:9ibkgn$mjd$1...@serv1.iunet.it...


> Comunque, per tua norma non cambia nulla se converti l'importo unitario od
il totale. Ciao
Non č vero. Potresti perdere dei decimali.
Le banche devono fare, a fine mese, un "conguaglio". Roba di poche lire, ma
c'č.
conversione "prima"
123456 lire / 1936.27 = 63.76 euro
63.76 euro * 123 = 7842.48 euro
conversione "dopo"
123456 * 123 / 1936.27 =  7824.44 euro


 c'č.
Roba di poche lire... Mi ricordo di quel tizio che cracko' la sicurezza di
una banca e fece trasferire tutti i decimali perduti sul proprio conto.
Lo sgamarono perche' il totale dei decimali perduti era talmente alto che in
breve tempo il suo divenne il conto piu' alto in tutta la banca.
Ciaotutti,
Asterix

A me risulta che nelle banche ci sarebbero obblighi nei calcoli fino alla 6a
cifra decimale! :)
Poi loro sul tuo conto ne mostrano solo 2...
Però i calcoli interni sono un'altra cosa...
Per questo cambia poco tra la pre-conversione e la post-conversione... :)
            Ciao
                    Allanon

 una banca e fece trasferire tutti i decimali perduti sul proprio conto.
Già... gran bel film... :)
Ma nella realtà non é mai successo... :)
                Ciao
                        Allanon

 wrote in message
news:9ieeno$igf56$1...@ID-67444.news.dfncis.de...

Mmm... A me lo riportarono come cronaca, non saprei se siavero o no ma e'
verosimile.
Non oggi, ma ai primordi dell'informatica non ci sarebbe voluto molto :)
Ciaotutti
*
Newsgroup: it.comp.lang.visual-basic
Titolo: SCRITTURA SERIAL NUMBER DELL'HD !?

Esiste secondo voi un modo per scrivere il serial number di un hd?
nino 
e...@italsoftweb.it


... togliete Ino dal mio nome per e-mail ...


Con VB no... in C si e non funziona al 100 con NT visto che non ti
permette di accedere direttamente all'HW...
Se ricordo, il programma interrogava una certa locazione del
controller, la quale inivia una stringa al BIOS dell'HD e lo rimandava
la risposta con gli identificativi come Nome HD, Modello, SN e altri
dati.
Il sorgente non ho qui in ufficio ma a casa


il comando DIR del DOS lo scrive come HHHH-HHHH
dove H sta per esadecimale.
il serial number e' un numero di 32 bits, che in esadecimale e' HHHHHHHH
in piu' il DIR ci mette un - come separatore tra i primi 16bit e gli altri
16.
--
Roal Zanazzi
z...@iol.it

...

OK, OK, ho letto il msg di fretta e ho capito tutt'altro, chiedo venia!
--
Roal Zanazzi
z...@iol.it

>


Il sorgente non ho qui in ufficio ma a casa
Se invece sei a casa (come me, adesso) quello che ti serve e'
sicuramente in ufficio. La legge di Murphy non perdona.
--
My e-mail address is:
j l s @ a c m . o r g

My e-mail address is:


Quali API devo usare per accedere ai settori di un qualunque disco?
Con Win95? Ma esistono?
BTW, l'indirizzo che avevo accennato nel posting precedente e'
http://www.ntinternals.com
, ci sono delle utility per NT e 95, alcune
con i sorgenti. Quella per modificare il serial number del disco si
chiama VolumeID (sono 15 KB zippati).
--


di win, ma non ho capito come convertirla in data).
Se parli del parametro FirstInstallDateTime (Win95), penso sia lo
stesso formato data/ora usato per il time stamp del file system FAT,
cioe' una DWORD divisa cosi:
bit 0-4  --> secondi pari (0, 2, 4,... 58)
bit 5-10 --> minuti (0 --> 59)
bit  11-15 --> ore (0 --> 23)
bit 16 - 20 --> giorno (1 --> 31)
bit 21 - 24 -> mese (1 --> 12)
bit 25-31 -> anno a partire da 1980
Ho provato su due PC con Win95 e funziona, se provi con altri fammi
sapere. 
Per Windows NT e' leggermente diverso, il parametro si chiama
InstallDate e viene espresso [come sui sistemi Unix] come numero di
secondi trascorsi dal 1/1/1970.
Ciao,
Luis

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] RichTextBox e ScrollBars

Ciao a tutti.
Ho inserito in un form un controllo RichTextBox, impostando la
proprieta' MultiLine=True, ScrollBars=3 (verticale e orizzontale)
e DisableNoScroll=False (serve per NON disattivare le barre di
scorrimento.... un po' contorta pero').
A questo punto se inserisco un testo (da file o a mano) mi
funziona lo scroll verticale ma non quello orizzontale, e il
testo va a capo da solo, come se vi fosse una proprieta' del
tipo WordWrap=True, che pero' non c'e'!
Qualcuno sa se vi sono delle altre proprieta' a me sconosciute
o se devo aggiornare l'OCX ? (eventualmente da dove prenderlo)
Io uso VB5+SP3.
  Grazie
  Dario

sul resto non ti so dire, ma
***attenzione all'ocx***
alcuni prg mi avevano messo il rtb di vb6
e vb5 non mi dava piu' il diritto di usarlo.
ho dovuto recuperare il vecchio dal cd e rimetterlo a mano...
The Buc <df...@NOSPAMusa.net> wrote in message


 Ciao a tutti.


Credo che sia dovuto alla proprietą Multiline che fa andare a capo

Lo faceva anche a me !
Poi ho trovato un esempio e li' funzionava benissimo !
Ho guardato le differenze e mi sembra di avere trovato la differenza che il
form
che ospita il controllo RTB deve avere la proprieta' scalemode impostata a
millimetri.
Boh !
Prova e fammi sapere !
Ciao Paolo

Newsgroup: it.comp.lang.visual-basic
Titolo: "schedulare" un file .exe

Salve a tutti
avrei bisogno di un piccolo aiuto:
alle ore xx.xx.xx devo lanciare un file c:\pippo.exe
sapete darmi qualche consiglio?
Grazie

Inserisci un oggetto Timer in cui imposti Interval a 1000 (ogni secondo)
Poi sull'evento Timer1.Timer scrivi:
    if format(now(),"hh:mm:ss")= ora_che_vuoi_tu then
        shell("c:\pippo.exe")
    end if
Ciao
Oz

 wrote:
Mi pare un po' banale e dubito che funzioni bene. Ho fatto una
procedura di backup che lancia backup ad ore/giorni prestabiliti, ma
il listato è un po' lungo, perchè ci sono parecchie funzioni e
procedure.
Se a qualcuno interessa mi mandi un mail e vedrò cosa posso mandare.
ErreBi

Newsgroup: it.comp.lang.visual-basic
Titolo: Passagio valori;da client a server

Ciao a tutti, il mio problema č il seguente :
devo recuperare un dato da un campo select e il valore scelto dall'utente mi
serve per interrogare un DB, cioč :
Poniamo che l'utente scelga da un campo select ed io in Javascript o
VBScript recupero
la selezione e la metto in una variabile 'scelta' , ciň che io vorrei fare
dopo e' interrogare un db con la seguente query :
"SELECT * FROM 'scelta'"
Come faccio a passare un parametro recuperato da javascript e metterlo nella
query ?
Oppure c'e' un modo piů rapido senza passare da Javascript o VBscript?
Usando
solamente ASP per recuperare il valore ?
Grazie mille per le risposte...
Matteo :-)


sicuro di non essere OT ?
ciao, hal

 solamente ASP per recuperare il valore ?
Prova a postare su news:it.comp.www.asp
Forse loro sono più esperti su queste cose...
Ciao
--
Timothy Redaelli
timothy....@email.it
Newsgroup: it.comp.lang.visual-basic
Titolo: cerca URL in un file di testo

premetto che questa e' la prima volta che utilizzo un newsgroup 
e per giunta non sono un esperto di Visual basic.
ho il seguente problema che mi sta rompendo la testa!!!!
devo estrarre degli URL da un file di testo, in qualche 
newsgroop ho letto che esiste un metodo dell'oggetto 
WebBrowser.Ho cercato in cielo e in terra ma niente......
qualcuno puo' aiutarmi?
Grazie
Giuseppe
--
giuseppe
Inviato da 
www.mynewsgate.net

 qualcuno puo' aiutarmi?
Open for Input, Line Input #, Instr per "http:\\" o anche solo per "\\",
senza scomodare il WebBrowser

 senza scomodare il WebBrowser
oppure "www." come inizio di parola.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: OCX x USB o PARALLELA

Cerco OCX per controllare
porta USB o porta parallela in VisualBasic.
In rete esiste molta documentazione
ma non sono riuscito a trovare
nessun ocx da scaricare.
Grazie per l'aiuto che saprete darmi.

Zito comune
Newsgroup: it.comp.lang.visual-basic
Titolo: GetPrivateProfileString non va (VB 3)

Non mi e' riuscito di far funzionare correttamente questa function di VB3
sotto Win95 (anche GetProfileString non restituisce nulla a parte il
default) mentre GetPrivateProfileInt funziona perfettamente.
Qualche suggerimento?
Grazie in anticipo per ogni risposta.
Nicola

Qualche suggerimento?
Le funzioni vanno che hai citato funzionano perfettamente sotto qualsiasi
windows (3.10/3.11/95/98/NT x.x).
Fai cosi:
Declare Function GetPrivateProfileString Lib "kernel" (ByVal
lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As
String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal
lpFileName As String) As Integer
Declare Function WritePrivateProfileString Lib "kernel" (ByVal
lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As
String, ByVal lpFileName As String) As Integer
    PathFileIni = App.Path & "\" & App.EXEName & ".ini"
    '
    ' ***** ultimo database aperto
    '
    Esito = GetPrivateProfileString("Globale", "UltimoDB",
"C:\miaApp\MioDb.mdb", StrAppo$, Len(StrAppo$), PathFileIni)
    UltimoDB = Left$(StrAppo$, Esito)
    Esito = WritePrivateProfileString("Globale", "UltimoDB", UltimoDB,
PathFileIni)
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

RetString = Left$(RetString, Bytes)
... ed infatti avevo gia' seguito i tuoi consigli (contenuti in maniera meno
evidente anche nell'help di VB) ma non mi ritorna nulla (a parte il default
che decido io). Adesso riprovero' (certe volte quando si ripetono ad
infinitum certe cose capita di replicare errori impercettibili...).
Grazie
Nicola

infinitum certe cose capita di replicare errori impercettibili...).
Se mi invii una copia della tua routine forse ti posso aiutare di più.
Ciao.

Carissimi,
vi ringrazio tutti. Il problema era che avevo copiato la dichiarazione del
Windows 3.1 API Help fornito con VB Professional 3.0 senza verificarla :-(((
Il Microsoft folks si e' infatti dimenticato di inserire il ByVal prima di
lpKeyName. Copio infatti direttamente dall'help:
---
GetPrivateProfileString
Declare Function GetPrivateProfileString Lib "Kernel" (ByVal
lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String,
ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName
As String) As Integer
---
E se gli help sono un coacervo di errori figuratevi i programmi... A dire il
vero, tuttavia, VB 3.0 mi venne offerto direttamente da MS a un costo
davvero ridicolo per l'epoca e - per quello che l'ho pagato - fa ancora
egregiamente la sua figura... (e mi permette di compilare, all'occorrenza,
anche su un Compaq Aero!)
Comunque, aggiunto il byVal, tutto ora funziona egregiamente.
Grazie ancora.
Nicola
Newsgroup: it.comp.lang.visual-basic
Titolo: Macro excel

Salve a tutti,
avrei la necessità di lanciare una macro appartenente ad una cartella excel
da un'applicazione VB5SP3...è possibile e se sì come?
Grazie a tutti
--
----------------------------------------------
Se la tua donna ti chiede un parere in realtà
vuole solo sentire il SUO parere detto con la TUA voce
----------------------------------------------
Andrea
in...@xxxrcmcastelli.it
(xxx=NOSPAM)

 avrei la necessità di lanciare una macro appartenente ad una
cartella excel da un'applicazione VB5SP3...è possibile e se sì
come?
E` possibile. Io ed altri nel recente passato abbiamo altre
volte postato degli esempi che al momento non posso
recuperare. Prova a fare una ricerca fra i (non troppo) vecchi
post, per esempio delle parole "Run" e "Macro" (o su
"
deja.com
") e se hai problemi rifatti vivo.
--
Ciao.
Maurizio

Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] - registrare qualunque cosa passi per la scheda audio

chi sa come si fa?
un ex collega me l'aveva fatto vedere.. aveva registrato una stazione
radio di internet.
ed aveva utilizzato i programmi standard di win2k se non
sbaglio..........
grazie

sul software recorder della mia Live!, che ho a casa, quando devo scegliere
la sorgente audio, ho anche "What you hear", che registra tutto quello che
sente, sia che arrivi da midi, mic, wav e via dicendo.
Non vorrei che questa possibilità dipenda dalla sk audio.....
good recording!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

Newsgroup: it.comp.lang.visual-basic
Titolo: funzione attendi esecuzione codice come msgbox

Esiste qualche funzione del genere?

non ho ben capito che ti serve.....quando chiami una funzione o una sub,
viene eseguito il codice che vi e` all'interno e finche` non termina, non si
ritorna alla riga da dove e` stata chiamata. Se devi attendere un tasto
allora il discorso e` diverso. Ricorda sempre che sei in programmazione ad
oggetti !!! Dai qualche info in piu`.
Alessio
"Zero" <Ze...@Zero.it> ha scritto nel messaggio
news:BRxtb.27394$9_.10...@news1.tin.it...


 ha scritto nel messaggio
news:KhKtb.118978$vO5.4...@twister1.libero.it...


 messaggio visibile finchè dura l'esecuzione di un  salvataggio o di una


 ha scritto nel messaggio
news:H_Ptb.123745$e6.44...@twister2.libero.it...


Capito, allora mi sa che non ti posso aiutare, non ho mai fatto prove con
gli script VBE. Ho controllato sulla documentazione microsoft ma non ho
trovato una risposta. Pero` se ho capito bene mi sembra che si possano
mettere dei form. Spero che qualcuno ti possa dare una mano.
ciaoo
        Alessio
"Zero" <Ze...@Zero.it> ha scritto nel messaggio
news:CsRtb.31156$9_.12...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Reports 8.5

Ciao a tutti, sicuro che la mia domanda per molti sarą stupida, ma sono
appena passato da Crystal Reports 4.6 a Crystal Reports 8.5 e non so proprio
come andare avanti.
Con la vecchia versione avevo il mio controllo crystl32.ocx e con questo
codice:
CrystalReport1.ReportFileName = App.Path & "\Assets\rpttrimtr2.rpt"
Dim sFiltro As String
sFiltro = "{Trim2.Anno} = " & frmTrimTR2.cboAnno.Text & " and {Trim2.Giorno}
in Date (" & Format(frmTrimTR2.txtDal.Text, "yyyy, MM, dd") & ") to Date ("
& Format(frmTrimTR2.txtAl.Text, "yyyy, MM, dd") & ")"
CrystalReport1.SelectionFormula = sFiltro
CrystalReport1.RetrieveDataFiles
CrystalReport1.PrintReport
potevo filtrare e visualizzare un report.
Ora con la nuova versione non so proprio come fare per configurare VB per CR
8.5 e poi visualizzare il report semplicemente premendo un bottone.
Vi chiedo quindi se qualcuno puņ darmi qualche dritta od indicarmi un buon
manuale in rete per l'uso di CR 8.5.
Scusate ma nel programma non mi parte la guida e non so proprio cosa fare.
Vi ringrazio e vi chiedo di essere magnanimi. :-)
Ciao

 Ciao
Non ricordo se l'installazione di CR8.5 copia i file della guida o se li
"dimentica" sul cd, penso cmq che questo link risolva il tuo problema:
http://support.crystaldecisions.com/library/kbase/articles/c2010291.asp
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Appartenenza di un controllo

Ciao a tutti,
Ho due frame frame1e frame2 e due controlli button Command1(0) e Command2(0)
che appartengono  rispettivamente a frame1 e frame2. Se creo due nuovi
pulsanti come segue:
    load Command1(1)
    command1(1).visible = true
    load Command2(1)
    command2(1).visible = true
come faccio a dirgli che command1(1) appartenga a frame1 e command2(1)
appartenga a frame2.
So che magari č una stupidata, ma vi prego aiutatemi.
Marta

 wrote in message
JNL34.1866$Bg7....@typhoon.libero.it...


Verifica nell'help il metodo Add dell'insieme Controls. Se non ho capito
male fa proprio al caso tuo
--
Piero Santini (VB6Sp3 - Win98)
Togliere ahaha dall'indirizzo per risposte in mail


Se i pulsanti Command1(0) e Command2(0) appartengono gia' rispettivamente a Frame1 e Frame2,
quando fai il Load di Command1(1) e Command2(1) questi appartengono gia' rispettivamente a Frame1
e Frame2.
Se proprio vuoi cambiare il frame di appartenenza puoi settare la proprieta' "Container" dei
pulsanti:
   Set Command1(1).Container = Frame2
   Set Command2(1).Container = Frame1
Ciao, Andrea F.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema Variant(,)->Byte()->Variant()

Come posso ottenere in modo più veloce possibile una conversione
da ARRAY VARIANT a ARRAY BYTE e di nuovo ARRAY VARIANT ?
mi spiego meglio... supponiamo
Dim vaDatiA(cx,cy) As Variant
Dim vaDatiB() As Variant
Dim baBuf() as Byte
supponiamo di popolare vaDatiA
come fare a portare vaDatiA nella variabile baBuf
per poi portare baBuf in vaDati in modo tale
che il contenuto di vaDatiA e vaDatiB siano uguali ?  ( ES: vaDatiA(i,j) =
vaDatiB(i,j) )
Il problema l'ho risolto... però vorrei dei suggerimenti per ottimizzarlo.
Il problema, almeno a mio parere, non è banale...
in quanto spesso mi si presenta questo problema nella elaborazione dei dati.
Grazie per l'aiuto.


In queste condizioni credo che in termini di velocità la cosa migliore sia
ancora il classico For.
Sarebbe diverso se anzichè avere un Variant() tu avessi un Variant(Byte()).
In questo modo (pressochè immediato come velocità):
    Dim vaDatiC As Variant
    ReDim vaDatiC(cx, cy) As Byte
    ReDim babuf(cx, cy) As Byte
    'riempio l'array per prova
    For i = 0 To cx
        For j = 0 To cy
            vaDatiC(i, j) = CByte((i + j) Mod 255)
        Next j
    Next i
    'pointer to the array
    ' un dato byref (come un array) è contenuto in un variant
    ' come pointer nei byte 9-12
    ptr = VarPtr(vaDatiC) + 8
    'pointer to the first element in array
    ' un array contiene il puntatore al primo elemento di un
    ' array nei bytes 9-12 del descrittore
    ptr = admArrayDataAddress(ptr)
    ' 1 è la dimensione di 1 byte
    Call CopyMemory(babuf(0, 0), ByVal ptr, cx * cy * 1)
Ti serve anche
Type SAFEARRAYHEADER
    cDims As Integer
    fFeatures As Integer
    cbElements As Long
    cLocks As Long
    pvData As Long
End Type
Function admArrayDataAddress(lpA As Long) As Long
    Dim psah As SAFEARRAYHEADER
    Call mm_ArrayHeader(lpA, psah)
    admArrayDataAddress = psah.pvData
End Function
E tanto per la cronaca, questa è la struttura di un Variant (che puoi
ottenere con la CopyMemory())
Public Type VARIANTHEADER
    iVarType As Integer
    dwUnused1 As Integer
    dwUnused2 As Long
    dwData1 As Long ' if data-type is byref this contains the address
    dwData2 As Long
End Type
Ciao

 ha scritto nel messaggio
news:q3cb7.118752$Qf6.7...@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetti in un progetto

Si possono conoscere durante l'esecuzione degli oggetti che compongono un
progetto, esempio form, classi etc, sempre ad esempio effettuare un load?
Grazie

 ha scritto nel messaggio
news:wCcA7.57274$1H1.6...@news.infostrada.it...

non mi è molto chiara la domanda...
l'insieme Forms è una collection di riferimenti a tutti i Form
_caricati_ (non semplicemente inseriti nel progetto), e ogni Form ha un
insieme Controls che ti lascio immaginare a cosa si riferisce  ;)
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report 6

Un'informazione.
Qualcuno conosce l'indirizzo di qualche sito da cui scaricare
la versione dimostrativa, se esiste, di Crystal Report 6 ?
Grazie
        Mauro

...




Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Fare il salto pagina in HTML

Ciao.....
Sempre nell'obiettivo di usare HTML per fare le stampe da un programma in
VB, sapete se c'è qualche carattere particolare per fare il salto-pagina?
Come ho spiegato in qualche post precedente, io esporto i dati del mio db in
XML, poi grazie a trasformazioni XSL/XSLT li converto tutti in HTML,
ottenendo un'impaginazione corretta.
Però a volte ho bisogno di forzare un salto-pagina......
C'è un modo?
Qualcuno ne sa qualcosa?
Grazie!!!
--
Damiani Liborio Igor
ig...@igordamiani.it
 - 
dam...@italiainfiera.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262
---
"Tu devi capire che lei è nuova a queste cose..."
"Bhè, e che cosa ci vuole?"
"Ci vuole, ci vuole, è questione di orizzonti che non è abituata a
vedere..."
Una persona che conosco, 8 Novembre 2002

VB, sapete se c'č qualche carattere particolare per fare il salto-pagina?
Come HTML non mi risulta che esista, pero' dovrebbe essere possibile
con uno stile a partire da XHTML 1.0 (poi pero' sono problemi tuoi se
il cliente ha o no un browser che lo supporta).
In pratica potresti racchiudere la pagina da stampare in un paragrafo
<P>, con il seguente stile:
<p style="page-break-before: always">
  <!-- qui va tutto cio' che c'e' da stampare sulla pagina -->
</p>
Se hai tempo e voglia facci sapere cosa hai combinato ;-)
-- 
hth, hal

con uno stile a partire da XHTML 1.0
Forse ci siamo, dai un po' un'occhiata qua:
http://www.webreference.com/authoring/languages/xhtml/beginning/chap13/
-- 
hth, hal

ho risolto il problema con mio fratello questa mattina.......
è molto simile a quanto suggerito da hal1961. In un foglio di stile CSS mio
fratello ha fatto quanto segue:
body  {
  }
h4 {
 color: red;
 }
p, td  {
  }
@media print {
  @page         { margin: 10% }
  H4      { page-break-after: avoid;
                  page-break-before: always }
}
quando viene incontrato il tag H4, solo in fase di stampa viene fatto un
salto pagina......
qui viene usato un CSS, ma in teoria credo che il tutto funzioni anche come
diceva appunto hal1961.
Grazie!!!!!!


 Forse ci siamo, dai un po' un'occhiata qua:
 
http://www.webreference.com/authoring/languages/xhtml/beginning/chap13/
ho provato l'esempio e funzia che e' una bellezza !
http://www.webreference.com/authoring/languages/xhtml/beginning/chap13/3/2.h
tml
Newsgroup: it.comp.lang.visual-basic
Titolo: Scusate...

Salve, sono un SUPER principiante e vorrei sapere dove posso trovare un
tutorial per iniziare a programmare con VB6...tnx
ByeZzZ
Vinxi

tutorial per iniziare a programmare con VB6...tnx
Risposta standard:
Io inizierei con il leggermi le nozioni fondamentali di VB sui suoi Books on
line
ciao

Ciao Vinxi,
questa risposta l'ho già data a Simone:
tanto per capire "dove hai i piedi" direi "Visual Basic 6 for dummies" della
Apogeo oppure il corso in fascicoli "Corso pratico di programmazione Visual
Basic 6.0" della Prens@ Tecnica...
... se sei asino come me, e mi farebbe piacere, giusto per confrontare i
progressi...
Se no, le guide della Mondadori Informatica, e tieni sempre d'occhio i
tutorial sulla rete.
Un saluto
Francesco

Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzo non valido di <null>

Certamente sarà capitato anche a voi di leggere un campo vuoto di un record
per trasferirlo su un controllo EditBox o simili.
Per evitare questo errore devo inserire dei ripetuti controlli che
verificano il contenuto del
campo prima di trasferirlo.
Esiste un sistema più semplice invece di riempire di "if...then" il codice
di Vb?
Grazie.

 Nota: la concatenazione di Null con "" restituisce "" (stringa vuota).
Contro ogni logica della "propagazione del Null" che vuole che se un membro
di un'espressione è null il rusultato è anch'esso null...
Misteri di VB.
Ciao


wrote:

Puoi usare iif in combinazione con isnull della serie
stringa = iif ( isnull(campo), "", campo )
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] - Non riesco a vedere il gruppo in Outlook express

Che server utilizzate???
Ho provato anche a metterlo in OE ma quando tenta di prender ei messaggi
dice che sul server ci sono 100 mila messaggi.
Con free agent mi scarica solo messaggi del 2001
con Xnews mi da errore di protezione generale...
non so piu' che fare. mi sono registrato solo per lasciare questo messaggio.
Gradirei una risposta in mail cosi' faccio prima
vmorgan...@hotmail.com
togliere nospam
Grazie infinite
--------------------------------
Inviato via 
http://usenet.libero.it

 Che server utilizzate???
io mi sono registrato qui
http://news.cis.dfn.de/
e uso il server 
News.CIS.DFN.DE
gratis e credo accessibile tramite tutti i provider
--
Salutoni
Sergio

 dice che sul server ci sono 100 mila messaggi.
Saran pure 100.000, ma ... pulsante destro sul NG e "Impostazioni
sincronizzazione", attiva "Non sincronizza"
Se vuoi scaricare il locale imposta "Tutti i messaggi" e ... attendi con
pazienza.
Vedi anche in OE, Strumenti, Opzioni, Lettura, News e Leggi. Il numerello
mettilo a 300 (default) o, comunque, a un numero piuttosto basso, max 1000.


--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: immagini nel file exe

Fo creato un programma che visualizza delle immagini in formato jpg, ma in
fase di compilazione vorrei includere tali immagini nel file exe, e non
lasciarle "sciolte" che magari qualcuno le modifica, come posso fare?



 lasciarle "sciolte" che magari qualcuno le modifica, come posso fare?
Se le hai incluse in un controllo, non c'è bisogno che tu fornisca i jpg:
durante la compilazione vengono inserite nell'eseguibile. Per la verità sono
già memorizzate nella definizione del form, per cui potresti cancellarle una
volta inserite nel controllo.
Oppure (metodo valido se devi manipolare le immagini in più punti del
programma) puoi creare un file di risorse e caricare le immagini con
l'istruzione LoadResPicture. Nell'Help trovi le istruzioni per l'uso. Sarebbe
troppo lungo descrivere qui la procedura. Sappi che ti serve il compilatore di
risorse (che è presente nel cd di VB in una dir che si chiama Resource.
Insieme al compilatore c'è l'help in linea relativo. Non è difficile creare il
file sorgente, le istruzioni indicano semplicemente il tipo di risorsa e il
nome del file. Una volta compilato il sorgente, ottieni un fie .res che va
inserito nel progetto con Inserisci File. Quello contiene le immagini, a cui
ti potrai riferire tramite il nome assegnato nel file sorgente.
Nota: non usare i jpg. Vengono espansi da VB e usano lo spazio che utilizzano
da espansi. Conviene trasformarli fin da subito in bmp per evitare sorprese.
Flavio Ronco
--
f.ronco@*NonMiServeNiente*
flashnet.it
http:\\
www.geocities.com
\Paris\3461\
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]
Newsgroup: it.comp.lang.visual-basic
Titolo: Creare file di testo

Immagino che la domanda potrebbe essere piùche banale...
Ma sono in una situazione di smarrimento (compreso ricercare nei miei vecchi
progetti).
Ho bisogno di creare un file di testo in una directory predefinita con nome
assegnato dall'utente, successivamente aprire tale file e scrivervi dentro i
dati interessati (istruzione PRINT)
Ciao
Jack

 Immagino che la domanda potrebbe essere piůche banale...



Grazie ma fino all'istruzione PRINT ci sono, non vedo però codice su come
creare un file.
Magari un pò di codice?
Ciao
Jack

 ha scritto nel messaggio
news:9n5kud$j27$1...@nreadb.inwind.it...
Istruzione OPEN.
Per es.
Private Sub Command1_Click()
    Dim nHandle As Long
    nHandle = FreeFile
    Open "c:\pippo.txt" For Output Access Write As nHandle
    Print #nHandle, "Pippo"
    Close nHandle
End Sub
ciao
ugo

(preso da MSDN)
OPEN
Consente di eseguire operazioni di input/output (I/O) su un file.
Sintassi
Open nomepercorso For modalità [Access accesso] [blocco] As [#]numerofile [Len=lunghezzarec]
Fai che guardare anche tutti gli argomenti relativi.....cmq..con Open crei un file oltre che aprirlo!
Ciao SIMO
(basta usare il Vedere Anche che trovi sotto il titolo)
--
__________________
www.sasim.cjb.net


 wrote in message
EYsl7.2811$Wg4.11...@news.edisontel.com...

Open "c:\prova.txt" For Output Shared As #1
    Print #1, Tab(10); "prova"
Close #1
Il prg mi restituisce un msg di errore (autorizzazione negata)
Ciao
Jack

 wrote in message
9n5ma4$5nr$1...@lacerta.tiscalinet.it...

Funziona, ora mi metto a lavoro
Grazie mille
Ciao
Jack

 ha scritto nel messaggio
news:9n5mgq$kbr$1...@nreadb.inwind.it...

Open "c:\prova.txt" For Output As #1
Print #1, Tab(10) &  "prova"
Close #1

Il prg mi restituisce un msg di errore (autorizzazione negata)
Cribbio, ma le leggi anche le guide o fai solo copia/incolla a
manetta?????
Ciao,
Moreno
#sirri#@#
morenosoft.com#
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: problema proprietà

Ho la necessità di trattare la propretà "picture" del controllo "picture
box" (cui ho dato il nome picFigura)
Ma ci sono problemi, che già si possono intuire al momento delle
digitazione del codice:infatti dopo aver digitato "picFigura." mi
aspetto compaia un menù scorrevole con una serie di proprietà tra cui
"picture"; invece compare un menu scorrevole con le seguenti quattro
diciture "Count","Item","Lbound","UBound".(già qui sentivo puzza di
bruciato...)
Se digito comunque "picFigura.Picture=" eccetera... dopo aver lanciato
il pogramma compare l'errore di compilazione e mi viene visualizzato in
blu ".picture"
Dov'è l'errore ? C'è qualcosa da settare ?
Spero di essere stato chiaro.
Grazie per l'attenzione. Un saluto.

 blu ".picture"
la tua picFigura fa allegramente parte di un array di controlli (ovvero hai
più di una PictureBox sullo stesso form con lo stesso nome, e proprietà
Index differenti; oppure ne hai semplicemente una, ma la proprietà Index ha
un valore definito).
dovresti risolvere specificando l'indice (ovvero picFigura(0).Picture = ...)
Ciao
Faber

> Se digito comunque "picFigura.Picture=" eccetera... dopo aver lanciato
in   "picFigura.Picture=<qualcosa>"   la sintassi è sbagliata
"Set picFigura.Picture=<qualcosa> " è quella giusta
Fabio

Newsgroup: it.comp.lang.visual-basic
Titolo: R: [?][?] R: [VB6] - Acquisizione da scanner e....

 > > ~[][][][][][][][][][]{(TEX§)}[][][][][][][][][][]~>



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

Qualcuno sa xchè su win me non funziona ? C'è una funzione alternativa ?
Ciao
Enzo

Puoi usare l'oggetto drive:
    Dim fs, d, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    drvPath = "C:"
    Set d = fs.GetDrive(fs.GetDriveName(drvPath))
    s = "Unità " & UCase(drvPath) & " - "
    s = s & d.VolumeName & vbCrLf
    s = s & "Spazio disponibile: " & FormatNumber(d.AvailableSpace / 1024,
0)
    s = s & " KB"
    MsgBox s
Gianni Moretti

 ha scritto nel messaggio
news:zXtq6.54556$Xj7.5...@news.infostrada.it...


 ha scritto nel messaggio
news:y%wq6.5417$x3.1...@news2.tin.it...



Io ho provato con l'esempio trovato sulla raccolta API di Cesare Rizzi, e
funziona anche con WIN ME.
Prova a postare il codice (dichiarazioni e utilizzo) che probabilmente c'è
qualche errore.
Ciao VB

 ha scritto nel messaggio
news:98dqm3$1ef60$1...@ID-77941.news.dfncis.de...


 ha scritto nel messaggio
news:98edoj$s29$1...@serv1.albacom.net...

Non è vero ho ricevuto un numero ma non l'ho controllato:
Spazio disponibile= -158068736
I fumi dell'alcol bevuto al Meeting non erano ancora passati, il colpo di
grazia l'ha dato il limoncello.
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: VB chat Problema X Volenterosi....(molto!!!)

Sto cercando di realizzare una chat, č la prima volta, ed infatti il 
programma mi da degli errori che non riesco a risolvere...
Ho allegato i progetti coi loro sorgenti in questa lettera, spero che 
possiate aiutarmi.
I problemi che ho visto sino ad ora sono (leggetevi il codice o provate 
il programma prima di leggere...):
1)nell'evento Data_arrrival (server) c'č un istruzione 
wskserver(index).senddata "benvenuto....".
Al primo client che si connette, questo viene mandato corretamente.
Al secondo client che entra (e siamo a due connessi) il messaggio non 
arriva subito, ma appare quando il primo client manda un messaggio al 
server, il quale viene lo manda al secondo client.
2) quando entra un terzo client, il primo client non riceve piů alcun 
tipo di messaggio...;(
ISTRUZIONI PER LA PROVA
Se volete provare la chat in runtime:
Aviate il server, in alto a destra trovate delle textbox.La prima 
contiene il vostro indirizzo IP.Inserite cosě il vostro indirizzo IP nel 
textbox che trovate nel client in basso a sinistra ( su IP address )
IL server lavora sulla porta 2000, cercate di cambiare le impostazioni 
iniziali del server senň non parte.
Vi ringrazio molto e spero che qualcuno parta....
venerdě parto..buone vacanze ;))

 tipo di messaggio...;(
Io ho provato ad avviare il Server su host con IP 10.73.5.49 + due sessioni
client su medsimo host
inoltre ho avviato altra sessione client su host10.73.5.147 e tutto
funziona correttamente!
I client ricevono correttamente i propri messaggi di benvenuto al log-in e
ricevono notifica delle altre connessioni; inoltre si scambiano
correttamente i messaggi.
Quello che non funziona è che in fase di log-out di un client il server si
blocca con errore
'10048' >> Indirizzo in uso
e questo succede nella sub "wskserver_close" istruzione
wskServer(index).Listen

 che possiate aiutarmi.
Scusa se ti rispondo sempre male :) ma questo non è un NG "binary", quindi
niente allegati!
Molti server li falciano e se non lo fanno loro lo fa chi si deve sorbire
anche gli allegati oltre al solo messaggio che si aspettavano.
Senza rancore, he? ;)
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Disable items in the list box in Visual basic

Hello Everybody,
I want to disable ( grey out ) some of the items in a list box made
through Visual Basic ( & not 
VB.NET
). Is this possible ? I have seen
that the only way to do this is to override the paint method that draws
the items of the list box.
A code snippet that do this will be really helpful.
Thanks in advance
Ashish Garg

 ha scritto nel messaggio news:1141047051.3...@i40g2000cwc.googlegroups.com...

put in your search engine: subclassing