mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Net Use in Visual Basic

Qualcuno sa dirmi se esiste un comando paritetico a "NET USE" di DOS?
Oppure come creare una connessione di rete.
Grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Oppure come creare una connessione di rete.
Ciao,
cerca su google (o meglio, in MSDN) la funzione API WNetAddConnection
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 Ciao!
Proprio quello che cercavo, grazie!


Newsgroup: it.comp.lang.visual-basic
Titolo: R: aiuto urgente su recordset

yuhuuuuuuuuu ma che siete spariti tutti quanti...?? ::))))))) il NG è vuoto,
non c'è nessuno... sentite come rimbomba la mia voce... oce... oce...
ho un dubbio, tipico di chi inizia a smanettare con i database.
finora come vi ho detto non sono riuscito a modificare (ma solo a leggere)
la proprieta value di un field di un recordset. la mia domanda è questa: se
un giorno (con il vs aiuto) ci dovessi riuscire, ch cosa modificherei? il
valore del recordset, oppure il valore del campo nel file MDB?
per effettuare la seconda operazione, in realta, ci sono arrivato con il
metodo Execue e usando l'istruzione UPDATE di SQL, ma cmq modificare il
record direttamente con .Value mi sembrava davvero facile... per questo vi
ho chiesto iuto.
in ogni caso, sto impazzendo perche non riesco a capire come mai MSDASQL da
me non esiste... grrr...
volete che impazzisca?? noooooooo... e allora help meeeee!!!!!
MarioH

 rst("Nome").Value = "auau-primo" ' qui si blocca!!!!!!!!!!!!!!!!!!
Ciao!
Sei sicuro che la tabella sia con almento un record? Perchč l'operazione che
usi č di modifica,se vuoi aggiungere devi usare rst.Addnew prima.
Se ci sono recors allora prova direttamente rst("Nome")="auau-primo" oppure
rst![Nome]="auau-primo"  (Il campo č string vero?)


Orpo non ci avevo pensato...
Una bella considerazione, che dovresti senza dubbio aggiungere a quanto ti
ho scritto nel mio post :)
Infatti e' possibile che il record sia aperto in modo sbagliato, ma anche
che non vi sia un record corrente (anche se in questo caso dovrebbe
segnalare "either BOF  or EOF is true" eccetera)...
Ciaotutti,
Alessandro

veramente il record c'era, non era vuoto e non era nè all'inizio ne alla
fine... ::))))


::))))
ehi scherzavo, scherzavo... cmq ho risolto (piu o meno...)
Newsgroup: it.comp.lang.visual-basic
Titolo: COM e interfacce I e II livello

Ciao a tutti,
avrei urgente bisogno di ricevere qualsiasi tipo di "lume", esempi,
documentazione sulla tecnologia COM (Component Object Model) e sulle
relative interfacce per utilizzare quel tipo di componenti (in particolare
cosa sono e come utilizzare le interfacce di primo e secondo livello). Tutto
ciň in VB6.
Grazie a chiunque possa aiutarmi ad avvicinarmi a questi concetti, per me
del tutto nuovi.
Antonio
--
Posted from 
ma...@node-1.ccstech.it
 [212.110.42.1] (may be forged)
via Mailgate.ORG Server - 
http://www.mailgate.org

>documentazione sulla tecnologia COM (Component Object Model) e sulle
Su 
www.programmazione.it
 trovi un tutorial.
Antonio



 ciň in VB6.
Solo un consiglio.
Se vuoi avere indicazioni PRECISE su COM/DCOM,
prova a chiedere ad Alex Martelli su it.comp.programmare.win32
Ci sono pochi che ne sanno quanto lui sull'argomento.
Per quanto riguarda l'ambiente VB non saprei, ma sicuramente
qualche dritta te la puň dare.

Newsgroup: it.comp.lang.visual-basic
Titolo: crash con vb5

usando vb5 sotto xp home ogni tanto, specialmente quando ho fatto molto
modifiche e non ho salvato :-) il programma va in crash. ho scaricato tutte
le sp. cè qualche controindicazione per chi usa vb5 e xp?

 le sp. cč qualche controindicazione per chi usa vb5 e xp?
Non "ufficialmente". Posso suggerirti di abilitare il salvataggio automatico
alla compilazione.
E, se la cosa non ti risulta traumatica, prendi in considerazione l'idea
d'una formattatina...

 ha scritto nel
| messaggio news:4mzWa.220378$lK4.6...@twister1.libero.it...
| > le sp. cè qualche controindicazione per chi usa vb5 e xp?
|
| Non "ufficialmente". Posso suggerirti di abilitare il salvataggio
automatico
| alla compilazione.
| E, se la cosa non ti risulta traumatica, prendi in considerazione l'idea
| d'una formattatina...
io all'inizio avevo installato solo vb e xp, ma vb andava in crash lo
stesso, quindi non penso possa servire a molto

Newsgroup: it.comp.lang.visual-basic
Titolo: Classi di oggetti grafici

Vottei sapere se esistono librerie di classi di oggetti grafici (linee,
archi, testi..)
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Inserimento in DataGrid vuota : come si fa?

salve a tutti, avevo postato questo problema un pò di tempo fa senza però
trovarne soluzione,
Ho una datagrid collegata ad un ADODC.
Setto la query sql in modo da restituire un recordset vuoto e di conseguenza
da "svuotare" la DataGrid, es. "Select * FROM Clienti Where ID=-1" (-1 è un
ID inesistente).
Bene la DataGrid si svuota ma se ora provo ad inserire dei dati mi da errore
dicendo "La riga corrente non è valida".
Se invece provo ad inserire dei dati in una DataGrid "non vuota" funziona
tranquillamente .......
vi prego aiutatemi ... sono proprio disperato ........
CIAO

 ha scritto nel messaggio
