mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Come funziona l'istruzione DIM ????????????

Ciao a tutti sono Sara,
Come vedete parto subito all'attacco coi problemi.
Devo creare un database mediante codice :
....
DIM MyDbf as Data
.....
Set MyDbf.Opendatabase(....)
N.B.: Quando lancio in esecuzione mi dà errore su opendatabase e mi dice :
Errore compilazione : Impossibile trovare il metodo o il membro dei dati.
Cosa sbaglio ???????????
Grazie a chiunque mi risponda.
Ciao Sara.

...

Ciao.
Allora innanzitutto clikka sul menu' References (mi pare sia nel menu
projects, vado a memoria 8) ) e ti appare una finestra con un elenco di
librerie. Tu clikka su DAO 2.5/3.5 che va bene.
DIM MyDbf as Database <- poi modifica cosi'!
Set MyDbf.Opendatabase(....)
vedrai che funzia,ciao!



Set MyDbf.Opendatabase(....)
Dim MyDbf as Database
set MyDbf as new Database
Mydbf.Opendatabase
Ciao,
Domenico

Dim Db as Database
Set Db = OpenDatabase("nomedeldatabase")
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Form (x Maurizio Borrelli)

> Roberto:

Scusami ma per assoluta mancanza di tempo non riesco a proseguire il
dialogo. Posta un nuovo quesito e sicuramente qualche collega ti
rispondera`.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: Memorizzare l'immagine dello schermo

Ciao a tutti,
    vorrei riuscire a mettere in una stringa o in un'array di byte (insomma
in qualche tipo di variabile) l'immagine dello schermo. Devo fare questo per
riuscire a spedirla tramite il controllo winsock. Naturalmente poi deve
essere possibile anche riottenere l'immagine.
Ho trovato esempi che, tramite le api, passano l'immagine dello schermo ad
un altro controllo grafico ma questo non mi aiuta perchč l'unico modo che
avrei per passare i dati sarebbe quello di salvare l'immagine quindi passare
il file bmp.
Se č possibile volevo fare tutto in RAM.
Grazie a tutti.

Se è possibile volevo fare tutto in RAM.
Non è il massimo ma potresti fare così:
Dim Schermo() as long
Dim ScreenX as long
Dim ScreenY as long
Dim hDC as long
Dim X as long
Dim Y as long
Dim Count as long
ScreenX=(Screen.Width \ Screen.TwipsPerPixelX)
Screeny=(Screen.height \ Screen.TwipsPerPixely)
Redim Schermo(1 To ScreenX * ScreenY)
hDC=GetDC(GetDesktopWindow())
For y = 1 To ScreenY
    For x = 1 To ScreenX
        Schermo(count) = GetPixel(hDC, x, y)
    Next x
Next y
ReleaseDC(GetDesktopWindow(), hDC)
Non l'ho provato ma dovrebbe andare.
Ciao

 ha scritto


unico problema, cosi' passa un bmp, che in 1024 24b sono 2.2mb. il winsock
da' tanto l'idea di un trasferimento lento. se salvi su file puoi salvare in
jpeg o png/gif e mandare 10-200k... rispetto al bmp come tempi se non sei in
lan ci guadagni senz'altro. non so se ci si possa riuscire al volo in ram.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: list box con 2 checkbox

Salve sto creando un applicazione per dare dei permessi agli utenti tipo 
vindovs con il ceck con il conseti ed il check con il nega.
Cosa potrei utilizzare dato che la listbox mi consente di mettere solo una 
ceck box
Grazie anticipatamente

Chianese Vincenzo ha scritto:

un listview, o una griglia, con due colonne Y/N.
comunque, forse non ho capito, ma non basta una colonna sola ?
check=consenti, no-check=nega ?
se vuoi fare qc come i permessi di accesso a cartelle/file, di colonne ce
ne vogliono piu' di due.
hth, ciao, j.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Tastiera, tasto windows e combinazioni di tasti.

Ho realizzato un piccolo programma di gestione del verbale di un pronto
soccorso; ora mi trovo nella situazione di dover disabilitare l'accesso ad
altri programmi (in quanto vengono installati giochi e altri programmi non
ammessi in un Ospedale) e quindi pensavo di disabilitare i tasti di cui
all'oggetto. Come c.... si fa? Ho cercato in giro ma nisba. Un grazie a chi
mi illuminerà con esempi semplici (non sono un esperto, ma solo un medico
amante dell'informatica).
Saluti a tutti, Ferruccio.

 amante dell'informatica).
(oh, come mi sento ripetitivo)
prova un po' questa:
Private Declare Function SystemParametersInfo Lib "user32" Alias
"SystemParametersInfoA" _
    (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any,
ByVal fuWinIni As Long) As Long
Public Function NegaKey(Optional Nega As Boolean = True)
    SystemParametersInfo 97, Nega, "1", 0
End Function
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: Come intercettare i dati dal Modem????

Ciao..Mi chiedevo ( anzi vi chiedevo ) se c'e un modo per
intercettare i dati del modem quando e' collegato al limite
per risalire ai kb di uscita e di entrata un p'o' come quando
ti colleghi da accesso remoto e nella traybar ci sono i due
computerini che slampazzano a seconda dei dati in arrivo
o in invio.........ciaoooooo.......e grazie.



Se devi ricavare tali info da una connessione di accesso remoto allora dai un'occhiata sul mio sito;
se invece la connessione è diversa e non utilizzi Acceso Remoto, allora trovi sul Sito Comune un
esempio su come monitorare lo stato del modem.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 wrote in message
k29n2tci8ks49658d...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: Forse OT - .Net Framework

 risolto
Se lo dici alla memoria di google potrebbe risultare utile a qualcun'altro.


ehm... si ci avevo pensato anche io.
Praticamente stavo facendo, con PEBuilder, un cd di boot.
Per il framework ho trovato un plugin anche se non sembra funzioni
molto bene.. (e soprattutto è ancora in beta). Quindi la soluzione che
ho adottato è stata non usare BartPE ma un altro software ;)
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: Query con Count e Distinct

"Select Distinct [kampo] From [tabella];"
Devo SOLO sapere quanti records.
cioé:
"Select Count (Distinct [kampo]) From [tabella];" ''Non và
Praticamente, pensavo si potesse fare in un colpo solo :
    Q(0) = "Select"
    Q(1) = "Count (Distinct [kampo1])"
    Q(2) = "Count (Distinct [kampo2])"
    Q(3) = "Count (Distinct [kampo3])"
    Q(4) = "Count (Distinct ........)"
    Q(5) = "From [tabella];"
Set rst = DB.OpenRecordset(Join(Q))
invece mi tocca aprire un recordset x ogni campo :(
Qualcuno ha un'idea migliore.

 "Select Distinct [kampo] From [tabella];"
[cut]
cambia la tastiera.. mi sembra che ci sia il tasto "K" incastrato.. :-(
aloha
--
Stefano Zamboni 
sz...@libero.it
Seconda legge di Scott:
Quando si trova e si corregge un errore, si vedrà che andava meglio prima.

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

Salve a tutti.
Devo cancellare un record da una tabella Access.
Su un form ho il controllo Data3 collegato alla tabella.
Se cerco il record e lo cancello va tutto bene e scrivo:
  SQL$ = "SELECT * From TargetAttivi WHERE IdTarget= " & Index & ""
  Data3.RecordSource = SQL$
  Data3.Refresh
  If Not Data3.Recordset.RecordCount = 0 Then Data3.Recordset.Delete
Ma se faccio una query di cancellazione esce Operazione non valida (Errore
3219).
  SQL$ = "delete * From TargetAttivi WHERE IdTarget= " & Index & ""
  Data3.RecordSource = SQL$
  Data3.Refresh
Perchè?Cosa sbaglio nella sintassi?
Grazie! Giorgio


le Query di cancellazione (come quelle di aggiornamento) non possono essere
usate come RecordSource (pensaci bene: non restituiscono un set di
record...);
credo tu debba usare
Data3.DataBase.Execute SQL$
oppure, con una variabile di tipo DataBase:
Dim DB As DAO.DataBase
Set DB = DAO.OpenDatabase([...])
DB.Execute SQL$
DB.Close
Set DB = Nothing
Ciao
Faber

Un pochino d'ordine.
Un controllo Data č un controllo che permette di connettere un recordset Dao
(o Ado se usi un Ado data Control) a dei controlli secondari. Accetta cioč
come RecordSource una stringa Sql che possa restituire un recordset.
Da una query SQL:
ssQlString="delete * From TargetAttivi WHERE IdTarget= '" & Index & "'"
NON ottieni tuttavia un recordset, dato che si tratta di una query di
cancellazione.
Dovrai quindi usare una Connection Ado sulla quale chiamare una
conMiaConnection.Execute sSqlString
o, se stai usando dao, usare il metodo execute dell'oggetto Database
dbMioDatabase.execute sSqlString
spero di essere stato chiaro
ciao
ugo

Vi ringrazio entrambi per i chiarimenti: ho risolto.
Giorgio
Newsgroup: it.comp.lang.visual-basic
Titolo: problemi con la virgola

Dato un numero,faccio una serie di operazioni ed alla fine il risultato
deve presentare al max due cifre dopo la virgola senza
approssimazione...come faccio?
esempio  :
sia 43.798 il numero
 43.798/2= 21.899
Voglio visualizzare solo 21.89
Grazie


          risultato=int(43.798/2*100)/100
ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con il DBCombo

Questo controllo mi fa impazzire  ......... ogni volta un problema diverso
Ambiente di sviluppo VB5.0
Ho realizzato una form che viene aperta in maniera modale.
All'interno della form ho inserito un tabstrip con diversi pannelli.
Per ogni pannello ho definito una picturebox che contiene i controlli
relativi al pannello considerato.
Tra i vari controlli inseriti nelle picturebox precedentemente definite, ci
sono dei controlli dbcombo.
I dbcombo hanno associato due datacontrol: uno per la definizione della
lista di valori ed uno associato alla proprieta' datasource per
l'aggiornamento dei dati della form.
Il problema che riscontro e' che appena viene visualizzata la finestra, il
contenuto del dbcombo appare selezionato. Cio' risulta esteticamente brutto.
Se qualcuno di voi ha gia' riscontrato il problema ne possiamo parlare.
Saluti
Paolo

Non ti do una soluzione, ma bensì un altro problema:
1. il dbCombo a 16 bit se ne frega altamente della proprietà BoundColumn.
Infatti, qualsiasi campo del rs tu imposti, la proprietà bountext ritorna sempre
il valore del primo campo del rs.
2. il dbCombo a 32 bit, se usato con un rs che ha un solo record ha problemi in
scrolling. Se vi sono due o più records tutto bene.
P.S.: questo è quello che ho riscontrato durante lo sviluppo di due
applicazioni; potrebbe dipendere da condizioni particolari che si sono
verificate nel mio caso. Magari in qualche altro caso funzionano benissimo (e
non sarebbe da meravigliarsi!!!)
Qualcuno ha qualche soluzione in merto?
Paolo ha scritto:


Newsgroup: it.comp.lang.visual-basic
Titolo: Collegamento PictureBox a campo tabella access

VB6
Perché se cllego una PictureBox ad un database access mi da sempre immagine
non valida anche se l'immagine č jpeg?
Claudio

non valida anche se l'immagine è jpeg?
Cioe'? cosa intendi con "collego una PictureBox"?
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Imparentamenti di finestre

Ciao,
c'è qualche controindicazione o qualche accorgimento da usare se
voglio rendere la finestra (o il finestro) del mio prog. in esecuzione
padre o figlio di un'altra applicazione (uso la SetParent)? A me
sembra che funzioni ma qualcosa sbarella.
Grazie.
Daniele
mc8...@mclink.it

sembra che funzioni ma qualcosa sbarella.
Prima di chiudere l'applicazione devi reimpostare il parent del controllo
che hai spostato al suo valore originale
Ciao Bruno

Io ho provato a spostare un pulsante da un form ad un'altro e funziona tutto
bene, tu cosa sposti?
Bruno


wrote:


mio form.
Dal Win32sdk.hlp
The SetParent function changes the parent window of the specified child
window.
...........
Remarks
An application can use the SetParent function to set the parent window of a
pop-up, overlapped, or child window. The new parent window and the child
window ******must belong to the same application******.
Non lo puoi fare :(.
Ciao Bruno
Newsgroup: it.comp.lang.visual-basic
Titolo: voglia di collaborare con società giovane e dinamica?

Cerchiamo gente sveglia e seria, dei giovani che abbiamo il desiderio di
confrontarsi con nuovi traguardi, se sei interessato mandami una e-mail a
in...@euronet2000.com
dimenticavo, noi siamo a Roma.

- PLONK
- kill

 ha scritto nel messaggio
news:9hfa3m$apj$1...@fe2.cs.interbusiness.it...


 ha scritto nel messaggio
news:9hfa3m$apj$1...@fe2.cs.interbusiness.it...


 cameriere due sere alla settimana), >
ehhhhhh davvero????????????
ok ragazzi ci vediamo fra un paio di mesi, io avdo a fare il cameriere...
::))))))
MarioH


sě ma la gnocca č refrattaria al cameriere (soprattutto se gnocco)...
::))))))
ecco, vedi? mi fai scadere nel volgare... ::)))))
MarioH

 ::))))))
beh...io quando giovinevo.....aaaaaa  che tempi!


Qui nella Riviera Adriatica non si guadagna mica così tanto a fa il
cameriere :)))
Forse è un'altra Riviera la tua :)
La gnocca cmq c'è anche qui!



E' una società giovane e dinamica che offre 2M netti al mese...
alessan...@libero.it
, roby o 
in...@euronet2000.com
 ?
Di solito si suppone che una ditta si firmi con il proprio nome e/o intestazione o quantomeno
utilizzi il proprio indirizzo di posta...
E mi stupisco di questa continua insistenza di tale alessandro o roby nell'inviare questi messaggi
che il ng ha già dimostrato non gradire, in quanto reputo Euroweb un'azienda seria... (ammesso che
si stia parlando di EuroWeb97...)
E poi... come mai un'azienda che fornisce servizi internet, o che comunque deriva dalla fusione di
due aziende di cui una leader di servizi internet si fa ospitare il dominio da mclink (dominio
registrato a nome di "roby")? Non ha molto senso, a meno che....
Vabbé, sarà una cosa "addett only"... ;-PPP
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:ap9njtknrsqltl6ad...@4ax.com...


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

come si imposta la risoluzione di un form?
es: 640x480
--------------------------------
Inviato via 
http://usenet.libero.it


Leggere il Sito comune?
--
Il Wodkino Nazionale è a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 Quotefix e altro:
http://www.martek.it/go.asp?portamia=4
 Usr: ICLVB Pw: amici

 ha scritto nel messaggio
news:213Z45Z147Z135Y...@usenet.libero.it...

nomeform.Height, nomeform.Width
Controlla anche il tipo di risoluzione e mi raccomando F1 !!!
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Excel: concat su più righe

Ciao a tutti!
scusate l'OT.
Devo fare un concatenamento di due celle in Excel (A1 & B1) e il risultato
deve essere messo su più righe all'interno della stessa cella.
Avete qualche idea?
Ho provato con:
=A1 & Char(13) & B1
ma mi visualizza un quadratino invece di andare a capo.
Grazie mille per l'aiuto che vorrete darmi
Ciao
A.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 A.
Esiste una Funzione CONCATENA
Cella= CONCATENA( A1; B1;...)


Cella = A1 & CODICE.CARATT(10) & B1
Inoltre la cella deve avere la proprietà Testo a capo impostata, e la trovi
facendo clic destro sulla cella, scegliendo Formato celle, e nella scheda
Allineamento cliccare dentro Testo a capo.
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: winsock e pop

salve a tutti!!
dunque: sto sviluppando un programma che tra le altre cose deve controllare
una casella di posta .. ho creato correttamente la connessione con winsock,
tant'è che mi si presenta la stringa di benvenuto del server, ma quando
cerco di inviare i primi dati (anzitutto 'user nomeutente') tramite SendData
... l'invio avviene ma non ho alcuna risposta dal server ... PERCHEEE???
solitamente, precedendo con Telnet, quando digito 'user nomeutente' ottengo
un OK+ ma qui nulla .. per caso devo accodare un particolare codice (??) per
far capire al server che il comando è terminato e che lo può valutare?
ringrazio chiunque mi voglia rispondere ciao :-D

 ha scritto nel messaggio
1NiP5.38755$BF.13...@news.infostrada.it...
| salve a tutti!!
|
| dunque: sto sviluppando un programma che tra le altre cose deve
controllare
| una casella di posta ..
.............
| per caso devo accodare un particolare codice (??) per
| far capire al server che il comando è terminato e che lo può valutare?
Hai chiuso la stringa da inviare con un vbcrlf?
Comunque nel sito comune 
www.murialdo.it
\it_lang_vb\ c'è un esempio

... l'invio avviene ma non ho alcuna risposta dal server ... PERCHEEE???
"USER " & username & Chr$(13) & Chr$(10)
ogni stringa inviata deve terminare con i caratteri di ritorno a capo.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa di un form...

Ciao a tutti
Dovendo stampare delle fatture che sono contenute in un form, anche se
dimensiono il form alla massima dimensione non raggiungo la dimensione
del foglio A4, come faccio ad unire piu' form e stamparle su una
pagina sola????
Grazia
Ciao
 Stefano

 ha scritto nel messaggio
news:3ca2e8e4...@news.tiscali.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire il dialog "Apri File"

Come posso farlo in VBA???
Devo aprire il dialog per selezionare solo file *.WAV ma non so con che
chiamata caricare il dialog standard di Windows.
Potete aiutarmi?
Mauro
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Mauro
Mi rispondo da solo:
http://support.microsoft.com/support/kb/articles/Q161/2/86.asp
Ciao a tutti

Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 - Formule CR

Devo passare da vb a cr una formula contenente una stringa di testo molto
lunga, ma ho incontrato delle limitazioni di lunghezza (non so se di vb o di
cr)
Qualcuno sa spiegarmi qualcosa, tenendo conto che la mia stringa č maggiore
di 255 caratteri?
Inoltre č possibile attuare una specie di formattazione (grassetto, corsivo,
ecc.) al testo di una formula passato con la seguente sintassi:
CrystalReports1.formulas(0) = "Nome formula = 'testo formula'"
Grazie a tutti
lupo...@freemail.it

CrystalReports1.formulas(0) = "Nome formula = 'testo formula'"
Così direttamente no.
Io ho dovuto creare un report con i saldi dei C/C della mia ditta
e quando il numero era negativo lo dovevo stampare in rosso
La cosa è molto semplice da fare ma non sò se è prorprio quello che
fa' per te.... io ci provo:
io ho fatto così:
ho preparato due campi-formula sul report, uno con testo in nero
e l'altro in rosso e poi con la formula controllo come è il numero
cioè se positivo o negativo
In altre parole in entrambi i campi la formula era del tipo:
nel campo positivo(numero formattato in nero):
if tabella.saldo >=0 then tabella.saldo else 0
(con opzione se campo a 0 non stampare)
nel campo negativo(numero formattato in rosso):
if tabella.saldo <0 then tabella.saldo else 0
(con opzione se campo a 0 non stampare)
con i due campi l'uno sovrapposto all'altro sul report.
In questo modo nello stesso punto del report ottengo
o il saldo in nero o in rosso.
Sembra banale ma per riuscire a trovare questa
soluzione ci ho perso alcune ore...
Saluti.

Newsgroup: it.comp.lang.visual-basic
Titolo: Database Access 2000

Di cosa ho bisogno per lavorare con database realizzati in Access 2000
considerando che:
1) Finora ho sempre lavorato con DB realizzati con Access 97
2) Ho installato semplicemente la versione Enterprise di Visual Basic.
Grazie
Popeye (
pop...@infinito.it
)

 wrote in message
8kkm2m$nms$1...@serv1.albacom.net...


 wrote in message
_glb5.802$KD3....@news.infostrada.it...


scusa se te lo dico, ma ha ragione EnricoTC.
Puoi benissimo lavorare con i db in formato Access 2000, basta usare ADO
come sistema per l'accesso ai dati, oppure DAO 3.6.
io ti consiglio il primo: devi fare un po' di conversioni al codice, perchè
non devi più usare variabili di tipo Database o Recordset. Inoltre, alcuni
oggetti/metodi/proprietà in ADO non esistono più o sono stati sostituiti da
nuove versioni.
Se stati realizzando programmi che un giorno potrebbero girare in LAN, ti
consiglio di guardare bene ADO; se invece funzionano in locale, allora vai
su DAO......
--
Damiani "Alletun" Igor
ico...@simcity.it

Non hai bisogno di nient'altro
Cambia solo la stringa di connessione e i references
INTERESSA SAPERLI NEI PARTICOLARI ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con il file pdbdao.dll

la mia applicazione funziona correttamente, e se la mando in esecuzione
da
visual basic 5 o da compilato tutto bene il mio database creato con
access 97 viene inizializzato e riesco cosě a gestire i miei dati in
maniera funzionale.
il vero problema č che se compilo il programma e creo la directory di
installazione e lo installo su un'altro PC che non ha access oppure si,
nel momento che lancio il programma lo stesso mi chiede il file
PDBDAO.DLL che non esiste neanche sul mio PC perché?
qualcuno sa darmi una mano a risolvere questo enigma.

 wrote in message
3951FC19...@tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Db MicroFocus Cobol

Qualcuno sa dirmi come posso andare a leggere direttamente
il contenuto di un archivio Microfocus *.dat senza passare per
driver ODBC?
Grazie a tutti.


Già provato.. :-( dovevo premettere che l'archivio in questione risulta
compresso..
solo parte dei dati sono "visibili" mancano nelle consonanti tutte le
doppie, sostituite da  chi sa
quale codice Hex ...
Una prima soluzione sarebbe quella di decomprimere tutto usando il comando
Rebuild con la
sintassi appropriata.. ma i tempi di accesso ai file diventerebbe eterno..
quasi quanto quello di
"importare" l'archivio usando odbc in un db di access per poi porter mettere
in relazione le
diverse tabelle.
Il problema reale sta qui, devo trovare il modo di aprire un recordset
mettendo in relazione
differenti tabelle nel modo più rapido possibile..
La cosa è più complicata di quello che sembra..
Tempo fa avevo sperimentato un prodotto, tale IQ per windows.. ma anche
questo con scarsi
risultati per le tabelle collegate.. :-(
Grazie.

Newsgroup: it.comp.lang.visual-basic
Titolo: winsock connessione...

ciao ancora a tutti...
ho un'applicazione server...ed una serie di client...
non so' come mai, ma alcune volte, nella lista di client connessi,
ne ho alcuni doppi...
come se fossero connessi due volte...
com faccio a sapere lo stato di connessione del controllo winsock ?
una specie di scansione di tutte le porte...
se ne trova qualcuna "sbagliata" la chiude...
anche stavolta mi sa' che mi sono capito da solo...
:-)


devi programmare i client a rispondere a dei ping di presenza....
i client irc sono famosi per questo :))))))
ciao :))


non esiste qualcosa di piu' "automatico" ?
ho letto della funzione select di winsock...
possibile ?
ciao...
:)

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

Qualcuno sa dirmi dove posso trovare il driver ODBC o DataProvider di SYBASE
?
Grazie a tutti
Alessandro

 Qualcuno sa dirmi dove posso trovare il driver ODBC o DataProvider di
SYBASE
La settimana scorsa ho scaricato il client di sybase 12 , il malloppo e'
55MB e fischia.
Contiene anche il driver odbc, l' ho provato con visual basic e funzia.
Mi pare sia questo link, altrimenti cerca sybase12.exe con google, vado un
po' di corsa :
http://www.asu.edu/it/fyi/admin/sybase.html
Saluti
GF
Newsgroup: it.comp.lang.visual-basic
Titolo: Resource Editor

Scusate tanto... ma l'editor dei file di risorse è incluso nel pacchetto di
VB6Enterprise?
So che sembrerebbe scontata come domanda, ma qui in ufficio non ce l'ho, ho
provato a rifare l'installazione e non mi compare nelle opzioni (pero'
risulta praticamente installato tutto.)
Non mi compare nemmeno nell'elenco moduli dell'Add-in manager...
Sapete sotto che categoria è indicato nell'installazione? Io ho cercato in
lungo e in largo ma niente, magari mi è sfuggito...Al limite mi sapete
indicare un buon editor di risorse alternativo? Cercando su google ho
trovato solo disassemblatori e programmi di quel tipo, a me serve
semplicemente un editor di file .res!!
Grazie!

 VB6Enterprise?
Si, c'e'... non ricordo in che categoria del setup si trova, in ogni caso
verifica che esista il file
<percorso di visual studio>\VB98\Wizards\ResEdit.dll
Se e' cosi', per farlo riapparire nell'elenco degli add-ins e' sufficiente
registrarlo nuovamente con regsvr32
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: Rudimentale note pad

Ciao a tutti,
sto iniziando a programmare in VB e sono alle prime armi, per imparare
sto cercando di realizzare un rudimentale programma di notepad, preso
dal sito 
www.vbitalia.it
, ma dopo averlo compilato mi dą sempre degli
errori, ho provato ad effettuare delle modifiche ma senza successo, dove
sta l'errore?
Vi riporto il codice:
Private Sub mnuapri_Click()
Dim strnomefile As String
Dim strtesto As String
strnomefile = InputBox("inserisci il nome del file")
Open strnomefile For Input As 1
strtesto = Input(LOF(1), 1)
Close 1
txtfile.Text = strtesto
End Sub
tale programma sta sul sito: 
http://digilander.iol.it/VBItalia/Corso/Lez9.htm
grazie a tutti coloro che mi aiuteranno
Ciao.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 End Sub
Puoi postare gli errori che ti da?
Lokar

 Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
ho scritto una fesseria scusa

 Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
invece di input prova con append

 Ciao.
nella input box metti il percorso completo?

 ho scritto una fesseria scusa
E' bene scrivere le ERRATA CORRIGE come risposta ai propri post errati e
non come altro messaggio in risposta al post principale.
Inoltre ti invito a controllare le impostazioni del tuo newsreader che
antepone R: (piuttosto che Re:) alle risposte, rendendole (per alcuni
newsreader) "non collegate" al thread principale.
Se usi Outlook Express:
Strumenti
   --> Opzioni
       --> Invio
           --> Impostazioni Internazionali
                 --> [X] In risposta al messaggio utilizza sempre
intestazioni in inglese.

 invece di input prova con append
append serve per scrivere non per leggere... :-\

 wrote in message
ac381g$11o$1...@fe1.cs.interbusiness.it...

forse si deve cambiare questo pezzo di codice:
Open strnomefile For Input As 1
    strtesto = Input(LOF(1), 1)
Close 1
con:
Open strnomefile For Input As #1
    strtesto = Input(LOF(1), 1)
Close #1
Cioè, anteponendo il cancelletto all'identificatore del file.
Byez

 Close #1
Ehmmm, direi che, in questo contesto, deve funzionare sia con che senza #.

 ha scritto nel messaggio
news:WMNF8.81067$US3.1...@twister1.libero.it...

Open strnomefile For Binary As #1
    Input LOF(1), 1,strtesto
Close #1
Cambia Input con Binary per leggere il file e per essere più sicuro anche la
seconda riga
Newsgroup: it.comp.lang.visual-basic
Titolo: Convertire file binari

Ciao, sapete come si converte i file binari dei form, in file di testo?
ciao

 Ciao, sapete come si converte i file binari dei form, in file di testo?
Quali files binari dei form?
Gli .frm sono già testo, gli .frx non ha senso convertirli in testo (sono
immagini!), i vecchi .frm di vb3 devi darli in pasto a vb4 che li converte
nel "nuovo" formato testo.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 nel "nuovo" formato testo.
Si sono propio i file .frm di Vb3 che devo convertire,ma non ho il Vb4, come
posso fare?
Può andar ben anche il Vb6?
ciao

 Può andar ben anche il Vb6?
No, non mi risulta.
Se ti fidi credo che qui potresti trovare qualcuno che lo faccia per te.


 posso fare?
In VB3 nel menù File --> SaveFileAs c'è una casella "Save as Text".
Ciao.
lucky
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Se ti fidi credo che qui potresti trovare qualcuno che lo faccia per te.
Che cosa intendi per  "Se ti fidi " ?
Se qualcuno è interessato, posso inviare tranquillamente i file.
ciao

 In VB3 nel menù File --> SaveFileAs c'è una casella "Save as Text".
Purtroppo non ho neppure il VB3...
Sai per caso dove posso trovarlo?
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Chiamate COM inspaghettate...

Ok, stavolta penso di aver fatto un casino...
Ho scritto in VB6 un applicazione-server COM (progetto Activex EXE) che
pubblica una classe Gate di tipo GlobalMultiUse. Un'applicazione esterna č
in grado di effettuare chiamate ai metodi pubblicati da Gate. Alcuni dei
metodi di Gate fanno a loro volta uso di oggetti COM di terze parti...
Cosa succede: se la mia applicazione viene avviata dall'interno dell'IDE di
Visual Basic 6 (service pack 6) *tutto funziona alla perfezione*. Quando poi
compilo il tutto in un eseguibile standalone, le chiamate COM entrano
correttamente, ma nel momento di re-instradare il flusso verso l'oggetto COM
esterno, vi č un blocco totale...
Nota bene: ho verificato che la chiamata all'oggetto COM esterno fa il suo
dovere. Il blocco avviene poco prima che il flusso torni alla mia
applicazione. Ripeto, se la mia applicazione viene avviata all'interno
dell'IDE di Visual Basic il flusso non si interrompe.
Da dove comincereste a guardare per capire come sbloccare la situazione?
Se servono maggiori info sono pronto a fornirle.
Grazie per le eventuali risposte
-- 
Fermiamo Scientology prima che sia troppo tardi!!!
http://xenu.com-it.net
  ---  
http://www.xenu.net
(per rispondere personalmente leva IlDitoDalCulo)

 Da dove comincereste a guardare per capire come sbloccare la situazione?
darei una letta qui per farmi un'idea cosa approfondire:
http://msdn.microsoft.com/library/en-us/vbcon98/html/vbconapartmentmodelmultithreadinginvisualbasic.asp
-- 
ciao, hal

 
http://msdn.microsoft.com/library/en-us/vbcon98/html/vbconapartmentmodelmultithreadinginvisualbasic.asp
 
pardon, in realta` inizia da qui:
http://msdn.microsoft.com/library/en-us/vbcon98/html/vbconscalabilitythroughmultithreading.asp
-- 
ciao, hal

 
http://msdn.microsoft.com/library/en-us/vbcon98/html/vbconapartmentmodelmultithreadinginvisualbasic.asp
aiuto....
-- 
Fermiamo Scientology prima che sia troppo tardi!!!
http://xenu.com-it.net
 - 
