mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Anagrammi di una parola

Qualc'uno potrebbe aiutarmi dandomi una idea su come scrivere un programma
che, data una parola mi ricava tutti gli anagrammi?????
La mia idea era di utilizzare la funzione random sulle lettere che
compongono la parola, ma se c'è una strada + semplice vi prego di
mostrarmela!
Grazie


http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&threadm=ajapea%24nrc%241%40lacerta.tiscalinet.it&rnum=3&prev=/groups%3Fhl%3Den%26lr%3D%26ie%3DISO-8859-1%26q%3Danagramma%26btnG%3DGoogle%2BSearch%26meta%3Dgroup%253Dit.comp.lang.visual-basic
leggi tutto il thread!
Ah, la prossima volta usa anche tu google!!!
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 che, data una parola mi ricava tutti gli anagrammi?????
Puoi provare con la routine (tradotta dal C) che ho messo nel
progetto CalcComb reperibile a 
http://www.flanguasco.org
Ciao e se poi ti servisse altro aiuto contattami pure.
Franco

 ha scritto nel messaggio
news:b2bni9$s56$1...@ventolo.computerville.it...

Da un mio precedente post:
Public Function Perm(ByVal S As String) As Collection
    Dim Ret As New Collection, Car As String, ToAdd As String, Aux As
Collection, W
    If Len(S) = 1 Then
        Ret.Add S
    Else
        Car = Left$(S, 1)
        Set Aux = Perm(Mid$(S, 2))
        For Each W In Aux
            For i = 0 To Len(W)
                ToAdd = Left$(W, i) & Car & Mid$(W, i + 1)
                Ret.Add ToAdd
            Next i
        Next W
    End If
    Set Perm = Ret
End Function

 che, data una parola mi ricava tutti gli anagrammi?????
Di solito utilizzo e questo semplicissimo algoritmo per gli anagrammi
e le permutazioni
Sub anagramma(a, b)
  l = Len(b)
  If l = 0 Then fai_quello_che_serve
  For i = 1 To l
    anagramma a & Mid(b, i, 1), Left(b, i - 1) & Mid(b, i + 1)
  Next i
End Sub
Dove fai_quello_che_serve può andare dall'incremento del contatore
delle
soluzioni al tentativo di accesso al bancomat.
La routine va invocata semplicemente con:
anagramma "" , stringa_da_anagrammare
Risolvendo un problema ho avuto la necessità di lavorare con lettere
ripetute, ed ho aggiunto una variabile con le lettere già usate (gu)
per
evitare di contare più volte la stessa parola.
Sub anagramma(a, b)
  l = Len(b)
  If l = 0 Then fai_quello_che_serve
  gu = ""
  For i = 1 To l
    c = Mid(b, i, 1)
    If InStr(gu, c) = 0 Then
      anagramma a & c, Left(b, i - 1) & Mid(b, i + 1)
      gu = gu & c
    End If
  Next i
End Sub
Ciao, Silv:o)

 progetto CalcComb reperibile a 
http://www.flanguasco.org
Presente anche in forma di classe sul Sito Comune
Ciao
--
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

 Presente anche in forma di classe sul Sito Comune
Assolutamente vero!!  Scusami, Zanna, l' avevo dimenticato :-(
Ciao a tutti.
Franco

 Scusami
E di che?
Il "core" č tuo :)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] rubrica di Outlook Express

ciao a tutti
esiste la possibilità di referenziare qualche libreria o controllo ocx, che
mi permette di usare alcune funzionalità di outlook express? Sto facendo una
semplice applicazioncina gestionale, e dovrei gestire la rubrica di outlook
express.
ciao e grazie Rea

se cerchi nei post vecchi, troverai una qualche DLL/OCX che credo faccia al
caso tuo, perchè permetteva l'accesso ai file WAB, che sono appunto le
rubriche di Outlook Express......
potevi consultare, aggiungere, rimuovere contatti nella rubrica.......
io non l'ho provata, ma sembrava carina e ben funzionante........
ecco.....l'ho trovato......segui questo link
http://www.locati.it/michele/kwab/default.asp
Good Coding anche a te!!!!!
--
Damiani Liborio Igor
idam...@hotmail.com
 - 
igor.d...@light.it
http://www.igordamiani.it
ICQ : 11847262

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

Ciao a tutti.
Scusate la domanda per molti banale.
vorrei ottenere dopo una divisione o percentuale un numero intero
approssimato. Esempio 4999.996 = 5000
Ho provato con Int, fix , CInt ecc.ecc  e il valore restituito è 4999.
Colto da grande panico ho deciso di rivolgermi al NG.
Grazie anticipate. Giuseppe
gius...@infoservizi.it

Ti va bene la funzione Round()?
Ciao


 ha scritto nel messaggio
news:8o6aqv$rjo$1...@fe1.cs.interbusiness.it...



se aggiungi 1 il numero 1000 esatto diventa 1001.
Dovresti aggiungere ,999  (arrotondamento a tre decimali)
oppure ,9999  eccetera, poi usare INT per l'arrotondamento
per eccesso.
Oppure ,499 o ,4999 per arrotondare per eccesso/difetto.
Ma esiste gia' round() bell'e pronto
--
Frogman
indirizzo e-mail corretto: 
be...@reboot.to
--------------------------------------------------------
Abito in un paese cosi' piccolo che non abbiamo nemmeno
lo scemo del villaggio.  Dobbiamo fare a turno.
--------------------------------------------------------

Ciao
Scusa Round sarà forse in VB6 , ma nel mio VB5 non la trovo....
cosa mi puoi dire?

 Ho provato con Int, fix , CInt ecc.ecc  e il valore restituito č 4999.


 Ho provato con Int, fix , CInt ecc.ecc  e il valore restituito è 4999.


 Ma esiste gia' round() bell'e pronto
Non ti fare fregare, round non funziona affatto come verrebbe spontaneo
pensare.
Prova a eseguire questo nella finestra di debug, e vedi se il risultato non
è strano:
? Round(1.5),Round(2.5)
Vedrai che ti viene 2 in entrambi i casi.
In realtà nel caso di "*.5", il risultato di Round dipende dal fatto che la
somma delle cifre sia pari o dispari. Se è pari, arrotonda per eccesso, se è
dispari per difetto.
Questa tecnica è molto usata in America, si chiama Banker's round, serve per
far quadrare statisticamente gli arrotondamenti, ma qui in Italia non è
accettata.
Ergo, se scrivi programmi gestionali, evita accuratamente di usare
l'istruzione Round di VB.
Con l'arrivo dell'Euro, prevedo una strage di programmi a causa di questo
piccolo particolare.
Ciao
*Roby*