news:9ovdq7$dgk$1...@nreada.inwind.it...
Ri-copio dal thread dell'altra volta
Dimmi cos'è che non ti quadra (anche considerando l'esempio che ti avevo
mandato in mail):
COPIA.BEGIN
"Quando crei un recordset vuoto e lo assegni alla datagrid, tutto va bene
così come già avevi fatto prima:
la .update non ci deve essere :  "Update" di che cosa???
Quando da Datagrid inserisci un nuovo record, di fatto esegui una
.addnew
.fields(0)=...
.fields(1)=...
.fields(2)=...
etc...
ma NON esegui la .Update finale, quindi l'aggiornamento resta pendente.
Devi aggiungere un pulsante di "salva", oppure provare a mettere la update
nel codice di click della grid, o eseguirlo alla chiusura del form, o
qualunque altra cosa vada bene al flusso logico del tuo applicativo."
fine della copia.
Prova a fare come ti dico...
1) Aggiungi un pulsantino,
2) ci metti:  adoPortate.Recordset.Update
3) Premi il pulsantino dopo aver fatto l'inserimento della riga
4) Mediti su "dove" nella realtà del -tuo- codice abbia senso mettere
l'update.
COPIA.END
ciao
ugo

 ha scritto nel messaggio
news:9ovjnr$6j9$1...@lacerta.tiscalinet.it...



Mah... a costo di apparire pedante:
ho fatto esattamente come hai scritto tu...
qui funziona con due condizioni/limitazioni/caratteristiche:
1) la datagrid deve avere Allowaddnew (e questo è scontato)
2) dopo aver inserito il record, l'idCliente viene visualizzato come 0, pur
essendo salvato correttamente...
Comunque resto del parere che la soluzione migliore sia quella di scrivere
un po' di sano codice Ado e abbandonare i datacontrol e i loro (falsi)
automatismi...
ciao
ugo

 ha scritto nel messaggio
news:9ovvfd$ojp$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Importare 1 select in un altro DB...

ho 2 DB con 2 connessioni ODBC diverse e voglio inserire in una tabella del
2° DB i risultati di una query del 1° DB, come posso fare ?

Dimenticavo di aggiungere ke uso ADO e VB6

 Dimenticavo di aggiungere ke uso ADO e VB6
Visto che usi ODBC, presumo che tu non utilizzi Access o Sql-Server.
Siccome ciò che chiedi dipende dal db, occorre che tu ci indichi che dbms
utilizzi.
Posta anche le due stringhe di connessione, così evitiamo fraintendimenti.
Ciao
Alberto
-- 
Santo cielo, Magnum, si può sapere cos'è questo baccano?
Higgins, posso spiegarle...
Credo non sia necessario.
Zeus, Apollo, a voi...

Ora x test sn 2 access,ma poi saranno 2 oracle

 Ora x test sn 2 access,ma poi saranno 2 oracle
Allora occorre 'ciclare' il recordset.
Quindi, apri un recordset (rigorosamente static) con la query, poi fai un
bel Do While, e per ogni record esegui un insert.
Con un po' di impegno, riuscirai a realizzare una funzione che ti genera
l'insert in automatico, usando le caratteristiche dei field di origine.
Il tutto inglobato in una transaction, e sei tranquillo (con Oracle, mentre
con Access il concetto di transaction è molto blando...).
Ciao
Alberto

 dove andarlo a recuperare :(
No.
Però mi chiedo: Se devi fare un applicativo che utilizza database, esistono
cose 'di base' che occorre saper fare (altrimenti stiamo parlando di nulla).
Quello che serve per risolvere il tuo problema fa parte delle cavolate di
base di ADO:
- Aprire un recordset
- Scorrere un recordset
- Effettuare un Insert
- Aprire e chiudere una transazione
Se non sai fare queste cose, non sarebbe neppure utile (se anche avessi
qualcosa di pronto), che io ti postassi del codice.
Ciao
Alberto

 Dimenticavo di aggiungere ke uso ADO e VB6
Questo e' la stringa SQL che ho usato per trasferire record da un db
access ad un altro:
"INSERT INTO " [nome tabella] & " IN " & [path e nome del db di
destinazione] & " SELECT * FROM " & [nome tabella]
Spero possa esserti utile...


Il problema è che questo metodo non è applicabile ad Oracle (anche se
qualcosa di simile c'è anche per dbms tipo Sql-Server ed Oracle), e per
Denis l'uso di access è solo temporaneo, ma alla fine passerà ad Oracle.
Ciao
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: Ricerca stretta

Ciao a tutti,
sono un principiante e ho un problema con una query. vorrei, da un
elenco di nomi estrarre solo quelli che iniziono per uno  o più
caratttere cioè fare una ricerca molto stretta. Faccio un esempio:
Domenico
Giuseppe
Francesca
Giovanni
Marco
Girolamo
Guglielmo
Vorrei che se gli dico di fare una ricerca per "G" mi di tutti i nomi
che iniziano per "G" mentre se gli dico per "Gi" mi dia Giuseppe,
giovanni, girolamo e non deve includere Gugliemo.
SPero di essere stato chiaro. 
grazie

 grazie
Devi dire che tipo di Database usi e con cosa accedi in quanto
per realizzare quanto chiedi serve inserire un carattere Jolly
che va differenziato.
Se usi Access(Jet)+DAO devi fare cosě:
"SELECT * FROM T1 WHERE [Nome] LIKE '" & strLettera & "*'"
Se usi Access(Jet)+ADO o SQL_SERVER
"SELECT * FROM T1 WHERE [Nome] LIKE '" & strLettera & "%'"
Saluti
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ciao,
grazie ho provato ma non mi dà nessun risultato. Uso un controllo
adodc. il codice è questo
If TabRicerca.SelectedItem.Index = 1 Then
    If TxtCognome = "" Then
      MsgBox "Inserire il cognome o parte di esso", vbCritical
      Exit Sub
    End If
    sql = "Select Soggiorno, Cognome, nome,datanascita, nazione,
a12,intestatario,idstraniero from straniero where (Cognome LIKE '" &
TxtCognome & "*' ) order by cognome"
     adoStraniero.RecordSource = sql
    adoStraniero.Refresh
    With adoStraniero.Recordset
      If .EOF Then
        MsgBox "Ricerca terminata - Nessun Soggetto trovato"
        Exit Sub
      End If
       Form1.AdoStraniero.RecordSource = sql
       Form1.AdoStraniero.Refresh
       Form1.tiporicerca = 1
       Form1.Show
nel form1 c'è sempre un controllo adodc e datagrid associato ad esso.
il form si apre ma la griglia è vuota. il motivo?

Newsgroup: it.comp.lang.visual-basic
Titolo: *** Outlook con VB ***

Sapendo come inviare una mail tramite un toll in VB è possibile non far
apparire una finestra di dialogo ove devo confermare l'invio della mail ?
Partendo di notte chiaramente non è possibile dare la conferma.
grazie
Saimon

Premesso che non ho ben capito cosa hai chiesto, comunque prova a vedere:
bye
Strumenti-->Opzioni-->Protezione-->Avvisa se altre applicazioni tentano...
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] For each x in me.controls

perchè non mi funziona?
Mi da un errore. tipo non corrispondente! (13)
"Cerca" è il FORM con dentro i cmbox (me)
Dim x As ComboBox
For Each x In Cerca.Controls
    If TypeOf x Is ComboBox Then
    x.AddItem "NONE"
    x.AddItem "opzione1"
    x.AddItem "opzione2"
    x.AddItem "opzione3"
    x.AddItem "opzione4"
    End If
Next x

 wrote in message
7jeqjt$c47$1...@pollux.ip-plus.net...

Il tuo credo sia solo un piccolo errore di impostazione
se gia dichiari x come combobox "dim x as combobox" come pretendi nel ciclo
for di non avere un errore?
e come se dicessi " per ogni combobox nei controlli della form1, se combobox
e'= combobox allora fai questo"
un po strano non trovi
prova cosi:
dim x as control
for each x in Cerca.controls
 if tipeof x is ComboBox then
x.additem "quello che minchia tipare"
end if
next x
ps : questo vale sempre , forse qualche riserva la si puo avere nel caso di
una matrice di controlli
ma dovrebbe fungere comunque
byez lollo


Si cosi' funziona ma mi accorgo di avere un problema, infatti ho alcuni
cmbox che non dovrei modificare e questi li posso chiamare come voglio.
Quindi un comando per escluderne del tipo:
for each x in Cerca.controls
if typeof x is ComboBox then
    if dim(???,1,4) = "cmb1"then             'SOLO i cmb che iniziano con
cmb1
    x.additem "quello che [-beep-] ti pare"
    end if
end if
next x
come riconosco il "???"
Praticamente cambiare solo tutti i cmbox che si chiamano "cmb1  e seguenti"
Potrei nel caso  risolvere il problema assegnando una variabile al comando
del tipo:
dim x
x="me.pippo"
x.additem "BLA BLA"
ma evidentemente anche qui canno il riconoscimento della "x"...:-))))
Grazie per qualche info
email: 
wl...@ticino.com
reply [togli NOSPAM]

 come riconosco il "???"
