mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Aggiornare il Recordset

Per aggiornare il recordset (rs1) con il seguente esempio, sono costretto
a chiuderlo e riaprirlo.
Posso evitarlo? Ciao
Dim cn1 As New ADODB.Connection
Dim rs1 As New ADODB.Recordset
 cn1.Open "Provider=MSDASQL.............."
  Do Not While.........
    Variabile = CambiaSempre
rs1.Source = "SELECT * FROM Tabella WHERE Campo1 '" Variabile & "'"
         rs1.ActiveConnection = cn1
      rs1.CursorType = adOpenKeyset
  rs1.LockType = adLockBatchOptimistic
        rs1.CursorLocation = adUseClient
           rs1.Open
   .....................
        rs1.Close
    Loop
cn1.Close

 Posso evitarlo? Ciao
prova a cambiare il codice cosi', attivando prima la connessione del
recordset al Db:
    rs1.ActiveConnection = cn1
    rs1.Source = "SELECT * FROM Tabella WHERE Campo1 '" Variabile & "'"
ciao

     rs1.Source = "SELECT * FROM Tabella WHERE Campo1 '" Variabile & "'"
Mi dà l'errore "L'operazione non è consetita se l'oggetto è aperto."
Grazie

 ha scritto nel messaggio
news:bB5a9.100664$lu5.2...@twister1.libero.it...

Mi perplime il concetto di "aggiornare il recordset":
Se con questo intendi che le modifiche fatte sul recordset si riflettano
sulla tabella di origine, penso che tu debba chiuderlo e riaprirlo in
funzione del fatto che hai scelto il locktype di tipo batch ottimistico.
Se con questo intendi che vuoi vedere le variazioni apportate eventualmente
da altri operatori, dovrebbe essere sufficiente utilizzare il metodo requery
del recordset.
Salutoni.
Sergio

> Se con questo intendi ........
[...]
Intendo ottenere nuovi dati ad ogni loop nel recordset (rs1) senza chiuderlo
e riaprirlo ogni volta, ma...... credo non sia possibile.
Grazie
--------------------------------------
es.:
Do Not While.........
    Variabile = CambiaSempre
 rs1.Source = "SELECT * FROM Tabella WHERE Campo1 = '" & Variabile & "'"
.........
    ............
       Loop
 rs1.Close
   cn1.Close
--------------------------------------

 ha scritto nel messaggio
news:bB5a9.100664$lu5.2...@twister1.libero.it...


 e riaprirlo ogni volta, ma...... credo non sia possibile.
Scusa, non avevo capito.
Secondo mè è possibile, invece, anche se devi valutare l'efficacia dei due
approcci.
Prova a fare queste modifiche
Dim cn1 As New ADODB.Connection
Dim rs1 As New ADODB.Recordset
 cn1.Open "Provider=MSDASQL.............."
rs1.Source = "SELECT * FROM Tabella"
         rs1.ActiveConnection = cn1
      rs1.CursorType = adOpenKeyset
  rs1.LockType = adLockBatchOptimistic 'a proposito, perchè questa strategia
di lock?
        rs1.CursorLocation = adUseClient
           rs1.Open
  Do Not While.........
    Variabile = CambiaSempre
rs1.filter "campo1 ='" & variabile &"'"
   .....................
    Loop
 rs1.Close
cn1.Close
Adesso sono un pochino fuso e non ricordo se il metodo filter riporta il
record corrente all'inizio del recordset, prova un po' tu
Salutoni
Sergio

 record corrente all'inizio del recordset, prova un po' tu
Sě lo porta all'inizio.
Salutoni a te Sergio e infiniti GRAZIE   :-))))))
Newsgroup: it.comp.lang.visual-basic
Titolo: Interagire con altri programmi

Ciao a tutti,
avrei la necessità di realizzare in Visual Basic 6 una form che rilevi i
dati da una qualsiasi maschera aperta a video (potrebbe essere, che ne so,
il valore del campo "Formato" nella maschera "Imposta pagina" di Word).
Esiste questa possibilità o è pura fantascienza?
Grazie in anticipo a chi riesce a darmi qualche dritta.
Nick

 fantascienza?
Detta così (per quel "qualsiasi maschera" e quel "che ne so"), propendo per
la fantascienza.

 la fantascienza.
un po' ROTFL, però mi viene in mente quell'applicativo di visual studio, mi
pare si chiami spy++ qualcosa, che permette di ricavare l'hwnd di ogni
controllo/finestra sul dekstop.
non è possibile quindi poi ricavare la classid del controllo e di
conseguenza tutto il resto?
good coding!!!
-- 
Alletun
"Io lo so che accadrà. La voce sussurra nei miei pensieri di Jair, Rone,
Allanon e soprattutto nelle Mortombre.
Sussurra segreti che mi sono tenuti nascosti, nella grigia oppressione
di questo giorno e nell'oscurità caliginosa di quello che mi aspetta.
Saremo distrutti. Tutti."
Brin Ohmsford - La Canzone di Shannara - T. Brooks

 il valore del campo "Formato" nella maschera "Imposta pagina" di Word).
beh, pare un compito mostruoso.
Poi non ho capito bene se intendi spiare applicazioni note (nel senso che è
nota l'interfaccia utente, i menu, le shortcut) o proprio generica e
imprevedibile.
Nel secondo caso non riesco a pensare a nessun approccio che non siano
stampe binarie delle schermate con printscreen e la clipboard di sistema
(ottenendo dati di nessuna utilità pratica)
NEl primo, se riesci a distinguere l'applicativo spiato ed identificarlo,
potresti mandargli comandi con  SendKeys  nella sintassi che l'applicativo
stesso si aspetta (ad esempio selezionando voci di menu seleziona, e poi
copia dei dati voluti) e infine trovandoli nella clipboard.
Capisco che è estremamente grezzo e funge solo in ciò che il programma
espone volontariamente.
Altro non so dirti
ciao
Soviet

Newsgroup: it.comp.lang.visual-basic
Titolo: tabella codici ascii

ciao a tutti, qualcuno sa dirmi dove posso trovare una tabella completa dei 
codici ascii?
grazie
-- 
c u by Link 

 -- 
Guida in linea e Google.
Ciao, Vincenzo

la 
asciitable.com
 , mi sembra... cerca su google asciitable.
--
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/
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto, x esegiure un file

Cari NG,
devo mandare in esecuzione un file utilizzando un pulsante.
Il file è sempre lo stesso ma il percorso può cambiare.
Come faccio a farglielo trovare sempre ?
Qual'è il codice se il percorso è sempre lo stesso ?
Utilizzo la shell ma mi parte minimizzato, può
essere così : shell(percorso, .... )?
Grazie
il pav
il...@libero.it


Scusa, ma ... l' intellisense dovrebbe sciorinarti i parametri.
O sbaglio ? :)
ciao, hal

 wrote in message