wrote:


 > Ho provato con Int, fix , CInt ecc.ecc  e il valore restituito è 4999.


 > > Ho provato con Int, fix , CInt ecc.ecc  e il valore restituito č 4999.

Newsgroup: it.comp.lang.visual-basic
Titolo: Help Con excel

Ciao a tutti,
Ho un piccolo problema con Excel.
Ho creato un Activex-dll in VB che mi crea un foglio Excel, me lo riempie e
poi me lo chiude (semplicemente
mi apro Excel con Dim AppExcel As New Excel.Application e poi alla fine la
chiudo con AppExcel.Quit).
Il problema è che l'Excel rimane tra i task attivi, non si chiude!!!! Mi
sono accorto che se invece di registrarla la DLL la metto in esecuxione (F5
di VB) allora quando la stoppo la DLL allora si chiude anche Excel.
Come posso fare in modo che Excel non rimane attivo tra i task se registro
l'Active-X Dll???
Premetto che il metodo della DLL viene chiamato da una pagina ASP, non è che
tutti questi problemi vengono causati da IIS???
Aspetto Aiuti
Grazie

 Il problema è che l'Excel rimane tra i task attivi, non si chiude!!!!
[...]
    Dim AppExcel As Excel.Application
    Set AppExcel = New Excel.Application
    ' ...
    AppExcel.Quit
    Set AppExcel = Nothing
    Ma consulta anche, con google, i numerosi post del ng sull'argomento
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 > Il problema č che l'Excel rimane tra i task attivi, non si chiude!!!!


 Aspetto info grazie!!
    Se vuoi posso parlarti del tempo, di Mozart, di Patty Pravo, ...


Newsgroup: it.comp.lang.visual-basic
Titolo: [API] splitter

Ciao a tutti
ho realizzato uno splitter, ma a differenza di quello presente sul newsgroup
il mio purtroppo non usa le API. Devo dire che č decisamente piů veloce di
quello sul newsgroup, (circa 10 min in meno) ma utilizza la CPU al 100%..
Esieste un modo čer evitare ciň attraverso l'utilizzo delle API?
Grazie!

 ha scritto nel messaggio
news:8Xkf9.2873$qE6....@tornado.fastwebnet.it...

Ma uno splitter di che ?

Hai ragione, chiedo venia. Uno splitter di files. Si insomma si carica un
file e si imposta la dimensione massima delgi spezzoni, e lui esegue.
"Fox Mulder" <fili...@NOSPAMtiscali.it> ha scritto nel messaggio
news:alkntp$gu8$1...@fe2.cs.interbusiness.it...


 file e si imposta la dimensione massima delgi spezzoni, e lui esegue.
quando si lavora su disco c'è sempre un uso maggiore di cpu...
non credo che ci puoi far molto

 non credo che ci puoi far molto
Si ma in giro ne ho visti altri che, anche se ci impiegano di +, utilizzando
le api riescono a far lavorare molto di meno la cpu, comunque meno del 10%.
Io mio la spreme al 100% :,(
L'unica consolazione è la velocità!

 ha scritto nel messaggio
news:9tmf9.2966$qE6....@tornado.fastwebnet.it...

E che te frega ...
Io preferirei sfruttare al massimo la CPU ma per poco tempo piuttosto che
sfruttarla poco ma per molto tempo .. tanto quando lavora l'HD non puoi fare
praticamente altro .
Saluti ...
PS aspettiamo il binario / sorgente sul sito comune.
Newsgroup: it.comp.lang.visual-basic
Titolo: Emulare il tasto TAB

Ho la necessitą di passare da un controllo text o commad
con il tasto invio invece dell tasto TAB (tabullazione) .
Qualcu sa come si fą? 

 Qualcu sa come si fà?
Nel form metti keypreview=TRUE
E nel Form_Keydown:
If Shift = 0 Then 'Scorrimento con tasti freccia o Invio
  If KeyCode = vbKeyUp Then 'Freccia sù
    KeyCode = 0
    SendKeys ("+{TAB}"), True
  End If
  If KeyCode = vbKeyDown Or KeyCode = vbKeyReturn Then 'Freccia giù o Invio
    KeyCode = 0
    SendKeys ("{TAB}"), True
  End If
End If
Oppure lo gestisci per ogni singolo componente.
-- 
DBMS Firebird
VB6 + Ado

Grazie.
"Andrea [Work]" <nos...@invalid.invalid> ha scritto nel messaggio 
news:d9ax5u23fe56.f...@40tude.net...


Newsgroup: it.comp.lang.visual-basic
Titolo: WPF: GridLines dentro una ListView

WPF-VB.Net 2010
Come si fa a inserire le linee orizzontali (equivalente di una GridLines 
dentro la listview di una Form) dentro una listview di una Windows di WPF?
Nero23 

 Nero23
.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

Ok. grazie 1000

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Autocomposizione installazioni e "dipendenze" (??)

Talvolta, nel creare i pacchetti di installazione, VB mi segnala che "le
dipendenze relative al controllo non sono aggiornate" o qualcosa di
simile.... cosa vuol dire? ho guardato in MSDN e dice che se si tratta di un
componente di VB in pratica dovrebbe risolvere da se il problema (e allora
perché me lo segnala, dico io...), mentre se si trattasse di un controllo
originale (creato da me, ma io non saprei neanche come fare...) dovrei
creare il file di dipendenze (questo saprei come farlo, ma non ho un
originale su cui farlo!!)
Ovviamente un pacchetto di installazione in cui viene ignorato tale problema
non funziona, per cui il problema va risolto in qualche modo.... preso dalla
disperazione ho escluso il controllo incriminato dal pacchetto (mscal.ocx,
se qualcuno sa cosa possa essere...) e sorpresa: il programma funziona alla
perfezione!!
comunque, a parte questo.... quale è la soluzione VERA al problema?
Grazie!


La soluzione che ti propongo è: da gestione risorse (o quel che è) controlla
la versione del tuo ocx (proprietà). Segnati la versione e la data di
creazione. Apri il file dep relativo con un editor ed alla chiave version
sostituisci il numero appena scritto (la data provi ad inserirla nel caso in
cui non funzionasse in questo modo). Generalmente, se nell'ocx nuovo non
hanno aggiunto altre dipendenze,  l'operazione dovrebbe funzionare.
Ciao Marco

 hanno aggiunto altre dipendenze,  l'operazione dovrebbe funzionare.
E' anche il trucco consigliato da M$ per questi casi.
Zeross



Newsgroup: it.comp.lang.visual-basic
Titolo: come faccio a sapere l'ip del mio pc in internet

come da oggetto.

Come da oggetto.
http://groups.google.com/groups?hl=it&lr=&ie=UTF-8&oe=UTF-8&threadm=bR9q5.144066%24dF5.2421644%40news.infostrada.it&rnum=2&prev=/groups%3Fq%3Dconoscere%
2Bip%2Bcomputer%2Bgroup:it.comp.lang.visual-basic%26hl%3Dit%26lr%3D%26ie%3DU
TF-8%26oe%3DUTF-8%26selm%3DbR9q5.144066%2524dF5.2421644%2540news.infostrada.
it%26rnum%3D2

 se sapessi ke cercare, l'avrei già fatto. ;)
Guarda più sotto, c'è il link...


www.bitmarket.it/ip.php3
:-)

 ha scritto nel messaggio
