mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: SOAP

qualcuno sà di cosa sto parlando?
mi serve urgente aiuto


Vivere?, Roberta?, Beautiful?, La 35607ima puntata di ...?

Lupo ha scritto:

LOL :-)
... cosi' impara a postare come si deve :-PPP
-- 
ciao, hal.xml

 ciao, hal.xml
dan non ti preoccupare per questi scapestrati, ogni tanto si devono pur
rilassare ( da tutti gli scherzi precedenti :), e cerca nei vecch post di
iclvb in google. mi sembra ne abbia parlato piu' volte roal zanazzi.
http://groups.google.com/advanced_group_search
ciao, a.
www.sundaysw.com

rilassare ( da tutti gli scherzi precedenti :)
Ecco, lo sapevo, adesso chissa' che idea si sara' fatto :-PPP
-- 
ciao, hal.gianburrasca

ok, me la sono cercata....
per caso sai anche darmi risposta al mio messaggio su COM+?
grazie
ciao


 ciao
purtroppo no. ogni volta che vedo la parola COM, svengo secco
proprio come il nostro premier :)
a.
pero' idem come sopra, roal, h.p.l., utente win2k, hellboy, direi ne abbiano
parlato spesso. prova in google a cercare " com ".

Newsgroup: it.comp.lang.visual-basic
Titolo: riguardo alla creazione di un MUD in VB...

Salve a tutti...
 ho letto in questo NG dell'idea di creare un Mud sotto VB... io non
voglio scoraggiarvi, ma vi parlo da implementor di un MUD italiano... in
C/C++ si possono fare TANTISSIMI trucchetti, pericolosi ai fini della
stabilità del codice, ma molto potenti, veloci ed efficenti che
permettono, se controllati bene, di aumentare di moltissimo le
prestazione del codice che si scrive... ora, non ho mai provato, e forse
mai provero', a far girare un mud creato in VB. Vi posso dire che ho
fatto girare su un Server NT il mio mud, cioe' ho preso il codice e l'ho
ricompilato per Win32... i risultati sono stati penosi, instabilita' e
lentezza assurde....
Pensateci..
Meditate..
Riflettete..
Ciao,
 Gianluca * Anthares - Coder di TF.

Riflettete..
Concordo su questo... l'ambiente Win32 non e' adatto a un uso
multiuser....
-- 
Sidewinder  
---------------------------------------------------------------------
Manchmal stehe nachts auf und installier's mir einfach...
	-- H0arry @ IRC
---------------------------------------------------------------------

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

Salve a tutti,
dato che di comandi SQL non ne so praticamente niente, qualcuno di Voi ha
dei siti dove poter scaricare qualcosa (esempi, codice, manuali ecc.).
Grazie a tutti.
Paolo.

Prova su questi indirizzi:
http://www.softwareplanet.net/cgi-bin/go.cgi?ID=manuali.net
http://www.microsoft.com/italy/sql/articoli/

Su 
www.manuali.it
 avevo trovato qualcosa...
CiaoZ
SebaMix

Prova su 
www.manuali.net
Ciao Gaetano
-- 
Posted from 
pop09-acc.tin.it
 [212.216.176.72] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.visual-basic
Titolo: Ottenere tanti array da una matrice

Salve,
c'è un comando che da una matrice 2*3 tiri fuori 2 array per le righe e 
3 array per le colonne ??
Mi spiego con un es.
Matrice    1 2 3
            4 5 6
Per Righe
array1------->1 2 3      =     MATRICE(0,)
array2------->4 5 6      =     MATRICE(1,)
Per Colonne
array1------->1 4        =     MATRICE(,0)
array2------->2 5        =     MATRICE(,1)
array3------->3 6        =     MATRICE(,2)
????????????????????????

 ha scritto nel messaggio 
news:e958tj$h7u$1...@nnrp-beta.newsland.it...

Se la matrice è memorizzata come array bidimensionale
è sufficiente ciclare gli indici   i e j tenendone uno costante

 
no, ma te la cavi con poche linee di codice
con redim puoi ridimensionare al volo un vettore ( array )
con lbound e ubound puoi determinare la dimensione della matrice e 
quindi dei successivi vettori
con i cicli for copiare i valori.
sempre pero', come ti hanno gia' fatto notare, tu non possa/debba 
operare sulla matrice stessa mantenendo fermo un indice e facendone 
variare solo l'altro.

[...]
Sě, ma in MatLab.. ;-)
Ciao,
    Diego 


Perfetto :-))))
tanto poi Matlab espone un gran bell'oggetto COM :-))
Newsgroup: it.comp.lang.visual-basic
Titolo: Curiosità su Api

Ieri mi è capitata una cosa strana: stavo sviluppanto un progetto dove mi
interessava riceve i l'elenco di tutti i pcin rete. In fase di sviluppo
andava tutto ok, vedevo l'elenco completo, ma poi una volta compilato il
progetto, l'api non funzionava. Può capitare che un'api si comporti
diversamente dalla fase di progetto a dopo viene compilato?

 ha scritto nel messaggio
news:ada6f2$qt1$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Comando Riavvio PC tramite Visual Basic 5.0

Buon Giorno a tutti!
Son sicuro di trovare in questo NG la soluzione del mio problema:
Ho bisogno di creare un semplicissimo programma in VB5 che riavvia il
computer senza aprire la finestra di dialogo di "chiudi sessione".
Immagino che questo per molti di voi sia di facile risoluzione, ma spero che
qualcuno mi indichi come si richiama la routine per eseguire quanto
richiesto.
Ringrazio anticipatamente
Roberto

 computer senza aprire la finestra di dialogo di "chiudi sessione".
Cerca sul sito comune del NG... l'indirizzo lo trovi sul post giornaliero
intitolato [Soluzioni] ...
--
Ciao
Alessandro
Visita: 
http://www.hardwaretips.com

 ha scritto nel messaggio
news:ROjZ7.11992$%B.43...@twister2.libero.it...

C'č una mia dll sul sito comune
http://www.it-lang-vb.net/download.asp?file=Archivio/Binari/Reboot.zip&ID=41
6
Ciao
--
Timothy Redaelli

 ha scritto nel messaggio
news:ROjZ7.11992$%B.43...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: un bel rompicapo (per me)