9ab0hl$4e302$1...@ID-56381.news.dfncis.de...


 wrote in message
9ab0hl$4e302$1...@ID-56381.news.dfncis.de...


Istruzione non valida all'esterno del blocco Type.
Shell "c:\progetti\prova\setup.exe", vbMaximizedFocus
ciao, hal

 wrote in message
9ab2fb$4i3c4$1...@ID-56381.news.dfncis.de...

Continuavo a perdere tempo con le parentesi.
Grazie
il pav

 Continuavo a perdere tempo con le parentesi.
La cosa che mi fa ridere (ilpav, il tuo e' soltanto un caso, non te la
prendere) e' che c'e' un sacco di gente che non capisce ancora la
differenza tra le chiamate a funzione e a sub.
Ma che gli costava a quelli della MS utilizzare la sintassi del C
in cui tutte le funzioni si chiamano con le parentesi come se ci
fosse un call implicito?
REGOLA GENERALE VALIDA PER TUTTE LE FUNZIONI:
Se la funzione ritorna un valore e questo viene assegnato o utilizzato
da un'altra funzione richiede le parentesi.
ad es. X = Shell("c:\myexe.exe", ...)
oppure
Call Shell("c:\myexe.exe")
Se la funzione viene isolata da tutto il resto e non viene assegnata
a nessuna variabile oppure non viene riutilizzata da altra funzione,
non richiede parentesi.
Shell "c:\myexe.exe",...
Non tutte le funzioni possono essere chiamate come Sub.
Perchè non se ne fa una FAQ?
Ma mi rispondo da solo. "Ma chi le legge poi?" :(
un Fibia esageratamente negativo!
--
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

fosse un call implicito?
perchè in C il "non definito" è un tipo di dati (void)
in Basic e in Pascal il void manca, e allora si distingue tra procedure 
(o subroutine, come le chiama il Basic) e funzioni.
e poi, se lo fa anche il Perl non dev'essere una cosa tanto cattiva ;)

 e poi, se lo fa anche il Perl non dev'essere una cosa tanto cattiva ;)
non me parla' di ActivePerl che c'ho avuto gli incubi :D


non me parla' di ActivePerl che c'ho avuto gli incubi :D
dai, il Perl è fantastico :)
la cosa migliore è il casting dei dati senza bisogno di conversione, 
basta piazzarci il simbolo giusto davanti all'espressione e fa tutto lui 
(se string è una variabile stringa, con $string avrai la sua 
rappresentazione come stringa, e con @string la sua rappresentazione 
come array di caratteri, ad esempio). Ora sto solo aspettando un 
compilatore funzionante...

 compilatore funzionante...
eheheh lo vedi?
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Compatibilità Win 95

Ragazzi, un dubbio mi assale quando ormai ho ultimato la mia applicazione:
il mio sistema è Win XP, uso VB6 SP5, la mia applicazione funzionerà su un
sistema WIN 95 ? Il pacchetto di installazione basta a caricare tutte le
librerie oppure devo ricorrere ai VBruntime da aggiornare sul sistema Win
95?
Grazie,
Francesco

 ha scritto nel messaggio
news:ozbj8.56095$_u5.1...@news1.tin.it...

Io per essere sicuro hoinstallato Win95 & VB6 su un'altra partizione
e ho fatto il pakketto di installazione
risultato .. su Win2k è di 3.5MB su Win95 è di 10.2MB
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: DB Access

Quanti record puo' contenere un database Access prima di piantarsi? Oppure
il numero di record e' illimitato? Grazie Ciao
--------------------------------
Inviato via 
http://usenet.iol.it

 il numero di record e' illimitato? Grazie Ciao
Tasto F1 questo sconosciuto...
Dimensione di un file (mdb) di un database di Microsoft Access. 2 gigabyte.
Poiché, tuttavia, il database può includere tabelle collegate in altri file,
le relative dimensioni complessive sono limitate soltanto dalla capacità di
memoria disponibile.
Numero di oggetti in un database 32.768
Moduli, comprese maschere e report con la proprietà Possiede modulo
impostata a Sì 1.000
Numero di caratteri in un nome di oggetto 64
Numero di caratteri in una password 14
Numero di caratteri in un nome utente o in un nome di gruppo 20
Numero di utenti concorrenti 255
________________________________________
James Tiberius Kirk, matricola SC 937-076 CEC
  Nato a Riverside, nello Iowa, USA, Terra
            il 1277.1 (26/03/2233)

Avevo gia' letto queste informazioni col tasto F1 ma il mio DB si e'
inchiodato ad una dimensione di 3Mb.... aprendo il DB con Access e'
leggendone il contenuto di una tabella l'HD del PC comincia a lavorare
pesantemente senza darmi alla fine il resoconto dei dati.... a qualcuno e'
mai capitata una cosa simile e sa spiegarmi come mai? Grazie Ciao


 ha scritto nel messaggio
news:212Z162Z72Z67Y1...@usenet.iol.it...
CUT
prima cosa...compatta il DB
seconda...scandisk dell'hd
terza...controlla quanto spazio residuo ha l'HD...
quarta...File di swap troppo piccolo o usi l'app con altre app?
quinta...defrag dell'HD

 quinta...defrag dell'HD
Sesto: Sarà mica che la Select è talmente complessa (o
sbagliata/ricorsiva/circolare) che impiega tutto quel tempo?

 ha scritto nel messaggio
news:212Z162Z72Z67Y1...@usenet.iol.it...

prova a cercare nell kb di microsoft, cmq, se non ricordo male, il limite
per
un db access, ma anche msde, è di 2Gb di pazio su disco fisso, quindi
fino a questo limite puoi andare tranquillo :-))
--
bye BlackMagic
ICQ: 85485468
Aiuta la ricerca sul cancro 
http://members.ud.com
Join
at:
http://members.ud.com/services/teams/team.htm?id=2E71C62A-8E67-48DB-B472-
BCA129B35412