http://xenu.freewinds.cx/
 - 
http://www.xenu.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: [FORSE OT] DLL di sistema

Salve a tutti,
    come faccio a sostituire una dll in uso?
Windows (ovviamente) mi blocca la dll che non posso cancellare,
sovrascrivere e/o
rinominare.
Suppongo ci sia la possibilità dato che i programmi di installazione lo
fanno!!
    grazie a tutti Ciao
                                                            danilo
minerv...@inwind.it

 wrote in message news:8t8lc5$hb5$1...@nslave2.tin.it...


 
minerv...@inwind.it
con 9x ti dovrebbe bastare un boot in dos.
con nt4 e dischi ntfs ho installato nt5. semplice, no ?

 ha scritto nel messaggio
news:8t908t$m53im$1...@ID-51318.news.dfncis.de...


 ha scritto


 > Suppongo ci sia la possibilitą dato che i programmi di installazione lo


Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto AdoData

Mi sto esercitando con la proprietà di AdoData .RecordSet.Find per la
ricerca di records
su db1 Access(ex Biblo.Mdb).Ho forse sbagliato il codice? Non riesco a
visualizzare il record richiesto.
Private Sub cmdRicerca_Click()
AdoDatabase.Recordset.Find ("Title '101 User Commands'")
If AdoDatabase.Recordset.EOF = True Then
    AdoDatabase.Recordset.MoveFirst