ciao a tutti!!
Vi spiego rapidamente il mio problema.
Ho una file di testo che proviene da un database. Il file non è delimitato
ed è composto da righe di 256 caratteri ASCII alfanumerici. Il 4^ carattere
di ogni riga è un codice (1 oppure 2). Dovrei cheare un eseguibile con vb5
che mi vada a leggere questo codice e che mi accodi ad ogni riga del file i
caratteri dal 7^ al 13^ se è presente il codice 1,  mentre se il cod è =  2,
al termine della riga mi deve riportare i caratteri dalla 7ma posizione alla
13^, ma della riga precedente.
Ovviamente le righe non sono distribuite in maiera uniforme...
In altre parole
se il codice = 1
accoda alla riga i caratteri della stessa riga dal 7^ al 13^
mentre se il codice = 2
accoda alla riga i caratteri dal 7^ al 13^  della riga precedente
Spero di essere stato chiaro...
Il problema ovviamente è: qual'è il codice?
grazie a chiunque abbia la pazienza (e le capacità, che qui non mancano...)
di darmi una mano...
ste

Se leggi in file per righe, avrai memorizzato in una variabile la riga i-esima.
(In generale) Per sapere cosa ci sia alla posizione 4 di una stringa usa:
Mid(str,4,1)

 ha scritto nel messaggio
news:9cedu1$2vj$1...@pegasus.tiscalinet.it...



Lasciando a te il compito di inizializzare le variabili e leggere le righe
da file di testo (vorrai pure fare qualcosa no? :-)):
...
...
do while bGo
    sVecchiaRiga=sRigaInLettura
    ...
    codice che legge una riga dal file di testo e la assegna alla variabile
sRigaInLettura
    ...
    if Mid(sRiga,4,1)="1" then
        sRigaInLettura=sRigaInLettura & Mid(sRigaInLettura,7,6)
    else
        sRigaInLettura=sRigaInLettura & Mid(sVecchiaRiga,7,6)
    endif
loop
...
...
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Scusate se è OT

Scusate se è OT
Nessuno di voi sa se è possibile scaricare da qualche parte la versione 4.5
di QBasic (il quale è l'ultima realizzata del vecchio Basic), in quanto la
microsoft rende disponibile per il download soltanto la versione 1.1, quella
cioé che non permette di creare moduli EXE.
Grazie.



QBasic, quello fornito di serie col vecchio (!) DOS e' interpretato...
quello che tu stai cercando e' QuickBasic (e non e' la stessa cosa...)
Jojo

non so dove potresti procurartene una copia legale, però puoi provare a
scaricarlo da:
http://www.conesul.com.br/~plybob/warez.htm

Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione RND

Ciao a tutti,
sto costryendo una sorta di Memory (nn x gioco!) costituito da 16
command1(i) ai quali devo, ogni volta che avvio, assegnare un colore
in modo che 8 bottoni abbiano colore rosso, giallo,etc ealtri 8 lo
stesso cos' da formare delle coppie (appunto tipo memory). Sto usando
finzione Random ma ho qualche problemino. Sarei grato se mi
indirizzaste sulla strada giusta. Grazie. Mi serve sapere x esempio
come faccio afare comparire a 2 a 2 i colori nei 16 bottoni al click
del bottone "Inizio". Rigrazie e spero di essere stato chiaro.
Andrea.

Scusate le disattenzioni ortografiche ma ho ancora i postumi di
Halloween!!! Scherzo e grazie ancora.

 Andrea.
-- 
regards,
Simon

 ha scritto nel messaggio
news:3dc69907...@powernews.libero.it...

in un form metti un array di pulsanti
da 0 a 15 che devi chiamare cmdColor
dopo basta che fai copia-incolla del codice
che segue
====================================
Private Sub cmdColor_Click(Index As Integer)
Static lastPush As Integer
    If cmdColor(Index).BackColor = &H8000000F Then
        cmdColor(Index).BackColor = QBColor(Val(cmdColor(Index).Tag))
        If lastPush > 0 Then
            If cmdColor(lastPush - 1).Tag <> cmdColor(Index).Tag Then
                cmdColor(lastPush - 1).BackColor = &H8000000F
                cmdColor(Index).BackColor = &H8000000F
            End If
            lastPush = 0
        Else
            lastPush = Index + 1
        End If
    End If
End Sub
Private Sub Mischia()
Dim I As Integer
Dim M As Integer
Dim N As Integer
Dim J As Integer
Dim T As String
    For I = 0 To 7
        For J = 0 To 1
            cmdColor(I * 2 + J).Tag = CStr(I)
            cmdColor(I * 2 + J).BackColor = &H8000000F
        Next J
    Next I
    M = 15
    Randomize Timer
    For I = 0 To 7
        For J = 0 To 1
            N = M * Rnd(1)
            T = cmdColor(N).Tag
            cmdColor(N).Tag = cmdColor(M).Tag
            cmdColor(M).Tag = T
            M = M - 1
        Next J
    Next I
End Sub
Private Sub Form_Load()
    Mischia
End Sub
 ==============================
HTH
bye
R


Scusa ma non ho capito cosa intendi fare, forse perchè non ho presente quale
sia il gioco Memory (che probabilmente devo aver visto sotto qualche altro
nome).
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa quadrattini a fine riga

Un vecchissimo progetto in vb3 che ha sempre funzionato alla perfezione.
Ora su alcune stampanti (epson stylus color 850) mi stampa dei quadrattini a
fine riga, mentre su altre (hp laserjet) č tutto ok.
In pratica stampa un carattere strano per ogni coppia di caratteri (Chr(13)
+ Chr(10)
Con la stessa stampante (epson), se stampo un semplice testo con notepad č
tutto ok
Avete qualche idea di quale possa essere il problema?
grazie 1000
gianni.

 Avete qualche idea di quale possa essere il problema?
Credo che al posto di Chr(13)+Chr(10) dovresti mettere la costante vbCrLf.
Forse notepad fa una sorta di conversione implicita.
bye
-- 
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Sinapsi Antispam. Antispam Gratuito.
http://www.sinapsi-antispam.tk
http://www.nicolaottomano.it/sinapsi.htm
Ingrosso Orologi.
http://www.supertop.it
email spamtrap: 
spam...@nicolaottomano.it

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

Come si fà per sistemare l'ordine di tabulazione su un form in VB6 ?
Ciao e grazie.
Enrico

 ha scritto nel messaggio
news:sPrT6.10345$Cq3.1...@news2.tin.it...


 daniele
e perchè non parti semplicemente dal primo, gli metti tabindex=0, sul
secondo tabindex=1 e così via?
la procedura che hai elencato tu è indispensabile solo per impostare la
proprietà index di array di controlli dove non puoi avere due controlli con
lo stesso index, mentre quando modifichi il tabindex, se assegni un valore
già presente lui cambia automaticamente l'altro.
Ciao.

 Come si fà per sistemare l'ordine di tabulazione su un form in VB6 ?
Io mi trovo bene partendo dall'ultimo e assegnandogli TabIndex 0
(tranquilli, è tutto sotto controllo...), poi mi sposto sul penultimo e gli
assegno... 0!, e così via fino al primo. Il vantaggio è che basta
cliccare-premere_0-cliccare-premere_0-... si fa in un attimo.
Silv:o)
Newsgroup: it.comp.lang.visual-basic
Titolo: help lettura scanner