scritto


Non si tratta di select o codice VB ne sono sicuro... perche' il DB fa la
stessa cosa una volta aperto semplicemente con access... ho provato piu'
volte a compattarlo ma quando e' in quelle condizioni nulla da fare mi da
un erroraccio.... la soluzione che ho trovato fino in questo momento per
ripristinare il database una volta danneggiato e' stata quella di
cancellare l'intero contenuto della tabella incriminata.... che tra
parentesi avrebbe dovuto contenere almeno 5.000 record...


 parentesi avrebbe dovuto contenere almeno 5.000 record...
No, non si deve distruggere niente.
Meglio se posti un po' di codice.

 ha scritto nel messaggio
news:212Z162Z72Z67Y...@usenet.iol.it...
YARGALA' ZAC!
non č che ti va in loop?
o che blocci in maniera esclusiva qualcosa?
che erroraccio č?????
"Attenzione: fusione del nocciolo imminente!"
:-)
doh!
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb & stampanti ...

Volevo sapere le proporzioni di una pagina stampata possono variare
cambiando stampante
(che so, da aghi a laser ...). Siccome non ho la possibilità di provare
sarei grato se qualcuno mi rassicurasse. Se al contrario rischio di vedere
le mie ore di impaginazione andare in "fumo" qual' è il rimedio ?
Grazie d.N.T.

 wrote in message 7t3d6o$4ce$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: indirizzi e-mail con VB5

premetto che ho VB5 e sottolineo VB5.......... come faccio ad inserire un
indirizzo e-mail in maniera tale che, cliccandoci sopra, faccia apparire la
relativa finestra per scrivere un e-mail? intendo dire che colleghi a
outlook express, eudora e simili.
grazie mille
ivan


Passa alla funzione ShellExecute (api win32) la seguente stringa:
mailto:
cic...@pluto.com
ciao, hal
p.s.
RTGNG sta per
Read The Fucking NewsGroup
visto che questa domanda viene posta un giorno si' e due anche
riciao, hal


guarda su MSDN (se non ce l'hai --> 
http://msdn.microsoft.com
) la funzione
dell'API ShellExecute()
Ciao
Faber

Ecco il codice completo
__________________________________________
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long) As Long
Public Function HyperJump(ByVal URL As String) As Long
   HyperJump = ShellExecute(0&, vbNullString, URL, vbNullString,
vbNullString, vbNormalFocus)
End Function
'Ricordarsi di mettere icona mano
'Crea il link al testo specificato nella caption del label
Private Sub Label1_Click()
            Label1.ForeColor = &H800080
            Call HyperJump(Label1.Caption)
End Sub
Private Sub Label2_Click()
            Label2.ForeColor = &H800080
            Call HyperJump(Label2.Caption)
End Sub
__________________________________________
Newsgroup: it.comp.lang.visual-basic
Titolo: [!] Sconto su .NET per chi è stato alla giornata di lancio

Chi c'è stato lo sa: c'è una offerta per prendere la piattaforma .NET con un
certo sconto, presso un certo rivenditore M$ (sto sul vago, perchè non
voglio fare pubblicità, nè rivelare prezzi che magari sono riservati ai soli
intervenuti).
Siccome pensavo di prendere l'upgrade della versione professional, ho fatto
un salto sul sito di questo rivenditore, ed ho trovato la suddetta versione
Upgrade venduta a chiunque, con in aggiunta anche un libro che insegna come
migrare da VB a VB:NET, ad un prezzo inferiore a quello dell'offerta
speciale riservata ai soli intervenuti.
Ho telefonato per chiedere lumi, (l'addetto è caduto dal pero e mi ha messo
in attesa per chiedere al suo capo) e pare che quella che costa meno, e con
il libro in omaggio, sia la versione inglese, che in origine costa un
centinaio di euro meno di quella italiana.
A parte che dal nome e dalla descrizione sul sito non si capiva (ma al fatto
che dai nomi dei prodotti M$ non si capisca nulla sono abituato ;-)), a
questo punto non so se prendere la versione italiano con lo sconto speciale
per pochi eletti, o risparmiare e prendere la versione inglese per tutti.
I soliti casini M$. ;-)
Ciao
*Roby*

 wrote in message
news:a994b0$1962l$1...@ID-94194.news.dfncis.de...


 Rivenditore che hai, libro che trovi ?!?!?
Mi manderesti l'Url via mail?
Inoltre c'è il problema dell'MSDN. Non mi interessa gran chè ricevere tutte
le versioni di Windows in tutte le lingue (considerato tutti i PC
preistallati acquistati per lavorare ho giù abbastanza licenze di Windows da
gestire un'aula corsi), quindi mi accontenteri della versione Library, ma
pare che sia quella meno pubblicizzata. Forse non ci guadagnano abbastanza?
Voi che cosa avete preso?
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: Lettura DB sul sito

Dovrei collegarmi ad un DB access situato su un sito web per leggere dei
dati.
Qualcuno ha idee su come possa fare.
Grazie a tutti

 Qualcuno ha idee su come possa fare.
Via ODBC oserei dire...ma che db č?
Alex
Newsgroup: it.comp.lang.visual-basic
Titolo: 2img in 1

Problema:
ho una frm child a cui e sovrapposta una picturebox che la copre totalmente.
Alla pressione di un tasto l'utente ha la possibilita di spostare una
seconda picturebox sulla prima. Quando si genera l'evento dblclick, la
picturebox controllata dall'utente si blocca nella posizione nella quale e
stato fatto il dblclick. Io vorrei che fatto cio la picture2 si fondesse con
la picture1 (quella grande)
A questo punto ho pensato a due strade.
1) catturo la finestra attiva (ma e possibile anche per una form child??)
2) prendo la picture2 e punto per punto la ricopio sulla picture1.
Altre soluzioni? E se non ce ne fossero altre...per queste due cosa devo
fare?
Quando cerco di catturare la frm child mi viene la schermata della MDI,
mentre per la soluzione 2 mi sembra un po'macchinosa...
Ciao e grazie
Pulx

 ha scritto nel messaggio
news:Bu_R5.94928$BF.34...@news.infostrada.it...

