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

Ciao,
qualcuno di voi sa per caso come e' possible fare un'operazione di browsing
di oggetti come fa VB con il suo visualizzatore oggetti?
Grazie
Gio

 di oggetti come fa VB con il suo visualizzatore oggetti?
Devi usare la TypeLib Information, fornita insieme a VB 6.
Ed ecco la guida su come utilizzarla:
http://download.microsoft.com/download/vstudio60pro/doc/1/WIN98/EN-US/Tl
binf32.exe
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: LM e NTLM hash

Salve gente,
Ho cercato su internet ma non ho trovato un gran ché: quello che sto
cercando di fare è memorizzare in un file gli LM e NTLM Hash della
password di un utente (del dominio), il problema è che non so come
generare i due hash.
Esiste qualcosa di già pronto?
Grazie
Enrico

 ha
scritto:

Guarda questa:
http://xstandard.com/en/documentation/xmd5/
Qui si può scaricare direttamente lo .ZIP
http://student.ing-steen.se/asp/md5/x-md5.zip
 
--
ciao
  Stefano

 
Se non sbaglio tratta di md5, non di NTLM / LM hashes. O sono la stessa
cosa?
Enrico

Il giorno lun, 13/08/2007 alle 13.22 +0200, SB ha scritto:

Non so cosa sono NTLM / LM, quella dll ti crea l'hash di una stringa o di un
file.
--
ciao
  Stefano

   Stefano
NTLM e LM sono due hash particolari che usano i sistemi Windows per
memorizzare le password, ma non credo siano uguali a quello lì (md5).
Enrico

Newsgroup: it.comp.lang.visual-basic
Titolo: metodo print

Salve. Volevo chiedervi :
se  inserisco queste linee di codice :
Private Sub Form_Load()
    form.print "Ciao"
End Sub
quando eseguo un form.show non ottengo nessun effetto. Se invece inserisco
un command sul form richiamato
Private Sub Command1_Click()
    form.print "Ciao"
End sub
quando eseguo il click mi si stampa la stringa "Ciao".
Domanda : come faccio a ottenere lo stesso effetto senza aver bisogno di
premere un pulsante ?
Grazie

Ciao,
inseriscilo nell'evento activate del form
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------

 quando eseguo un form.show non ottengo nessun effetto.
Certo! Stai disegnando su qualcosa che ancora non esiste.
Sposta tutto nel Form_Paint
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/

Sposta tutto nel Form_Paint
Esatto :-)
Se pero' vuole proprio farlo esistere gia' nel Load, occorre mettere AutroRedraw
a True, scrivere e/o disegnare, quindi ripristinare AutoRedraw al valore originario.
In questo modo vb manipola la propria copia interna dell' immagine del form.
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Lentezza con VB e ADO





Ho un problema nell'acceso ad una base dati 
Informix realizzato da un'applicativo Visual Basic mediante ADO (gli ODBC sono 
Intersolv 3.32, il server è un Infomix SE 7.2).


Il problema è che l'accesso alla base dati è 
particolarmente lento. La query che viene eseguita è molto semplice e la 
velocità non dipende nel modo più assoluto dal numero di record presenti nella 
tabella acceduta.


Dalle prove che ho fatto sembra che il tempo venga 
impiegato proprio per realizzare la connessione e sottoporre la query: a me 
serve recuperare solo il primo record della query e tra la richiesta dei dati e 
l'arrivo dei risultati sul client passano circa 15 secondi (le macchine sono 
entrambe ben equipaggiate e la connessione di rete è di 100Mbit)


Qualcuno sa dirmi se la cosa è normale o se ci sono 
settaggi particolari da fare? La lentezza dimostrata mi sembra davvero 
eccesiva.


Grazie


 


Davide



per favore non postare in html perche' ti si legge male :(
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Help Orologio

Non riesco a trovare i parametri per creare un orologio che rispecchi quello
di sistema su un form.

 ha scritto nel messaggio
news:8tabaj$p03$1...@nslave3.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Ho forse scoperto l'acqua calda !!??

Ho utilizzato in vb5 un oggetto Data con Access 2000 e indovinate un pò ? mi
dice che il formato di access non è valido !!
Ho riprovato il tutto con access 97 e tutto rifunziona.
Qualcuno sa dirmi cosa devo utilizzare??
Domandina facile faclice ( per voi):
Se voglio memorizzare i valori di due textbox in una tabella di access con :
Data1.Recordset.AddNew
    Data1.Recordset![CLIENTE] = txtCliente
    Data1.Recordset![Luogo] = txtLuogo
Data1.Recordset.Update
 tutto funziona bene se inserisco i valori ma se lascio una text  vuota mi
dà errore, COME OVVIO IL PROBLEMA !!??
1000000 di grazie
MANUELA

 MANUELA
prob impostando in access o nel db che usi
allow zero length = true
in basso nelle propr del campo, vicino a indexed y/n




Newsgroup: it.comp.lang.visual-basic
Titolo: Qualcosa che somigli alla barra di outlook...c'è?

Salve,
mi serve qualcosa di carino da sostituire ai soliti bottoni,
grafici o no, di vb. Esiste un controllo che somigli alla barra di outlook,
o un altro controllo...carino? Vi viene in mente qualcosa che posso
scaricare dalla rete?
Grazie, saluti...
--------------------------------
Inviato via 
http://usenet.iol.it

 scaricare dalla rete?
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

Nel sito comune trovo qualche controllo?
O forse nell' help c'è una lista
di siti da cui scaricarne alcuni veramente carini?? 
Bhà, chi sa quale
era la risposta giusta...soprattutto, quale era la risposta :)


 di siti da cui scaricarne alcuni veramente carini??
Buona la prima. Ma almeno provarci, no, eh ?
Bye, G.

 wrote in message
151Z24Z196Z158Y...@usenet.iol.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: passare un controllo ad un OCX

Ciao volevo sapere se era possibile passare ad un oggetto OCX un controllo.
Ad esempio io ho un controllo e volevo passare un'oggetto MSComm io ho
fatto un metodo 
....
dim myCom as MsComm
public Sub setMsComm(com as
variant) 
   set myCom = com
end sub
....
In questo modo tutto
funziona ma solo alcune volte dopo di che mi tocca ricompilare l'ocx fatto
questo va di nuovo.
Come posso risolvere la faccenda ? Grazie
--------------------------------
Inviato via 
http://usenet.iol.it

 variant)