Carissimo, l'ignoranza č un grande male!E io sono ignorante!
Questo č il mio problema:
-ho uno scanner Agfa Studioscan su SCSI(7).
-ho spessissimo il problema (di lavoro) di acquisire dati per immetterli in
data base vari costruiti ad hoc (Access) da un amico che conosce bene il
progr. suddetto.
-sono un modestissimo programmatore (basic, gw basic, povero che piů povero
non si puň Visual basic)
Ho pensato di costruire una sorta di interfaccia in VB4 che acquisisca ina
tabella (tipo tavola delle tabelline) e assegni un valore ad ogni casella
annerita.
POSSIBILI SOLUZIONI (secondo me...):
 -costruire una interfaccia apposita (con tutto l'hardware -vedi fotodiodi,
leds,sistema di trascinamento- (utilizzando una vecchia stampante
modificata......!)
 -riuscire a leggere direttamente i dati dallo scanner....!
 -salvare le pagine (formato A4) in modo BMP e "rileggere" il tutto con il
programma appositamente costruito!
Cosa mi consigli? Mi dai qualche dritta maggiore? Ti sarň eternamente grato
dato che non ne posso piů di inserire i dati in maschere, tabelle ecc. ecc.
Ti assicuro che non ho alcun fine di lucro ma solo il desiderio scientifico
(lavoro in ospedale).
Grato per ciň che mi dirai ti ringrazio.
Renato Favero
EMAIL 
renato...@numerica.it

 scritto nell'articolo
<01bcc818$7a909fc0$6ef978c3@default>...


Newsgroup: it.comp.lang.visual-basic
Titolo: Dizionario in formato elettronico dei sinonimi

Ho pure openOffice.
Se c'è qualche file di openoffice va bene lo stesso.
ho scaricato il file che contiene questo sito
http://it.openoffice.org/contribuire/thesaurus.html
; Arrivano sino alla
lettera C

Il thesaurus di OpenOffice è ancora incompleto, quindi è normale che arrivi
solo alla C... (almeno sul sito c'è scritto che è incompleto).
La prossima volta però non aprire un nuovo thread per la stessa domanda...
continua su quello sul quale ti trovavi.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [semi-OT][?] Gestione ambientale dell'audio

Buon dì a tutti!
Il subject sembrerà un pò pesantuccio ma in effetti il problema è
risolvibile in meno tempo di quanto si pensi.
Ho intenzione di gestirmi l'audio in casa stanza per stanza, con un computer
che gestisca il tutto. Mi spiego meglio: vorrei gestire la musica a seconda
degli ambienti in cui mi trovo... che sò... in salotto una musica un pò
rilassante e contemporaneamente da qualche altra parte un altra canzone...
Secondo voi è possibile? E' possibile eseguire contemporaneamente un brano e
quindi decidere dove e quando volerlo sentire? Di che hardware ho bisogno?
Mi basta una scheda audio a più canali oppure per ogni canale audio (quindi
per ogni stanza) dovrei installare sul PC una scheda audio?
Ho intenzione di crearmi un programma in VB per gestirmi tutta la situazione
che ho descritto. Secondo voi... è materialmente realizzabile?
Spero di essere stato quanto più chiaro possibile...
Saluti...
The_Crazy

> per ogni stanza) dovrei installare sul PC una scheda audio?
Quasi indubbiamente questo... :) Ma preparati a smazzare infinite quantità
di conflitti hardware... :(
        Ciao
                Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: ***************** Problemi con il formato data/ora

personalizzato, ma in Access o Visual Basic si può fare qualcosa del genere?
non so dirti per i decimi ma la questione e' stata recentemente
affrontata su icda in un paio di thread dal titolo "somma di ore con
totale superiore a 24" e "operazione di tempo".
======================================================
my opinions do not necessarily have to be true.
======================================================
per rispondermi rimuovere NOSPAM. dall'indirizzo email
to answer me remove NOSPAM. from email address
======================================================

Newsgroup: it.comp.lang.visual-basic
Titolo: Conversione da array di byte a single

Come posso convertire un'array di 4 byte...
dim a(4) as byte
in una variabile di tipo Single???
Ciao, FabioDB

 ha scritto nel messaggio
news:8R_t6.4031$lT1....@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Novizio a visual basic6

Salve a tutti, ho appena installato visual studio 6 sul mio pc quando mi
sono accorto che mi č stato venduto(di seconda mano) privo di manuale!!!!!
Dopu una breve telefonata al primo proprietario mi č stato detto che mi
sarei dovuto informare prima di acquistare da lui(rabbia e smadonnamenti
vari.....) e,stranamente ho trovato il sempre ben fornitissimo
www.manuali.it
 completamente privo di manuali base su visual basic(l'unico
riferimento era quello a proposito dei collegamenti ad un database...)
La mia domanda č:esiste un buon manuale(in un qualsiasi formato) per Visual
basic 6.0 disponibile online(preferirei italiano,ma va bene anche in
francese,inglese e tedesco....)
Grazie Dell'aiuto.
Maria

 wrote in
news:R1Fs8.7104$
m41.1...@twister2.libero.it
: 
Mai sentito parlare di MSDN (Microsoft Developers Network)?
E' la sezione ufficiale della microsoft per il supporto
ai suoi prodotti di sviluppo (tra i quali ovviamente
VS6 fa la parte del leone). Li puoi trovare TUTTO
per lo sviluppo, quindi references, esempi di codice,
TUTTO!. Quindi 
www.msdn.microsoft.com
Ciao e buon sviluppo.
Giuseppe

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Esporre più di 255 caratteri in una griglia

OK, ammetto la mia ignoranza, ma non riesco (nè con l'antica e amata Grid32,
nè con la MSFlexGrid, nemmeno con la ListView) a esporre in una "cella" di
una griglia più di 255 caratteri. Poco importa, credo (visto che non uso
controlli bound-ati) che si tratti di una campo memo da un database, non ci
riesco nemmeno se compongo il contenuto della cella con una normalissima
stringa.
La ListView (più invecchiano, più impazziscono) non sopporta nemmeno il
vbNewLine per spezzare un testo su più righe nella stessa cella.
Posso immaginare che sia una "limitazione" voluta per evitare che una cella
risulti più alta di tutto lo spazio verticale del controllo che la ospita,
ma non mi torna, specialmente dopo aver messo immagini in una Grid32 ben più
alte della grid stessa. Certo, non le vedi completamente, ma lo scrollo con
la barra verticale consente comunque di passare alla riga seguente o
precedente...
Avere qualche idea? Grazie.

 OK, ammetto la mia ignoranza, ma non riesco (nè con l'antica e amata
scusa Lupo non avevo visto il post!
Ho preso una flexgrid...ho settato l'unica proprietà...pui fare il resize di
colonne e righe per far vedere che va!
Option Explicit
Private Sub Command1_Click()
Dim testo As String
testo = "1234567890 1234567890 1234567890 1234567890 1234567890"
testo = testo & testo
testo = testo & testo
testo = testo & testo
testo = testo & testo
testo = testo & testo
testo = testo & testo
testo = testo & testo
testo = testo & testo
FGrid.Rows = 10
FGrid.Cols = 12
FGrid.Row = 2
FGrid.Col = 3
FGrid.RowHeight(2) = 1500
FGrid.ColWidth(3) = 4500
FGrid.WordWrap = True
FGrid.Text = testo
End Sub
e va senza problemi!
mi sa che si incasina in qualche punto......
PERO' OCCHIO
metti solo testo = "gg " + String(300, "h")+" pinolo"
e vedi che .....
"gg "..ha lo spazio?...a capo!
vedi che una stringa continua di 300 caratteri non sa dove spezzarla (i
progettisti non si son bacati le palle ...spezza solo agli spazi
evidentemente) e la mette su una solo riga
.... " pinolo" ha lo spazio?...va a capo!
Saluti!!!!
--
%%============================%%
Il Wodkino Nazionale è a : 
www.martek.it
Forum: 
http://www.martek.it/go.asp?PortamiA=1
Bestiario: 
http://www.martek.it/go.asp?PortamiA=2
 (link bestiario del
ng)

 .... " pinolo" ha lo spazio?...va a capo!
Proverò..., ma ho un tot di dubbi, anche per stringhe contenenti spazi. Però
mi fido di te. Grazie.

 spazi. Perň mi fido di te. Grazie.
a meno che tu non abbia un "win for Lupo"...quello che ti ho mandato č
provato eh!
una flexgrid ed un command
e il codice postato....sotto xpPro vb6 sp5 fa quello che ti ho detto!(pregi
e difetti)
altro nin sň!
:-)
--
%%============================%%
Il Wodkino Nazionale č a : 
www.martek.it


 altro nin sň!
Sě, ho provato con la Flex (che non uso perchč non sente i tasti) e va.
Niente da fare con la Grid32 (che uso costantemente) e la ListView... ;-)
Newsgroup: it.comp.lang.visual-basic
Titolo: Apertura un File .Doc  usando la funzione Shell

