mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: DLL e Inserimento in 10 tabelle

Evvai riecchime qua...
Dopo essermi cimentato con le Procedure su Oracle passo alla creazione di
DLL x inserire al meglio i dati da un client in VB6 allo stesso Oracle...
Assodato che io sappia ora inserire su Oracle tutto quello che mi serve vi
chiedo invece qualche dato tecnico relativo ad altre cose.
Come ho messo sull'oggetto del post ho 10 tabelle con circa 10 campi a
tabella (alcuni anche di +)...L'inserimento in queste tabelle avviene in
cascata cioè prima inserisco in una e poi in successione le altre non
insieme ma una dietro l'altra. Mi chiedevo quindi se non fosse il caso di
passare tutti e 100 i valori a una DLL che risieda sul server in modo da
alleggerire il lavoro al client che non sempre è potente mentre il server
che deve gestire il DB è + potente. In questo modo poi la DLL richiama DLL +
piccole che si adoperano all'inserimento dei propri valori nelle relative
tabelle chiaramente richiamando le loro Procedure... A ogni DLL potrei
legare 1 tabella.
Oppure lo stesso client richiama le 10 DLL e passa i rispettivi valori x
l'inserimento...
Voi che ne dite? quale delle 2 soluzioni è la + valida???
Grazie!!!

 Voi che ne dite? quale delle 2 soluzioni è la + valida???
Prevederei decisamente la seconda, quindi la possibilità che il client possa
scegliere quali tabelle gestire (anche perchè, prima o poi, ti capiterà di
_doverlo_ fare), senza per questo impedire di fare tutto in un colpo solo.
Però rileggendo e salvo "privatizzare" quelle che chimi "DLL + piccole",
credo che facendo la prima tu abbia automaticamente la seconda. O no?!

 credo che facendo la prima tu abbia automaticamente la seconda. O no?!
Scusami ma temo di non aver capito completamente... In pratica avrei le 10
dll piccine normali... e un'11esima che le richiama in cascata... invece di
lasciare al client la chiamata alle singole dll. Restando sottointeso che se
mi servisse una sola dll delle 10 la posso richiamare tranquillamente.
Che ne pensi?

[*francy* = aaa...@llll.jj in news:bq26jk$9ks$
1...@fata.cs.interbusiness.it
]
ha scritto:

Penso che tu hai scritto esattamente questo nel tuo primo post.
Penso che con questo tu abbia tutte le possibilità.

Newsgroup: it.comp.lang.visual-basic
Titolo: problema password

ho impostato in un database Access 2000
una possword
in VB6 lo voglio aprire e uso la seguente stringa di connessione
StringaConnessioneAccess = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
pippo.mdb"
ho provato a scrivere in questo modo
StringaConnessioneAccess = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
pippo.mdb; PWD=pippo"
non funzione...mi da errore
in che modo la devo specificare la password?
grazie mille
laura

 ha scritto nel messaggio
news:Kf9T6.939$7F4....@news.infostrada.it...


 wrote in message