Io metterei (com as MsComm) o (com as Object)
Comunque è meglio, imho, non passare oggetti a DLL, OCX, ActiveX exe, etc ma
solo parametri.
ES:
Al posto di:
Sub ScriviTestodaTextBox(text1 as variant)
    msgbox text1.text
end sub
Mettere:
Sub ScriviTesto(byval text1 as string)
    msgbox text1
end sub
Ciao
--
Timothy Redaelli

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Registrazione Ocx

Sistema Operativo        : Windows 95B
Linguaggio di Sviluppo : Visual Basic 6 Enterprise
Ho installato un programma da me realizzato su di un Pc appena formattato
con sopra solo il Client Access di Big Blue. Premetto che il programma
funziona perfettamente su ogni altro Pc da me provato. Tuttavia su
quest'ultimo mi è impossibile registrare gli ocx di terze parti quali:
Mascomm32.ocx
PicButton.ocx
guarda caso con lunghezza oltre gli 8 caratteri. Ora mi chiedo: perchè solo
su questo Pc si verifica questo inconveniente???
Anche registrando manualmente mi viene riportato il seguente errore:
LoadLibrary("pippo") failed.
GetLastError returns 0x00000485
Grazie a chiunche mi aiuti.................

Ti mancano le librerie (probabilmente msfcxx.dll o altro) che queste ocx
utilizzano.
Io ci ho perso un mese qualche anno fa...
Mi dovresti offrire almeno una pizza  ;)
--
GbC

GetLastError returns 0x00000485
A me succede quando ho degli spazi nel percorso (magari per te era
c:\cacca\prova\pippo pluto.ocx  --> e ti ha tagliato il nome fino al primo
spazio).
Prova a registrare così:
regsvr32 "c:\cacca\prova\pippo pluto.ocx"
cioè tra le virgolette.
Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare valori di una seriale

Ciao,
ho fatto un breve corso in VB6 e non ho imparato un ka--o...di compenso
ho sborsato 300,00€ per 10 ore.
Io vorrei capire come posso, in una label, fare comparire ciò che invio
alla seriale e -viceversa- far apparire alla seriale quello che
voglio.... potrei per esempio leggere i valori provenienti da un A/D
converter, il tipico voltmetro, o attuarli con un D/A converter...
Almeno quì qualcuno può spiegarmi come fare?
Grazie, Paolo Carollo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
utilizza la libreria mscomm32 che contiene le funzioni di lettura scrittura
da seriale
-da progetti/riferimenti oppure progetti/componenti ...vedi un pò
ciao
-- 
Paolo Bartolini

Purtroppo con 10 ore di studio non puoi aver capito niente di VB.
Io ci lavoro da 4 anni ed incontro ogni gionro nuove difficoltà.
Cmq mi sembri ferrato in elettronica.
Ti passo l'indirizzo di un sito dove ho pubblicato un pò di materiale
elettronico.
Qui puoi trovare anche un modo per gestire la seriale.
www.elettronicamente.com
bye
Newsgroup: it.comp.lang.visual-basic
Titolo: [AIUTO] Settare i permessi utente su cartelle e file NTFS