news:bduo1a$11aino$1...@ID-106271.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: GUID





non sono riuscito a trovare il messaggio in cui si 
spiegava come ottenere l'dentificativo univoco del processore... potete 
postarmelo, spedirmelo, che ne so...


 


ah, una volta sul sito Intel ho visto che c'era una 
cosa simile, si doveva scrivere in assembly


 


mov eax,1 ; o forse un altro valore, ora non 
ricordo...


cpuid


 


e lui restituiva un numero a 96 bit che era appunto 
l'identificativo del processore. ma quell'istruzione CPUID è sicuro che si può 
usare in un normale programmino asm compilato (che so) con MASM?


grazie


 


mario


 


 



 asm compilato (che so) con MASM?
Gli assembler Pentium-compliant hanno il token.
Vedi le specifiche del tuo assembler.

Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire un Files

Ciao a tutti,
                il mio problema è il seguente:
1 Io voglio aprire un Files
2 criptare il files con una funzione che ho gia
à fatto
3 salvarlo in modo cripteto.
Sapete darmi qualche consiglio ?
Grazie a tutti in anticipo
Alberto 

 Sapete darmi qualche consiglio ?
Si tratta di questo, oppure ho travisato?
-- 
Emanuele Torrenti
http://torrenti.altervista.org

 3 salvarlo in modo cripteto.
Pugliese?


Newsgroup: it.comp.lang.visual-basic
Titolo: Smart Card e Framework

Esiste qualche classe del framework per leggere i dati contenuti in una 
smart card? 

 una smart card?
No, non nativamente.
Devi usare tools di terze parti.
Ad esempio: 
http://www.axalto.com/access/smartcards/cryptoflexnet.asp
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 ha scritto nel messaggio 
news:dtvp9c$nc8$1...@area.cu.mi.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Out of stack space, VB3 HELP

Sto scrivendo un'applicazione in VB3 e mi sono imbattuto nel seguente
errore: "Out of stack space"
L'applicazione crea un eseguibile di circa 2,5Mb.
E' possibile aumentare lo spazio stack a disposizione?
Come posso ovviare a questo problema senza passare a VB4 o successivi
(vi sarebbero ben altri problemi).
GRAZIE MILLE

...

L'errore "Out of stack space" è tipico quando c'e' una routine ricorsiva;
questo vuol dire che all'interno della routine c'e' una chiamata a se
stessa.
Ogni routine di questo tipo deve prevedere una condizione di uscita, cioe'
di fine
ciclo per l'emissione della serie di esiti di chiamata accumulati nello
stack,
appunto, che non e' inesauribile, e quindi poter deallocare la memoria.
Un esempio puo' essere il calcolo di un numero fattoriale, ecc. ecc.
Newsgroup: it.comp.lang.visual-basic
Titolo: [COMMONDIALOG] Settarla a nothing.....

Ciao a tutto il Ng,
ho un'applicazione che lavora con sql 7, il tutto gestito da una variabile
globale (non me ne vogliate :)) ) in cui è impostata la connessione al
server.
In una procedura uso la Commondialog per andare a leggere in una tabella fox
presente sul floppy, poi appendo nel db di Sql. Tutto funziona perfettamente
(Cofh Cofh), tranne
nel caso in cui la tabella è sul floppy...
Ovvero all'uscita della procedura di importazione, non so per quale motivo,
quando apro una connessione al db:
    dim ConAdo as new adodb.connection
    ConAdo.Open sFileUDL
    'sFileUDL contiene la stringa di connessione al DB
Oltre che aprirmi la connessione va a leggere ancora sul Floppy.
Non succede niente se è ancora presente, altrimenti viene lanciato il solito
messaggio di esplora risorse : "Floppy non presente...."
Ovviamente se sceglo un percorso su Hard Disk non succede nulla...
Il brutto è che nella procedura di importazione non faccio assolutamente
nulla, apro solo la tabella e appendo nel db, all'uscita scarico tutti gli
oggetti, tranne la commondialog perchè non posso (set common = nothing da
errore).
Ah dimenticavo, non manipolo la variabile globale...
Se in seguito chiudo il programma e lo riapro va tutto bene....
Avete qualche "idea" e/o "consiglio" e/o "Bug" e/o "Ogni cosa che vi salta
in mente" ?
Non so proprio + cosa fare....
Ciao e grazie a tutti..
Oz

 Ciao a tutto il Ng,
Non che abbia capito bene l'esatto flusso del programma, tuttavia:
1) la Connection che usi per aprire il database fox è chiusa?
2) com'è settata la .initdir della commoddialog?
3) e la cdlOFNNoChangeDir e la cdlOFNPathMustExist?
ciao
ugo

 3) e la cdlOFNNoChangeDir e la cdlOFNPathMustExist?
Rispondo con le righe di codice
    Dialogo.DialogTitle = "Selezione File ricevuto"
    Dialogo.InitDir = App.Path
    Dialogo.Filter = "Esportazioni Rapportini (TRAS-PRE.DBF)|TRAS-PRE.DBF|"
    Dialogo.FileName = IIf(TXT(Index).Text <> "", TXT(Index).Text, "")
    Dialogo.Flags = cdlOFNFileMustExist Or cdlOFNHideReadOnly
    Dialogo.ShowOpen
Secondo te cosa può essere?
Ciao e grazie ancora.
Oz

 Secondo te cosa può essere?
esegui una
    ChDrive "c:"
    ChDir App.Path
dopo il codice di apertura dei dati dal floppy
Win ha sicuramente settato il drive corrente su a:
ciao
ugo