Controlla x.Name, che e' una stringa...
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Secondo me questo codice è sbagliato

Il codice è il seguente (in una classe):
WriteOnly Property BirthYear() As Integer
    Set(ByVal value As Integer)
        birthYearValue = value
    End Set
End Property
ReadOnly Property Age() As String
    Get
        Age = My.Computer.Clock.LocalTime.Year - birthYearValue
    End Get
End Property
Che ne pensate?
Ciao 

 ha scritto nel messaggio 
news:44a94f3c$0$16936

Dal punto di vista semantico mi pare corretto.
Dal punto di vista logico bisognerebbe tener conto anche del mese e del 
giorno.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Un AIUTO sulle CLASSI

Sono Valter,
Vorrei sapere, dato che non riesco, come si fa a passare come parametro un
tipo definito dall'utente ad un membro pubblico di una classe (.cls).
Il problema l'ho agirato trasformando il tipo definito in classe di soli
dati pubblici;
In questo caso ho il problema che gli array non possono essere mebri
pubblici di classi!
Come posso superare il problema?
Un altro problema che ho in questo caso e' il fatto che passando ad una
routine (byref) un mebro pubblico di una classe, la routine
modifica la copia del valore come se lo avessi passato byval.
Non si puo' passare un mmbro pubblico di una classe ad una routine che deve
modificarlo?
Grazie dell' aiuto
VALTER

tipo definito dall'utente ad un membro pubblico di una classe (.cls).
]zac[

tipo definito dall'utente ad un membro pubblico di una
classe (.cls).
Il problema č che non puoi mettere un tipo da te definito
come pubblico nel modulo di classe, se perň lo metti in un modulo a parte,
non puoi passarlo alla classe (Property Let non lo prende)...io pure avevo
avuto un problama del genere mi sembra e...qualcisa mi ero inventato...dopo
spulcio e ti dico :))
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
 

Bhè ma a questo punto tieni nel form il tuo tipo, e lo smembri nella classe
sotto forma di tante proprietà...io mi sembra che avevo fatto così...


Newsgroup: it.comp.lang.visual-basic
Titolo: mscom32.ocx

Sto cercando questo controllo activex.
Dove posso scaricarlo?
grazie

Dove posso scaricarlo?
Ossia:
MS Communications Control V6.0  - MSCOMMLib.MSComm  - mscom32.ocx 
... direi dal cd di visual basic ;-)
ciao, hal

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

Come faccio a selezionare il testo contenuto in una textbox appena prende il
focus.
Grazie
--
Grazie
Gabriele F.
gab...@NOSPAMtin.it
Eliminare NOSPAM per scrivermi

 wrote in message
news:8mtn04$gkt$1...@fe1.cs.interbusiness.it...

Fai cosě:
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
Ciao, Adriano

 wrote in message


Newsgroup: it.comp.lang.visual-basic
Titolo: Vb e ScriptSQL

Come si esegue uno script Sql da VB6?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:4dcbffca7ea8b7f3d32...@mygate.mailgate.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: Disattivare l'audio

Devo realizzare un piccolo software che azzeri l'audio nella macchina
(l'equivalente via codice di cliccare sull'icona del volume nel tray e
selezionare "disattiva", in pratica).
Qualche suggerimento su funzioni dell'API di win che possono essermi utili?
Vi ringrazio in anticipo.

 ha scritto nel
messaggio news:BAAE9.55781$744.2...@news1.tin.it...