End If
    AdoDatabase.Recordset.Find ("Title '101 User Commands'")
End Sub
Inoltre,la funzione Move(i) si può applicare con le tabelle di un database
Access non relazionate fra loro?
--------------------------------
Inviato via 
http://usenet.libero.it

 Access non relazionate fra loro?
Sì.

 ha scritto nel messaggio
news:62Z98Z21Z103Y1...@usenet.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: EPP in VISUAL BASIC

>> 
www.ceccherini.net
 <<< 

 Qualcuno sa darmi un idea da dove posso iniziare?
Dalle specifiche del protocollo, direi.
Solo che sono pi� di 60 pagine di RFC... mica ciufoli:
http://www.rfc-archive.org/getrfc.php?rfc=3730
Bye, G.

 
http://www.rfc-archive.org/getrfc.php?rfc=3730
Comunque in generale i protocolli TCP/IP sono veramente gnocchi, poche 
cazzate a stati finiti, con repliche gestibili a gruppi (cioï¿œ, una 
risposta 340 ï¿œ gestibile come una 350, cambia solo la descrizione).
E' solo questione di fare un paio di schemini a blocchi e poi 
realizzarli con dei select case...
Alberto
-- 
Chi semina raccoglie,
ma chi raccoglie si china.
E a quel punto ï¿œ un attimo...