GRAANDE, sei 1 mito!!!!
Non sapevo che esistevano queste funzioni (sai l'elenco è bello lungo)....
Mi hai risparmiato 1 faticaccia....
Ciao e grazie 3000000000
Oz
Newsgroup: it.comp.lang.visual-basic
Titolo: modem

ciao,
ho trovato in rete questo codice:
Dim NumeroDiTelefono As String
NumeroDiTelefono = "055-555555"
Open "COM2:" For Output As #1
   Print #1, "ATDT" & NumeroDiTelefono & Chr$(13)
Close #1
serve a comporre un numero col modem. sapete altri comandi, quello per
chiudere la chiamata, ecc...? o sapete dove posso trovarli ? grazie
--
-=GicK=-
gi...@gick.cjb.net

 chiudere la chiamata, ecc...? o sapete dove posso trovarli ?
    Di solito i *comandi AT* sono elencati nel manuale del modem...
    Fai anche cosi': nella casella indirizzo di Microsoft Internet Explorer
digita:
        comandi at
e premi invio.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere campo a tabella con Index

Salve a tutti,
ho letto molti post sull'argomento "Aggiungere un campo ad una tabella
tramite codice" ma non ho risolto il mio problema:
Aggiungere un campo in tabella indicandone anche la posizione da
assumere.
Mi spiego meglio:la mia tabella ha 25 campi,devo aggiungerne 1,ma, per
problemi che non sto a raccontare,ho bisogno di aggiungerlo in
posizione "10". E' possibile?O sono costretto ad "appenderlo" in coda?
Thanks


Innanzitutto non specifichi quale dbms usi, e già questo ti preclude molte 
risposte.
Comunque, supponendo tu stia utilizzando MSDE o Sql-Server:
l'ordine delle colonne non è gestito dal db.
Questo è un 'purismo' relazionale che personalmente non apprezzo.
Cioè, è vero che l'ordine delle colonne non dovrebbe inficiare il 
funzionamento del sw, ma è pur vero che per molte cose di tipo raw, ad 
esempio per tool di amministrazione o altre cosine poco curate graficamente, 
un bel 'Select *' è più comodo dell'elenco dei campi. E, quindi, sarebbe 
comodo poter cambiare ordine alle colonne.
Lo standard SQL, però, fornisce solo l'ADD della COLUMN, ma non ammette la 
posizione.
Il modo migliore per effettuare questa cosa è attraverso l'Enterprise 
Manager.
Apri la struttura della tua tabella, aggiungi in coda la colonna nuova, NON 
SALVI, sposti la colonna nella posizione che ti serve col drag&drop, NON 
SALVI, clicchi su 'genera script modifiche'.
Ti appare uno script T-SQL che puoi copiaincollare nel tuo codice.
Quando però vedrai lo script, capirai quanto quetsa operazione sia 
complessa. Infatti, Sql aggiunge la nuova colonna con il valore di default, 
crea una tabella d'appoggio con le colonne nel nuovo ordine, trasferisce 
TUTTI i dati da una tabella all'altra, elimina la vecchia tabelle, rinomina 
la tabella di appoggio col nome della vecchia.
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene...
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] vb 2 vbscript

Debbo migrare una procedura di accesso ai dati che risiedeva in una dll in
un file vbs il problema č che non potendo referenziare ado debbo usare la
createobject e se prima questo funzionava:
...
...
dim rs as object
set rs=createobject("Adodb.recordset")
...
 rs.Open "Select * from
tabella1", cn, rs.adOpenDynamic, rs.adLockReadOnly
adesso le costanti
adopendynamic e adLockReadOnly non sono piů riconosciute, lo so che potrei
scrivere direttamente il valore ma prima vorrei sapere se č possibile
usarle senza referenziare la libreria adodb....
grazie mille....
--------------------------------
Inviato via 
http://usenet.iol.it

 usarle senza referenziare la libreria adodb....
No, non puoi usarle dato che non puoi referenziare la type library di ADO.
Piuttosto che sostituirle con il loro valore numerico (che renderebbe meno
leggibile il codice), ti suggerisco di definire delle costranti:
Const adOpenDynamic = 2
Const adLockReadOnly  = 1
Ciao!
--
Lorenzo Benaglia
UGIdotNET - 
http://www.ugidotnet.org

Newsgroup: it.comp.lang.visual-basic
Titolo: Cache ADO

Salve,
(se erro prego di correggere)
alla apertura di un recordset il valore della Cache di ADO è = 1, se ho
capito scorre un solo record alla volta .
Da un testo leggo "non esiste un metodo scientifico per determinare la
CacheSize ottimale, ma in generale si ritiene che 100 sia un buon valore" .
Ho effettuato alcune prove con valori 1 , 10 , 50 , 100 ; ho controllato il
tempo di esecuzione ma è rimasto identico.
Avete constatato vantaggi nell'aumentare la CacheSize di ADO ?
Si potrebbe dare un valore pari al numero di record ?
giuseppeD

 Si potrebbe dare un valore pari al numero di record ?
Allora fai che fare una
.cursorlocation = aduseclient
che č meglio.
( Tra l'altro, per impostare una cachesize=recordcount dovresti
- determinare il recordcount con una COUNT o lavorando sul recordset
- modificare la cachesize
- eseguire una resync del recordset (e quindi, di fatto, rileggerlo!)
)
ciao
ugo

 di 4mln record,prevedendo l'obiezione di Pal!)
cosa ti fa pensare che j si interessi di tecnologie ormai obsolete come
ado ? sta gia' guardando ai db su flashcard, con seek da nanosecondi...
ciao,
j.net


 ugo
Ottima lezione
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Meglio proteggere o no i programmi? (Era: Re: Chiavi hardware economiche, dove?)

 
Questo e' un discorso che vale per programmi di uso generale a larga
diffusione (come sono ad esempio i programmi contenuti in Office).
Nel caso di programmi gestionali scritti spesso per un target molto
ristretto, una protezione secondo me e' necessaria.
-- 
Samuele Battarra
mail server: 
libero.it
, indirizzo: battarsa@(mail server)
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/leggiminews.html

 ha scritto nel messaggio
news:WbH67.14941$NZ6.5...@news.infostrada.it...


 qualchesia genere!
Beh, a onor del vero esistono anche prodotti non "di uso generale a larga
diffusione", ma neanche "il cui utilizzo è specialistico"...
:-)
ciao
ugo

[...]
Cmq se il target è ristretto mi
spieghi a cosa servirebbe fare una copia?
[...]
Se vendi un software ad uno a 5 milioni, sarebbe bruttino che questo si
metta a copiarlo in giro... sai soldi che (virtualmente) perderesti? Ogni
cliente che ha una copia pirata è un cliente perso...
CiaoZ
SebaMix

 ha scritto

a parte che a ben vedere, e a finanza addestrata, direi di no (come
giustamente diceva qualcuno nel thread, se bill avesse messo delle
chiavi hw ai suoi sw avrebbe meno soldi della media di noi del ng: 10
piratati =  almeno 1 comprato, ma in genere di piu') -- se il target e'
'ristretto' = 'personalizzato' prob il sw e' molto personalizzato: dalle
intestazioni di form e stampe, alle procedure.
se un'altra ditta se lo copia, deve poi riadattarsi il workflow alle
procedure del piratato. e cambiare ragione sociale. ehehe.


Questo non č vero:
Ho installato una copia piratata di "Internet Explorer offerto da Libero",
ma non ho cambiato ragione sociale in "Libero", bensě in "Selvaggia"...
:-)
ciao
ugo

 Ho installato una copia piratata di "Internet Explorer offerto da