Ciao
Da "Apiguide 3.7" scaricata dal sito 
www.allapi.net
 (NON l'ho provato)
INFO
"The waveOutSetVolume function sets the volume level of the specified
waveform-audio output device."
PARAMETERS
Declare Function waveOutSetVolume Lib "Winmm" (ByVal wDeviceID As Integer,
ByVal dwVolume As Long) As Integer
· hwo
Handle to an open waveform-audio output device. This parameter can also be a
device identifier.
· dwVolume
New volume setting. The low-order word contains the left-channel volume
setting, and the high-order word contains the right-channel setting. A value
of 0xFFFF represents full volume, and a value of 0x0000 is silence.
If a device does not support both left and right volume control, the
low-order word of dwVolume specifies the volume level, and the high-order
word is ignored.
Returns
 MMSYSERR_NOERROR if successful or an error otherwise. Possible error values
include the following.
MMSYSERR_INVALHANDLE Specified device handle is invalid.
MMSYSERR_NODRIVER No device driver is present.
MMSYSERR_NOMEM Unable to allocate or lock memory.
MMSYSERR_NOTSUPPORTED Function is not supported.
ESEMPIO
'Example submitted by Danjel Nyberg
'It needs a textbox (Text1) and two command buttons (Command1, Command2)
Private Declare Function waveOutSetVolume Lib "Winmm" (ByVal wDeviceID As
Integer, ByVal dwVolume As Long) As Integer
Private Declare Function waveOutGetVolume Lib "Winmm" (ByVal wDeviceID As
Integer, dwVolume As Long) As Integer
Private Sub Command1_Click()
    Dim a, i As Long
    Dim tmp As String
    a = waveOutGetVolume(0, i)
    tmp = "&h" & Right(Hex$(i), 4)
    Text1 = CLng(tmp)
End Sub
Private Sub Command2_Click()
    Dim a, i As Long
    Dim tmp, vol As String
    vol = Text1
    tmp = Right((Hex$(vol + 65536)), 4)
    vol = CLng("&H" & tmp & tmp)
    a = waveOutSetVolume(0, vol)
End Sub

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

Newsgroup: it.comp.lang.visual-basic
Titolo: programma in esecuzione

salve, come sapere dal mio programma (mio.exe) se un altrol programma (
xxx.exe) è in esecuzione, grazie


vai su:
http://www.allapi.net
e cerca "Process32First"
ciao. buc
Newsgroup: it.comp.lang.visual-basic
Titolo: Componenti stile XP

Ho utilizzato il metodo più volte postato per implementare i controlli in
stile XP sulle mie applicazioni.
Quando i form sono composti da pochi controlli tutto OK, nei form un po' più
complessi si verificano spesso problemi di visualizzazione, ovvero: Option
button tutti in nero, caption dei frame spezzati a metà e in grassetto,
controlli che spariscono al passaggio del mouse e altri problemi dello
stesso genere.
E' normale o devo utilizzare qualche altro stratagemma ?
Grazie
Fabio

 controlli che spariscono
Molti problemi sono legati all'uso dei frame. Se eviti quelli dovrebbe
essere tutto un po' più stabile.
In caso esistono molti controlli scritti in VB che emulano il look&feel di
XP.
Un bel sorgente di OCX di pulsante lo trovi ad esempio qui:
http://www.planet-source-code.com/vb/default.asp?lngCId=37471&lngWId=1
Ciao
*Roby*

 
http://www.planet-source-code.com/vb/default.asp?lngCId=37471&lngWId=1
Grazie per la segnalazione, ma cercavo una soluzione più "sbrigativa",
ovvero senza dover sostituire una marea di buttons... peccato.
Speravo che con il SP1 di XP le cose si sistemassero, ma da questo punto di
vista non è cambiato niente.
Ciao
Fabio

  cercavo una soluzione più "sbrigativa",
La cosa più sbrigativa da fare è riscriversi il controllo Frame.
Magari con un OCX fatto da te il tuo programma sotto WinXp funziona, e se
emuli tutte le funzionalità dei frames standard, ti basta sostituire il
riferimento al Frame con il riferimento al tuo OCX, direttamente aprendo i
files delle form con un editor di testo e usando il search&replace.
In caso, facci sapere l'esito della prova.
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: PLEASE HELP!

Hi,
 Can anyone tell me how to use a button to insert pre-defined text at the
cursor point in a text box??
Many Thanks,
                Matthew Townsend

The cursor point, as you call it, in a text box is a textbox property called
SelStart.
So:
Private Sub Command1_Click()
Dim Predefined As String
Predefined = "Something"
Text1.Text = Left(Text1.Text, Text1.SelStart) & Predefined _
& Mid(Text1.Text, Text1.SelStart)
End Sub
Notice the use of the Mid function. Ommitting the end value will make it
return the rest of the string from the start value (In this case
Text1.SelStart to the end of the string.

Newsgroup: it.comp.lang.visual-basic
Titolo: INFORMAZIONE URGENTE...GRAZIE!!

Scusate ma ho urgentemente bisogno di sapere come si crea un DataSourceName
(DSN) dell'ODBC con Visual Basic.
Mi serve per effettuare una connessione tra la mia applicazione e un
database costruito con Sql Server 7.0
P.S. Tutto questo per evitare che, chi deve usare il programma, deva settare
il collegamento dell'ODBC  manualmente .
Grazie mille

 wrote in message
83tblb$hi5$1...@lacerta.tiscalinet.it...

Io non lo ho mai fatto, comunque il codice dovrebbe essere come il seguente:
'dichiarazioni
const ADD_DSN = 1
const REMOVE_DSN = 2
[private|public] declare function SQLConfigDataSource Lib "ODBCCP32.DLL" _
    (byval hWndParent as long, byval fRequest as long, byval lpszDriver as
string, byval lpszAttributes as string)
public sub CreaDSN(nomeDSN as string)
    Dim res as long
    Dim Driver, Attributes as string
Driver = "*****" 'qui metti il nome del driver che non è il nome della DLL
ma lo devi ricavare dalla documentazione
Attributes = "Server=xxxxxxxxx" & Chr$(0)
Attributes = Attributes & "DESCRIPTION=descrizione"  & chr$(0)
Attributes = Attributes & "DSN=" & nomeDSN & chr$(0)
Attributes = Attributes & "DATABASE= DB" & chr$(0)
Attributes = Attributes & "UID=myuserid" & chr$(0)
Attributes = Attributes & "PWD=mypassword" & chr$(0)
DBEngine.RegisterDatabase "nome database da usarsi anche con il metodo
OpenDatabase", Driver, True, Attributes
res = SQLConfigDataSource(vbAPINull, ADD_DSN, Driver, Attributes)
End Sub
Public Sub EliminaDSN(nomeDSN as string)
Dim res as long
Dim Driver, Attributes as String
Driver = "****" 'qui metti il nome del driver che non è il nome della DLL ma
lo devi ricavare dalla documentazione
Attributes = Attributes & "DSN=" & nomeDSN & chr$(0)
res = SQLConfigDataSource(vbAPINull, REMOVE_DSN, Driver, Attributes)
End Sub
Spero di averti aiutato
fra...@iname.com

Esiste in vb6 una funzione apposita ma a memoria non la ricordo, prova a
guardare nell'help "rdoregisterdatabase" o simile.

Newsgroup: it.comp.lang.visual-basic
Titolo: Form non rettangolari

Ciao,
immagino che questa domanda sia stata fata almeno un centinaio di volte.
Vorrei sapere quali sono le Api per realizzare in VB form non rettangolari.
Se qualcuno sa indicarmi dei siti mi farebbe una cosa gradita.
Grazie e ciao a tutti.


Forse non sapevi che questo Ng ha un Sito Comune che ,oltre al rispondere
alla tua domanda, vale la pena di 'navigare' fino in fondo :-)
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Evitare di inventare l'acqua calda

Qualcuno conosce, ho ha realizzato, un oggetto tipo Grid che permetta di
visualizzare un db utilizzando ADO con funzionalità simili ad una vista di
"Notes"?
Vorrei poter definire qualche cosa di simile:
    Prodotto xxxxxxxxx
        Ordine 1
        Ordine 2
        ecc.
La colonna prodotto deve essere espandibile.
Ho provato ad utilizzare il controllo griglia gerarchica ma non è
esattamente quello che voglio.
Quello che cerco assomiglia di più ad un controllo Tree come effetto ma non
posso utilizzarlo in quanto per caricarlo manualmente quando vi sono molti
datii occorre troppo tempo.

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: Listbox

Vi espongo brevemente il mio problema:
il mio programma prevede che ad ogni click di un pulsante, secondo uno
schema piu o meno casuale, si aggiungano da una listbox uno o piu dati
predefiniti, banalizzando:
  archivio:
   1=pomodoro
   2=cane
   3=salsiccia
se il numero casuale generato e ad es.1, nella listbox si aggiunge
"pomodoro".
Fin qui tutto ok.
Il fatto e che quest'evento si ripete sicuramente piu di una volta,
aumentando la probabilita di avere ripetizioni.
Come faccio percio a determinare che non ci siano dati doppi nella listbox,
soprattutto con una lunga lista?
Ciao e grazie
                                             Andrea

...


Dai un'occhiata al sito 
http://www.mauro.sistel.it/index.htm
 troverai
sicuramente quello che cerchi e non solo.
By GIANNI

 >   3=salsiccia,false
ciao
Enrico

Ti mando una funzione che genera numeri casuali e li inserisce in un array
senza ripetizioni...
Public Function nRndNoRepeat(vMatrice() As Variant, ByVal nNumero As
Integer)
Dim nTest As Integer
Dim bGiaUscito() As Boolean
Dim nAccettati As Integer
ReDim vMatrice(1 To nNumero)
ReDim bGiaUscito(1 To nNumero)
Do Until nAccettati = nNumero
    nTest = Int((nNumero * Rnd) + 1)
    If Not bGiaUscito(nTest) Then
        nAccettati = nAccettati + 1
        bGiaUscito(nTest) = True
        vMatrice(nAccettati) = nTest
    End If
Loop
End Function
-----Uso del func
Dim i As Integer
Dim Testo As String
Dim p()
Call nRndNoRepeat(p, 50)
For i = 1 To UBound(p)
Testo = Testo & p(i) & " "
Next
MsgBox Testo
-------------
Ciao
Sabba



Newsgroup: it.comp.lang.visual-basic
Titolo: Help creazione file .res

Ho vb 5.0 Enterprise devo creare un file .res ma non
riesco a trovare delle istruzioni in merito.
Qualcuno puo' aiutarmi
Grazie

riesco a trovare delle istruzioni in merito.
Ora non posso riscrivere tutto il procedimento... COmunque in sostanza
devi fare un TXT e poi compilarlo con RC.EXE. Fatti prestare una guida
del VB4, che li c'e' sicuramente...
Ciao.
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                 Trust no ONE.
Per rispondermi via E-Mail togli STOPSPAMMERS.
Guarda la RFD per it.comp.prog.collaborazione !

Qualcuno puo' aiutarmi
  Sul sito microsoft c'e' un editor ad hoc per creare i file res ma
non chiedermi l'URL esatta perche' non la conosco, prova a cercare
partendo dall'area dedicata al VB.
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258

...
[...]

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampanti

Un saluto a tutto l'NG, vorrei sapere come faccio a ricavare la lista delle
stampanti istallate sul mio computer e come faccio ad impostarne una delle
due come predeinita.

 wrote in message
news:GJwa6.12305$lV5.2...@twister1.tin.it...

Dim prn As Printer
For Each prn In Printers
    If prn.DeviceName = <quella_che_cerco> Then
        Set Printer = prn
        Exit For
    End If
Next prn
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: Contatore lettere immesse

Avrei necessità di avere un controllo di testo che visualizzi in tempo reale
(mentre digito le lettere) il numero di caratteri digitate in un secondo
controllo di testo.
COnosco l'esistenza del comando Len, ma non funziona nel modo in cui serve a me
(ripeto, aggiornamento in tempo reale).
Qualcuno ha qualche suggerimento?
In caso positivo vi prego di inviarmi un e-mail.
Grazie
Corrado
-- 
Posted from 
a-md1-53.tin.it
 [212.216.150.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie
me l'ero risolto, semplicemente, mettendo in un label appunto la lunghezza
del txtbox. posso sapere qual e' il modo che serve a te ?


Nell'evento Change del Text1 (che usi come inserimento)
scrivi
Text2.Text=Len(Text1.Text)
ovviamente Text2 e il campo di testo dove verra visualizzato il numero
dei caratteri!
Ciao

 scrisse:

Se ti interessa tenere il conto dei tasti premuti, fai così:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    Text2 = Text2 + 1
End Sub
Ciao
VB
Newsgroup: it.comp.lang.visual-basic
Titolo: Sito del NG

Salve a tutti,
potrei sapere l'indirizzo esatto del sito comune del newsgroup? Sto cercando
di accederci da mesi ma mi dice sempre che il server non è disponibile...
Forse ho sbagliato indirizzo... Io ho come indirizzo
http://www.murialdo.it:8000/it_lang_vb/
 è giusto?
Antonio Mirarchi

 
http://www.murialdo.it/it_lang_vb/
ciao
	maxx


Newsgroup: it.comp.lang.visual-basic
Titolo: SAPI 5

Salve,
ho sviluppato una applicazione in VB che utilizza le SAPI 5 per riconoscere 
la voce.
Funziona egreggiamente ma solo in inglese, avete idea di come si può fare lo 
stesso in italiano?
Emiliano. 

 stesso in italiano?
Sembra che in vista saranno integrati gli engine di riconoscimento nelle varie lingue.
Cmq secondo me, anche l'engine inglese fa schifo, per cui non oso immaginare la qualità di quello in italiano.
Newsgroup: it.comp.lang.visual-basic
Titolo: Struttura ad oggetti del VB (vengo da VBA e non capiasco....)

Vengo da VBA e mi sto avventurando nel mondo VB.
Prima di tutto vorrei capire bene qual'è la struttura ad oggetti di VB, ma
ci sono alcune cose che mi sfuggono...
In VBA ho un oggetto Application... e da li prendo i riferimenti per
qualsiasi cosa esista (maschere, report, dbengine, query.....)
In VB esiste qualcosa di simile? Un Macro-oggettone con i riferimenti a
tutti gli oggetti esistenti nel mio progetto?
Stavo provando col VBE, ma non riesco ad inizializzarlo... e poi non sono
molto convinto che sia la cosa giusta.
Qualcuno può darmi qualche delucidazione?
Grazie, Max

 tutti gli oggetti esistenti nel mio progetto?
[SNIP]
No, non esiste... o meglio, volendo c'e' anche una cosa simile ma e'
praticamente inutile.
In VBA credo sia cosi' perche sostanzialmente e' un motore esterno
all'applicazione vera e propria (Access, Excel ecc..); quest'ultima fornisce
la propria gerarchia di oggetti al motore VBA per dare un punto di aggancio
tra i due mondi e permettere al codice di interagire con l'applicazione
host.
In VB non hai niente del genere perche' il programma lo scrivi interamente;
quindi hai, si, delle librerie dei tipi per conoscere *gli oggetti base
forniti dall'ambiente* ma non per quelli *da te creati nel progetto*.
Per capirci, se tu crei una nuova maschera (form), in Access e in VB, nel
primo caso devi fare riferimento con
Application.Forms("frmProva").Visible = True
nel secondo hai accesso ad una variabile globale implicita di tipo Form con
lo stesso nome, e quindi e' sufficiente
frmProva.Visible = True
Come dicevo puoi vedere qualcosa di simile all'oggetto Application
attraverso l'oggetto <nome del tuo progetto>, oppure tramite l'insieme Forms
ecc. ma in genere sono superlui e comunque non rappresentano esattamente
quello che intendi tu in VBA...
Ciao
--
Luca Dormio
luca....@tin.it

 quello che intendi tu in VBA...
Grazie :-)
Max

Newsgroup: it.comp.lang.visual-basic
Titolo: Quali dll per far funzionare CR sotto vb ?

Salve,
Una domanda, questa, che mi sta facendo impazzire.
Immaginatevi a dover creare il setup del vostro ultimo programma che
utilizza le stampe di Cristal report.
Ovviamente senza utilizzare l'utility stupida di  Vb (il setup creator
occomecacchiosichiama...) :)
Ho dato una letta al file Developer.hlp, (o runtime.hlp?) quello che
ti dice la lista di dll da inserire nel pack...
le ho messe tutte..
ma quando clicco sul bottone di stampa, il programma continua a darmi 
un errore a proposito dellla database dll.
Aiutatemi, non so piu cosa provare...

 un errore a proposito dellla database dll.