Newsgroup: it.comp.lang.visual-basic
Titolo: Per "RICC" sulle griglie.

Ciao, mi chiamo Fulvio, il ragazzo a cui hai consigliato i controlli
ssdatawidgets. Innanzitutto grazie mille (anzi grazie 1'000'000, visto che
utilizzo database molto grossi), il tuo consiglio è azzeccatissimo: sto
provando la versione Full-Trial (10gg) e va che è una bomba.
Quindi grazie ancora, hai risolto molti miei problemi.
Se non è troppo disturbo vorrei però chiederti due cose:
1.   come faccio ad allineare il contenuto delle mie colonne tutto centrato?
2.   come faccio per definire la colonna1 di una certa larghezza e le altre
di larghezze diverse?
Non so se mi sono spiegato, spero di si.
Ancora un immenso grazie.
Ciao

 di larghezze diverse?
Scusa se mi intrometto
ssgrdgriglia.Columns("Col1").Width = intLarghezza oppure
ssgrdgriglia.Columns(IndiceColonna).Width = intLarghezza
ssgrdgriglia.Columns("Col1").Alignment = ssCaptionAlignmentCenter
Anch'io mi trovo molto bene con gli Sheridan DataWidgets anche i Combo a più
colonne sono molto buoni. C'è qualche baco ma come sempre è comprensibile (e
soprattutto aggirabile).
Ti consiglio di gestire il layout soprattutto da codice (è molto più veloce)
e di gestire le griglie in modo Unbound (vedi esemi della Sheridan) che
incrementa di molto le prestazioni.
Ciao
Lawrence Lebowsky

 wrote in message