Libero",
se e' libero, non e' piratata :)
Newsgroup: it.comp.lang.visual-basic
Titolo: MESSAGGIO IMPORTANTE







Spett.Le Mailgate.it,
sono un ragazzo di 24 anni 
di Milano.
H in mente una gran bella idea un progetto da sviluppare ..una 
sorta di cosolle vendibile su scala mondiale.
Un progetto decisamente 
fattibile e poco costoso ma purtroppo mi mancano le risorse tecniche per poterlo 
implementare e strutturare.
Nel vostro organico sicuramenrte ci sarà del 
personale o dei tecnici in grado di aiutarmi e ..disposti a gettarsi in questo 
progetto assieme a me.
Dove sta la vostra sede legale?
C è qualcuno che mi 
sta ascoltando?
Se ne potrebbe parlare meglio sempre che voi o qulcuno di vio 
sia interessato:-)
Saluti:-)
GIo.



ao', ma che stai addě?
e non postare in html !!!!!!!!

Abbiate pazienza..................
vorrei creare una macro in vba che possa fare questa routine.....
Ho un file di excel chiamato pippo nella cella A1 ho il numero 10!!
Nel secondo file di Excel chiamato PROVA voglio che nella cella B1 compaia
il numero 10 derivante dal file pippo.
(se si potesse vorrei che comparisse il risultato della cella A1 del primo
file anche se questo non č aperto)
Grazie
Skiro

> skiro:

file anche se questo non è aperto)
Vuoi dire che non ti basta, o non ti va bene, il normale collegamento fra le
due celle? Del tipo:
    Cartella PROVA.XLS
    Foglio1
    Cella B1: ='C:\Documenti\[PIPPO.xls]Foglio1'!$A$1
?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Costante per doppio apice

 
          Salve a tutti, deve fare un replace su una stringa di visual basic che