??? Essere un po' piu' preciso?
Versione di CR?
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 Aiutatemi, non so piu cosa provare...
ciaociao
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprtura database excel

Ciao, mi potresti dire come con un data fare una ricerca in un database in
formato excel? Ho provato con seek, ho definito prima l'indice, ma mi dice
che l'indice è errato!

 formato excel?
Accendendo il registratore di macro e facendo l'operazione risulta:
Cells.Find(What:="valore da cercare", After:=ActiveCell, LookIn:=xlValues,
LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False) _
        .Activate
ciao,
Taipů
Newsgroup: it.comp.lang.visual-basic
Titolo: Command1_Click() dentro un'altra SUB

Ho fatto un pulsante STOP che però non mi stoppa niente mentre è in
esecuzione una funzione attivata da un altro pulsante.
Lo scopo era proprio quello, quindi è un bel problema, come faccio a
risolvere?
Grazie,
Simone
P.S.: Non sono neanche due settimane che uso VB ma mi piace già da morire!!!

 writes:
S> Ho fatto un pulsante STOP che però non mi stoppa niente mentre è in
S> esecuzione una funzione attivata da un altro pulsante.
S> Lo scopo era proprio quello, quindi è un bel problema, come faccio a
S> risolvere?
Il problema è  non banale in Windows, visto che  si sono dimenticati i
segnali esterni a'la` Unix...
In VB l'unica soluzione è che ogni tanto la funzione da fermare faccia
una bella  DoEvents. Occhio  che però devono  essere abilitati  solo i
controlli che ha  senso siano ascoltati dal programma.  Se no richi di
lanciare  la  funzione  lunga,   ripremere  il  pulsante  e  lanciarla
nuovamente.   Una   volta    terminata   questa   seconda   esecuzione
riprenderebbe la prima...
S> P.S.: Non sono neanche due settimane che uso VB ma mi piace già da morire!!!
Io lo odiavo prima di dover essere costretto a usarlo. Come è vario il
mondo.
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )

 risolvere?