Buongiorno a tutti, ho un grosso problema nel settarre i permessi utente per
una cartella o file in win 2k con NTFS.
Utilizzo Vb 6. Cercando un po' in giro ho trovato codice e consigli per
riuscire nel mio intento, ma qualche cosa non funziona come dovrebbe.
Utilizzo ADSI con la dll adssecurity.dll.... da odice riesco a leggere e
settari i permessi per una data cartella o file, solo che quando apro
esplora risorse e vado in proprietą nel tab "Protezione" compare una msgbox
che dice...
Le autorizzazione per la cartella "mia cartella" sono ordinate in modo
errato. Alcune voci potrebbero non essere abilitate. Scegliere Ok per
continuare e ordinare correttamente le autorizzazioni. Per reimpostare le
autorizzazioni scegliere Annulla"
Se premo ok va tutto a posto.
Se non apro espolara risorse e clicco su proprietą le autorizzazioni non
funzionano correttamente :(((( quindi da codice sembra che ci sia qualche
problema o baco non segnalato.
Di seguito invio il codice che utilizzo....
Avete consigli da darmi ????
----------------
Dim sd As New ADsSecurity
Dim Ace As New AccessControlEntry
Dim Dacl As AccessControlList
Dim sACLs As SecurityDescriptor
Dim meSD As New ADsSID
Dim strSID As String
Dim Ace2 As New AccessControlEntry
'
' Open the files SD
' Be sure to place a path to an NTFS file after the FILE:// text in both,
' the GetSecurityDescritor and SetSecurityDescriptor lines
'
Const myFile = "FILE://C:\prova
Set sACLs = sd.GetSecurityDescriptor(myFile)
Set Dacl = sACLs.DiscretionaryAcl
'For Each oace In Dacl
  'Debug.Print oace.Trustee
'Next oace
'
' Local_Convert_BIN_To_SDDL takes two arguments, a server name and
' and NT SAM account name.
'
' The function will return the SID in SDDL format.  This string can be
' used to set the trustee attribute of the ACL entry
'
strSID = Local_Convert_BIN_To_SDDL("markab", "IUSR_MARKAB")
Ace.Trustee = "MARKAB\IUSR_MARKAB" 'strSID
Ace.AceType = ADS_ACETYPE_ACCESS_ALLOWED
'ace.AceType = ADS_ACETYPE_ACCESS_DENIED
Ace.AccessMask = ADS_RIGHT_GENERIC_ALL
'ace.AccessMask = ADS_RIGHT_GENERIC_WRITE
'Ace.AceFlags = 3
Dacl.AddAce Ace
'sACLs.DiscretionaryAcl = dacl
'sd.SetSecurityDescriptor sACLs, myfile
sACLs.DiscretionaryAcl = Dacl
sd.SetSecurityDescriptor sACLs, myFile

problema o baco non segnalato.
Eh, il problema e' noto, tant'e' che esiste un articolo che suggerisce
proprio di riordinare le access control entries a mano:
HOWTO: Use ADsSecurity.dll to Add an Access Control Entry to an NTFS
Folder
http://support.microsoft.com/support/kb/articles/Q279/6/82.ASP
Puo' essere inoltre di aiuto anche avere l'ultimo service pack di
windows installato, non si sa mai ;-)
-- 
ciao, hal


Ti ringrazio per il link sono impazzito a cercare qualche cosa su msdn, ma
non ero riuscito a ricavarne molto. Ho già installato la SP4 (facendo delle
prove su un sistema in inglese) ma il risultato era analogo a prima.
Adesso faccio delle prove o il codice contenuto nell'articolo.
Ancora grazie mille.
Newsgroup: it.comp.lang.visual-basic
Titolo: Finestre Dockable

Nessuno di voi sa della esistenza di una classe o  componente per creare
delle Finestre Dockable per form MDI o SDI?
Andrea

 delle Finestre Dockable per form MDI o SDI?
Ho uno zip da 55K (mi dispiace ma non ricordo da dove l'ho scaricato :-((  ) che
lo fa implementando il subclassing.
Se vuoi te lo mando per mail, il NG non accetta allegati.
Bye, G.
-- 
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

 Ho uno zip da 55K (mi dispiace ma non ricordo da dove l'ho scaricato


 Ho uno zip da 55K (mi dispiace ma non ricordo da dove l'ho scaricato :-((  ) che


> Lo manderesti anche a me?
Fatto.


> > delle Finestre Dockable per form MDI o SDI?
Volendo ho scritto una semplice classe per ancorare delle finestre,
anche se in effetti l'unica operazione che fa e' cambiare il Parent.
Comunque se t'interessa la trovi sul solito sito comune.....

 >


Lo manteresti anche a me?
Grazie.
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Package size problem.

Hi
    We have developed an application.I am using installshield 5 for the
installation of this application. Size of my application is about 1MB.
But the size of final installation package is coming around 1.8MB (80%
increase) which is very high. Any solution to reduce this size.
TIA
Sunil
Sent via Deja.com 
http://www.deja.com/
Before you buy.

remove any graphic files might help


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Orientamento Foglio in Stampa

Ciao a tutti,
Ho un problemino con la selezione dell'orientamento del foglio in stampa.
Chiamando il dialog di stampa voglio impostare io l'orientamento (portrait o
landscape). L'unica cosa che riesco a fare e' "beccare" l'orientamento dopo
che il dialog si e' chiuso, ma non riesco ad impostarlo prima che questo
venga aperto.
Qualcuno ha idea di come poteri risolvere il problema?
Grazie per l'aiuto.
Giorgio
Gior...@BigFoot.com

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Eliminare record db Access

Salve a tutti,
vorrei sapere se esiste un comando che elimina tutti i record di una tabella
in un database Access, oppure devo eliminare i record uno per uno?
Grazie.
Mario.

Esegui SQL "DELETE * FROM nometabella"
Ciao, Daniele.
Newsgroup: it.comp.lang.visual-basic
Titolo: VB2005-caricare una serie di valori in n TextBox

buongiorno a tutti,
devo scrivere un codice al click di un command-button, che :
dato un ciclo for da 0 a 5, devo valorizzare 6 textbox di una form ,
partendo dalla prima arrivando alla sesta .
La form da valorizzare è data dall'indice del ciclo For (esempio: il primo
passaggio del ciclo (0) dovrà valorizzare la prima text box, il secondo la
seconda , ecc...)
Nella form ho definito 5 textbox ognuna con nome differente , visto che nel
dotnet2005 le matrici sono defunte.
Voi come fareste ? (Al di là della serie di if sul contatore del ciclo for )
grazie a tutti
zorro
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Voi come fareste ? (Al di là della serie di if sul contatore del ciclo for )
Potresti creare una lista di TextBox, e poi lavorare sulla lista come 
faresti con un array. Esempio:
         Dim ltb As New List(Of TextBox)
         With ltb
             .Add(TextBox1)
             .Add(TextBox2)
             .Add(TextBox3)
         End With
         For i As Integer = 1 To 3
             ltb(i - 1).Text = "Sono la TentBox numero " & i.ToString
         Next
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 ha
scritto:

MAMMA MIA !
RESTO ESTEREFATTO dalle possibilità che offre il Net.
Peccato che lavoro principalmente su AS400 e faccio una fatica incredibile
ad imparare alcuni concetti dei linguaggi ad oggetto.
Ci sto mettendo l'impegno ma da autodidatta è dura . A Saperle ste cose ...
:-)
GRAZIE MILLE
Zorro

Newsgroup: it.comp.lang.visual-basic
Titolo: VB.Net e MySQL

un saluto a tutti
Mi sto cimentando per la prima volta in MySQL con Vb.Net 2005 usando gli
oggetti esposti da MySQL.Data.
Ho dei problemi con l'aggiornamento dei dati usando il metodo Update del
DataAdapter.
Con OleDB e Access funziona con MySQL no
Riporto uno stralcio di codice che sto provando.
Grazie a chi mi potrŕ aiutare
____________________________________________________________
Dim con As MySql.Data.MySqlClient.MySqlConnection
Dim connStr As String = ""
connStr = String.Format("server={0}; port={1}; database={2}; user id={3};
password={4}; pooling=false", "127.0.0.1", "3306", "Prova", "root",
"password")
con = New MySql.Data.MySqlClient.MySqlConnection(connStr)
con.Open()
Dim t As DataTable
Dim da As MySql.Data.MySqlClient.MySqlDataAdapter
Dim ds As Data.DataSet = New Data.DataSet
da = New MySql.Data.MySqlClient.MySqlDataAdapter("SELECT * FROM Utenti
Where(IdOperatore=1)", con)
da.Fill(ds)
t = ds.Tables(0)
t.Rows(0).Item("Connesso") = True
Dim com As MySql.Data.MySqlClient.MySqlCommand
com = New MySql.Data.MySqlClient.MySqlCommand("UPDATE Utenti SET
Utenti.Connesso = @P1 Where(IdOperatore=@P2)", con)
With com.Parameters.Add(New MySql.Data.MySqlClient.MySqlParameter("@P1",
    MySql.Data.MySqlClient.MySqlDbType.Bit))
    .SourceColumn = "Connesso"
    .DbType = DbType.Boolean
    .SourceVersion = DataRowVersion.Current
    .SourceColumnNullMapping = True
    .Direction = ParameterDirection.Output
End With
With com.Parameters.Add(New MySql.Data.MySqlClient.MySqlParameter("@P2",
    Nothing))
    .SourceColumn = "IdOperatore"
    .DbType = DbType.Int32
    .SourceVersion = DataRowVersion.Current
    .SourceColumnNullMapping = True
    .MySqlDbType = MySql.Data.MySqlClient.MySqlDbType.Int32
    .Direction = ParameterDirection.Input
End With
da.UpdateCommand = com
da.Update(ds)
con.Close()
Viene sollevata una eccezzione DBConcurrencyExeption, violazione di 
concorrenza. 

 Grazie a chi mi potrą aiutare

seguendo il tuo esempio mancava la proprietą .IsNullable = true e ora 
funziona.
Grazie infinite sei stato molto prezioso
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Evento MouseUp su Combo... ??

Sob, dopo un mucchio di lavoro per il restyling del mio
prog per aggiungere i menu popup, mi accorgo solo ora
che i Combo non accendono gli eventi Mouse...
E adesso che fo ?
Idee ?
Grazie
--
Frogman
indirizzo e-mail corretto: 
be...@reboot.to
--------------------------------------------------------
Abito in un paese cosi' piccolo che non abbiamo nemmeno
lo scemo del villaggio.  Dobbiamo fare a turno.
--------------------------------------------------------

 E adesso che fo ?
L'unica cosa che mi viene in mente è scrivere un OCX di wrapper del combo,
ed implementare internamente la gestione degli eventi che non esistono.
Prova a dare una occhiata a questa classe per la gestione del mouse e vedi
se può servirti da spunto:
http://vbaccelerator.com/codelib/ssubtmr/msleave.htm
Ciao
*Roby*

 E adesso che fo ?
Ciao,
se vuoi fare una cosa quasi decente credo che ti resti solo il subclassing
dei tuoi combo, altrimenti....  ....  .... altrimenti....  ....  ....
questa che stò per dire è brutta, sporca e cattiva; ma tant'è...
(un po' mi vergogno di averla solo pensata)
I ComboBox non contemplano gli eventi del mouse ma... i DBCombo della
Microsoft Data Bound List Controls SI!
Se sei agganciato ad un DB avresti fatto meglio ad usarli fin dall'inizio,
se al contrario il tuo prog del DB non ne ha mai sentito neanche l'odore
puoi sempre crearti un recordset a runtime (mi hanno detto che non è
necessario avere un vero DB se usi ADO) e gestire gli elementi della List
tramite i metodi del Recordset.
N.B.: questo è necessario perchè i DBCombo non hanno i metodi AddItem e
RemoveItem.
Se ho detto una tremenda boiata (cosa quasi sicura) vi prego di
comunicarmelo, ma con gentilezza :-))
P.S.1: che come soluzione fa schifo lo so da solo :-((
P.S.2: forse fai meglio a cercarti un OCX con dellle Combo "modificate".
--
Princi, 
princ...@programmer.net
-------------------------------------------------------------------
"Tutti sanno che una cosa è impossibile da realizzare,
finché arriva uno sprovveduto che non lo sa e la inventa." A.E.


Soluzione pulita, avevo pensato a qualcosa di simile...  In effetti ogni volta
che trovo errori, inefficenze o difficolta' nell'utilizzo di qualche controllo o
routine di terze parti, mi viene la incontenibile voglia di svilupparne una per
conto mio.   Spero di non essere costretto a seguire questa strada, perche'
non ho molto tempo a disposizione.   Comunque grazie, la terro' presente.
Ciao



Ecco, e' proprio brutta, si, hai ragione.   Non mi e' mai piaciuto usare le
pinze per piantar chiodi, anche quando non trovo piu' il martello.
Non ho alcun DB collegato al combo.
Fra l'altro, il combo ha un suo popup che dovrei disabilitare, quindi devo
proprio intercettare il mouseup per mettere combo.enabled a false...
Quindi non mi resta che il subclassing...   qualcuno l'ha gia' fatto sui
combo?

Newsgroup: it.comp.lang.visual-basic
Titolo: Devo eseguire 2 volte una routine per avere il risultato finale.

HO una ruotine che richiama alcune subroutine. IL problema è che ad
una prima esecuzione ho dei risultati intermedi, poi da un certo punto
in poi non riesce a trasferirli alle successive fasi del programma. Se
però rieseguo la routine dall'inizio la procedura viene completata
correttamente. Io penso di avere fatto un errore con le variabili di
scambio delle subroutine, qualcuno sa darmi un consiglio?

 scambio delle subroutine, qualcuno sa darmi un consiglio?
Prova a postare un po' di codice ...
cosě come lo spiegato mi vengono in mente 3 o 4 tipi di errori ..
Saluti

 ha scritto nel messaggio
news:a26f33$f6i$1...@fe2.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [ADO] classe che restituisce un recordset

salve, ho bisogno del vostro aiuto.
sto creando un' applicazione in VB6 in cui accedo ad un database Access
mediante un modulo di classe in cui sono implementati tutti i metodi per
la gestione del db stesso (connessione, disconnessione, crud).
la mia difficoltà consiste nell'implementare un metodo pubblico Read che
resistuisca un recordset letto dal db.
in pratica in questo metodo Read io vado ad effettuare la connessione
con il db, leggo il recordset secondo una determinata query in sql,
assegno il recordset al nome del metodo e poi disconnetto il db.
ottengo sempre l'errore 3265:
"impossibile trovare l'oggetto nell'insieme corrispondente al nome o al 
numero richiesto"
in pratica al form chiamante non ritorna nessun recordset.
ho notato però che se non chiudo la connessione al db tutto funziona
correttamente.da questo ho capito che il recordset viene distrutto non
appena chiudo la connessione.
ora vorrei chiedervi se esiste un modo di dissociare il recordset dalla
connessione, in maniera da potervici lavorare in sola lettura e offline.
ho già letto il post "ADO recordset disconnesso" ma non ne sono venuto 
ancora a capo.
ho provato ad impostare set rs.ActiveConnection = nothing ma se lo 
faccio prima di chiudere il recordset mi dà errore di recordset ancora 
aperto, se lo faccio dopo averlo chiuso ho già perso il recordset, 
quindi è inutile.
Spero che qualcuno mi aiuti!
vi posto il codice della classe (tutto è semplificato al minimo):
Option Explicit
Private cn As ADODB.Connection
Private rs As ADODB.Recordset
Public Function leggi() As ADODB.Recordset
     Set cn = New ADODB.Connection
     cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data 
Source=" & App.Path & "\barcode.mdb" & ";Persist Security Info=False"
     cn.Open
     Set rs = New ADODB.Recordset
     Set rs.ActiveConnection = cn
     rs.Source = "SELECT * FROM AI WHERE AI = '00'"
     rs.Open
     Set leggi = rs
     rs.Close
     cn.Close
End Function

 quindi è inutile.
Il cursore del recordset è lato client o lato server?
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Il cursore del recordset è lato client o lato server?
ho risolto impostando il cursore lato client (rs.CursorLocation = 
adUseClient)
Grazie!
Newsgroup: it.comp.lang.visual-basic
Titolo: Form, query parametrica e navigazione dei risultati

Dovrebbe essere un classico ma questa cosa proprio non riesco a farla.
All'interno di una form vengono visualizzati in alcune TextBox i risultati in una query 
parametrica. All'esecuzione vengono correttamente mostrati i valori del primo record 
estratto. Quello che non riesco a fare è implementare in maniera decente due 
"stupidissimi" bottoni PREV e NEXT per visualizzare i record successivi al primo. Avete 
suggerimenti?
Riporto il codice che esegue collegamento al db, la query e visualizza i risultati:
Private Sub btnCatSerch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 
Handles btnCatSerch.Click
        Using objData As New DataDef
            Try
                objData.SQL = "usp_SearchSrvc"
                objData.InitializeCommand()
                objData.AddParameter("@SRVC_ID", Data.OleDb.OleDbType.Variant, 3, _
                txtSrvcId.Text)
                objData.AddParameter2("@SRVC_DESC", Data.OleDb.OleDbType.Variant, 55, _
                txtSrvcDescription.Text)
                objData.OpenConnection()
                objData.DataReader = objData.Command.ExecuteReader
                If objData.DataReader.HasRows Then
                    'Processa tutte le righe
                    While objData.DataReader.Read()
                        'Si popolano le varie TextBox
                        txtSrvcDescriptionDet.Text = _
                        objData.DataReader.Item("SRVC_DESC").ToString.ToUpper
                        txtSrvcIdDet.Text = _
                        objData.DataReader.Item("SRVC_ID").ToString.ToUpper
                        '.... vengono popolate allo stesso modo altre n TextBox
                    End While
                End If
                objData.DataReader.Close()
            Catch ExceptionErr As Exception
                MessageBox.Show(ExceptionErr.Message, strAppTitle)
            End Try
        End Using
       End Sub

                     While objData.DataReader.Read()
ok, processi tutte le righe... mai idati dove li metti?
nelle text box alla fine ti trovi i valori dell'ultima riga, sei in un 
while.
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it
Newsgroup: it.comp.lang.visual-basic
Titolo: Recuperare ID dopo una query

Vorrei realizzare questa cosa ma non ci riesco.
Ho un bottone. Cliccando su di esso vorrei che venissero
eseguite due query di tipo INSERT. La prima insert mi va a
riempire una tabella anagrafica con nome, cognome etc. In questa
tabella c'e' un campo ID chiave primaria autoincrement. La seconda
query mi dovrebbe inserire l'ID che si e' auto-generato con la prima
insert in una seconda tabella.
Una soluzione sarebbe di fare, subito dopo la prima INSERT, una
SELECT id FROM primaTabella
WHERE (tutti i campi sono uguali a quelli appena inseriti )
Una volta ottenuto l'ID, fare la seconda insert.
ma non mi sembra assolutamente una buona soluzione.
potete aiutarmi ?
Grazie :) 

 ha scritto nel messaggio
news:46e05713$0$36443$4faf...@reader5.news.tin.it...

Una cosa simile...?
INSERT INTO T2 (SELECT TOP 1 ID FROM T1 ORDER BY ID DESC)
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


wrote:
Prova cosě:
Set rs = db.OpenRecordset("Select Max(id) as MaxID From Tabella")
If rs.RecordCount > 0 Then MaxID = rs!MaxID


BCP ha scritto:

Questa soluzione č buona se si lavora in locale.
Ma se si lavora in rete non credo sia una buona soluzione.


Se usi MySQL dopo la prima Insert puoi usare SELECT LAST_INSERT_ID 

 potete aiutarmi ?
Non è una buona soluzione, in quanto l'unico campo che identifica
univocamente un record è la chiave, tutti gli altri potrebbero essere
uguali.
Che database utilizzi?
L'applicazione è mono-utente?
Se si, ti potrebbe bastare prendere la SELECT MAX(CAMPOID) FROM TABELLA.
Altrimenti bisogna vedere dal database.
Se è multi-utente, bisogna vedere il database. In linea di massima potresti
fare in modo di avere l'accesso univoco nel momento del salvataggio, e
potresti usare la select max comunque, anche se ci sono modi migliori che
alcuni DB dovrebbero avere.
BloccaTabella "NOMETAB"
InserisciTesta
SELECT MAX(CAMPOID) AS MaxID FROM NOMETAB
InserisciRighi (MaxID)
SbloccaTabella "NOMETAB"
Ovviamente con una gestione errori e magari in maniera transazionale.

 ha scritto nel messaggio 
news:46e05713$0$36443$4faf...@reader5.news.tin.it...


 Una volta ottenuto l'ID, fare la seconda insert.
Da access 2000 in poi si può usare (con ADO) la stessa sintassi che si 
usa per SQL Server:
AdoConnect.Execute "INSERT INTO T1 (campi) VALUES (valori)"
Set rs = AdoConnect.Execute("SELECT @@IDENTITY")
AdoConnect.Execute "INSERT INTO T2 (IdT1 ... etc) VALUES (" & 
rs.Fields(0) & ")"
e risolvi tutto.
ciao
stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Data report

Salve a tutti
E' possibile stampare con il data report senza utilizzare il
Dataenvironment?
Se è possibile come posso attraverso codice passare i dati da un form al mio
datareport?
Grazie per le risposte
Amedeo

 datareport?
Guarda nei vecchi post
Newsgroup: it.comp.lang.visual-basic
Titolo: barra di caricamento

Uso Visual Basic 4 qualcuno sa indicarmi come si usa la barra di
caricamento? Si può usare solo per caricare effettivamente qualcosa o anche
solo per simularlo? Grazie ciao.

 anche solo per simularlo?
Intendi il "Controllo barra di avanzamento (ProgressBar)"?
Se ti riferisci a tale controllo in effetti non carica proprio nulla: sei tu
che ti devi preoccupare di farlo avanzare, direi quindi che la risposta, se
ho colto il senso del tuo quesito, e': si', puo' essere usato per simulare
un caricamento.
Riguardo come usarlo potresti studiare l'esempio della guida. Se hai
problemi particolari rifatti vivo.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Memoria

Ho realizzato un controllo in vb.net... questo controllo ha bisogno di fare
il refresh del suo aspetto una volta ogni 400 millisecondi... per fare
questo mi avvalgo di un timer che chiama ogni intervallo di tempo il
me.refresh andando a generare l'evento paint dell'oggetto che uso per il
disegno.
Disegno usando gli strumenti GDI+.
Dopo la premessa succede questo... succede che se vado a vedere
l'applicazione che usa il mio controllo la memoria sale di 4kb alla volta
come mai? Non chiudo tutte le risorse? Eppure faccio il dispose di tutti gli
strumenti di disegno... c'e' un modo di vedere quale risorse non chiudo? Se
disattivo il timer infatti non ho + incremento di memoria... HELP!

 disattivo il timer infatti non ho + incremento di memoria... HELP!
Può darsi sia a causa del fatto che .Net non è deterministico nel rilasciare
le risorse, cioè anche se chiami la Dispose le risorse non sono
immediatamente rilasciate, ma il GarbageCollector aspetta o un attimo di
respiro del processore (fai un test abbassando la frequenza del timer)
oppure che la memoria usata sia davvero molta.
Eventualmente puoi provare a forzare il GC, se non ricordo con il metodo
GC.Collect(), e se il problema era quello sopra descritto la memoria
dovrebbe liberarsi immediatamente.
Occhio che il GC richiede un buon dispendio di risorse, quindi magari
chiamalo una volta ogni tanto, altrimenti il tuo programma potrebbe
rallentare troppo.
Ciao
--
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net


Ci avevo pensato... ma avendo paura che le prestazioni degradassero
parecchio non cia vevevo nemmeno provato... poi mi sarebbe piaciuto capire
cosa fosse... sai mania della perfezione ;-)... cmq adesso leggendo altri
post ed il tuo l'ho fatto! Lancio ogni tanto gc.collect! Sembra funzionare e
le prestazioni non sembrano affatto cambiate!

Newsgroup: it.comp.lang.visual-basic
Titolo: Come fare lettura/scrittura in client/server???

In tutti gli ambienti dov'e'  richiesto il collegamento in rete di piu'
postazioni ad un database centrale, come viene realizzata la
lettura/scrittura dei record ?
Supponiamo di parlare di Sql Server 7.0 o Msde per stare in ambito
Microsoft, di utilizzare Ado, e di usare una griglia tipo Truegrid per
vedere e scrivere sui record.
Come eseguire il bloccaggio dei record da scrivere?
Come 'rilevare' se uno o piu'  record sono bloccati da altri utenti?
Come 'vedere' quali sono la postazione e l'utente che blocca il record che
vorrei scrivere?
Grazie ai rispondosi.
RobertoA

 wrote in message
9afls0$u6f$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:wAJy6.1915$5Y1....@news1.tin.it...


 ha scritto nel messaggio
news:9afqr9$vu3$1...@pegasus.tiscalinet.it...


 wrote in message
9afqr9$vu3$1...@pegasus.tiscalinet.it...


 seconda della situazione); tutti sono gestibili con la proprietà LockType

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ancora sul Serial Number dell'HD

Assodato che la funzione API "GetVolumeInformation" può restituire il numero
di serie del Volume dell'unità indicata e che questo si modifica ad ogni
formattazione del disco rigido o del floppy, vorrei sapere se qualcuno
conosce invece una funzione API che restituisca il vero numero di serie
dell'HD.
Ho notato, infatti, che esiste un programma (EZSMART della IBM) che riesce a
leggere proprio quel serial number stabilito dal produttore che identifica
univocamente l'HD se dotato di funzionalità S.M.A.R.T. (Self-Monitoring,
Analysis and Reporting Technology).
Sapete come fa?
Grazie a tutti.
        Silvio
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                Visita il Sito Comune
 
http://www.murialdo.it/it_lang_vb
~~~~~~~~~~~~~~~~~~~~~~~~~~~~

> Sapete come fa?
Interessa anche a me!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Terza domanda! :-)

Ciao a tutti. Innanzitutto grazie per le risposte che mi avete dato finora,
mi sono state molto utili. Ora vi pongo il nuovo problema in cui sono andato
a cozzare, mentre tentavo di inserire una icona nella traybar (sono uno
schifoso principiante):
Ho avviato visual basic (4.0, ed. professional), ho creato un nuovo progetto
di prova, e poi ho inserito un modulo. Nelle dichiarazioni del modulo ho
dichiarato Shell_NotifyIcon e la struttura NOTIFYICONDATA (non credo di aver
sbagliato in questo, ho usato il visualizzatore testo API).
Ho disegnato un pulsante nel form e, nella sub dell'evento click ho scritto
dim nic as NOTIFYICONDATA e l'ho riempito di opzioni, poi, finalmente, il
momento della veritą: call Shell_NotifyIcon(NIM_ADD, nic).
Tutto felice, eseguo il progetto, clicco sul pulante e... <crash> (rumore
delle palle che mi cadono ^__^)... "errore di runtime 453: funzione non
definita nella DLL specificata".
Scongiuro voi guru di aiutare questo povero incompetente ^__^
--
GUiLE

 definita nella DLL specificata".
Non è che hai specificato l'opzione NIF_MESSAGE tra i flag
senza aver creato la necessaria Callback ?

Scongiuro voi guru di aiutare questo povero incompetente ^__^
Beh, il messaggio è abbastanza chiaro: hai scritto male il nome della
funzione.
Controlla:
Declare Function Shell_NotifyIcon Lib "shell32" Alias "Shell_NotifyIconA"
(ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Long
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: convertire un file di testo in immagine

Non sò se questo quesito sia fantascenza, arrivare a farlo in VB, ma avrei
l'esigenza di convertire un qualsiasi file di testo in formato immagine.
Nessuno sà se esiste un sistema per farlo?
GRAZIE per l'interesse

 Nessuno sà se esiste un sistema per farlo?
Lo "stampi" (con Print) su una PictureBox e poi fai SavePicture...

 Nessuno sà se esiste un sistema per farlo?
No, non é fantascienza...
Però di sicuro non é performante ed ha più di un limite...
Prendi un form, metti una picturebox (Picture1 nel mio caso)
E poi fai così:
  Picture1.AutoRedraw = True
  Picture1.Print Tuo testo da stampare
  SavePicture Picture1, PathDelFile
                Ciao
                                        Allanon
--
- 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:avk2hn$gho2q$1...@ID-67444.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: [ot] bollino siae

l'ultimo dev e il cd macafee che mi arriva da ultimo byte ce l'hanno...
bisogna metterlo anche sui cd di backup ? <g>


la cosa che mi fa inc...are come un demonio (...) č questa:
mettiamo che io decida di realizzare un cd multimediale utilizzando
materiale originale creato da me (senza utilizzare in alcun modo opere di
altri);
mettiamo anche che io decida di regalarlo a chiunque, senza pretendere
assolutamente niente in cambio
mettiamo anche che questa mia intenzione sia esplicitamente stessa a livello
di opera multimediale (titoli di testa, schermata introduttiva o altro);
la domanda che sorge spontanea č: perchč devo pagare la SIAE per realizzare
tutto questo? che cosa centrano loro in tutto questo?
ciao

 tutto questo? che cosa centrano loro in tutto questo?
nulla.
devono vivere pure loro, ma se non ti obbligano...
ciao, a.
ps -- dici che gli usa come 51. stato ci prenderebbero ? ormai fanno casini
anche loro, non li spaventiamo piu'. ma magari con gli enti inutili tira
meglio...

 > la domanda che sorge spontanea è: perchè devo pagare la SIAE per


 dal cliente...si risparmia qualcosina...
:))))
--
Fibia "Sakamoto" FBI
URL: 
www.geocities.com/fibiafbi
E-Mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Membro #25 delle BT Sez. Sud
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire e scrivere cmd da vb