Salve a tutti,
Qualcuno mi può suggerire come posso da VB6 aprire  un file .Doc il cui nome 
comprende caratteri vuoti (es. "File da Aprire")usando la funzione shell.
Ho usato il codice che segue ma mi da errore.
Shell "C:\Programmi\Microsoft Office\OFFICE11\winword " & File da Aprire, 
vbMaximizedFocus
Grazie a chi mi risponderà.
Antonio

 ha scritto nel messaggio 
news:EmnQd.24078$Of5....@nntpserver.swip.net...


 ha scritto nel messaggio
news:EmnQd.24078$Of5....@nntpserver.swip.net...

Hai provato così:
Dim stringaNomeFIle as String
stringaNomeFIle = "File da Aprire"
Shell "C:\Programmi\Microsoft Office\OFFICE11\winword " & chr(34) &
stringaNomeFIle & chr(34), vbMaximizedFocus
Alternativa è quella di lasciare alle API il compito di recuperare l'EXE
associato
usando ShellExecute
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
Const SW_SHOWNORMAL = 1
ShellExecute Me.hwnd, vbNullString, "NomeProgrammaCommpleto", vbNullString,
vbNullString, SW_SHOWNORMAL
Oppure:
Public Sub ExecuteFile(FilePath As String)
'Esegue file
On Error GoTo error
Dim ret As Integer
ret = Shell("rundll32.exe url.dll,FileProtocolHandler " & (FilePath))
Exit Sub
error:  MsgBox Err.Description, vbExclamation, "Error"
End Sub
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 funzione shell.
Puoi provare:
Shell "start " & PatheNomeFile,vbhide
In questo modo ti apre l'applicazione predefinita, senza che tu sappia dove
è installato. Non ho provato con i nomi con gli spazi però.

> Qualcuno mi può suggerire come posso da VB6 aprire  un file .Doc
Dim WordApp As Object
   Set WordApp = CreateObject("Word.Application")
   WordApp.Visible = True
   WordApp.Documents.Open FileName:="c:\s.doc"
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore SQL

Ciao a tutti,
Ma possibile che questa istruzione sql non funzioni ?
ALTER TABLE MiaTabella ADD COLUMN Campo1 boolean default false
Mi restituisce errore di sintassi
comunque questo è il codice completo
SQL = "ALTER TABLE MiaTabella ADD COLUMN Campo1 boolean default false"
cmd = New OleDbCommand(SQL, Conn)
DR = cmd.ExecuteReader
Grazie per l'attenzione

 Mi restituisce errore di sintassi