Devi creare come prima cosa una variabile booleana che sia visibile da
entrambe le procedure; nelle dichiarazioni generali della form aggiungi
qualcosa del genere
Dim bStopFunction As Boolean
e nel pulsante STOP
Private Sub cmdSTOP_Click()
bStopFunction = True
End Sub
fin qui cose che probabilmente gia' avevi fatto... ora la parte importante;
all'interno della tua funzione devi verificare il flag che hai definito
prima, ma non solo, devi anche fare in modo che il sistema possa processare
il click sul tasto STOP pur essendo impegnato ad eseguire la funzione;
supponendo che la routine sia un ciclo di qualche tipo avrai qualcosa simile
a
bStopFunction = False 'inizializziamo il flag
For i=1 To 12345
    'Se e' stato premuto STOP allora usciamo dal ciclo
    If bStopFunction The Exit For
    '[...] il resto del codice
    DoEvents  'questo rilascia temporaneamente il controllo al S.O.
              'per permettergli di processare i messaggi in coda,
              'nel tuo caso il click su STOP...
Next
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett Brown


Esempio:
Dim bStop As Boolean
Private Sub Command1_Click()
    bStop = True
End Sub
Private Sub Form_Load()
    Me.Show
    girofinchenonmifermi
End Sub
Sub girofinchenonmifermi()
    Do While Not bStop
        Debug.Print "pippo"
        DoEvents
    Loop