ciao a tutti, volevo sapere come aprire il command prompt da vb con
codice e (forse meno probabile) quando aperto scrivere nel prompt quel
che ho scritto prima in un textbox........è possibile????spero di sì
ringrazio anticipatamente
gege

 
a suo tempo scrissi questo semplice codice che faceva usi della clipboard:
       ID = Shell("cmd", vbNormalFocus)
       Sleep 200
       AppActivate ID
       Clipboard.Clear ' svuota la clipboard
       Clipboard.SetText "TUO TESTO" & vbCrLf
       SendKeys "% ep"
se ti puň aiutare..
ciao, roby

qualcosa è servito (aprire il cmd) ma per il resto o manca qualcosa o
non sono capace io.......ehehe!
non mi cancella il cmd e non mi scrive. perchè???

 nel prompt quel che ho scritto prima in un textbox.
Google e' tuo amico.
Da un vecchio post di hal:
http://groups.google.it/group/it.comp.lang.visual-basic/msg/7b45d828dd23d9fc?hl=it&
hth,
Lokar 

 
Prova con SendKeys "% mn" al posto di SendKeys "% ep" (sarebbe ALT+M  +n 
(incolla))
ciao, roby

 wrote in message 
news:43946993$1...@x-privat.org...


Newsgroup: it.comp.lang.visual-basic
Titolo: Picture Boxes