Essendo una sintassi che deve eseguire sul dbms, sarebbe stato utile 
sapere su che dbms lavori.
Comunque, le istruzioni SQL si testano prima di tutto in una finestra 
client che può accedere al dbms, e solo dopo le si inchiodano nel 
codice.
Ad esempio, se tu utilizzassi Sql-Server (ma non credo, visto che 
quella sintassi in SQL sarebbe sballata in almeno 3 punti diversi), 
potresti provare ad eseguirla nel SqlServer Management Studio, anche 
express va bene.
Ciao
Alberto
-- 
La forza di volontà è guardare negli occhi una ragazza in topless.

Ciao SQL errore è che non vi è alcun tipo di dati boolean vi passo
come uno script aggiungere campi in una tabella.
Se il vostro campo di una tabella in grado di immagazzinare 1
carattere sarebbe meglio se il tipo di dati è un char ()
--------------------------------------------------
create table mitabla(
cod char(5),
des varchar(20)
)
--------------------------------------------------
ALTER TABLE mitabla ADD column_b VARCHAR(20) NULL
--------------------------------------------------
ALTER TABLE mitabla ADD Campo1 boolean
--------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: invio SMS

sto cercando il modo di connettermi ad un qualsiasi SMS gateway
per inviare SMS partendo da un db
spero che qualcuno abbia info o source da suggerirmi
grazie
jdm


wrote:


 wrote in message
39d74930...@news.libero.it...


Allora puoi "rubarti" una form da qualche portale. Es: 
www.blu.it

 ha scritto nel messaggio
news:8r79v5$bjn$1...@lacerta.tiscalinet.it...


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

SMSSPLITTER
scaricalo da volftp


possibile che nessuno sappia aiutarmi per costruirlo da solo in vb sto k@##o
di prg che spedisce sms attraverso internet????
jdm

 ha scritto nel messaggio
news:8rijkc$mav$1...@pegasus.tiscalinet.it...

Non penso che sia possibile creare in visual basic un programma del genere,
per alcuni semplici motivi.
1- il servizio messaggi GSM è intrinseco alla rete dei telefonini, percui ci
serve un server che, collegato ad un ponte GSM o direttamente al server che
gestisce i messaggi GSM ne consenta la trasmissiono tramite la rete.
2- va da sé che per un sistema del genere bisogna possedere le
autorizzazioni, di solito rilasciate dietro compenso.
Quindi se vuoi mandare un messaggio SMS tramite il PC ci sono queste strade.
1- ti colleghi ad un sito autorizzato e compili il form.
2- paghi e metti in piedi un sito autorizzato :-)))
3- Provi a vedere come è composta la riga di comando dello script CGI o
altro di uno di questi siti e l'ho chiami da un tuo prg, interpretando poi
il codice HTML ricevuto.
L'ultima soluzione non è ovviamente molto legale (anzi non l'ho è per
niente), ma comunque sarebbe un bel esercizio....
Ciao. EPOCH.

Newsgroup: it.comp.lang.visual-basic
Titolo: alle prime armi... domande

premessa:
sto studiando da solo partendo da zero il manuale sul vb6 della McGraw hill.
1.)qualcuno sa farmi capire con parole semplici il significato dell'uso
degli oggetti  file sytem...sinceramente non l'ho capito,in cosa dovrebbero
essere + pratici delle altre proprietà..
2:)sto iniziando a provare un piccolo progetto ho un form con una casella di
riepilogo dei file,delle directory e delle unità,sono riscito a collegarle
fra di loro,ora però se in quella delle unità avviando il programma
seleziono l'unità vuota del floppy o del cd.rom mi dà giustamente
errore,vorrei sapere come ovviare al problema..
Grazie

 errore,vorrei sapere come ovviare al problema..
prova a postare il codice che ti da errore .....
CIAO


Devi catturare l'errore. Cerca un pò su questo : ON ERROR GO errHandler
Ciao
Sal

grazie provero subito...
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ottimizzazione codice: Alias

Dall'help del VB non risulta chiaro se la casella "Alias..." deve essere
abilitata o meno per ottimizzare il codice e in quali casi non si puo`
applicare.
Io ho un programma che lavora moltissimo con le stringhe e ci mette 6min a
compilarmi files di testo.
Grazie123000, FenixX. (A buon rendere)
|:-D| FenixX |(-:|
ICQ: 16201896
http://members.xoom.it/_AA/fix/index.html
http://skyscraper.fortunecity.com/online/888/WebStation.html
http://space.tin.it/scienza/dfelisar/
http://www.angelfire.com/ok/fenixx
http://webstation.webjump.com
FenixX=Visual=Book=Marks=System:[Meteos]-[SuperBarZell]-[MangAnime]-[Music]
WebStation: Main Menu
[SearchEngines] [HotPages] [InternetServices] [MessagesServices]
[Hardware] [Software] [InternetSoftware]
[Friends] [People] [Audio-Music-Radio] [Video-Live-Cam-TV]
[MangAnime] [Doc-Info] [NewsPapers] [Lombardia] [Links2Links]
  ("`-''-/").___..--''"`-._
   `6_ 6  )   `-.  (     ).`-.__.`)
   (_Y_.)'  ._   )  `._ `. ``-..-'
     _..`--'_..-_/  /--'_.' ,'

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto: VB6 fa le bizze

Ciao,
ho appena installato VB6 e quando vado ad utilizzare il controllo DBGRID mi
dice che non ho informazioni valide sulla licenza per usare il controllo in
progettazione.
Ho disintallato e reinstallato ma mi fa uguale, qualcuno mi può dire cosa
posso fare.
Grazie e ciao

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] 3d

ciao a tutti,
vorrei imparare 2 righe di grafica 3d, ma non utilizzando librerie gia'
fatte (directx, opengl e compagnia bella), ma proprio capendo i meccanismi
che ci stanno dietro e crecando di riprodurli... non voglio fare il motore
grafico del futuro, mi basterebbe riuscire a fare un cubo che ruota o una
cosa simile.
potete aiutarmi oppure indirizzarmi verso un ng piu' adatto?
grazie! :) assa.

 wrote in message news:asauni$paure$1@ID-

Il NG è comp.graphics.algorithms
Ma la cosa è tutt'altro che semplice... avevo intenzione di fare un motorino
anch'io, giusto per fare le forme base, ma ho rinunciato perchè gli studi e
le prove mi impegnavano troppo tempo.
Un libricino di base che ti posso indicare è "Programmazione Grafica 3D" di
Andrea Fasano, Infomedia (12.9euro), ma anche con questo non ne caverai
molto, perchè la teoria è tanta e metterla in pratica è ancora peggio.
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

 grafico del futuro, mi basterebbe riuscire a fare un cubo che ruota ...