dai un occhiata alla funzione PaintPicture;
ammesso che Picture2 sia la picture di partenza e Picture1 quella di
destinazione, ammesso inoltre di avere le coordinate x, y di destinazione
puoi fare quanto segue:
    Picture1.PaintPicture Picture2.Picture, X, Y
ciao

ciao
Caspita, non pensavo che fosse cosě semplice!
Grazie 1000!
 Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo MSCOMM

Ciao vorrei sapere se qualcuno puo' indicarmi come posso
gestire in VB5 la porta seriale senza utilizzare o
utilizzando solo in parte il controllo predefinito MSCOMM.
Grazie
Simone

 wrote in message
7mkgmh$jke$1...@pluto.sm.dsi.unimi.it...

Direi che sia l'unico modo (e non e' malaccio !!!)
Altrimenti c'e' sul sito comune (
www.murialdo.it/it_lang_vb
) una dll
(win95io.dll) che fa questo:
[...]
Win95io.DLL is a 32-bit DLL that provides access to port input/output
(I/O) under Windows 95. It was written for use with 32-bit Visual
Basic since Visual Basic does not have I/O instructions. Note that,
due to the Win32 architecture, the DLL may not always behave exactly
as expected. This DLL is documented in more detail below.
[...]
Vedi se ti puo' servire, io l'ho usata per la parallela (al posto delle
istruzioni IN e OUT che c'erano in QB)
Se hai bisogno su MSCOMM o se vuoi spiegarmi perche' non lo vuoi usare fammi
sapere !!!
ciaps
Stracca

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 e Fllash

Fatto un bottone in flash lo inserisco in un programma vb, ma non posso
gestirlo bene, tipo il comando click non c'e'.Si può risolvere questa cosa?
Grazie a tutti ciao


Ecco un esempio.
http://www.vbcity.com/pubs/article.asp?alias=flashvb
Occhio che per poter gestire l'evento click, bisogna che il pulsante in
flash scateni effettivamente l'evento. :-)
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: visualizzare file pdf in vb

ho inserito in un form il controllo pdf.ocx per la visualizzazione di
file
acrobat pdf.
tutto ok tranne per il fatto che non riesco ad attivare i link interni
al
file pdf caricato nel controllo.
Qualche suggerimento?
Un saluto a tutti
gianni

 ho inserito in un form il controllo pdf.ocx per la visualizzazione di
scusa dove lo hai trovato questo bell' OCX?
MarioH

 ho inserito in un form il controllo pdf.ocx per la visualizzazione di
scusa dove lo hai trovato questo bell' OCX?
MarioH

Nella cartella ActiveX dove è installato Acrobat Reader!
Ciao SIMo
--
__________________
www.sasim.cjb.net


 scusa dove lo hai trovato questo bell' OCX?
se hai installato acrobat reader, lo trovi in alto fra i componenti
disponibili.
nb: questo presuppone, che se ci costruisci intorno un'app, non lo
includi nel distribuito.
l'utente _deve_ installarsi a.r. per conto suo.
seno' (*) adobe si arrabbia e ti trasforma ipso facto il pc in un mac.
ciao, a.
(*) senno', con il senno di altri :)

Credo sia sufficiente installare acrobat reader per ritrovartelo tra i
controlli aggiuntivi di vb.
gianni



ok. io pensvo però che si potesse redistribuire, invece da quello che ho
capito non è così.
MarioH

capito non è così.
Beh, basta la solita frasettina "Questo programma richiede xyz".
Che fa anche figo :P
Ciao

(*) senno', con il senno di altri :)
Uhmm... :)
Mangiafuoco

 Che fa anche figo :P
io di solito premetto
"questo programma richiede windows"
e ho come l'impressione che faccia abbastanza sfigo <g>

 ha scritto nel messaggio
news:9haocj$d8o36$1...@ID-51318.news.dfncis.de...

bella questa!  :D
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: impedire il resize delle colonne di una ListView

c'è un modo per impedire all'utente di modificare la larghezza delle
colonne di una ListView (con proprietà View impostata a 3).

 colonne di una ListView (con proprietà View impostata a 3).
Forse intercettare l'evento mousemove e/o mouseup e rimettere le cose a
posto se l'utente sposta qualcosa?
Boh! non mi viene in mente altro.
-- 
Fabio
http://www.codice.it

 a 3).
Se non sbaglio l'unico modo è il subclassing.
Su Google trovi degli esempi.
termoPilucco

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 - Porte Seriali

Egregi programmatori,
volovo sapere come possono essere gestite le porte seriali in VB6 ( es:
apertura porte, lettura porta, scrittura, inizializzazione ecc.).
Grazie per la collaborazione
Saluti
--
Posted from 
mail.caribusiness.it
 [194.177.98.4]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
37652EA8...@hotmail.com...


Grazie per il tuo aiuto, se ho bisogno ti faccio sapere.
Saluti.

Newsgroup: it.comp.lang.visual-basic
Titolo: Numeri a precisione arbitraria

Ho aggiunto alcuni "operatori" basilari alla classe di numeri a precisione
arbitraria che avevo scritto:
-addizione e sottrazione (facile)
-divisione
-la moltiplicazione c'era già
La divisione mi è costata un po' di fatica: alla fine ho scritto un
algoritmo pessimo che funziona per tentativi ed è pertanto lentissimo - si
parla di alcuni secondi :-/
Inoltre rimane il problema intrinseco della divisione che può generare un
numero infinito di cifre (periodiche) sul risultato.
Ovviamente ho dovuto limitare il processo ad un numero di cifre.
La cosa ha conseguenza negative, perchè il processo inverso (ovvero la
moltiplicazione) è invece a precisione totale.
Pertanto (a/b)*b<>a contro ogni aspettative.
Non aspettatevi troppo: il tutto è testato pochissimo e mancante di numerose
funzioni importanti (per esempio l'arrotondamento).
Progetto per il futuro, (ma solo se trovo l'ispirazione):
-rendere i tempi della divisione accettabili: ho in mente un algoritmo ma
non riesco ad implementarlo :)
-aggiungere un bel metodo .eval in modo che si possano valutare espressioni
senza dover dichiarare esplicitamente un oggetto per ogni numero coinvolto.
link del progettino:
http://www.unbelsito.com/vb/molt.0.1.zip
termoPilucco

 parla di alcuni secondi :-/
Io avevo provato a darci un occhio la volta scorsa, ma sinceramente 
quando ho visto il ginepraio di funzioni tutte insieme ho lasciato 
perdere :)
Andrebbe un po' razionalizzata.
Ciao

 Andrebbe un po' razionalizzata.