Hey,
       I am trying to make a picture appear when I click on a command button
in a picture box.  I can make it show up in the property's and figured,
picDisplay.Picture c:\picture.jpg would work but ...
       Tell me if you got any idea's ro I'll try somethign besides picture
boxes...
                - Thanks a million Nikolao

 picDisplay.Picture c:\picture.jpg would work but ...
... but it can' t :-(
Try instead:
Set picDisplay.Picture = LoadPicture("c:\picture.jpg ")
Bye
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: Combo e Items - Seconda Parte

Come faccio a far corrispondere ad un Item contenuto in una ComboBox un
determinato elenco di nomi che appaiono in un listbox alla selezione del
succitato Item
Grazie, :-)

 wrote in message
fDRp6.2355$Xj7....@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Protocollo Mbus Fbus

Forse sono un po' OT, però ci provo ugualmente.
Qualcuno conosce il protocollo di comunicazione Mbus Fbus usato per
intenderci anche dai telefonini nokia.
Grazie.
Pigi



Ti consiglio di comprare un cavo taroccato a 45k lire :)
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: Come creare un oggetto TextBox RunTime

Avrei necessità di creare uno o più oggetti textbox in una form in RunTime.
Ho provato di tutto ma non sono riuscito a risolvere il problema.
Il fatto è che io devo creare tanti TextBox quanti richiesti da una
funzione.
L'unica cosa che sono riuscito a fare è creare una form con il seguente
codice:
Dim f As frmTest
Set f = New frmTest
f.Caption = "hello"
f.Show
...ma creare una TextBox proprio non se ne parla.
Qualcuno può aiutarmi?
grazie e ciao