contiene il doppio apice
dato che non posso scrivere Replace(str1,""","pippo"), non posso cioè usare
tre apici consecutivi.
qual'è il modo migliore per far si che il mio replace trovi il mio doppio
apice?
grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 doppio apice?
A parte che potresti scrivere
Replace(str1,"""","pippo")
il codice ascii del doppio apice è 34. Ero tentato di dirti che è 
sufficiente usare la funzione Asc per conoscere il relativo codice ascii di 
un qualsiasi carattere, però è chiaro che se non sapevi che un doppio apice 
in una stringa si può rappresentare con 2 doppi apici, non immaginavi che 
potevi ottenere il codice ascii semplicemente così:
Asc("""")
Ciao!
-- 
3st3b4n
www.seber.it
Questo post è stato scritto con bit riciclati
Newsgroup: it.comp.lang.visual-basic
Titolo: controllo ogni secondo: come?

ciao a tutti
sto scrivendo un programma e mi trovo incasinato: ho una label che necessita 
di un aggiornamento ogni secondo... ho provato con timer ma non riesco a 
fare nulla...
consigli? pareri?
grazie 

 ha scritto nel messaggio
news:i97vh.9442$422.1...@twister2.libero.it...

Che significa che non riesci a fare nulla....?
Se metti un Controllo Timer ed imposti l'evento ad 1 secondo su evento Timer
scriverai quello che serve....
Dov'è che trovi difficoltà...?
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 fare nulla...
1) crei un controllo timer ed imposti , l'intervallo a 1000 (millisecondi =
1 secondo)
2) nell'evento tick creato dal controllo inserisci il refresh della label
ciao
nervo

 Dov'è che trovi difficoltà...?
ehm... sono pirla :) alla fine mettevo timer1.enabled=false!
grazieeeeee
Newsgroup: it.comp.lang.visual-basic
Titolo: dimensioni del drive

ciao ho cercato un po' da tutte le parti, (magari male!!!!)
ma ho trovato solo esempi del tipo, del nome, del serialnumber, ma non ho
trovato come reperire
la dimensione del drive , questo mi serve per fare delle copie di backup
l'utente sceglie il drive dove farlo e prima controllo la massima dimensione
e di conseguenza creo il file di backup
come posso fare , ?
ps. o esiste un modo piu' corretto?
ciao Ilairo

devi usare la api: GetDiskFreeSpaceEx
"The GetDiskFreeSpaceEx function obtains information about the amount of
space available on a disk volume: the total amount of space, the total
amount of free space, and the total amount of free space available to the
user associated with the calling thread."
crea un nuovo progetto e poi copia e incolla l'esempio in un form chiamato
Form1:
Private Declare Function GetDiskFreeSpaceEx Lib "kernel32" Alias
"GetDiskFreeSpaceExA" (ByVal lpRootPathName As String,
lpFreeBytesAvailableToCaller As Currency, lpTotalNumberOfBytes As Currency,
lpTotalNumberOfFreeBytes As Currency) As Long
Private Sub Form_Load()
Dim r As Long, BytesFreeToCalller As Currency, TotalBytes As Currency
Dim TotalFreeBytes As Currency, TotalBytesUsed As Currency
'the drive to find
Const RootPathName = "C:\"
'get the drive's disk parameters
Call GetDiskFreeSpaceEx(RootPathName, BytesFreeToCalller, TotalBytes,
TotalFreeBytes)
'show the results, multiplying the returned
'value by 10000 to adjust for the 4 decimal
'places that the currency data type returns.
Me.AutoRedraw = True
Me.Cls
Me.Print
Me.Print " Total Number Of Bytes:", Format$(TotalBytes * 10000,
"###,###,###,##0") & " bytes"
Me.Print " Total Free Bytes:", Format$(TotalFreeBytes * 10000,
"###,###,###,##0") & " bytes"
Me.Print " Free Bytes Available:", Format$(BytesFreeToCalller * 10000,
"###,###,###,##0") & " bytes"
Me.Print " Total Space Used :", Format$((TotalBytes - TotalFreeBytes) *
10000, "###,###,###,##0") & " bytes"
End Sub

 devi usare la api: GetDiskFreeSpaceEx
grazie del codice mi potresti dire  la differenza tra GetDiskFreeSpaceEx e
GetDiskFreeSpace
ciao  Ilario

 GetDiskFreeSpace
"The GetDiskFreeSpace function retrieves information about the specified
disk, including the amount of free space on the disk."
... ti da meno informazioni (di quelle che cerchi te), ma te ne altre, tipo
il numero di bytes per settore ed il numero di settori per cluster.



Gia' che ci siamo, aggiungerei anche che la GetDiskFreeSpaceEx e'
disponibile a partire da Win95 OSR2, quindi e' comunque opportuno fare
prima un test sulla sua presenza. In caso negativo occorre chiamare la
GetDiskFreeSpace.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT][Blame]Re: ma è possibile ...

"Gruppo Datamedia S.P.A." ha scritto:
Niente, questo è il massimo. Chiedo scusa all'autore, ma è proprio il
massimo, con "Re:Re: Ma è possibile"... di subject. Sarà che il mio
server cancella spesso i messaggi, ma questo è proprio il massimo.
Beviamoci sopra.
Flavio
--
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

una sottomaschera in access =E8 praticamente un form inseribile in un =
SNIPPONE
Per riprendere un altro tuo post, se ci fosse meno casino su questo NG...
P.S.: a proposito di _un altro_ post, ma se bevi un caffè a quest'ora,
poi dormi ?  ;-)
Scusate l'OTtone...
Bye, G.
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

 massimo, con "Re:Re: Ma è possibile"... di subject. Sarà che il mio
Visualizza il sorgente del messaggio e vedrai cosa appare.

Giulio Bottini ha scritto:

Yeah... Io non vedo alcun sorgente... la cosa curiosa era l'abbinamento
subject-messaggio vuoto. Io non avevo nessun messaggio  "Ma è
possibile...". Che se fosse stato scritto così (e non troncato in seguito)
sarebbe un bell'esempio di subject chiaro. Io vado dal medico e gli dico:
"Senta, ma come mai..." e lui mi guarda fisso negli occhi e mi manda da uno
specialista. Comunque, visto che non c'era il messaggio, come mai c'era la
rplica della replica? Forse il mio News Server non funge...


 subject-messaggio vuoto. Io non avevo nessun messaggio  "Ma č
Che uomo di poca fede. Il messaggio c'č, ma il tuo newsreader non te lo
fa vedere. Se visualizzi il sorgente del messaggio con 'visualizza
sorgente' se usi netscape vedrai cosa conteneva.

Newsgroup: it.comp.lang.visual-basic
Titolo: it.comp.prog.collaborazione

come faccio a votare?? sono andato su it.news.votazioni ma non ho trovato
nulla!
grazie
Francesco Mapelli ( 
mape...@tin.it
 )
http://members.xoom.com/Francesco
Mousestats, il contachilometri per il mouse
http://members.xoom.com/mousestats
Sito comune programmatori Visual Basic
http://members.xoom.com/it_lang_vb

nulla!
Non c'è niente neppure su it.news.annunci !?!?!?!?
Se il GCN aveva erroneamente impostato la data di scadenza della 1^
CFV al 29/9, mi sa che il msg è sparito da tutti i server... forse
sarebbe meglio chiedere un supplemento di validità (visto che 15
giorni _almeno_ andranno persi...).
Bye.
Greg
gbia...@computering.it
gy...@geocities.com
http://www.geocities.com/Athens/Aegean/3276/

 giorni _almeno_ andranno persi...).
Fatemi sapere quando ci sara' la prossima votazione, che a quanto pare
bisogna acchiapparla al volo!   :-S
-- 
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
Newsgroup: it.comp.lang.visual-basic
Titolo: Combo multicolonna

Qualcuno ha notizia di una libreria DAO che permetta le combo a più colonne
tipo Access? Sono un utente Access e senza mi sento nudo.

 tipo Access? Sono un utente Access e senza mi sento nudo.
sul sito comune del ng
http://www.murialdo.it/it_lang_vb/
dovrebbe esserci un nowcombo.zip o newcombo.zip.
temo che il search non vada, ma prob nella sezione controlli lo trovi
presto.
ciao, a.
(
per il curatore della faq e il prossimo wm:
giocatevela ai dadi, con la monetina, come credete:
o lo mettete nella faq a riga 1
o in hp con fontsize=128
:)

 wrote in message
8vukpl$pf5$1...@pinco.nettuno.it...


 ha scritto nel messaggio
news:8vvok0$8as$1...@fe2.cs.interbusiness.it...


 Fammi sapere
Che problemi ti da ... io la uso regolarmente ... (VB6 SP4) ...
in verità non l'ho mai associata a controlli Data ... se vuoi posso provare
...

Newsgroup: it.comp.lang.visual-basic
Titolo: Informazione urgente!

Ciao,
        sto realizzando un gestionale per librerie e avrei bisogno di sapere
quale tecnica sia la migliore per gestire il database.(per es. usando
controlli ADO, o MSFlex, creazione guidata database,...)
Dal database in seguito dovro' estrarre tabelle, aggiornare campi,
eliminarne altri.
Ringrazio chiunque possa darmi un suggerimento
Ciao

 ha scritto nel messaggio
news:JAOM7.187209$sq5.8...@news.infostrada.it...


> Crystal Report (c'è sul cd)
Su Visual Studio 6 Professional?
Perchè io non sono stato capace di trovarlo?
In che Cd è dei 6?
Io ho trovato solo DataReport e crystalReport della crystalDecisions dal
sito non si scarica e non esiste nessuna versione freeware o dimostrativa.

Newsgroup: it.comp.lang.visual-basic
Titolo: Fare il GRAB del testo di controlli su finestre esterne

Da un mio applicativo, volgio catturare le informazioni testuali
presenti in un altro programam da me non realizzato.  Esempio volgio
avere l'elenco di tutte le scritte presenti su labels, bottons ....  E
fin qui nulla di complicato.  Quando cerco di catturare le informazioni
di presenti in una listView mi blocco.	Motivo: per catturare le
infomazioni precendenti ho: 1 - elencato gli handles dei controlli
presenti in una finestra; 2 - usato l'API gettextwindow passando
l'handle interesso per ottenere il testo che si legge a video.	Con il
controllo ListView mi fermo, non riesco a catturare le informazioni.  Ho
pensato di usare l'API sendMessagge passando come parametri  1.Handle  
'-> oggetto interessato  2.LVM_GETEIMTEMTEXT   '-> per idicare che tipo
di informazione richiedo  3.L'indice dell' item  4.LV_ITEM   '-> la
struttura che dovrebbe essermi popolata per ottenere l'informazione
richiesta.  RISULTATO: mando in chrash l'altro programma.  Qualche idea?
 grazie

 ha scritto nel messaggio
news:ao41vc$cg8$1...@gossip.excite.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB5

Ciao a tutti ;
c'e nessuno che puo dirmi se c'e un sito dove posso trovare VisualBasic 5 ,
free ovviamente, ancora una cosa , che differenza tra VB5 , e VBCCE, se c'e
differenza poi, voglio dire , io ho il VBCCE, il control,
creation,editition, e` diverso dal VB5 o no ?
Thanks a tutti quelli che gentilmente mi risponderanno.
      //////
     ( '  ' )
--
Regards!
luc...@lineone.net

Thanks a tutti quelli che gentilmente mi risponderanno.
Purtroppo VB5 free non esiste... e' uno strumento professionale e come
tale richiede investimenti anche sostanziosi.
La edizione Standard costa non moltissimo (dipende dai punti di
vista), ma non e' consigliabile poiche' quasi sempre fa rimpiangere di
non aver optato almeno per la Professional... questa costa mezzo
milione in versione aggiornamento (se hai un VB di edizione
precedente).
La edizione CCE permette appunto di creare controlli personalizzati e
nient'altro...
Jojo

Newsgroup: it.comp.lang.visual-basic
Titolo: DEC to BIN

Qualcuno saprebbe dirmi come convertire da decimale a binario in modo veloce
un Integer??? Qualche funzione??
Chiaramente senza usare la regoletta del /2!
AIUTOOOOOOO!!!!

Emiliano ha scritto:

Un metodo di conversione può essere questo, è il primo che mi è venuto
in mente, indi va controllato e migliorato. 
Private Function ConvertiEsaBin(ByVal Cifra As String) As String
 
    ConvertiEsaBin = ""
 
    Select Case Cifra
 
        Case "0"
            ConvertiEsaBin = "0000"
        Case "1"
            ConvertiEsaBin = "0001"
        Case "2"
            ConvertiEsaBin = "0010"
        Case "3"
            ConvertiEsaBin = "0011"
        Case "4"
            ConvertiEsaBin = "0100"
        Case "5"
            ConvertiEsaBin = "0101"
        Case "6"
            ConvertiEsaBin = "0110"
        Case "7"
            ConvertiEsaBin = "0111"
        Case "8"
            ConvertiEsaBin = "1000"
        Case "9"
            ConvertiEsaBin = "1001"
        Case "A"
            ConvertiEsaBin = "1010"
        Case "B"
            ConvertiEsaBin = "1011"
        Case "C"
            ConvertiEsaBin = "1100"
        Case "D"
            ConvertiEsaBin = "1101"
        Case "E"
            ConvertiEsaBin = "1110"
        Case "F"
            ConvertiEsaBin = "1111"
 
    End Select
End Function
Private Function ConvertiDecBin(ByVal Numero As Long) As String
Dim Appoggio As String
Dim indice As Long
Dim Numbin As String
 
    Numbin = ""
    Appoggio = Hex(Numero)
 
    For indice = 1 To Len(Appoggio)
        Numbin = Numbin & ConvertiEsaBin(Mid(Appoggio, indice, 1))
    Next indice
 
    ConvertiDecBin = Numbin
 
End Function
Numero Binario = ConvertiDecBin(Numero decimale)
Ciao
	  :-) Hd (-:
-^- Verso l'infinito e oltre -^-

For i = 0 To 15
    x1 = 2 ^ i
    str1 = IIf((x And x1) = x1, "1", "0") & str1
Next
dove x è il numero da convertire ....
Newsgroup: it.comp.lang.visual-basic
Titolo: Multi-wireless platform SDK/programming contest

According to this article, ESPN will be using a new SDK to deploy
their wireless apps to all wireless device OSs:
http://www.pcworld.com/news/article/0,aid,110170,00.asp
You can download this SDK for free at
http://www.uievolution.com/developer/developer/home.htm
; and you can
enter to win a Segway at 
http://www.programmingcontest.com
.

Just what we need captivating games on cellphones that people will play
while driving....
Hope they will have annoying loud sound effects so they can be banned
for all public use.
Online gambling on your cellphone -- just what we need.
Anyone have a wireless toothbrush yet????


Do you actually have a wired toothbrush?!?
/Anders

Newsgroup: it.comp.lang.visual-basic
Titolo: verificare la presenza di una connessione adsl

Dalla mia applicazione è necessario connettersi ad internet e visto il
crescere di connessioni adsl volevo prepararmi ad affrontare il problema. La
domanda è come faccio a verificare la presenza di una connessione adsl ?
come faccio a vedere se è attiva (forse la domanda è doppia ma da buon
ignorante.....) ?
Daniele

 di una connessione adsl?
Dal punto di vista della tua applicazione, interessa sapere se la
connessione ad Internet è via xDSL, ISDN, ATM o PSTN?
-- 
Ale
E` in corso la CFV per per
*it.comp.programmare.dotnet*,
Si può leggere il manifesto su
_it.news.annunci_ o _it.news.votazioni_

 connessione ad Internet è via xDSL, ISDN, ATM o PSTN?
Battuta cattiva: un dialer non funziona con l'adsl....
Per connessione ATM cosa intendi?
--
Salutoni
Sergio

 wrote:

ATM è l'acronimo di Asynchronous Transfer Mode, fino a qualche tempo fa'
Telecomitalia offriva connessione diretta ad Internet usando ATM con
l'offerta ATMosphera attraverso una trentina di POP. Non seguo queste cose
da un po' di tempo, ma se non sbaglio tutto il backbone Internet di
Telecomitalia dovrebbe ancora essere IP su ATM su SDH (e dove possibile su
WDM).


Allora scendo nel dettaglio: ho un applicazione di gestione dati che ha
bisogno di una connessione a internet e finchè usa la connessione analogica
o isdn non ho problemi a verificare l'esistenza della connessione ma quando
il collegamento deve essere effettuato attraverso un modem adsl o la rete
lan collegata ad un router o ancora ad un computer che condivide la
connessione come faccio a verificare se esiste una connessione già attiva ?


connessione come faccio a verificare se esiste una connessione già attiva ?
Fare un ping pare brutto?
-- 
ciao, hal

 verificare se esiste una connessione già attiva ?
Mi autocito ;-)
http://groups.google.it/groups?selm=a3ubk6%241at3k6%241%40ID-94194.news.dfnc
is.de
Ciao
*Roby*

 .. la rete lan collegata ad un router
Usa il ping, divertiti con il WDM, ma non metterti contro gli amministratori
di rete tentando connessioni abusive dall'interno di una LAN, se non vuoi
essere scuoiato vivo ;-)


 Fare un ping pare brutto?
Si, perché con un ping se la connessione non c'è, si attiva.
Ciao.
Andrea

Si, perché con un ping se la connessione non c'è, si attiva.
Be', non e' quello che voleva l'OP?
-- 
ciao, hal

ignorante.....) ?
Vuole vedere se c'è e SE E' attiva, non ATTIVARLA.
Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Tariffa oraria di un programmatore

Ciao,
recentemente sono stato chiamato da una industria per svolgere programmi in
Access 97 e Visual Basic 6.
Premesso: sono studente universitario, 2 anni di programmazione VB a buon
livello.
Le mie domande sono:
1) Quanto può essere fatta pagare 1 ora di programmazione Access e un ora di
programmazione Visual Basic? Fino adesso sono sempre passato da società di
lavoro temporaneo.
2) Queste ore che farò le considero prestazioni occasionali oppure sono qualche
altra formula?
Grazie per la consulenza!
teddy...@hotmail.com
ICQ 7044062
Como - Italy

 wrote in message
news:3844f37f...@news.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare formule in un textbox

Come si potrebbe fare per visualizzare formule matematiche (per esempio una 
frazione o degli esponenti), con dati variabili, in un controllo in 
VB.NET
?
Grazie 

Non vorrei dire sciocchezze o metterti fuori strada,
ma forse potrebbe esserti utile cercare su google
AsciiMath e simili. Si tratta di programmi in
JavaScript che consentono di inserire formule in
pagine HTML, digitando puro testo.
Il tuo problema sarebbe cosi' ricondotto a quello di
visualizzare una pagina HTML.
Per esigenze meno sofisticate, hai pensato di usare
un font monospaced e un po' di asciiart ?

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ma ho fatto qualcosa di male?

Non capisco perché nei ultimi tempi nessuno risponde ai miei messaggi,
sembra quasi che siete incavolati con me ?!?!
(oppure avete rinominato questo NG a it.comp.lang.bella.addormentata :)) )
Cmq io ci riprovo....
Se qualcuno mi sa dire come si chiama il canale IRC del NG (visto che non
riesco a trovare un riferimento sul sito comune), e come si fa a fare il
Drag & Drop dei file su una ListView.
Queste sono le miei due domande (la prima mi sembra +o- facile).
Spero che qualche persona con un po' di pietà mi dia una mano
Grazie

(oppure avete rinominato questo NG a it.comp.lang.bella.addormentata :)) )
statisticamente può trattarsi di un ritardo rilevante... ma prima o poi il
ritardo si sfalda :-))
server e room sono...
Irc.Jnet.It
#it_lang_vb
okkio a un tale di nome Moreno... trattalo male e se puoi bannalo :-))
ciao

 Se qualcuno mi sa dire come si chiama il canale IRC del NG
Il NG non ha nessun canale irc ufficiale, l'unico canale irc che esiste č
#it_lang_vb nei seguenti server:
irc.jnet.it
irc.azzurra.it
irc.net32.com
Lo stesso canale sta su 
chat.parsec.it
, ma non c'č mai nessuno perché il
server č piccolo.
Poi mi sembra ch abbiano fondato anche #it.comp.lang.vb (o simili) sempre
negli stessi server.
Bye

Fantastico !!!
Non speravo in un FeedBack cosi immediato...
Grazie mille a tutti e tre :)
Newsgroup: it.comp.lang.visual-basic
Titolo: arrotondamento

Ciao a tutti avrei bisogno di un piccolo aiutino per quanto riguarda
l'arrotondamento.
Ho la seguente funzioncina che assegana alla variabile resto la parte
decimale della divisione "resto = Int((x# - Int(x#)) * 1000)" , mi funziona
per tutti i casi tranne quando la parte decimale è ad esempio
X,098874......,come nel caso 6000/1936.27 dove il risultato da 3.09874.
La funzioncina da come risultato 98 e io invece avrei bisogno che mi
restituisca 098.
So che non è chiarissima come spiegazione ma spero che qualcuno mi
risponderà.
Grazie a tutti.
Barbara.

Ciao auguri:
resto = Format(Int((x# - Int(x#)) * 1000), "0##")
--
Piero Romani
HomePage:
http://digilander.iol.it/vbsegreti
"Non dico mai non si può fare.(a chi mi puo votare)"

 ArtId: 215786


 funziona
se sai già quanti sono i decimali che ti interessano, e non trovi di meglio,
prova a trattare
il risultato come una stringa dalla quale poi estrarre la parte che ti
interessa
                    ciao.

prova cosi
Dim ŁLire As Double, tot As Double
Dim num As Integer
Dim resto As Integer
ŁLire = 1936.27
num = 10000
tot = num * ŁLire
Text1.Text = Format(tot, "#,###.00;;##")
resto = Format(Int((tot - Int(tot)) * 1000), "0##")
If resto = 0 Then
    Text1.Text = Format(tot, "#,##")
Else
    Text1.Text = Format(tot, "#,###.00;;##")
End If
ciao carmelo

 resto = Format(Int((tot - Int(tot)) * 1000), "0##")
Format$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$()!!!!!!!!!!!!1
La Format() è per i Variant (VBScript e compagnia)!
La Format$() è quella che vi serve!
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Open Office

Salve a tutti !!
Sto cercando delle librerie che mi permettano di creare ed editare dei
file da Visual Basic nel pacchetto Open Office , dovrei creare dei file
di Excel .
So che per il pacchetto Office di Micorsoft esistono delle librerie gia'
fatte ... che voi sappiate esistono anche per Open Office ??
Grazie .
Paco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

fatte ... che voi sappiate esistono anche per Open Office ??
Per Open Office esiste un' apposita API, che non ho mai usato,
ma dalle faq sul sito (
http://api.openoffice.org/faq.html
) sembra convenientemente 
accessibile con C++ e Java e mi pare anche StarBasic.
Prova a scaricarla e vedi un po' cosa dice.
Comunque OpenOffice ti permette di salvare in formati diversi
(anche Office, se ti e' piu' comodo).
-- 
ciao, hal

 gia' fatte ... che voi sappiate esistono anche per Open Office ??
http://udk.openoffice.org/common/man/tutorial/office_automation.html
Sembrerebbe di si... dai un'occhiata al link! ;)


http://udk.openoffice.org/common/man/tutorial/office_automation.html
Ottimo, segnato e scaricato tutto il possibile ;-)
-- 
ciao, hal

ciao, hal
--------------------------------
Inviato via 
http://usenet.iol.it
 

 Ottimo, segnato e scaricato tutto il possibile ;-)
Eheheh... dopo aver letto il messaggio di paco e dopo aver fatto una
ricerchina su goole ho scoperto il link... Inutile dire ch è molto
interessante... poter creare  documenti modificabili dall'utente senza
essere legati alla licenza m$oft ! ;)

 essere legati alla licenza m$oft ! ;)


 esterne ?? e se si come faccio a passargli i dati ??
http://api.openoffice.org/basic/man/tutorial/tutorial.pdf
L'hai guardato questo? Il link era sulla stessa pagina! ;)
Inutile dire che partendo da qui:
http://api.openoffice.org/
Trovi un bel po' di materiale...
Non ho ovviamente avuto tempo di guardare a fondo...
Ciao