news:AEGw6.108984$lj4.3...@news6.giganews.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: IMPORTANTE Data Report

Ciao a tutti, ho un problema:
Quando faccio un report, setto i margini del foglio, metto il titolo, i
campi.. e il testo che deve comunicare in fondo ad ogni pagina, mi lascia
sempre un margine grande il fondo. Es se metto il botton margin =100 twip,
il margine al momento dell'esecuzione rimane uguale. Ho notato che se il
valore è uguale a 0 succede la stessa cosa. Sembra che lui si tenga sempre
un minimo di spazio fisso.
Mi sono dimenticato di dire che uso VB6.
Grazie

 ha scritto nel messaggio
news:8hj7g9$61u$1...@oldforst.unisource.it...


 wrote in message
news:LX9%4.115277$VM3.8...@news.infostrada.it...

    Il fatto è che tempo fa c'ero riuscito.
    Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: databases

Ciao a tutti.
Sto affrontando un progetto in cui devo effettuare una copia di alcuni
record di un database verso un altro database gestito da un altro motore SQL
(uno MSDE, l'altro SQL Server).
Utilizzo ADO v.2.7.
E' possibile tramite un recordset ado, dopo essersi caricati in memoria i
dati necessari, andarli a copiare in un altro database connesso tramite
un'altra connessione?
Per ora la mia soluzione č stata quella di caricare tutto in una struttura
in memoria e poi scorrere la struttura per salvarla.
P.S.: I databases sono identici
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 connesso tramite un'altra connessione?
il problema era circa lo stesso, prova a dare una occhiata
http://makeashorterlink.com/?L10143DC7
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo


Ciao Emanuele,
io farei in questo modo: aggiungi un linked server al tuo server di utilizzo
, aggiungi la login e a questo punto basta che esegui  una query di
accodamento tra i due server -
-------------------
INSERT ecc ecc.
------------------
Riferimenti:
sp_addlinkedserver
sp_addlinkedsrvlogin
dal manuale di SqlServer
http://www.microsoft.com/sql/techinfo/productdoc/2000/books.asp
Ciao Giorgio

 
http://makeashorterlink.com/?L10143DC7
Rammento. Io ho sempre dei dubbi (ma non esperienza) sul fatto che la mia
soluzione non vada... specialmente se parliamo di db di stessa famiglia (nel
coso OP MSDE e SQL Server)

Newsgroup: it.comp.lang.visual-basic
Titolo: ma xche

xche

> xche
la vita è dura..su su su!!
Newsgroup: it.comp.lang.visual-basic
Titolo: Un aiutino.....duplicazione tabella

Ciao, mi trovo in questa situazione. Ho una tabella vuota in un file 
mdb. Ho già creato una procedura che mi popola la tabella sulla base di 
diverse routine. Questa procedura dovrò utilizzarla almeno un migliaio 
di volte. Il problema è che ad ogni lancio della procedura deve 
corrispondere una tabella creata. Avevo pensato di risolvere in questo 
modo : mi tengo la tabella vuota (con la struttura che mi serve)  e 
prima di lanciare la procedure la duplico in un altra tabella identica 
che verrà successivamente popolata. La domanda è ...... come faccio a 
duplicare una tabella esistente ? Grazie

Bastet ha scritto:

Se non sbaglio la SELECT INTO crea una copia della tabella se questa non 
esiste (occhio se la tabella invecie esiste già).
Basta metterci una WHERE falsa (es. 1 = 0) e dovrebbe riprodurti la 
struttura in una sola riga di codice.
Ciao


wrote:

La "SELECT INTO" può essere usata per copiare una tabella in un'altra,
ma non per creare una tabella nuova, in quel caso "CREATE TABLE".
Salvo fraintendimenti! ;-)
Cmq. a Bastet, perchè creare tante tabelle nuove?
Non ne basta una con un campo in più, un "ID" che identifichi in
maniera univoca ogni lancio della tua procedura (che non sappiamo cosa
dovrà fare)?
Ciao!

 Salvo fraintendimenti! ;-)