Per farlo c'è solo un modo: abbandonare il limbo di vb e cominciare a sporcarsi
le mani con le brutte API.
ecco quello che devi fare:
Crei un modulo Visual basic e copi questo codice:
Modulo1.bas:
Public Const ES_LEFT = &H0&
Public Const ES_WANTRETURN = &H1000&
Public Const WS_VISIBLE = &H10000000
Public Type RECT
        Left As Long
        Top As Long
        Right As Long
        Bottom As Long
End Type
Public Const WS_CHILD = &H40000000
Public Declare Function CreateWindowEx Lib "user32" Alias "CreateWindowExA"
(ByVal dwExStyle As Long, ByVal lpClassName As String, ByVal lpWindowName As
String, ByVal dwStyle As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth
As Long, ByVal nHeight As Long, ByVal hWndParent As Long, ByVal hMenu As Long,
ByVal hInstance As Long, lpParam As Any) As Long
nel form inserisci un bottone e incolli il seguente codice:
Private Sub Command1_Click()
 MsgBox CreateWindowEx(0, "EDIT", "EDIT", WS_VISIBLE Or WS_CHILD, 10, 10, 100,
100, Me.hWnd, 0, 0, 0)
End Sub
Se sdegni le api c'è un metodo molto più comodo che richiede soltanto che in
design time inserisci una sola textbox con la proprietà index impostata a 0. Ma
al momento non ricordo come dovresti procedere.
ciao.