Kf9T6.939$7F4....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] E adesso??? :-(

Ciao a tutti,
Sono impiantato in un punto dove credevo quasi impossibli piantarsi, e
invece...
Avendo un database Access con una sola tabella (più facile di cos' si
muore...), volevo aggiungere un record alla stessa...E allora bello
sorridente ho cominciato...
Private Sub btnSalva_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnSalva.Click
Try
Connessione.ConnectionString = StringaConnessione
'Apri la connessione
Connessione.Open()
'Crea il DataAdapter con la tabella
Dim Adapter As New OleDbDataAdapter(Sql, Connessione)
'Riempi il DataSet con la tabella
Adapter.Fill(DataSet, "Archivio")
Dim Tabella As DataTable = DataSet.Tables("Archivio")
Dim Record As DataRow = Tabella.NewRow
Dim Comando As New OleDbCommandBuilder(Adapter)
Adapter.InsertCommand = Comando.GetInsertCommand
Adapter.DeleteCommand = Comando.GetDeleteCommand
Adapter.UpdateCommand = Comando.GetUpdateCommand
Record("Lunghezza") = Mis1.Text
Record("Larghezza") = Mis2.Text
Record("Spessore") = Mis3.Text
Record("NumFogli") = Prod1.Text
Record("NumFogli/Ora") = Prod2.Text
Record("MCubi") = Prod3.Text
Record("MCubi/Ora") = Prod4.Text
Record("Data") = Temp1.Text
Record("OraInizio") = Temp2.Text
Record("OraFine") = Temp3.Text
Record("TempoPerso") = Temp4.Text
Tabella.Rows.Add(Record)
Adapter.Update(DataSet, "Archivio")
Catch ex As Exception
MessageBox.Show(ex.Message, ex.Source, MessageBoxButtons.OK,
MessageBoxIcon.Error, MessageBoxDefaultButton.Button1,
MessageBoxOptions.DefaultDesktopOnly)
Finally
'Chiudi la connessione
Connessione.Close()
End Try
Me.Dispose()
End Sub
Il tutto generandomi il seguente (nonché implacabile) errore: Errore di
sintassi nell'istruzione INSERT INTO
Come noterete il nodo della questione è la stringa INSERT del provider
Sql...
Ma adesso come lo risolvo il problema???
-- 
Alessandro Vaia,
PANGUANETA S.p.a.

 Ma adesso come lo risolvo il problema???
Ti risulta una cosa del genere?
Questo errore potrebbe essere generato quando vengono utilizzate delle
parole riservate nei nomi di un campo, di un oggetto o di una variabile
utilizzando i database.
Altra possibilità è l'utilizzo di caratteri speciali quali . / * : ! # & - ?
(esempio : Record("NumFogli/Ora") = Prod2.Text) oppure uno spazio nel nome o
un nome di colonna che inizia con un numero.
ciao
Alessandro
--
Morfeus®
Free Joint
:PII

 Dim Adapter As New OleDbDataAdapter(Sql, Connessione)
Cosa vale Sql?
Il commandBuiler si basa sulla stringa Sql che hai usato per fare la Select
per generare le istruzioni Insert/Update/Delete
Ma tu qui non hai scritto il valore di Sql.
Ciao
Skysurfer

 un nome di colonna che inizia con un numero.
Cavolo, era proprio quello stramaledetto /!!!!
Grazie di tutto!!! ^_^

 Grazie di tutto!!! ^_^
Prego
MILAN MILAN MILAN
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Windows CE

Qualcuno ha provato a programmare qualcosa con VB5 per WinCE?

>Qualcuno ha provato a programmare qualcosa con VB5 per WinCE?
E con Access ? Interessa anche me la cosa
--------------------------------------------------------
Paolo Hölzl
Metis Informatica S.r.L technical manager (Ferrara)
--------------------------------------------------------
ATTENZIONE!, antispam 
per reply sostituire xxxx.xxxxxxx.xx con 
mail.asianet.it

...


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

Mi sapete dire se i server di posta su internet utilizzano ancora l'UUENCODE
per gli attachment oppure c'è un nuovo formato di conversione?
Per ora il mio attachment entra nel corpo della mail con un:
being 666 etc.

 wrote in message
news:8p52f4$2k8u$1...@stargate1.inet.it...


 ha scritto nel messaggio
news:8p54q1$26o6$1...@stargate1.inet.it...


Ah no, quello non c'entra...
Per inviare un allegato devi specificare i MIME boundaries... cerca gli RFC
relativi alle MIME.
Ciao,
Alessandro
hey <h...@hey.hey> wrote in message news:8p5bo3$1mtq$1...@stargate1.inet.it...


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

E' possibile esportare tramite VB una query access in un foglio excel?


perche' vuoi usare vb nel mezzo?
non capisco se vuoi esportare il comando della query  od il risultato della
query...
per il comando credo che un taglia incolla della sintassi SQL vada benone
se vuoi invece inserire in un foglio il risultato della query
basta aprirla come qualunque altra connessione a db esterni
Newsgroup: it.comp.lang.visual-basic
Titolo: Pulire stringa dalle "

Ciao a tutti,
    cosa dimentico in questa stringa?
PulisciStringa = Replace$(PulisciStringa, """ ,"""")
Logicamente vorrei sostituire al carattere " i caratteri "" (doppie 
virgolette) per inserirle nel database. Ma mi viene generato errore. Quando 
sostituisco un singolo apice con 2 singoli apici non va in errore.
Grazie! 

 PulisciStringa = Replace$(PulisciStringa, """ ,"""")
Cosi?
REPLACE$(PulisciStringa,"""","""""")
-- 
DBMS Firebird
VB6 + Ado


ciao,
devi semplicemente mettere il doppio apice in codice ascii. ti va in
errore perchè i doppi aplici servono per gestire gli le stringhe in
vb.
la sintassi corretta è la seguente
Esempio 1:
...
 PulisciStringa = Replace(PulisciStringa, chr(34) , chr(34) & chr(34))
'chr(34) è " in Ascii
...
Fine Esempio 1.
Fammi sapere nel caso trovi problemi.

 
Prova a mettere il " tra apici singoli...
cosi: '"'
Johnny

 Prova a mettere il " tra apici singoli...
Il suo problema credo fosse diverso
s$="Pip""o"
debug.pring REPLACE$(s$,"""","""""")


PulisciStringa = Replace$(PulisciStringa, Chr(39),Chr(34))
HIH
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Ringrazio tutti quanti ma ho risolto in tutt'altro modo...
Cmq per rifarmi al problema la soluzione esatta č:
REPLACE$(PulisciStringa,"""","""""")
Come ha postato Andrea la prima volta... era cosě che mi serviva...  ma a me 
il problema non sussiste + xche quando trovo i doppi apici li tolgo visto 
che devo salvare + spazio possibile.
Grazie a tutti!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Listbox da file txt o ini

E possibile che una listbox carichi il suo contenuto(appunto una lista) da
un file di testo??
grazie

un file di testo??
Devi farlo via codice in esecuzione:
Apri il file ( istruzione OPEN )
Leggi una linea ( istruzione LINE INPUT )
Immetti la line nella listbox ( metodo Listbox.additem )
Torni a leggere un'altra linea se non sei alla fine del file ( funzione
EOF )
Chiudi il file ( istruzione CLOSE )
Ciao
Daniele

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Programma Modulare

Vorrei realizzare un programma che consti inizialmente di un singolo modulo
ma che possa in futuro essere integrato con ulteriori moduli forniti
separatamente.
Per intenderci mi interessa realizzare un form MDI composto da singoli form
MDI child che possano essere acquistati separatamente e linkati al programma
base.
Per esempio un programma di contabilità che parta inizialmente dalla sola
fatturazione e quindi possa essere integrato con magazzino, bollettario etc.
Qualcuno sa dirmi come fare?
Grazie in anticipo.





 wrote in message
821i2h$d2p$1...@news.flashnet.it...


 wrote in message
news:821huj$d0m$1...@news.flashnet.it...


 wrote in message
82c0ro$jf6$1...@news.flashnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Microsoft Speech SDK 5.1

Salve a tutti.
In questi giorni ho provato a cimentarmi con la tecnologia che permette di
scrivere applicazioni dalle quali è possibile sintetizzare il parlato per
leggere testi e importare testi acquisiti dal motore di riconoscimento
vocale.
Microsoft Speech SDK 5.1
L'intero sistema sembra funzionare tranne che per il fatto che il motore
riconosce solamente la lingua anglosassone ed il cinese semplificato.
Qualcuno sa dove è possibile reperire gli speech engine per la lingua
Italiana?.
Perchè nella documentazione che stò leggendo se ne parla ma non ho ancora
trovato il sito da cui scaricarli. ( Sulla rivista VBJ di Dic 2000, c'è
scritto di scaricare gli Speech engine della IBM, ma non dice da che URL)
Accetto i vostri suggerimenti, ringraziandovi
Pino Saffioti
---------------
pi...@asl1.to.it


Mi sono imbattuto nello speech engine provando Microsoft Agent
(di piu' nin zo :))
http://www.microsoft.com/msagent/downloads.htm#tts
CIAnO

 Italiana?.
Dragon Naturally Speaking SDK, ...io ho usato quello.
Ma non essendo un prodotto commerciale ma solo per studio non ho
approfondito il discorso delle licenze per poter usare il loro engine. Non
ricordo da dove l'ho scaricato se dal loro sito o da un altro... cmq cerca
con google e lo troverai di sicuro
p.s. funziona che è una meraviglia e + lo usi + funziona meglio...

Newsgroup: it.comp.lang.visual-basic
Titolo: tipo dati

come faccio a capire il tipo di dati di un campo di un database access
davisual basic(esempio:testo , data....ecc)?

davisual basic(esempio:testo , data....ecc)?
ADO o DAO (oppure in campo misitico: TAO ;-) ) ??
In ADO credo si possa fare cosě, anche se non ho provato:
Recordset.Field("CAMPO").DataFormat
Controlla sulla guida cosa dice a riguardo
Sciao
Aran


con table defs
Private Function tipo(dbs As Database, NumCampo As Integer) As String
Dim tdf As TableDef
Dim fld As Field
Set dbs = OpenDatabase(nomedb, 1)
Set tdf = dbs.TableDefs(cmbTabelle.List(cmbTabelle.ListIndex))
Set fld = tdf.Fields(NumCampo)
Select Case fld.Type
        Case Is = 1
            tipo = "Boolean"
            W.tipo = 3
        Case Is = 2
            tipo = "Byte"
            W.tipo = 1
        Case Is = 3
            tipo = "Integer"
            W.tipo = 1
        Case Is = 4
            tipo = "Long"
            W.tipo = 1
        Case Is = 5
            tipo = "Currency"
            W.tipo = 1
        Case Is = 6
            tipo = "single"
            W.tipo = 1
        Case Is = 7
            tipo = "double"
            W.tipo = 1
        Case Is = 8
            tipo = "Date"
            W.tipo = 4
        Case Is = 10
            tipo = "String"
            W.tipo = 2
        Case Is = 11
            tipo = "Bynari"
            W.tipo = 1
        Case Is = 12
            tipo = "Memo"
            W.tipo = 5
     End Select
End Function
Ciao

 Aran
Proprietà Type e non DataFormat

 ADO o DAO (oppure in campo misitico: TAO ;-) ) ??
scherza, scherza pure...
ISOBuster v1.0 [1.7M] W9x/2k/XP FREE
http://www.smart-projects.net/isobuster/
{Recover data from CD}
ISOBuster can also interpret files in DAO, TAO, ISO,
j.data :P


ISOBuster can also interpret files in DAO, TAO, ISO,
 
Acc... è vero Track At Once....
Me ne ero scordato...
;-))))
Aran
Newsgroup: it.comp.lang.visual-basic
Titolo: TIMER & dintorni

vedevo quello che avete scritto sui timer e sulla problematica relativa al
loro utilizzo. Su come sia meglio usarne uno e quant'altro.
Vorrei saperne di piů abbinato ad un esempio pratico che vorrei sviluppare:
Un esempio tipico potrebbe essere la gestione delle apparecchiature di una
fabbrica o di una casa.
Se devo implementare una Time line valida per 24h ma che deve tenere "a
mente" anche i centesimi.....
E se su questa timeline posso avere (diciamo al max 3) eventi che sospendono
la timeline e lanciano un altro timer.....
Da tutto questo si evince che avrei bisogno di 4 timer e forse anche di un
quinto per sincronizzare il tutto E QUINDI i timer di Vb sono inadeguati.
Ora tutti quelli che ho interpellato mi dicono che solo un "pazzo" farebbe
una cosa del genere in VB perchč tutti la farebbero IN C !!!
Ma tant'č...
Immagino che dovrei usare una API che si interfaccia all'orologio di sistema
ma io le API le ho usate solo per le icone e per scrivere i registri...da
dove comincio?Mi fornite qualche dritta su API timer eventi e dintorni?
Grazie a tutti quelli che mi leggono!

la timeline e lanciano un altro timer.....
Quindi ne basta 1: quello che conta i centesimi.
Comunque un pc con Windows non e' in grado di tenere traccia dei
centesimi in modo affidabile, quindi non hai sbagliato solo linguaggio
di programmazione --che essendo circa interpretato peggiora ancora le
cose-- bensi' proprio sistema operativo. Se hai bisogno di andare al
centesimo preciso, ti serve Qnx.
Comunque e' anche vero che se hai delle cose che devi far girare al
centesimo e' meglio che lasci perdere e che compri un sistema di
controllo integrato, perche' ci sono problematiche che non ti verranno
mai in mente finche' non te le fa notare qualcun altro oppure perche'
ti capita il caso incredibilmente sfigato che te le mette in evidenza.
E tipicamente e' troppo tardi...
In casa o in un'azienda, piu' che con una precisione del secondo e'
quasi impossibile che tu riesca ad andare, quindi o ti accontenti
oppure devi rivedere da capo tutto il discorso. 
Men che meno, poi, in Visual Basic: non per cattiveria, ma perche'
diventi matto e non ne vale la pena: tanto vale che scrivi in C su un
sistema operativo nato per quello.
Saluti.
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro RomagnoloŽ, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD
Newsgroup: it.comp.lang.visual-basic
Titolo: Quando esce la sp1 di VS.NET???

come da oggetto...
Grazie!!!


  Dunque per il Framework SDK .NET c'è la v1.1, per 
VS.NET
 c'è il 
VS.NET
 2003
che include il Framework SDK .NET 1.1.
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

La SP1 di visual studio.NET é uscita circa 6 mesi fa... Ora c'é visual
studio.NET 2003 che é un po' come la SP2 di Visual studio.NET però lo compri
già così! ;)
                        Ciao
                                                Allanon
P.S. Io voglio la SP1 di windows 2003 server! :( La beta era tanto bella...
La versione finale é tanto instabile! Ma come é possibile mi chiedo?!
-- 
- SPAMKILLER
 L'indirizzo delle risposte é 
itlangv...@michele.sytes.net
 LASCIATE il NOSPAM fa parte dell'indirizzo :-)
  Per superare le impostazioni di protezione antispam scrivete
  nel testo del messaggio la scritta "SPAMKILLER"
Scusate il disturbo, ma non posso più di pubblicità

 ha scritto nel messaggio
news:bej44q$5n5em$
1...@ID-67444.news.dfncis.de


 Forse hanno sbagliato a masterizzare i cd :p
:)
conoscendoli, prob hanno introdotto appositi bug per dar lavoro alla service
pack division :>

 chiedo?!
Do more with less programmers! <bg>

 si', anche i bug sono d'annata :P
Intendevi "dannati" ?
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: Partita Iva

Avrei bisogno di una procedura che verifica la correttezza della partita
Iva, se esiste, a parte la lunghezza dei caratteri, ci sono altri controlli?
Massimo

questo è tutto quello  che ho.
ciao.
daniele
*****************************************
La Partiva IVA
E' costituito da undici cifre. Le prime sette sono il numero progressivo
attribuito dall'ufficio IVA, le cifre dall'ottava alla decima sono il codice
della provincia dove ha sedel'ufficio IVA competente, l'undicesima cifra è un
carattere di controllo.
Prime sette cifre: sono attribuite dall'ufficio IVA e sono progressive. 8, 9 e
10a cifra: codice provinciale: necessario database contente i codici per tutte
le provincie italiane.
Carattere di controllo: si prendono le cinque cifre di posizione dispari e si
sommano. Poi si raddoppia ogni singola cifra di posizione pari, e se il
risultato è superiore o uguale a 10 si riduce sommando la cifra delle decine a
quella delle unità. Si sommano tutti questi risultati. Poi si determina il
totale delle due somme di cui sopra (cifre di posizione pari e cifre di
posizione dispari). Si prende la cifra delle unità di questo totale e la si
sottrae da 10.
La cifra delle unità di questo risultato è il codice di controllo.
Esempio:
Ditta di Torino.
L'ufficio IVA assegna il numero progressivo 0123581.
Il codice di Torino è 001.
Fin qui : 0123581001
Calcolo cifra di controllo:
Cifre di posizione dispari: 0+2+5+1+0=8
Cifre di posizione pari: 1+3+8+0+1, che si raddoppiano diventando 2+6+16+2. 16
diventa 1+6=7 In definitiva, cifre di posizione pari: 2+6+7+2=17
Gruppo pari + gruppo dispari (8+17)=25 La cifra delle unità è 5, 10-5=5.
Dunque il numero di controllo è 5, e la partita IVA è: 01235810015.
*****************************************

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma autopartente

Come faccio ad impostare che un programma si renda autopartente ad ogni
avvio di windows soltanto cliccandoci sopra?
In pratica, se io apro questo programma, questo si deve installare da
qualche parte ed essere autopartente ad ogni avvio di Win.
Grazie.

 ha scritto nel messaggio
news:o8bb9.277$c66...@tornado.fastwebnet.it...

devi inserire le istruzione per lanciarlo nel registro
di sistema in questo punto:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
poi, o ogni volta che lanci il programma controlli questa chiave e vedi se
esiste,
oppure scrivi in un file INI che l'applicativo è registrato e non deve più
andare nel registro.
--
bye BlackMagic
ICQ: 85485468
Aiuta la ricerca sul cancro 
http://members.ud.com
Join
at:
http://members.ud.com/services/teams/team.htm?id=2E71C62A-8E67-48DB-B472-
BCA129B35412

 andare nel registro.
Grazie lo stesso... mi sono accorto che è troppo complicato per me... sono
rimasto troppo indietro con VB ultimamente...
Ciao Cosky

 ha scritto nel messaggio
news:illb9.439$c66...@tornado.fastwebnet.it...

oppure esiste sempre la cartella esecuzione automatica di windows....


> oppure esiste sempre la cartella esecuzione automatica di windows....
Sto cercando di fare quella infatti...
Grazie Cosky
Newsgroup: it.comp.lang.visual-basic
Titolo: Vb & Mysql

Salve a tutti,
vi volevo chiedere un grande aiuto [di solito preferisco non dare troppo 
fastidio con domande che cmq troverebbero risposta spulciando bene su san 
google,ma sono da un 56k e vi lascio immaginare lo stress per uno abituato a 
ben altro genere di velocità :-)...quindi se anche potete solo consigliarmi 
qualke link dove documentarmi sul mio problema ve ne sarò gia molto molto 
grato]
Ritorniamo a noi...
Io e un mio collega di università stavamo facendo un po di prove tecniche 
per permettermi di collegarmi al suo database mysql (che ha in locale)  con 
una mia applicazione scritta in vb...
Ho scaricato il driver dal sito di MySQL (MyODBC 3.51.11) e aggiunto il 
seguente codice:
Private Sub Command1_Click()
  Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
    conn.CursorLocation = adUseClient
    conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
        & "SERVER=" & Text1.Text & ";" _
        & "DATABASE=" & Text2.Text & ";" _
        & "UID=" & Text3.Text & ";" _
        & "PWD=" & Text4.Text & ";" _
        & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 163841
    conn.Open
    MsgBox "mi sono connesso"
End Sub
Purtroppo pero non siamo riusciti a farlo partire perchè  sembra che sia 
impossibile accedere al server... a questo punto gli ho passato l'exe e gli 
ho fatto provare ad utilizzare localhost come nome server e tutto ha 
funzionato alla perfezione...
E' il mio codice che sbaglia a fare qualche cosa oppure è la configurazione 
del server che va cambiata in qualche modo ?
Sapete indicarmi eventualmente dove io (o lui ) sbagliamo ? e magari una 
possibile soluzione?
Scusate se non sono stato breve ma andavo di fretta :-)
Grazie
Giuseppe Cozzolino 

 funzionato alla perfezione...
Perchè non ci dici che errore ti restituisce? :-)
Comunque su mysql server è possibile che sia disabilitato l'uso esterno 
al localhost e per questo vengono negati accessi esterni.
Se dalla macchina esterna provi a lanciare un
# telnet <indirizzo_mysql_server> 3306
Che ti restituisce?
Potrebbe addirittura anche esserci il firewall di mezzo.
-- 
Ciao,
	Fabrizio
===  
http://www.negusweb.it
  ===
Newsgroup: it.comp.lang.visual-basic
Titolo: Ifilters Implementation

Is it possible to implement the Ifilter methods using Visual Basic, and if
yes could anyone tell me where to find information about it

 wrote in message
news:986974752.13525.0...@news.demon.co.uk...

Newsgroup: it.comp.lang.visual-basic
Titolo: RICHTEXT CONTROL 5.0

I am using VB5 and my program is using the RichText Control property.
Is there an update of this OLE?  I'm asking because in a point in my
program I need to change the font size of the RichTextBox but there is
no such property (strange huh?)  I'm using RichText 5.0 and I'm
looking for an update WITH the Fontsize property.
Also, is there anyway to get the RichTextBox OLE to search for text in
a file and scroll around it?  If so, could someone give me some help
using it. :)
Thanks all,
	Chetan

Chetan:
The Font attributes are sub properties to the RTB control's .Font property
ie. rtbText.Font.Size, etc.  Try typing a period after the .Font in your
editor.  I do know that my RTB control indicates that it was updated with
Service Pack 2, so you may need to download that.
Tom Schoeneweis
Utility Management Services
SG Tec
t...@sgtec.com

Salve a tutti!!
Sapete se esiste una qualche ocx o simili che gestisca la lettura di codici
a barre? o qualche programma shareware?
Grazie a tutti!!

Ne esistono a tonnellate, per trovarle puoi cercare su qualcehe mototre di
ricerca. Inoltre se devi usare code39 puoi trovare anche dei font apposta da
usare invece degli ocx.
ciao Rick

 
A parte il fatto che questo thread e' errato..... (non e' in root)
Non serve alcuna OCX!
Il lettore dei codici a barre fornisce il codice letto o per via seriale RS232 o in
emulazione tastiera, di modo che quando leggi un codice viene simulata (in modo hardware) la pressione dei tasti sulla
tastiera che scrivono il codice letto.
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] controllo db aperto

ma per controllare se un database è già aperto
come posso fare  senza eseguire una open/close
grazie luciano

 come posso fare  senza eseguire una open/close
con DAO farei una cosa del tipo
Dim IsOpen As Boolean
IsOpen = Not (DB Is Nothing)
oppure
Public Function IsOpened(DB As DAO.Database) As Boolean
    On Error GoTo Closed
    Dim NTable As Integer
    NTable = DB.TableDefs.Count
    IsOpened = True
Closed:
End Function
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: OT Tastiera e punto decimale

Scusate l' OT, ma tra sviluppatori di software
in gran parte gestionale forse il problema e' sentito.
In vista dell'Euro come posso riconvertire la pressione del "punto"
nel tastierino numerico in "virgola" senza intervenire su tonnellate di
software ?
I miei clienti che macinano enormita' di numeri non accettano
l'idea di usare la virgola vicino alla "M"..., troppo scomodo.
Una soluzione che tengo come "salvagente" sta nel cambiare
fisicamente la tastiera con una, ad es., IBM  che ha gia' la virgola
al posto del punto. Ma mi sembra un po' drastica,
qualcuno sa come risolvere con qualche intervento software ?
Grazie
Ciao ciao
Giuseppe

Forse potrebbe esserti utile qualcosa del genere
http://www.rocketdownload.com/Details/Smal/keychange.htm


 ha scritto

Io ad inizio programma intercetto qual'è il separatore decimale nelle
impostazioni, poi ho una funzione generale KeyPremi che viene lanciata in
ogni form all'evento keyup che oltre a gestire altre cose rimappa il punto
del tastierino.
Ciao
--
Lawrence Lebowsky
#marcone#@#sidsrl#.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Forse OT, da IDL a Type Library come?

Salve, scusate forse sono OT, qualcuno sa dirmi come posso ottenere una type
library da un file idl? o se esiste un altro modo per utilizzare un idl da
visual basic?
Grazie a tutti per il vostro interessamento.

library da un file idl? 
http://msdn.microsoft.com/library/en-us/midl/midl/generating_a_type_library_with_midl_2.asp
Generating a Type Library with MIDL
-- 
hth, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: variabile tra form

Ciao a a tutti
come posso esportare una variabile da un form in un altro, ho creato un 
modulo contentente "Global var" ma se in un form gli assegno un valore, in 
un altro form non me lo restituisce, perchč? 

 ebbe
l'ardire di profferire:

Una variabile dichiarata global in un modulo viene vista da tutti i 
form e le routine, a meno che tu all'interno di un form non abbia 
dichiarato una variabile locale con lo stesso nome...
-- 
IBM: I'll Buy Macintosh
News 2002 [v 2.07] / StopDialer / PopDuster - 
http://www.socket2000.com
Akapulce portal: 
http://www.akapulce.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Evento KeyUp e KeyCode

Utilizzo l'evento KeyUp per intercettare la pressione di alcune sequenze 
di tasti in un TextBox ed eseguire una routine.
Nel codice dell'evento scrivo:
Private Sub T_e_prezzo_KeyUp(KeyCode As Integer, Shift As Integer)
     If IsNumeric(T_prezzo) Then
         If KeyCode = vbKeyE Then
             If (Shift And vbCtrlMask) <> 0 Then    'se e' premuto ctrl 
converte arrotondando al primo decimale
                 T_e_prezzo = Round(T_prezzo / EURO, 1)
             Else    'altrimenti arrotonda a 2 cifre decimali
                 T_e_prezzo = Round(T_prezzo / EURO, 2)
             End If
             SendKeys "{Home}+{End}"
         End If
     End If
End Sub
Nell'IDE funziona!
Installato su un altro PC funziona se premo E, ma CTRL+E non funge.
Una routine simile in cui intercetto il ? non funziona (su un altro PC). 
In questo caso ho utilizzato if KeyCode=191.
Dove sta il problema?
grazie
		maxx

 In questo caso ho utilizzato if KeyCode=191.
Non ho capito dove hai il problema.
Comunque: perchè usi la sendkey (che è deprecabile)?
E perchè non usi le proprietà esplicite (Text1.Text e non Text1)?
Ciao
------------------------- SiDB Simple DataBase engine ----
------------------------- adParser Expression evaluator --
 
http://space.virgilio.it/zntf...@tin.it/
----------------------------------------------------------

 E perchè non usi le proprietà esplicite (Text1.Text e non Text1)?
Come sopra ...
grazie
		maxx

 Una routine simile in cui intercetto il ? non funziona (su un altro PC). 
A chi puo' interessare:
Il problema nell'íntercettamento del ? dipende dal fatto che io uso la 
tastiera americana e quindi il Keycode del tasto ? e' diverso da quello 
che ottengo su una tastiera italiana (sono una pippa).
ciao
		maxx

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

Avrei il bisogno di compattare e fare il multivolume di alcuni dati tramite
VB.
Qualcuno mi sa dire dove posso trovare delle dll utili a questo?
Grazie
    Leonardo
--
----------------------------------------------------------
Messaggio Inviato da Leonardo
Sito Internet 
http://web.domaindlx.com/leoleo/

 wrote in message
news:8qtftf$ha9$1...@fe2.cs.interbusiness.it...


 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: Secondo voi è possibile...

Secondo voi è possibile da vb inviare informazioni ad un sito munito di
pagine asp, però senza eseguire l'internet explorer.
Grazie

 Grazie
  immagino di si con il controllo inet

 di pagine asp, perň senza eseguire l'internet explorer.
Si puoi gestire tutto da codice...

 wrote in message U%yz8.34650$8D3.9...@news1.tin.it...


 pagine asp, però senza eseguire l'internet explorer.
certo che si può.
Metti sul server una pagina .asp che prenda i valori in "post" o in "get".
Per mandarglieli puoi usare Internet Controls e fare una post o una get su
quella pagina. Se non vuoi usare internet controls usa direttamente i Socket
buon 1° maggio
ciao
Valerio

 pagine asp, però senza eseguire l'internet explorer.
http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=31390&lngW
Id=1
E' un esempio che ho postato su PSC e dovrebbe darti una mano.
Usa INET e il metodo get/post.
CiaoZ
SebaMix

 ha scritto nel messaggio
news:U%yz8.34650$8D3.9...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione a MSQL7 da ADO

deV<

 Source=" & Server & ";Use Procedure for Prepare=1"
Beh, direi che é ok... Infatti passi direttamente dal driver OLEDB di
Microsoft ed eviti il mitico Kagera (driver OLEDB per fonti ODBC) che pare
essere così poco prestazionale...
Un appuntino... Da VB.NET... Ci fregano sulle proprietà di default... Cioé
si potranno ancora mettere ma solo se con parametro... quindi penso che
convenga uniformarci in anticipo e mettere tutti i bei ".text"
        Ciao
                Allanon

 ha scritto nel messaggio
news:9gs8s9$asmc0$1...@ID-67444.news.dfncis.de...



Sempre messi.
La saggezza spinge a prevenire i mali...
:-)
ciao
ugo

convenga uniformarci in anticipo e mettere tutti i bei ".text"
e sarebbe anche l' ora :)
avete mai messo le mani in programmi scritti da altri e non documentati
con le variabili con nomi a c@%%0 che non si capisce se siano controlli,
tipi nativi, ecc. ecc. ?
ciao, hal

 ha scritto nel messaggio
news:9gu0m7$a5dp2$1...@ID-56381.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: COME SI STAMPA UN TREEVIEW?

Vorrei stampare un treeview.
Come posso fare?
Grazie.
Andrea

Come posso fare?
Automaticamente non lo puoi fare, devi leggere nodo per nodo e scrivere il
tutto in un report.
Ciao

Ovviamente ti servono le solite vecchie funzioni ricorsive.
Bye

 wrote

Newsgroup: it.comp.lang.visual-basic
Titolo: user document

Ciao Ragazzi, sono Silvia e ho un problema URGENTISSIMO da risolvere
Ho creato una DLL ACTIVEX Document allo scopo di realizzare una
intranet.
Ho creato quindi user document (formato vbd) che vengono letti da IE.
Il mio problema è la stringa di connessione che non si connette al db
sul server
Compilando il programma e creando un pacchetto di distribuzione della
dll e installandolo su una macchina che non ha vb6 installato ho notato
che i file vbd vengono letti ma non si interfacciano col db.
Non ho usato l'ODBC ma ho creato una stringa di connessione utilizzando
Microsoft Jet 3.51
Credo che il problema sia qualche libreria che in fase di installa zione
del pacchetto o non viene aggiornata o non viene proprio installata.
AIUTATEMI VI PREGO ciao Silvia

 wrote in message
3A110160...@pastis.cnrsm.it...


Ho risolto il problema da sola era l'mdac non aggiornato. Per rispondere a te:
ma mi hai preso per una cretina?
ciao Silvia
"...f.l." ha scritto:


o per una scortese e maleducata?
Silvia Ventura wrote in message


dai stavo scherzando!!!! non volevo che fosse intesa cosě!!! scusa sia a te che
a tutti.
ciao Silvia
Della Bianca Giuseppe ha scritto:


 wrote in message
3A114F53...@pastis.cnrsm.it...
| Ho risolto il problema da sola era l'mdac non aggiornato. Per rispondere a
te:
| ma mi hai preso per una cretina?


 wrote in message
| > 3A110160...@pastis.cnrsm.it...
| > | Ciao Ragazzi, sono Silvia e ho un problema URGENTISSIMO da risolvere
| > | Ho creato una DLL ACTIVEX Document allo scopo di realizzare una
| > | intranet.
| > | Ho creato quindi user document (formato vbd) che vengono letti da IE.
| > | Il mio problema č la stringa di connessione che non si connette al db


stavo solo scherzando!!! scusa non volevo, è che quel problema mi stava facendo
impazzire!!!!
scusa ciao Silvia

Newsgroup: it.comp.lang.visual-basic
Titolo: Menu - Richiesta informazioni varie

Ciao a tutti...
sarei molto felice se qualcuno sapesse darmi alcune risposte riguardo:
- come mettere le icone grandi nei menu (vedi tasto AVVIO di win95/98/NT)
- come mettere immagini nei menù (riesco solo con i font...)
- come far disegnare attorno al menù il quadratino di tridimensionalità
(vedi office 97)
- come gestire i menù OWNERDRAW (e gli oggetti OWNERDRAW in generale)
- come mettere una bitmap verticale nel menù (vedi menù principale di
win95/98/NT)
- come avere un separatore dei menù con del testo scritto (vedi separatore
di ICQ)
Chiedo troppo???
Ma no!!!
grazie in anticipo
prego dopo...

vai a 
www.vbaccellerator.com
qualche settimana fa c'era un ocx (con tanto di sorgenti) che ti
permetteva di usare i menu in stile M$ Office.
Per gli altri quesiti, ti posso dire che devi usare le API, ma non
saprei dirti quali (bell'aiuto, vero? ^_^)
Ciao!
-- 
May
---------------------------------------------------------
MaySist...@lycosmail.com
Togliere MAYBE
ICQ_UIN: 27234690
---------------------------------------------------------
Maurizio Coffinardi ha scritto:

Newsgroup: it.comp.lang.visual-basic
Titolo: countdown in vb

salve.
sono un principiante assoluto in vb. Per esercizio sto cercando di
creare un countdown in vb con il seguente codice ma non funziona come
dovrebbe:
#######
Private Sub Timer1_Timer()
Dim secondi As Integer
Dim minuti As Integer
secondi = DateDiff("s", Now, tempo)
minuti =
Int(secondi / 60)
secondi = secondi - (minuti * 60)
If (minuti < 0) Or
(secondi < 0) Then
    tempo = DateAdd("s", 10, Now)
End If
Label1.Caption = Format(minuti, "00") & ":" & Format(secondi, "00")
End
Sub
#####
Qualcuno potrebbe darmi un aiuto?
grazie mille
ockeghem
--------------------------------
Inviato via 
http://usenet.iol.it

 dovrebbe:
quello che importa è impostare esattamente l'intervallo in cui la routine
viene eseguita. Se guardi le proprietà dell'oggetto TIMER ti accorgerai
della proprietà INTERVAL, che rappresenta il tempo in cui la routine viene
eseguita (in millesimi di secondo). Quindi, prima imposta INTERVAL a 1000
(=1 secondo), poi il resto!

 ha scritto: 

--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Protezioni delle immagini

Sto scrivendo un programma in VB5 per l'archiviazione ottica
sfruttando gli ocx della Wang.
Vorrei sapere se qualcuno conosce un metodo per impedire
che le immagini create dal mio programma possano essere
visualizzate con un comune programma di grafica.
Inoltre è possibile includere all'immagine un testo (ad esempio
per descriverne il contenuto)?
Io salvo le immagini ini formato .TIF
Grazie
    Matteo



Io salvo le immagini ini formato .TIF
dunque...
potresti cambiare i primi 2 byte che dovrebbero essere sempre gli stessi
all'inizio di ogni immagine tif (4949 in esadecimale)
il + dei programmi non le leggerebbero piu'..
ovviamente prima di leggerli dalla tua applicazione dovresti rimettere le
cose al loro posto magari in un file temporaneo
saluti
S.

visualizzate con un comune programma di grafica.
  Il problema e' che puoi anche taroccare le immagini con codifiche
arcane in modo che solo il tuo programma riesca a leggerle ma poi
qualunque programma di cattura del desktop puo' comunque "rubartele" e
permettere a chiunque di salvarle e visualizzarle separatamente.
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"


Ummm, allora rilancio....usa il digimarc watermark cosi sei sicuro che anche
un cattura schermo si porti dietro la firma di copyright...pero' devi
pagare' per usarlo :))

pagare' per usarlo :))
  Non mi aspetto che un tool ben fatto di questo genere sia gratuito,
ma cosa vuol dire che l'immagine si porta dietro la firma di
copyright? L'immagine ha comunque un copyright, quindi al pirata non
gliene puo' fregare di meno di una firma, o forse intendi qualcosa che
riesce a rovinare la cattura?


riesce a rovinare la cattura?
Allora il digimarc watermark   "nasconde" nell'immagine dei pixel che una
volta letti tirano fuori copyright, nome e quant'altro.
Viene usato spesso per le foto da dove un'  eventuale grafico ladrone
potrebbe estrapolare una parte per riusarla magari in una sua composizione.
L'algoritmo piazza nell'immagine in tantissimi punti tale firma cosi anche
da un solo piccolo frammento si puo' rileggere
le notizie sul copyright...(una moderna implementazione di un metodo usato
in guerra per passare i messaggi, i tedeschi non lo conoscevano, hehehe).
L'unico modo per togliere tale firma e' alterare talmente l'immagine che
risulta pero' poi inservibile.
Cmq...non e' gratuito :)))
Saluti
Simone

...


Secondo me per fregarlo basterebbe l'applicazione di un normale filtro, a
livello impercettibile per l'occhio umano (magari basta semplicemente
modificare leggermente la luminosita' dell'immagine).
--
Roal Zanazzi
z...@iol.it


No no credimi...ho fatto i miei esperimenti, non e' cosi cretino come
sistema.

modificare leggermente la luminosita' dell'immagine).
Hm... non se Watermark ricerca un "Pattern" di modifiche predefinito.
Magari una variazione ciclica nella luminosita', o cose del genere.
Tu puoi cambiare la luminosita' di TUTTA l'immagine, ma sposti il loro
"Pattern" su e giu', lasciandolo intatto.
Ciao, Pipol!
Piero
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] MSDOS 6.0

Scusate il grande [OT]!
Dove posso scaricare il vecchio MSDOS 6.0?
(Possibilmente in italiano)
Grazie e ciao
Angelo
P.S. Installazione, no aggiornamento

 Dove posso scaricare il vecchio MSDOS 6.0?
secondo te ?
http://snurl.com/1c26
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 
http://snurl.com/1c26
ma si puo' scaricare l'ms-dos?
non credo che microsoft l'abbia mai reso pubblico.... mi sbaglio?

prova a guardare it.comp.retrocomputing
ogni tanto bazzico anche là, e trovi sicuramente persone più esperte in
materia, tra l'altro anche molto gentili e disponibili.....
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262


Grazie!   (per il link)

Newsgroup: it.comp.lang.visual-basic
Titolo: List Box Multiline

Ciao
Ho un problema con il controllo ListBox con proprieta' Multiline = True vi
faccio un es.
a=""
For n= 1 to 10
a=" Ciao " & "  " & n
me.listbox=a+a
next n
Il risultato ottenuto Ciao    1Ciao    2Ciao    3 .............
Invece Voglio ottenere
Ciao    1
Ciao    2
Ciao    3............
Ringrazio
Michele

 ha scritto nel messaggio
news:3b407...@news.bluewin.ch...


 ha scritto nel
messaggio news:nw_%6.20134$F85.6...@news.infostrada.it...


 Ciao    3............
[SNIP]
Hmmmm... a parte che con il codice qui sopra il risultato che ottieni e' "
Ciao   10 Ciao   10", per andare a capo in un TextBox multiline devi
inserire nel testo i caratteri appropriati, che sono rappresentati dalla
costante vbCrLf; il tutto quindi diventa:
'N.B. '&' equivale a '+' ma e' meno ambiguo
a = ""
For n = 1 To 10
    a = a & " Ciao " & "  " & n & vbCrLf
Next n
Me.Text1.Text = a
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Partire da Null

Ho un problema sull'inserimento di un primo numero su un db partendo da un
record vuoto
la procedura che ho impostato è la seguente
If rstDati.Fields("MaxDiIDOrdine").Value = Null Then
            txtFields(2).Text = 1
        Else
            rstDati.MoveFirst
            txtFields(2).Text = rstDati.Fields("MaxDiIDOrdine").Value + 1
        End If
L'informazione che mi restituisce è : "rstDati.Fields("MaxDiIDOrdine").Value
= Null"
Miii dove sbaglio?

[Marco M.] scrisse:

sbagli nell'effettuare il controllo:
null = null, sembrerà strano, ma è sempre falso.
Devi fare: if isnull(qualcosa) then.....
--
Salutoni
Sergio


Grazie Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Catturare immagini video da webcam

ciao a tutti. come faccio a catturare delle immagini video da una webcam in vb6?
ci sono degli ocx, api o altre diavolerie simili per farlo?
se si, dove le posso trovare?
grazie. roby

 webcam in vb6?
Sito comune, progetto vidcap
Dov'è il sito?.... 
www.it-lang-vb.net
Salutoni
Sergio

Newsgroup: it.comp.lang.visual-basic
Titolo: Protezione prg da copie non autorizzate

Salve a tutti,
ho bisogno di sapere come posso ricavare la data di modifica o creazione di
un file.
Lo scopo è il seguente:
devo proteggere un mio programma da copie indesiderate, e per farlo ho
pensato di inserire all'inizio un controllo sulla data di creazione o
modifica del file del programma. Grazie a questo, se il cd del mio programma
viene copiato senza autorizzazioni, il programma non funzionerà perchè la
data di modifica risulterà ovviamente diversa.
Grazie
Brunix



 ha scritto nel messaggio
news:mfHzb.162825$vO5.6...@twister1.libero.it...



è inutile. Basta fare "Copia CD" da qualsiasi programma di masterizzazione e
hai una copia *quasi* uguale all'originale. Se poi usano CloneCD, hanno una
copia perfettamente identica all'originale

 Brunix
Di niente
Antonello
-- 
Nella vita una sola cosa è certa: se la storia ci ha insegnato qualcosa, 
è che si può uccidere chiunque.
(Michael Corleone)
Posted from X-Privat Free NNTP server - 
www.x-privat.org
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Controlli WindowLess

Ho provato ad utilizzare i controlli WL di VB6, e ho dovuto non solo
registrare l'OCX ma anche inderire nel registro le voci contenute nel file
.reg allegato (sembra per le licenze).
Ma... se distribuissi un'applicazione con questi controlli... non posso mica
pretendere che l'utente faccia doppio click sul file .reg per poter usare la
mia app.
Mi sto preoccupando per niente o qualcuno sa la soluzione?
Grazie, ciao.

...

Ti stai preoccupando per niente (penso).
Le licenze servono (dovrebbero servire) solo per poter usare i controlli in
un ambiente di "design", ma non a runtime. Comunque basta fare una prova.

C'era il parametro /S una volta per farlo funzionare in background (silent).
Umberto Meroni
umb...@vbp.it
-----------------------------------------------------
Webmaster del sito comune di it.comp.lang.visual-basic
URL Sito Comune: 
http://www.murialdo.it/it_lang_vb
-----------------------------------------------------
Sito Visual Basic: 
http://www.vbp.it
Sito Servizi Internet: 
http://www.ubi1k.com
Sito Comune VB: 
http://www.murialdo.it/it_lang_vb
-----------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: CONOSCERE CHE NUMERO DI RECORD NEL RECORDSET SONO

Ciao a tutti!!!
Ho la necessità tramite  Ado di posozionarmi su di un record di un rs il cui
valore del campo "prog" = al valore di una casella di testo txt1 del form
corrente
, e sapere a che numero di record sono del recordset per poi fare una  Move
e posizionarmi sul quel record.
Io ho usato questo codice per trovare il record
Private Sub CMD1_Click()
DE_Dati.rsARCHIVIO.MoveFirst
DE_Dati.rsARCHIVIO.Find "prog="& Val(frm_dettagli.TXT1.Text) &" "
End Sub
Per conoscere che numero di record e' quello in cui mi sono posizionato come
faccio ???
Grazie e ciao a tutti !!!
Stefano :-))
--
----------------------------------------------------------------------------
------------
Stefano Grassi
System  Admin Sabiana S.p.A
Sabiana S.p.A
Via Piave , 53 20011
Corbetta MI
Tel. 02972031
Web Site: 
www.Sabiana.it
 
www.Sabiana.com
----------------------------------------------------------------------------
--------------------------------------------------------
INFORMAZIONI STRETTAMENTE CONFIDENZIALI
L'invio di questa e-mail è destinato solo ad uso personale o a enti sopra
nominati e potrebbe contenere informazioni riservate, coperte da segreto
professionale e non soggette a divulgazione ai sensi di legge. Se non ne
siete i corretti destinatari, con la presente siete informati che non Vi è
assolutamente permessa alcuna divulgazione, copia, distribuzione, o altro
uso delle informazioni in essa contenute. Se per errore avete ricevuto
questo messaggio, Vi chiedo cortesemente di informarmi immediatamente al
mio indirizzo di posta elettronica. Grazie.

 End Sub
ti informo, che quando effetti il metodo find, il recordset si posiziona già
sul recordset che ti interessa (se c'è, in caso contrario arriva a EOF, o
BOF se fai la ricerca al contrario).
Non hai quindi bisogno di sapere altro
hth
Salutoni
Sergio

 legge. Se non ne siete i corretti destinatari, con la presente siete
Non soggette a divulgazione su un NG? ROTFL! :-)
Ehm... togli la firma quando posti su un NG per favore...

Prova con:
NumeroRecord = CStr(DE_Dati.rsARCHIVIO.AbsolutePosition)
ciao Sergio
"Stefano Grassi" <S.Gr...@Sabiana.it> ha scritto nel messaggio
news:at7lke$hak$1...@newsreader.mailgate.org...


Dovrebbe essere   rs.AbsolutePosition
Ciao
   Mario
"Stefano Grassi" <S.Gr...@Sabiana.it> ha scritto nel messaggio