Questa crea una nuova tabella con la struttura identica alla tabella di 
partenza, a parte gli indici che non vengono riportati:
SELECT * INTO TabellaDest FROM TabellaOrig WHERE 1 = 0
Comodissimo per creare tabelle temporanee al volo
Ciao

Comodissimo per creare tabelle temporanee al volo
Hai ragione, questa non la sapevo!
Grazie della precisazione.
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: Textbox...facile facile

Ciao ,
quando con setfocus sposto il cursore su di una textbox come faccio a
rendere il testo "evidenziato" in modo che sia immediatamente modificabile?
(praticamente: avete presente quando lo sfondo diventa blu ed il testo
bianco?)
grazie a tutti
Stefano
--

Text1.SelStart = 0
Text1.SelLenght = Len(text1.text)
Ciao Luciano.

Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 Win 32 API

Centoventimilaaaaaaaaaaaaaaaaaaaaaa !!!
Ma porc............................ !!!

Se ti puņ essere d'aiuto non č l'unico modo per imparare le API.
Documentazione ed esempi se ne trovano in giro. Con un pņ di pazienza.
Ciao Fabio

Ciao Fabio
Ahimč, gią dato............
Grazie Mauro
Newsgroup: it.comp.lang.visual-basic
Titolo: -- RICAVARE CODICE HTML DA PAG.WEB