End Sub
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Help me

ciao a tutti, ho un problemino: voglio fare un programmino che mi
restituisca i colori da modalità RGB a quella esadecimale, visto che faccio
anche pagine web nei momenti liberi. Potete dirmi se esiste un OCX o un
qualche controllo di VB che mi potrebbe andare bene?
grazie
andrea

 wrote in message
news:yCUR5.92162$BF.33...@news.infostrada.it...

Un programma solo per questo mi sembra esagerato. Cmq:
Public Function RGB2Hex(ByVal r As Byte, ByVal g As Byte, ByVal b As Byte)
As String
      RGB2Hex = Hex$(RGB(r, g, b))
End Function
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: Urgente problema di VBA in Excel

Ho un urgente bisogno di scrivere una procedurina VBA dentro un foglio
di lavoro Excel (97).
Se qualcuno mi puņ aiutare per l'inserimento della procedura nella cella
interessata ...
Mi basta solo saper come si crea e collega con il foglio di lavoro.
Attendo una vostra risposta.
Grazie 1000
Claudio G.
-- 
*****************************************************
* Per risposta togliere 'AAA'dall'indirizzo e-mail. *
* To reply please remove 'AAA' from the E-mail.     *
*****************************************************

...


Newsgroup: it.comp.lang.visual-basic
Titolo: * <<<FPT>>> *

Carissimi amici del Newsgroup,
dopo qualche anno di esperienza con VB, per la prima volta mi sto
addentrando nella programmazione per internet.
Avrei bisogno di inserire nel mio programma un metodo (che sia il piů
semplice e piů snello possibile) che prenda un file dalla app.path e lo copi
su una directory remota, tramite protocollo fpt.
 FtpUpload (NomeFileLocale, ServerFtp, UserID, Password, DirectoryRemota,
TipoFile)
Spero che qualche gentile programmatore possa aiutarmi, consigliandomi
almeno un testo dedicato a VB e internet (smtp, ftp, tcp/ip, udp, http,
nntp) da acquistare.
non so come ringraziarvi
Giovanni Gasparri
PS - Ho problemi con NNTP, per piacere rispondetemi anche in privato.
giov...@gasparrisoft.com
www.gasparrisoft.com

forse con il controllo Inet lo puoi fare
--
ciao
- Xaero -
"Quando ero piccolo i miei genitori mi
 volevano cosě bene che nella culla mi
 misero un orsacchiotto vero"


Ciao Giovanni, vai a dare un occhio a questo sito:
www.vbip.com
Ciao
Stefano
--
================================================
Stefano Ursoleo
Responsabile Sviluppo software
e-mail : 
stef...@unicode.it
------------------
Unicode srl
e-mail : 
uni...@unicode.it
web    : 
www.unicode.it
=================================================
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report PRN

Come faccio a dire al Crystal report di stampare su una stampante che
non sia quella di default???
Grazie



	Quando lanci la stampa da VB la lanci con il common dialog e
selezioni la prn di destinazione.
Ciao.
Lucio
mailto:
lu...@mywebpages.com
---------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Alla MS sanno comme allietare le giornate dei programmatori!

http://www.bbspot.com/News/2005/01/microsoft_antispyware.html
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 
http://www.bbspot.com/News/2005/01/microsoft_antispyware.html
effettivamente sembra una mezza bufala: nessuno riesce a togliere explorer
da windows :-)
-- 
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

 da windows :-)
Si piò tranquillamente eliminare, tranquillo :)
Solo che si elimina tutto quello che riguarda il browsing web perchè 
Explorer è la parte integrante di Windows, Internet Explorer no.
Soltanto che a lungo andare il sistema diventa (più) instabile...
-- 
Quando noi ignoranti eravamo di più, tutto era più bello...
(A. Celentano)
Per rispondermi in privato, prima togli l'immondizia dalla testa.

 Soltanto che a lungo andare il sistema diventa (più) instabile...
Prova a lanciare WindowsUpdate dopo aver disinstallatoInternet Explorer...
..il browser ricompare con tutte le sue caratteristiche anche se lo hai
disinstallato...
:-)))
-- 
-------------------------------------
[F] Freestyler
-------------------------------------
Legge di Osborn:
Le variabili non mutano mai,
le costanti sì !!!


 
Prova a leggere le Related News di quella pagina...
;-)


 Prova a leggere le Related News di quella pagina...
oops, mi erano sfuggite ;-)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Simulare orologio veloce