Cosa suggerisci?
Questo è più o meno quello che ho fatto:
-variabili  interrne (mantissa, posizione della virgola, ...): 'Private'
 Qui potrei migliorare, visto che per non fare properties ho usato delle
funzioni di lettura/scrittura.
-metodi degli operatori: 'Public'.
-metodi di interfaccia con altri tipi (fromString, toString): 'Public'
-funzioni interne usate solo dalla classe, ma non solo sull'istanza 'me':
'Friend'
Altra cosa che non mi convince:
I metodi che fanno da operatori lavorano avendo come base l'istanza attuale
e prendendo in argomento il secondo membro. Inoltre resituiscono il
risultato in una nuova istanza. Boh...
termoPilucco
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO SONO DISPERATA: decimali su Crystal Reports

Ho un problema che mi perseguita/assilla da qualche tempo relativamente
alla stampa con CR7 (versione Inglese).
Con un programmino VB6.0 , che si appoggia ad un database SQL,lancio una
stampa in Crystal Report.
Nell'anteprima di stampa, vengono riportati correttamente i decimali,
nella stampa su carta NON vengono riportati!
Esempio:
prezzo su anteprima: 12,13
prezzo su stampa: 12,00
Sul database i dati sono scritti correttamente.
Questo problema si presenta, a volte, anche in fase di visualizzazione
anteprima, ma occorre uscire e rientrare dal programma per fare
ricomparire i decimali.
SONO DISPERATA AIUTATEMI!!!!
Grazie
Simona
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:b862cb3700c1470554c...@mygate.mailgate.org...


 ha scritto nel messaggio
news:b862cb3700c1470554c...@mygate.mailgate.org...


 > SONO DISPERATA AIUTATEMI!!!!
Allora... Non funziona mettendo mano ai parametri di windows o cose
del genere, o comunque non funziona *sempre*.
E in piu' non ci si puo' aspettare che l'utilizzatore finale debba
settare il sistema come vuoi tu perche' le stampe abbiano i
decimali!!!
Il modo che uso io e' di creare un campo "Formula Field" e metterci
dentro una formula con l'istruzione ToText che prenda i valori da dove
vuoi tu e formatti tutto come piu' ti aggrada.
Detto questo sottolineo che piu' volte me la sono cavata tramite le
impostazioni di visualizzazione numeri nelle opzioni generali, nelle
opzioni di report, e nelle opzioni di campo, ma non sempre si riesce.
spero che ti aiuti
_JeLoT_

 alla stampa con CR7 (versione Inglese).
[CUT]
Fai un salto alla home page di Crystal Report, fai una ricerca di Patch e
Decimal...
Scarica la patch, installala e da me il problema (identico al tuo) si è
risolto !!
^___^
--
                  \/
                 -   -
                 (.) (.)
----o0O0o--(_)--o0O0o----
<<Oh Grande Spirito,
Concedimi la serenità
Di accettare le cose
Che non posso cambiare,
Il coraggio di cambiare le cose
Che posso cambiare,
E la Saggezza di capirne la differenza.>>
               (Preghiera Cherokee)
Ciao
Franco

Ciao Franco,
non sono riuscita a trovare la patch.
Puoi darmi qualche altra info?


Ciao,
già fatto!
Non funziona....uffi........
Grazie comunque!


Ciao, 
ho provato anche a inserire un campo formula, come dicevi tu, ma non
funziona, o meglio a volte funziona altre o.
Grazie ugualmente!
....se ti viene in mente qualche altra soluzione...... 


 Puoi darmi qualche altra info?
http://support.crystaldecisions.com/updates/
Cerca la patch per la tua versione....
^__^


Si, io ho la versione 7.0 ci CR


Ciao Franco,
Sono andata sul sito che mi hai indicato, purtroppo non esiste nessuna
patch per la versione 7.0 di Cristal Reports!
..peccato!


 ..peccato!
Ho trovato questo:
http://support.crystaldecisions.com/kbase/c2010226.asp
prova a vedere se fa al caso tuo.


Ho provato tutte le soluzioni proposte, ma niente da fare!!!
Grazie ugualmente x l'aiuto!!!
....se ti viene in mente qualche altra idea....

Newsgroup: it.comp.lang.visual-basic
Titolo: Form in primo piano

Sarei grato a chiunque mi possa dire come fare a far venire un form sempre
in primo piano.
Grazie

 Grazie
....zzzzzzzZZZZ......
-----------------------
Private Const HWND_TOPMOST = -1
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
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 Sub Form_Load()
   SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
End Sub
-------------------------
Attenzione a ripristinare la giusta formattazione del codice!
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale Minerva
mine...@libero.it

Se ne è parlato spesso in questo NG.
Sicuramente c'è qualche esempio sul sito comune,
oppure va qui che ho appena depositato un esempio
http://members.xoom.it/CesareRizzi
  e fammi sapere cosa ne pensi del sito.
L'esempio che ti interessa si trova nella pagina delle API
CIAO
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

Newsgroup: it.comp.lang.visual-basic
Titolo: Combo Box e Shut down

Ciao al ng, sto incominciando a sviluppare delle piccole  applicazioni, ma
ho avuto dei problemi, quindi chiedo aiuto a voi che siete più esperti.
Vorrei sapere qual'è il codice  per fare lo Shut Down clicccando un bottone
e poi sapere come si fa ad ordinare per nome i dati, provenienti da una
tabella di Access, di una datacombo.
Mirko

 wrote

ciao mirko
per lo shutdown -- palarm sul mio sito (prg coi sorgenti). c'e' appunto un
frmShutdown.
per il combo, qui si caricano due liste sincronizzate da una tabella di un
mdb (maindb). per il combo il sistema e' praticamente lo stesso.
    Dim SqlRS As Recordset, Sqls As String
    Sqls = "SELECT fullname, firm FROM addresses ORDER BY fullname"
    Set SqlRS = MainDB.OpenRecordset(Sqls)
    SqlRS.MoveLast 'populate the rs
    If SqlRS.BOF And SqlRS.EOF Then Exit Sub
    SqlRS.MoveFirst 'begin from the beginning
    For J = 0 To SqlRS.RecordCount - 1
        lstFromTo.AddItem SqlRS!fullname
        If IsNull(SqlRS!firm) Then
            lstFirm.AddItem "*"
        Else
            lstFirm.AddItem SqlRS!firm
        End If
        SqlRS.MoveNext
    Next
    SqlRS.close
    Set SqlRS = nothing