-- RICAVARE CODICE HTML DA PAG.WEB
si può fare???
con quale ocx???
rispondete sul ng



con quale ocx???
Con nessuno....aprilo come un file di testo (in fondo non è altro che un
file di testo)

Newsgroup: it.comp.lang.visual-basic
Titolo: Operazioni con grandi numeri

Siccome volevo convertire tra loro numeri in base 10 e numeri in base
256(!):
1) ho scritto una funzione che moltiplica tra di loro numeri di n cifre
2) un'altra che li somma
3) una ancora che esegue la divisione intera
 ma quando mi sono apprestato a fare una funzione che mi restituisce il
resto di una divisione... uff, ho lasciato perdere!
Mi sapete dire se in giro c'č qualche sorgente che mi svolga le operazioni
su grandi numeri?
P.S.
Per grandi numeri intendo numeri anche con migliaia di cifre. In VB basta
considerarli come stringhe e piano piano li si gestisce bene.

 resto di una divisione... uff, ho lasciato perdere!
forse ti riferisci all'operatore Mod ?
es.:
5 Mod 2 = 1
(perchè 5 / 2 è = 2 col resto di 1 ..)
hth
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: OPEN PORT COM1 FALLITA

Ho realizzato un tool che comunica con una stampante sulla COM1. Però appena
tento di aprire la COM mi da errore perché la porta probabilmente è già
aperta. Infatti nel sistema su cui sto testando l'applicativo ho installato
una stampante che è sulla COM1. Esiste una maniera per poter aprire la porta
COM1 e comunicare con la stampante ma senza disassociare la stampante con la
COM1?



 COM1?
impostazioni della stmapante, porta e togli la com1, o meglio ancora se non
devi usare la stamapnate da windows ma solo dal tuo applicatico tramite la
stampa diretta della com, non installare proprio la stampante.

 wrote in message
news:NJNra.37995$K35.1...@news2.tin.it...

Forse non sono stato chiaro. Io ho la stampante installata e non è in
discussione che possa essere non installata. Devo comunicare con la
stampante tramite comandi escape ma appena cerco di aprire la porta COM mi
dice che la porta è già utilizzata. Esiste un altra maniera per comunicare
con la stampante? Oppure è possibile sbloccare la COM così da comunicare con
la stampante?

 la stampante con la COM1?