-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

mi sono ricordato, allora:
inserisci in un form un textbox;
compila la proprietą Name con "Text1"
compila la proprietą index con 0
inserisci un button nel form e riempila con il codice seguente:
  Load Text1(1)
  Load Text1(2)
  Load Text1(3)
  Dim top As Long
  For i = 0 To 3
 
 
    Text1(i).top = top + 15
    Text1(i).Visible = True
    Text1(i).Text = i
    top = top + (Text1(i).Height)
  Next
  Text1(1).Visible = True
  Text1(1).top = 100
 
Ciao


Scusate l'intromissione.
Il secondo metodo che hai scritto è più veloce e comprensibile:)
Come faccio però a modificare anche la grandezza del form che contiene
i textbox. Io a priori non so quanti textbox avrò.
Esiste una qualche proprietà automatica o devo calcolarmelo a mano?


 wrote in message
news:2e345294191a3d49915...@mygate.mailgate.org...


...oppure...
cercare su google un post del sottoscritto che ne parli!
Mannaggia alla pigrizia!!!!!!!!!!!!
http://groups.google.com/groups?q=controlli+run+time+group:it.comp.lang.visu
al-basic+author:Allanon&hl=it&selm=9uqjop%24a2aa8%241%40ID-67444.news.dfncis
.de&rnum=2
                    Ciao
                                            Allanon