Se davvero ti basta qualcosa di mooolto semplice puoi dare un' occhiata
al progetto SurFit che ho messo su 
http://www.flanguasco.org
C' e' un Form di utilita' per la rappresentazione in 3D assonometrica
di superfici e di punti, con la possibilita' di cambiare il punto di
vista e di ruotare in continuo gli elementi visualizzati.  Con l' uso,
poi, dell' API Polygon sono anche riuscito ad ottenere (quasi gratuitamente)
di rimuovere le parti nascoste :-)
Ciao, per ora e fammi sapere.
Franco

 wrote in message
news:up7G9.12783$fa.4...@news1.tin.it...


 Ciao, per ora e fammi sapere.
gia' solo a vederlo girare mi spaventa tantissimo :)
ora provero' a dare un'occhiata al codice, ma temo che sia una cosa ancora
troppo al di la' delle mie possibilita' :)
grazie, assa.

 mi basterebbe riuscire a fare un cubo che ruota
Dai una occhiata a questo.
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?lngWId=1&txtCodeId
=34623
Se invece decidi di restare nell'ambito 2D, questo sito è imperdibile.
http://edais.earlsoft.co.uk
Ciao
*Roby*

 puoi dare un' occhiata al progetto SurFit
Ho letto la descrizione. Eccone uno stralcio:
"Comprende l' interpolazione con "kriging", con il metodo quadratico di
Shepard e la routine MASUB.
Ho anche incluso la mia ultima elaborazione di CONREC"
Meno male che era molto semplice :-)
Ciao
*Roby*

 Meno male che era molto semplice :-)
Ma questa e' la descrizione del progetto SurFit per l' interpolazione
delle superfici!  Quello che puo' interessare ad Assa e' un solo Form di tutto
il progetto, il frm3D che puo' essere indipendentemente usato (e modificato)
per la rappresentazione in 3D di punti, superfici o poliedri.
Ciao ed a risentirci.
Franco

 delle superfici!  Quello che puo' interessare ad Assa e' un solo Form
Si, hai ragione, ma non ho resistito alla tentazione di sottolineare quel
passaggio descrittivo. :-)
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: PDF

Ciao a tutti,
qualcuno di voi sa dirmi come fare a creare + pagine in un file pdf generato
dopo una scansione?
GRAZIE A TUTTI

 dopo una scansione?
Non sapendo cosa usi esattamente ti passo un'idea generica (ma funzionante):
imposti lo scanner per darti un tiff mulitpagina, quindi stampi il tiff in
pdf.
--
ciao, hal
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.lang.visual-basic
Titolo: sub e le variabili

ciao
so che puo essere una domanda della quale  dovrei sapere la risposta, ma non
ho mai avuto bisogno e non ho trovato un esempio
nella sub
private sub ( dato as string , optional secondodato as string = "ilario" )
........
end sub
vorrei che nel secondodato si possa inserire solo alcuni valori  (come in
boolean  = true o false)  come devo fare?
ciao ilario

 boolean  = true o false)  come devo fare?
devi usare un ENUM...e un F1
MIk


grazie mille

Newsgroup: it.comp.lang.visual-basic
Titolo: Se compilato non apro la rete

Ave o NGettani,
    dopo ore e ore download son riuscito a scaricare tutto il SP3
famelico per le patch al scarcassato VB5 (quasi da rimpiangere il 4), ed
ora installate mi rendo conto che non si e' ancora sistemato a dovere...
Beccatevi sti problemini che si verificano e poi ditemi...
1) open "//silvano/D465" for output as 2
    tanto per fare una bella stampa di etichette su stampante seriale
attaccata a un computer remoto.. tutto bene se questo lo si fa in Run
Time ma dopo compilato si inventa un bruttissimo "percorso non trovato!"
cosa abbastanza irritante! devo stampare cosě' sempre e solo in Run
Time.
2) L'auto istallazione
Come voi ben sapete é forse la fase piů critica del VB, un rituale al
quale tutti abbiamo sempre sacrificato diversi dischetti, e nel 5, ha
una sorpresa in piů.. (almeno per me)
dopo aver scelto il progetto ringhia un:
Trova Kernel seguito dopo aver scelto il file del kernel di Win un..
Trova User e sempre con la solita finestrella del apri file un
Trova GDI e poi dopo aver scelto come un bravo bambino le "trovate" ti
ritrovi al
Trova Kernel...
P.S> non vorrei che il tutto non sia al fatto che ho installato il VB5
sul server (N:) e che invece il Win é come al solito sul C:
Tks per l'aiuto.
Bye Bye
73 Walter : )

 Trova Kernel...
Questo succede perché hai nel progetto righe per la compilazione
condizionale (#if win32....#else....#end if). Se ignori il messaggio non
succede niente, se ti dà fastidio togli le righe.
Domenico
Newsgroup: it.comp.lang.visual-basic
Titolo: Creare file csv a campi delimitati

Ciao a tutti,
    sono in VB6, ho a disposizione un recordset già pronto e bello
filtrato.
Tramite la totalità dei record di questo recordset devo creare 
un file di interscambio  .csv a campi delimitati da punti e virgola.
Adesso ci provo, ma non è che qualcuno l'ha già fatto e ha a disposizione
un sorgentino simile e me lo copia incolla?
Ciao  e grazie
Indriano  ( lo scansafatiche metropolitano  )
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Indriano  ( lo scansafatiche metropolitano  )
ti copio-incollo le parti essenziali...
open for output as #
with rs
    do while not .eof
        s=""
        for j = 0 to .fields.count-1
            s=s & !campo & ";"
            print #, s
        next
        .movenext
    loop
    .close
end with
set rs=nothing
close #
ciao, a.

 ti copio-incollo le parti essenziali...
.Ed io  ti ringrazio 
.........qualcosina più che infinitamente !!!!!
Ciao
Indriano


 .Ed io  ti ringrazio
fallo solo dopo aver messo print s _dopo_ il next :)
ciao, a.

 fallo solo dopo aver messo print s _dopo_ il next :)