Se la porta è aperta non vuol dire che c'e' una periferica in funziona 
connessa alla porta, ma che c'e' qualche altro software che sta utilizzando 
quella porta. 
Non è che c'e' il mouse ?
Ciao,
        Fabrizio

 stampante clicco il checkbutton corrispondente alla porta COM.
Allora credo che sia il sistema operativo ad aver impegnato (aperto) la 
porta in questione.
Fai questa prova. 
Associa alla stampante una porta diversa dalla COM1.
Collega la stampante sulla COM1 e prova ad accederci con il VB.
A questo punto, se tutto funziona, è il sistema operativo a bloccare la 
porta e puoi comunicare la stampante utilizzando l'oggetto Printer.
Ciao,
        Fabrizio

 ha scritto nel messaggio
news:D6Nra.79596$DT4.2...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: record

ciao, sono nuovo di questo programma, volevo sapere se ci sono (immagino di
si) delle strutture dati di record (e come si dichiarano)???
Volevo anke sapere se esistono file di record come in pascal o c, o altri, e
come si fa a creare il file e a inserirgli un record nuovo.
Graxie 1000..
Robyy ;)


Ciao
Penso che possa esserti utile il "FileSystemObject" che ti permette di
manipolare un file quasi (e dico quasi com una tabella di un Database) devi
vederti tutti gli argomenti correlati ed in particolare in particolare gli
oggetti "File" e "TextStream".
Con l'utilizzo del "FileSystemObject" (per gli amici FSO) ti crei un vero e
proprio file di testo che potrai manipolare in maniera abbastanza elastica
(es. puntare ad una particolare riga ecc.)
Approfondisci bene l'argomento sull'help trovi tutto, segui i consigli nel
post intitolato
[!]Un aiuto a tutti i newbie postato il 22/05 da Lokar (link
interessantissimi !)
oppure vai su 
www.vb2themax.com
 (di Francesco Balena autore del bellissimo
libro Programmare Visual Basic 6) o ancora su 
www.vbitalia.it
Altrimenti creati un file MDB (Access) con la relativa tabella che potrai
utilizzare e manipolare in mopdo piů elastico e completo (per esempion con
ADO)
JKLJKL :-)

 ha scritto nel messaggio
news:3ced...@news.cis.it...


 come si fa a creare il file e a inserirgli un record nuovo.
Devi aprirlo in modalitą "Random". Un esempio al volo
(attento, non č detto che sia "pulito", eh ?):
************
     Dim NumeroFilmInMemoria As Long
     Dim FileAttuale As String
     Dim NumeroDelFileCorrente As Integer
     FileAttuale = "Archivio.FLM"
     NumeroDelFileCorrente = FreeFile
     Open FileAttuale For Random As #NumeroDelFileCorrente Len = Len(Scheda)
     NumeroFilmInMemoria = LOF(NumeroDelFileCorrente) / Len(Scheda)
     For N = 0 To NumeroFilmInMemoria -1
          Get #NumeroDelFileCorrente, N, Scheda
          Debug.Print Scheda.TitoloSp
     Next N
     Close NumeroDelFileCorrente
************
Per altre info, vedi sulla guida per Open, Seek, Get, Put...
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

 ************
Aprendo il file in modalità random, la gestione di questo è molto più
semplificata rispetto al Pascal. Con questo metodo puoi accedere (anche
scrivere e leggere)direttamente a qualsiasi numero di record, anche se prima
di quel record non ce ne sono altri. Cioè: il tuo file contiene 5 record. Tu
puoi benissimo inserire il record numero 10, anche se il record dal 6 al 10
non esistono. Se sei abituato ad usare il file con il BP ti consiglio di
aprirli in VB sempre in modalità Random, per somiglianza e facilità di uso.
Poi dipende dall'uso che ne devi fare con i file.
-Ciao-
-Luca450Mhz-
Newsgroup: it.comp.lang.visual-basic
Titolo: Help DLL

Qualcuno mi puo postare il file MSSTDFMT.DLL.
Grazie in anticipo.

 Grazie in anticipo.

Newsgroup: it.comp.lang.visual-basic
Titolo: dll... mi sa che ho fatto un casino

Ciao a tutti!
Ho bisogno di un aiuto importantissimo:
ho fatto un programmino in  VB6 che lavora con un database access e crea
fogli di lavoro di Excel facendo vari calcoli e queries...
Io ho sul pc Office XP e quindi l'ho sviluppato compilandolo e creando il
file di installazione sul mio pc.
Poi ho dato il programma a chi mi aveva chiesto di farlo... lui sul pc ha
Office 2000... beh, da quando ha fatto l'installazione del mio programma non
riesce a farlo funzionare! Prima, mentre lo sviluppavo, ogni tanto provavo
l'eseguibile sul suo pc e andava tutto bene.. da quando ha lanciato il file
di installazione il programma si pianta quando deve aprire il file excel
dandomi un errore di dll (errore 48).
Come posso fare a farlo funzionare? Ho provato a disinstallarlo, ma nulla...
non funzionano piů nemmeno le versioni che prima andavano sul suo pc... č
come se l'installazione avesse fatto sě che di colpo manchino delle
librerie....
Aiuto!
Grazie...
Francesco Musicman

Azz! Il problema non è di facile soluzione.
Chissà quale sarà l'ago nel pagliaio...
Ti consiglio di riprovare ad installare Office 2000 dopo aver fatto una
reinstallazione del SO (non formattazione, solo reinstallazione).
Prova anche con le Norton Utilities (delle volte fanno miracoli..)
Se non va ancora prova con i punti di ripristino di Windows (credo che anche
win98 avesse qualcosa del genere..)
Se dopo tutto ciò le cose non vanno lo stesso allora non resta che cotarti a
qualche santo (san Google per esempio...)
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

 Chissà quale sarà l'ago nel pagliaio...
temevo in una risposta simile... ma non ci sarebbe un modo di mettere le
librerie che servono anche sul pc dell'altro mio amico? Oppure magari
installandogli office XP si può sistemare tutto (lui come OS ha winXP) ?
Grazie!
Francesco

può darsi che installando Office Xp si risolva tutto.
Anche il punto di ripristino non mi sembra un'ipotesi da scartare.
bye
PS ora vado a dormire (domani università). al max continuiamo domani
pomeriggio.