Ciao,
dovrei poter simulare un orologio che gira velocemente diciamo a diverse
velocità aumentate x1x2x5x10x100/e più volte ecc...
Non ho idea di come poter fare se non programmare un timer a differenti
intervalli e modificare questo orologio fittizio ma poi subentra il problema
della data che dovrebbe cambiare anche quella in funzione delle aggiunte e
di come restare nel nuovo loop.
Qualche consiglio?
Al momento nel timer ho la seguente formula:
---
Private Sub Timer3_Timer()
UTCx = 2 (per l'ora locale rispetto Z/UTC)
UtcDate = Format(Now - (UTCx * 0.0416666667), "dd/MM/yyyy")
UtcTime = Format(Now - (UTCx * 0.0416666667), "hh:mm:ss")
End Sub
---
Potrei portar fuori la variabile UTCx e aumentare o diminuire UTCx e
modificare l'intervallo ma poi non so come restare in un loop dato che mi
riproporrebbe sempre la stessa ora ...
ciao Grazie per ev. consigli.!
Anto.
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 Anto.
Scusa la franchezza, ma il tutto mi sembra un po' assurdo: Cos'è, vuoi
morire alla svelta? ;-)) (corna e bicorna). Non saprei. Mi viene solo in
mente di archiviare in una variabile il Timer (o Now, ma è un po' diverso)
iniziale e di usare ovunque tale variabile, opportunamente modificata in
funzione dell'incremento che le vuoi dare.

 funzione dell'incremento che le vuoi dare.
Esatto, credo sia l'unica, modifico ora semplicemente l'intervallo per la
velocità di "scanning" e il TimeFwd mentre per la previsione passaggi, uso
un ciclo "for to" con il quale quale calcolo ogni 5 minuti in 2 secondi
sulle 24h.
Sto cercando altre formule per i vari calcoli...:-)))
soprattutto come creare un cerchio predefinendo i punti della/sulla
circonferenza sopvrapposta ad un'immagine.
è dura!
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [vb2005] Datatable e database

Ciao,  ho letto che il datatable è una copia in memoria del database e
con l'update tutti i dati vengono portati dalla memoria su db.
Supponendo di avere un binding con una datagridview e la tabella A,
aggiungendo 2 righe, cancellando la seconda e immettendo una nuova riga
avrò:
2 righe con ID(contatore) 1 e 3.
Se riporto i dati su db avrò 2 righe con ID(contatore) 1 e 2.
Esiste un modo per avere come id 1e3 su db?
Il problema è che : se in un' altra tabella ho un riferimento che
punta all'id 3 della tabella A, dopo la copia su db ottengo
un'incogruenza dati in quanto c'è un riferimento ad una riga che non
esiste...
Spero di essere stato chiaro,
grazie

grazie
basta che anche nel dataset metti la relazione referenziale con
aggiornamento a cascata, poi aggiorni prima la tabella padre e poi i
figli.
Ciao

 Ciao
Ciao Stefano, grazie per la risposta mi hai risolto un grande
problema!!!
Dopo aver settato l'aggiornamento a cascata, quando avvio
l'applicazione mi viene generato un errore: "Impossibile attivare i
vincoli. Una o più righe contengono valori che violano il vincolo
non-null, unique o foreign-key.", ho provveduto quindi a risolvere con
l'istruzione
Me.Db1DataSet.EnforceConstraints = False
carico le tabelle e ripristino
Me.Db1DataSet.EnforceConstraints = True
e sembra tutto ok.
Conosci qualche guida o tutorial che in modo semplice ma abbastanza
completo, spieghi come trattare con i db ?
Grazie ancora.

completo, spieghi come trattare con i db ?
Di  libri che trattano 
ado.net
 ce ne sono parecchi ed uno vale l'altro
anche se a mio avviso è molto semplice da utilizzare.
Il mio consiglio e' di non abusarne troppo e di usare il database
disconnesso (dataset) dove c'e' effettivamente bisogno.
Considera il dataset, non come un'immagine distaccata del tuo
database, ma come un insieme di oggetti da utilizzare per memorizzare
e modificare i dati del database. Ado.net e le sue classi, se
utilizzate propriamente ti permetteranno di creare programmi
indipendenti dalle basi dati.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [Per Pal] NG su VB

Un giorno in chat mi avevi dato l'indirizzo di un ng su VB in inglese a tuo
parere degno di nota e oggi mi è venuta voglia di darci un'occhiata.
L'indirizzo che mi hai dato è: 
news.mvps.org
 ma sul server della Tin non
c'è.
L'indirizzo è giusto? Se si come faccio per frequentarlo?
--
W il Manifesto del newsgroup
Jimmy
E-mail: 
jimmy...@hotmail.com
ICQ#: 41646051

esiste un canale chat per parlottare di vb?
loquale?
loquando?
lodove?
--[GbC]--

 wrote


l'unico chatting che ho mai usato e' icq.
numero di jimmy nella sua firma, mio qui sotto.
ma a fine bimestre sto per avere un salasso, temo...
ciao, a.
--
andrea dot palazzi at tin dot it
xday at libero dot it
http://members.xoom.it/xday/_html/
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/
icq 60697991
p.f. nei messaggi usare solo testo normale, non html !
please use just plain text, not html, in your msgs !
GbC <mac...@ti.importa> wrote

Newsgroup: it.comp.lang.visual-basic
Titolo: Msgbox

Ciao a tutti,
ho una msgbox classica (ossia del testo con sotto il pulsante di 'OK') che
nel momento in cui premo il pulsante 'OK' esegue determinate istruzioni. Ora
io vorrei fare in modo che se non premo il pulsante 'OK' per un tot di
secondi, il VB lo faccia al posto mio.
Come fare?

Non so se puoi. La MsgBox infatti è modale, il che significa che se la
richiamo l'esecuzione del codice si interrompe fino a che non si preme uno
dei tasti.
Una soluzione che potresti seguire sarebbe quella di costruirti una tua
MsgBox personalizzata. Cioè inserisci una tua form, ci metti un pulsante
"OK" ed un bel timer... ;)
CiaoZ
SebaMix

Aggiungi un Timer ad un Form
Codice del Timer
Private Sub Timer1_Timer()
  MsgBox ("ciao")
  tue istruzioni
End Sub
Nelle proprietą del Timer setti
Interval a 4000.
Se vai runtime, dopo 4 secondi
il Timer ti chiama il msgbox.
Spero sia una dritta buona.
--
Mauro

Ah... dimenticavo! La form falla vedere cosě: FormMsgBox.Show VbModal
Quando ti rompe le pa**e prova FormMsgBox.Show VbModal, Me
CiaoZ
SebaMix

No... quello che si chiedeva penso sia proprio il contrario, cioè mettere un
timer nel MsgBox. Giusto WebPC?
CiaoZ
SebaMix

 No... quello che si chiedeva penso sia proprio il contrario, cioč mettere


 timer nel MsgBox. Giusto WebPC?
Penso tu abbia ragione.
Bisognerebbe andare a letto aduna certa ora...
--
Mauro

;)