Aggiungo che si può usare anche il comodo:
Rs.GetString
Che fa tutto da solo, e salva su un file specificato.
http://groups.google.it/group/free.it.visual-basic/browse_thread/thread/f576374e01de9d68/aa6d64b40328898d?q=GetString+visual+basic+csv&rnum=1&hl=it#aa6d64b40328898d


http://groups.google.it/group/free.it.visual-basic/browse_thread/thread/f576374e01de9d68/aa6d64b40328898d?q=GetString+visual+basic+csv&rnum=1&hl=it#aa6d64b40328898d
giustissimo, me lo scordo sempre perche' direi sia solo ado.
devo provarlo per gli utenti nell'ldb, il rs restituito con
JET_SCHEMA_USERROSTER e' pieno di schifezze, magari con geststring si fa
prima a pulire.
ciao, a.


Newsgroup: it.comp.lang.visual-basic
Titolo: mail verify

curiosità: ho visto che esistono programmi che controllano se un indirizzo
e-mail è ancora valido, cioe se esiste ancora...
qualcuno di voi sa come diavolo fanno?
grazie
Mario

 ha scritto nel messaggio
news:9uofo3$9q809$1...@ID-70152.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP!! ComboBox

Ho una ComboBox (con propriet? Sorted = True e Style = 2 - dropdown list)
non associata che alimento in fase di Form_Load.
La tabella che carico ? questa:
Tabella "MOTIVO"
ID Motivo      Motivo
1              Utilizzare apposita modulistica
2              Dati mancanti
3              Segnalazione non regolare
4              Modulistica errata
etc..
Vorrei sapere come posso fare  a recuperare l'ID Motivo dopo l'evento click
sulla ComboBox visto che con la proprieta Sorted = True l'ordine della
tabella non viene rispettato.
Qualcuno mi sa aiutare ?
Grazie
Maurizio
--
Posted from 
smpt.crtn.it
 [194.185.204.150] (may be forged)
via Mailgate.ORG Server - 
http://www.mailgate.org


Puoi utilizzare la proprietą ItemData, ad esempio:
Private Sub Form_Load ()
 
	Combo1.AddItem "Utilizzare apposita modulistica"
	Combo1.ItemData(Combo1.NewIndex) = 1
	Combo1.AddItem "Dati mancanti"
	Combo1.ItemData(Combo1.NewIndex) = 2
	Combo1.AddItem "Segnalazione non regolare"
	Combo1.ItemData(Combo1.NewIndex) = 3
	Combo1.AddItem "Modulistica errata"
	Combo1.ItemData(Combo1.NewIndex) = 4
End Sub
Private Sub Combo1_Click ()
	' Append the  number and the description.
	Msg = Combo1.ItemData(Combo1.ListIndex) & " "
	Msg = Msg & Combo1.List(Combo1.ListIndex)
	Label1.Caption = Msg
End Sub
Ciao

...
<snip>
Signore e signori...
Questa e' la prima risposta data su questo NG da una gentil pulzella (almeno
da quando lo frequento io).
Sono commosso e felice... il mondo e' donna... vado a festeggiare il lieto
evento con la mia morosa :-P
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Contascatti INTERNET - software FREEWARE

E stata rilasciata l'ultima versione di X-Counter, software
per monitorare i costi di connessione Internet.
- Eliminazione di alcuni BUG relativi alla visualizzazione
  di alcune finestre.
- Migliore personalizzazione delle tariffe libere.
L'indirizzo per il DOWNLOAD è:
http://web.tiscalinet.it/alexscarcella/software/XCounter.exe
Per chi avesse già la versione 3.2 è disponibile l'update
all'indirizzo:
http://web.tiscalinet.it/alexscarcella/software/XCupdate33.exe
Per maggiori informazioni fare riferimento al sito web.


Newsgroup: it.comp.lang.visual-basic
Titolo: Progressbar.Max e fine file

Ho necessità di inizializzare una progressbar prima di  leggere un file di
testo con un ciclo DO.
Questo è il codice:
.
.
.
Open APP.PATH & "\file.txt" For Input As #1
ProgBar2.Min = 0
ProgBar2.Max = ???? <------ COME POSSO INDICARE LA FINE DEL FILE #1?
ProgBar2.Value = 0
Do While Not EOF(1)
Line Input #1, Riga
ProgBar2.Value = ProgBar2.Value + 1
ProgBar2.Caption = "Seconda Fase" & " " & Int(ProgBar2.Value * 100 /
ProgBar2.Max) & "%"
ProgBar2.Refresh
.
.
.
Come posso indicare la fine del file in ProgBar2.Max = ????
Grazie.

 Grazie.
Leggendolo...!
Function FileLen(PathName As String) As Long
    Membro di VBA.FileSystem
    Restituisce la lunghezza di un file in byte
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie.
Scusa ma prima mi è partito il suggerimento, che nonostante sia
corretto, fà riferimento alle Librerie di VBA per abitudine.
Per recuperare la lunghezza di un file è disponibile la funzione
FileLen, che restituisce la lunghezza espressa in byte.
Per ottenere la lunghezza di un file aperto è invece necessario
utilizzare la funzione LOF.


 utilizzare la funzione LOF.