hth, pal
--
andrea dot palazzi at tin dot it
xday at libero dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/


Per lo ShutDown prova questo :
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long,
ByVal dwReserved As Long) As Long
Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_FORCE = 4
Private Sub Command1_Click()
    dim res as long
    res = ExitWindowsEx(#####,0&)
    end
end sub
'al posto di ##### metti una delle costanti dichiarate sopra
ciao
            ;-)) Davide ((-:
Newsgroup: it.comp.lang.visual-basic
Titolo: HELP - Crystal Report e Access 2000

Ciao a tutti.Mi č capitato questo problema.
Ho VB6 con Crystal Report 4.6 (era nel cd).
dopo diverso tempo mi č capitato di fare report che non avevo mai utilizzato
con Access 2000.
Bene, mi sono accorto che non riconosce il formato 2000.
Le mie basi dati sono ormai e per sempre in formato 2000. Cosa devo fare ?
Devo comprare una versione piů aggiornata o c'č una patch ?
Grazie a tutti.

 ha scritto nel messaggio
news:C_Jr7.929$jT5....@news.infostrada.it...

Quando fai il report invece di Data File usa SQL/ODBC.
Ciao Roberto - Syd

 ha scritto nel messaggio
news:8yQr7.44619$dJ3.4...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Mimmo - help su importa da scanner (vedi funzioni)

Sto realizzando un programma che mi deve digitalizzare dei documenti
dallo scanner (in formato immagine), stamparle .......
Uso controllo [Wang Image Scan control]
-1 ImgEdit
-2 ImgScan
-3 ImgAdmin
Esempio :
Public Function Stampa(figura As String)
        If figura = "" Then
        figura = "prova.tif"
    End If
    ' ImgEdit1.Image = App.Path & "\" & figura
    ImgAdmin1.Image = Frmdigi.ImgEdit1.Image
    ImgAdmin1.PrintOutputFormat = 2  '0 pix=pix, 1 actual size, 2 fit to
page
    ImgAdmin1.PrintAnnotations = False
    'STAMPA...
     Printer.Copies = 1 'cNum.Value
    ImgEdit1.PrintImage ImgEdit1.Page, ImgEdit1.Page, _
    ImgAdmin1.PrintOutputFormat, ImgAdmin1.PrintAnnotations
End Function
' +++++++++++++++++++++++++++++++
Public Function Digitalizza(figura As String)
 ' ++++++++++++++++++++++++++++++++
 If figura = "" Then
        figura = "prova.tif"
    End If
    If ImgScan.ScannerAvailable = True Then
        ImgScan.Image = App.Path & "\" & figura
        '--------------------------------
        ImgScan.OpenScanner
        ImgScan.ShowSetupBeforeScan = True
        ImgScan.StartScan
        ImgScan.CloseScanner
        ImgEdit1.Page = 1
        ImgEdit1.FitTo 0
        ImgEdit1.SaveAs figura
    Else
        MsgBox "Non ci sono scanner disponibili", _
               vbInformation, _
               "Manca uno scanner TWAIN"
    End If
End Function
--------------
Le due funzioni funzionano funzionano non del tutto.
1 - riesco a importare il documento e di conseguenza a salvarlo, ma se cerco
di stamparlo
mi da un errore sul file (nome del file .......), se invece voglio stampare
un'immagine
gia' memorizzata non ho problemi !!!!!!!
Chi mi puo' dare una mano
Saluti Mimmo (Fg)
un saluto particolare a tutti quelli che mi scriveranno :))
in...@iol.it

prova a dare
printer.paintpicture imgEdit1.picture,0,0
oppure
printer.paintpicture imgEdit1.hwnd,0,0
ciao
--
======================================================
Provate il contascatti per internet disponibile all'indirizzo
http://tucci.tsx.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Exe con Learning Edition ??

Carissimi, considerando l'opportunità di utilizzare per una nuova
applicazione VB6, ho visto il buon prezzo della Learning Edition.
Sulla scatola non c'è scritto nulla in proposito e il sito Microsoft è
oscuro al problema: POSSO REALIZZARE UN ESEGUIBILE DA ME VENDIBILE
COMMERCIALMENTE con qusta versione ??? Anni fa c'era la Standard
Edition, sempre dello stesso livello di prezzo, che compilava il suo
bravo exe, ma ora NON E' CHIARO :...(Learning Edition, più che una
versione 'leggera' con poca spesa, suona come una specie di Working
Model, magari corredato da ampi help e tanti esempi).
Che mi dite poi della velocità degli eseguibili di VB al giorno d'oggi
? Avevo realizzato delle applicazioni con VB3 che, a parte la lentezza
del codice, avevano il problema che il disegno delle form e dei
controlli su essa posti era, a volte, fastidiosamente lento, dando
così, anche se non sempre, un aspetto 'poco professionale' alle
applicazioni. Con alcune 'tecniche' un po ci si rimediava. Oggigiorno
poi un eseguibile VB3 con un pc minimo pentium 100 va benissimo anche
sotto questo profilo. 
Vi ringrazio dell'attenzione e buon lavoro a tutti.
UnoComeVoi 
vincenzoru...@usa.net
(togliere il TOGLIERE per corrispondenza in email).

In realtà la Learning Edition non permette la creazione di EXE e così non è
possibile distribuire le applicazioni create con questa versione di VB.
Per quanto riguarda la velocità delle applicazioni, io sono del parere che,
nonostante quello che dice Microsoft, la velocità è costantemente in
diminuzione. Non sto parlando della velocità del codice, quella dipende
ovviamente dal programmatore, ma della velocità con cui Vb visualizza i form
su video. A volte, quando metto 30-50 controlli su un form, esso rallenta
abbastanza sullo schermo; usare il controllo SSTab (mi pare si chiami così)
è assurdo: quando clicco su una linguetta per cambiare sezione, ci mette
mezzo secondo per aggiornare il form e si vede il programma che "sfarfalla".
In conclusione, ti basti sapere che da un mesetto a questa parte, ho deciso
di studiare a fondo il grande Visual C++.
Buon lavoro....
Damiani Igor
ico...@simcity.it