Newsgroup: it.comp.lang.visual-basic
Titolo: 4 Aggiornamento tabelle in rete

Lupo ha scritto:
L'incremento di un contatore non andrebbe mai fatto se il (per esempio)
documento relativo non è ancora stato scritto o se ci sarà il dubbio che
venga scritto, ma solo contestualmente alla scrittura stessa.
Quindi, semmai, ipotizzo all'operatore un numero (leggo il contatore, senza
bloccare e espongo quanto letto +1) che potrà essere quello che il documento
assumerà, ma non è affatto certo perchè in quell'istante un altro operatore
sta facendo qualcosa che necessita dello stesso contatore. Quando mi
conferma la creazione, senza più alcun intervento da parte dell'operatore,
blocco, determino e aggiorno il numeratore, sblocco e aggiungo il record del
documento al quale assegno il contatore stesso che nessuno (grazie al
blocco) potrà più occupare.
Ti dico che avevo già fatto qualcosa di simile.
Se uno o più operatori salvano tutti funziona bene, ma se uno di loro
annulla o se tipo quello che apre addnew prima salva dopo dell'altro si
incasina.
Forse è questione del blocco che non ho ben capito.
In pratica non ho le idee ben chiare.
Non ci sono che tu sappia esempi sul SC?
Ho cercato ma non so cosa cercare.
Ciao carmelo

 Ti dico che avevo già fatto qualcosa di simile.
E io ti dico, per la seconda volta, che si risponde nel topic originario.

 Ho cercato ma non so cosa cercare.
Se n'era parlato tempo fa (ma non troverai molto di diverso da quanto già
detto): Cerca in Google e in questo NG "author:Lupo blocco"
Newsgroup: it.comp.lang.visual-basic
Titolo: connessione db remoto

Sapete e/o avete un esempio su come connettersi ad un database access
presente su un server, tramite visual basic in locale?
esempio:
normalmente in locale:
Set CONNESSIONE = New ADODB.Connection
Set RECORD = New ADODB.Recordset
CONNESSIONE.Provider = "Microsoft.Jet.OLEDB.4.0"
CONNESSIONE.ConnectionString = "Data Source=c:/datacazz/datacazz.mdb"
CONNESSIONE.ConnectionTimeout = 60
CONNESSIONE.Mode = adModeReadWrite
CONNESSIONE.CursorLocation = adUseServer
CONNESSIONE.Properties("Jet OLEDB:Database Password").Value = passdb
CONNESSIONE.Open
RECORD.CursorLocation = adUseServer
COSI' NON FUNGE
Set CONNESSIONE = New ADODB.Connection
Set RECORD = New ADODB.Recordset
CONNESSIONE.Provider = "Microsoft.Jet.OLEDB.4.0"
CONNESSIONE.ConnectionString = "Data
Source=
http://www.sito.it/datacazz/datacazz.mdb
"
CONNESSIONE.ConnectionTimeout = 60
CONNESSIONE.Mode = adModeReadWrite
CONNESSIONE.CursorLocation = adUseServer
CONNESSIONE.Properties("Jet OLEDB:Database Password").Value = passdb
CONNESSIONE.Open
RECORD.CursorLocation = adUseServer
ho cercato su google, molte domande ma nessuna risposta seria
ciao
Icchese

 Icchese
Non puoi connettere un db Access da VB in rete Web se non
usando sistemi non convenzionali come l'uso di WebService
su di un WebServer, ma otterresti Recordset disconnessi.
L'unico modo è tramite ASP o altri linguaggi WEB.
Diverso è se lavori in LAN.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

grazie per l'informazione, sarebbe stato bello :)
ciao 

 ciao
e tu creati la "bellezza"!!!
in locale (sul server) un tuo programmillo tiene aperta un porta in
ascolto...
i tuoi client si connettono alla porta....fanno una richiesta...il tuo
programmillo interroga access...e produce la risposta!
puoi fare una cosa semplicissima...o di una complicazione mostruosa...a te
la palla!
;-)
-- 
Il Wodkino Nazionale è a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 New Entry nel bestiario!
Aderisci al M.A.I.  
http://www.villaceleste.it/html/icadioti/

> grazie per l'informazione, sarebbe stato bello :)
...ma forse lo vuoi fare per aggieggiare un tuo mdb on line?
prova cosě
http://www.carlprothman.net/Default.aspx?tabid=93#MSRemoteAccess
con l'obsoleto remote access forse il tuo provider ha ancora le vecchie dll
nel suo pc!
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdrefmsremote.asp
oppure
http://www.carlprothman.net/Default.aspx?tabid=87#OLEDBProviderForMicrosoftJet

Newsgroup: it.comp.lang.visual-basic
Titolo: Maledette Stampanti ad Aghi!

So che le stampanti ad aghi possono essere pilotate mediante comandi ESC...
Bene! Ma come si utilizzano in VB?
Esiste un sito o un esempio che lo spiega?
Grazie.

 wrote in message
news:0hlS4.10091$uk2.1...@news.infostrada.it...


 wrote in message


 
1) apri "LPT1:" o "PRN:" come file e ci scrivi sopra mandando le
opportune sequenze di escape come documentate sul manuale della
stampante
2) installi e configuri la stampante 'generico solo testo' e la usi come
una qualsiasi stampante windows ( printer.print )
null'altro