Ho provato cosě, ma non capisco il motivo per cui mi si ferma al 1% :-(
  Open "file.txt" For Input As #1
  ' Set up the progress bar's properties
 ProgBar2.Min = 0
 ProgBar2.Max = LOF(1)
 ProgBar2.Value = 0
  Do While Not EOF(1)
    ProgBar2.Value = ProgBar2.Value + 1
    ProgBar2.Caption = "Seconda Fase" & " " & Int(ProgBar2.Value * 100 /
ProgBar2.Max) & "%"
    ProgBar2.Refresh
.
.
.
Loop
Close#1
Non capisco dove sia l'errore...

Beh non è indispensabile indicare con Max la lunghezza totale in byte 
del file.
Basta impostare Max = 100 e mentre leggi il file calcolare la 
percentuale di avanzamento.
La funzione Filelen(Percorso) ti dice quanti byte è lungo il file.
Totale = Filelen(...)
Do
    ...
    Leggi
    BytesLetti = BytesLetti + ...
    BarraAvanzamento.Value = 100 * (BytesLetti / Totale)
Loop While BytesLetti < Totale
-- 
Quando noi ignoranti eravamo di più, tutto era più bello...
(A. Celentano)
Per rispondermi in privato, togli prima l'immondizia dalla testa ;)

 Non capisco dove sia l'errore...
Se come MAX imposti il numero di Bytes del File, mi pare ovvio
che ad ogni iterazione devi ricavare il numero di Bytes letti
fino a quel momento(se poi li vuoi trasformare in % credo sia
banale).
Secondo me potrebbe essere errato il metodo di recupero dei
Byte Letti, ma non ho capito come fai.....

Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto Collection

Guardando l'help di VB5 per l'istruzione Add di un oggetto Collection dice
che e' possibile aggiungere oggetti di qualsiasi tipo, anche definiti
dall'utente (ovviamente oggetti tutti uguali).
Pero' se io definisco un mio tipo:
    Public Type MioTipo
      MiaVar1 as String
      MiaVar2 as Integer
      ...
      ...
    End Type
e poi provo ad aggiungerlo in un oggetto Collection:
    Public MioCollection as New Collection
    MioCollection.Add MioTipo
in esecuzione mi da il seguente errore:
  Errore di compilazione:
  Tipo non corrispondente per l'argomento ByRef.
Se invece non uso variabili da me definite ma ad Add passo variabili di tipo
standard (String, Integer, ...) funziona perfettamente.
Nel MioTipo non uso variabili strane ma solo tipi String, Boolean e Integer.
Qualcuno sa spiegarmi il perchč?

Qualcuno sa spiegarmi il perchč?
Vedi un po' se cosě ti funziona. :D
Ciao!


Semplice, non puoi passare un UDT a una collection. Dovresti usare le
classi.





Perché secondo te così funziona? Avrei i miei dubbi. Un type non si può
aggiungere ad una collection.

Newsgroup: it.comp.lang.visual-basic
Titolo: Componenti aggiuntivi per VB: Infragistics

Ciao ragazzi.
C'è qualcuno di voi che utilizza componenti (.OCX) Infragistics in VB6?

 C'è qualcuno di voi che utilizza componenti (.OCX) Infragistics in VB6?
Usa Access che ha già tutto quello che ti serve... :-D
Va bene, giuro che non lo dico più!
Ciao, AleGAM

C'è qualcuno di voi che utilizza componenti (.OCX) Infragistics in VB6?
Mi sono trovato la loro toolbar in un progetto.
L'ho tolta e sostituita con quella di vb :-)
-- 
ciao,hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Sort su file dbf

Vorrei realizzare un ordinamento alfabetico su un file DB3 in base al
campo SortStr
Con il codice seguente ottengo l'ordinamento sulla DbGrid collegata al
controllo Data1, ma non l'ordinamento del file. Come si fa ad ordinare
il file ?
Grazie
----------------------------
Private Sub cmdSort_Click()
    Dim recRecordset1 As Recordset, recRecordset2 As Recordset
    Dim SortStr As String
    Set recRecordset1 = Data1.Recordset            'Copia il Recordset
    recRecordset1.Sort = SortStr
    'Applica l'ordinamento
    Set recRecordset2 =
recRecordset1.OpenRecordset(recRecordset1.Type)
    Set Data1.Recordset = recRecordset2
End Sub

 ha scritto

guida db4
SORT TO <nome file> ON <campo1> [/A] [/C] [/D]
   [,<campo2> [/A] [/C] [/D] ...] [ASCENDING/
   DESCENDING] [<campo d'azione>] [FOR <condizione>]
   [WHILE <condizione>]
Crea un nuovo file di database in cui i record del
file di database attivo sono riordinati alfabetica-
mente, cronologicamente o numericamente in base ai
campi chiave specificati.
     /A ordinamento ASCENDENTE.
     /C ordinamento MAIUSCOLO/minuscolo, non perciň
         rigorosamente secondo la tabella ASCII.
     /D ordinamento DISCENDENTE          <SEGUE  F4>
quindi il sort lo fai "to pippo[.dbf]".
a naso, devi buttare l'output della griglia ordinato su un nuovo file,
buttare il vecchio e ribattezzare il nuovo.
se hai modo di usarli, ci sarebbero gli indici apposta per evitare
'ste cose...
ciao

 ciao
Scusa, ma non ho capito. Io il sort lo voglio fare da VB e don da DB4
Grazie

 Grazie
infatti ti ho detto di prendere il contenuto ordinato _della griglia_
di buttarlo in un nuovo dbf con la stessa struttura. direi che puoi
scegliere due metodi:
1. sql: select into nuovofile. guarda la guisa sql
2. fai un ciclo e assegni al nuovo recordset il contenuto dei campi di
quello che hai visualizzato, qualcosa come
    for r=0 to grid.rows-1
        for f=0 to data1.recordset.fields.count-1
            rsnuovo.fields(f)=data1.recordset.fields(f)
mi sa che il primo e' parecchio piu' veloce.
per curiosita', a cosa ti serve un file ordinato ?

 per curiosita', a cosa ti serve un file ordinato ?
Stro traformando in VB un prog fatto in Clipper . Sono nuovo del Vb e
mi porto dietro dei ragionamenti probabilmente sbagliati.
Dove posso trovare i criteri per gestire al meglio i databese ?
Grazie

 per curiosita', a cosa ti serve un file ordinato ?
Sto traformando in Vb un prog.fatto in Clipper (summer 87).
L'ordinamento veniva fatto dopo l'inserimento di nuovi record (poche
volte all'anno) per poter riaprire i file dbf con Excel e manipolarli
con facilità.
Vorrei mantenere questa possibilità.
Vorrei capire perché, mentre tutte le altre modifiche al recordset
(addnew,
delete) vengono automaticamente recepite dal file dbf, altrettanto non
accade per il sort.
Grazie per l'aiuto
Newsgroup: it.comp.lang.visual-basic
Titolo: PLEASE HELP

I am new to this list and not a very acomplished programmer, but I am working
on a project and need some help.  When making a menu in VB5, how do you add a
little picture next to the word?  For example in Visual Basic 5, under the file
menu, next to the print selection there is a picture of a printer.
Tom Kramer
sgm...@aol.com

Try to take any OCX at 
www.activex.com
. I think it's only way because the
menu-editor of VB isn't enabled to this function.
Good luck!
Thunder.

...

Take a look at APIs with "Menu" in the name.
In particular SetMenuItemBitmaps ()
If I was able to use them (and without guide!)...
Excuse my poor english
See u!