Uso la Learnin Edition da qualche mese in alcuni corsi di Visual Basic e
assicuro il fatto che compili degli exe (non in codice nativo) e crea i suoi
bravi pacchetti di distribuzione. L'edizione in questione è limitata sotto
altri aspetti ma se non ci sono richieste particolari è ottima per lavorarci
seriamente. Per quanto riguarda la velocità anch'io penso sempre più
seriamente a Visual C++.
GG
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Usercontrol - errore

Ciao a tutti.
Vediamo se qualcuno sa spiegarmi questa.
Ho un mio controllo (non ocx, un ctl che funziona già egregiamente nel mio
progetto exe).
Ora ho preso questo controllo, l'ho aggiunto a un nuovo progetto ocx, ho
aggiunto un altro controllo che farà da contenitore.
Tento di appiccicare il mio primo ctl sul nuovo contenitore.
VB non fa una piega e non mi mostra niente.
pubblico/privato non cambia niente (e non dovrebbe infatti).
Indizio: ho editato a mano il file ctl contenitore aggiungendo il controllo
nella parte di design del contenitore, ricarico il progetto e VB crea un log
con questo criptico messaggio:
"
Riga 13: la classe MioControllo del controllo NomeCheHoDatoAMano non era una
classe di controllo caricata.
"
Che cavolo significa?
Perchè non riesco ad appiccicarci un tubo? (neanche un controllo nuovo).
Ciao

 VB non fa una piega e non mi mostra niente.
Provato ad inserirlo nella lista dei componenti? La butto lì...

 Provato ad inserirlo nella lista dei componenti? La butto lě...
Se ho capito bene non l'ha compilato.
Lo aggiunge proprio al progetto come modulo ctl.
Ciao
Alberto

 Lo aggiunge proprio al progetto come modulo ctl.
Esatto, comunque ho risolto dopo imprecazioni varie.
La colpa era di un riferimento condiviso con un altro riferimento (chiaro
no?) che si riferivano a versioni incompatibili tra loro.
Cioè
Prj1->Prj2->Prj3
 \->Prj3
Prj3 di Prj1 e di Prj2 erano incompatibili tra loro e questo grazie alla
fine progettazione dei nostri analisti (coaudiuvati dai commerciali) non
funziona.
Ciao.
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Newsgroup: it.comp.lang.visual-basic
Titolo: Printer.PaintPicture HELP!!!!!!

Salve ragazzi,
Ho un'immagine in un controllo picture che vedo a video, devo poter
stampare questa immagine, se eseguo printer.paintpicture, ho 2 problemi,
il 1 è che non stampa finchè non esco dal programma, il 2 è che viene di
dimensioni enormi che non entrano su un A4, dell'immagine in questione ne
ho una copia anche su disco .jpg
Grazie a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

ho una copia anche su disco .jpg
Leggi bene la firma di PaintPicture(): vedrai che ti permette di
specificare le dimensioni in output.
-- 
ciao,
hal

Grazie hal1961,
Ora funziona, però c'e' un modo per adattare l'immagine al foglio?, ossia
se stampo su una stampante A4, come faccio a sapere i valori che devo dare
a paintpicture?, se poi vado su A3? come si fà?, es.
a = picScan.Picture.Width
b = picScan.Picture.Height
a1 = a / 2
b1 = b / 2
Printer.PaintPicture picScan.Picture, 0, 0, a1, b1, 0, 0, a, b
sul foglio esce bene però riduco sempre a metà l'immagine
hal1961 ha scritto:





-- 
questo articolo e` stato inviato via web dal servizio gratuito 


sul foglio esce bene però riduco sempre a metà l'immagine
Printer.ScaleWidth e Printer.ScaleHeight, mi pare
-- 
ciao,
hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Hashtable

ciao a tutti, ho una hashtable cosi' popolata
Dim colonne As New Hashtable
colonne.Add("id_pezzo", "Id pezzo")
colonne.Add("codice", "Codice")
colonne.Add("nome", "Nome")
colonne.Add("descrizione", "Descrizione")
colonne.Add("standard", "Standard")
colonne.Add("codice_materiale", "Codice materiale")
colonne.Add("codice_cmc", "Codice cmc")
poi ad un certo punto del codice devo recuperare i valori inseriti e faccio
Dim entry As DictionaryEntry
   For Each entry In colonne
     Dim chiave As String = entry.Key
     Dim valore As String = CType(entry.Value, String)
     ......
   Next
però questi mi vengono stampati in un ordine apparentemente casuale, 
mentre io vorrei mantere l'ordine in cui li ho inseriti.
come si può fare?
ciao e grazie
Mauro

"Innuendo" <prova@b.c> ha scritto nel messaggio 
news:4ca5e8e2$0$18988$4faf...@reader5.news.tin.it...

Usa una NameValueCollection anziché una HashTable.
Bye
Raf 

 Usa una NameValueCollection anziché una HashTable.
prova una dictionary ;)
 

 Mauro
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 SortedList o SortedDictionary e non hashtable
Ciao, ho provato il tuo suggerimento ma non funziona come vorrei.
Io vorrei scorrere gli elementi che ho aggiunto e vederli esattamente 
nell'ordine che ho impostato io in fase di creazione dell'elenco.
Nell'esempio di sopra vorrei che mi stampasse per primo id_pezzo, poi 
codice, poi nome e poi descrizione.
Con la SortedList o SortedDictionary me li stampa in ordine alfabetico 
che non è quello che voglio.
Ho provato a cercare nella documentazione della SortedDictionary ma non 
ho capito se e come si può ottenere quello che mi serve.
C'e' modo di memorizzare una serie di coppie chiave-valore in un certo 
ordine e poi recuperarle nello stesso ordine in cui sono state inserite?
ciao e grazie
Mauro

"Innuendo" <prova@b.c> ha scritto nel messaggio 
news:4ca9dcc2$0$41849$4faf...@reader5.news.tin.it...

Hai provato il mio suggerimento di usare la NameValueCollection?
Ti riporto un pezzo di codice adattato al tuo caso:
        Dim colonne As New Specialized.NameValueCollection
        colonne.Add("id_pezzo", "Id pezzo")
        colonne.Add("codice", "Codice")
        colonne.Add("nome", "Nome")
        colonne.Add("descrizione", "Descrizione")
        colonne.Add("standard", "Standard")
        colonne.Add("codice_materiale", "Codice materiale")
        colonne.Add("codice_cmc", "Codice cmc")
        Dim sb As New System.Text.StringBuilder
        For Each key In colonne.AllKeys
            sb.AppendLine(String.Format("key: {0} - value: {1}", key, 
colonne(key)))
        Next
        MessageBox.Show(sb.ToString)
Il messagebox dovrebbe riportare le coppie esattamente nell'ordine in cui 
sono state inserite.
Ciao
Raf 

 Ti riporto un pezzo di codice adattato al tuo caso:
Grazie, funziona perfettamente !!!
ciao
Mauro
Newsgroup: it.comp.lang.visual-basic
Titolo: ftp e direttori

hO UN PICCOLO PROBLEMINO;
USANDO IL CONTROLLO INET, UNA VOLTA CHE CON IL COMANDO LS HO IL LISTATO DEL
MIO SITO, POSSO INSERIRE IL CONTENUTO DEL MIO SITO IN UN CONTROLLO DIR
LISTBOX?
IN SOSTANZA MI STO FACENDO UN PROGRAMMINO PER FARE FTP CON IL CONTROLLO
INET, SAREBBE PIů CARINO SE POTESSI VEDERE IL CONTENUTO DEL COMPUTER REMOTO,
UNA VOLTA COLLEGATOMI CON FTP, IN UN SEMPLICE DIR LISTBOX ....GRAZIE PER
L'AIUTO E UN SALUTO A TUTTI.....ThH

 wrote in message
9__N5.12084$BF.3...@news.infostrada.it...


 collegarsi all' FTP tramite password ma solo in modo anonimo.
Permettimi di contraddirti... l'username e password funzionano benissimo
prima devi impostare:
INET.protocol=ftp
INET.UserName
INET.PassWord
poi devi usare i comandi INET.Execute...
non ho sottmano i sorgenti di un programma che ho fatto, che trasmette in
FTP ad un server VMS, alcuni file, loggandosi come root.
Se li trovo te li allego...
ciao.

 wrote in message
_a%N5.12261$BF.4...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Visual basic e registro di sistema

ciao a tutti, vorrei sapere eventuali funzioni di visual basic per operare sul registro di sistema (leggere, scrivere, ecc..)
grazie

grazie
Devi andare di API, qui ci sono alcuni esempi:
http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=45115&lngWId=1
http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=27955&lngWId=1
http://www.vbaccelerator.com/home/VB/Code/Libraries/Registry_and_Ini_Files/Complete_Registry_Control/article.asp
--
ciao
  Stefano

salve
in VB6 c'era l'oggetto WScript.Shell
che tra le altre ti permetteva di scrivere su qualsiasi chiave di
Windows
dim WSS as Object
set WSS=createobject("WScript.Shell")
wss.regwrite "PERCORSO_CHIAVE", [TIPO_VALORE] , "VALORE"
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: dir$(*.*) in ordine di data

è possibile tramite la funzione dir$ avere l'elenco dei files presenti nella
directory, in ordine di data/ora?
grazie per la risposta

la funzione Dir$ non supporta l'ordinamento, per quello che ne so.....
ti conviene forse utilizzare questa funzione per caricare tutti i files
dentro una listview o simili, per poi effettuare l'ordinamento da lì, con la
proprietà Sorted=True......
qualche thread fa, avevo letto di una funzione che reperiva data/ora di un
certo file, cercala, perchè ti serve anche quella.........
ciao, e good coding!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

 certo file, cercala, perchè ti serve anche quella.........
FileDateTime --> F1
Un Paperino monoriga.
Newsgroup: it.comp.lang.visual-basic
Titolo: :-( Cancellazione )-:

Ragazzi ho cercato nel sito comune, ho provato a farlo io, ho pregato il Dio
che mi potesse illuminare... ma niente
non riesco a cancellare una chiave dal registro!!
Se qualcuno di voi e' in ascolto...
dovrei cancellare una chiave su
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices
e dopo dover riavviare per cancellare il file utilizzato...
se qualcuno sa come fare, magari senza bisogno di riavviare il PC, puo'
salvare una vita :-))
NighTiger

 wrote in message
7mkrid$7uh$4...@fe2.cs.interbusiness.it...



Si... ho letto il tuo msg, completo ma non rispondeva alla mia esigenza.
Anche xche' cerco sempre il metodo piu' corto.
Cmq ho risolto il problema.
Copiando il registro interessato ho potuto notare che la chiave
con Nome (Predefinito) viene prodotta tramite una @ = valore.chiave.
Dunque la soluzione piu' veloce e':
copiare la chiave e sovrascriverci quella nuova.
Le scelte sono:
1- Chiamare una shell, copiare la chiave con un nome .reg scelto da noi,
aprire il file in modo sequenziale
     trovare la stringa che ci serve e aggire.
2- Identificare il percorso con uno nome dimensionato a stringa, If nome =
"@" ect etc
     Verificare se la chiave e' quella giusta ed agire.
Il primo metodo implica da parte nostra la conoscenza dei comandi DOS per
regedit.
Ma questi mi sono estranei.
Ho fatto determinate prove ma niente.
Il secondo metodo e' anche buono, e' piu' veloce ma, secondo me, meno
preciso.
Cmq il metodo da applicare deve essere scelto in base alle proprie
conoscenze
NighTiger

Newsgroup: it.comp.lang.visual-basic
Titolo: problemino con textbox

Il codice in calce mi da come risultato 10322, perché non viene riconosciuto
il punto come separatore decimale di AAA. Se invece Text1 è "5,161"
l'errore non si verifica.
Come posso usare il punto come separatore decimale senza incorrere
in errore ??
Grazie a chi mi risponderà.
+++++++++++++++++++++++++++++++++++
Dim AAA As Double, BBB As Integer, CCC As Double
Text1.Text = "5.161"
AAA = CDbl(Text1.Text): BBB = 2
CCC = AAA * BBB

On Fri, 01 Mar 2002 17:06:00 GMT, "Nino" <anton...@Virgilio.it>
wrote:

AAA=cDbl(Replace(Text1.Text,".",","))
Ciao