mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: TRANQUILLI , C'E' SPOT

Dovete portare pagine e pagine di tabulati emessi dal sistema as/400 in
formato PC.
Non avete voglia di perdere tutto quel temp a ridigitare tutto ?
Tranquilli .... c'e' SPOT
Mandatemi un e-mail per una copia demo.
Cordiali Saluti
-- 
Toni Zadro
Zeta Soft scrl
via del teatro 1
18100 Imperia (IT)
tel 0039 183 652524
fax 0039 183 666291
e-mail 
zs...@mbox.lol.it

fffffffzzzzzz........booooooommm!!! Chiamate i pompieri c'č qualcuno che č
stato fulminato.
bye,bye
C.I.
e-mail 
gat...@iol.it
Online with ----------> ICQ:4908004
web site   
http://users.iol.it/gateway/

Tranquilli .... c'e' SPOT
Scusa, forse ho capito male; ma quasi tutti i sistemi AS/400 sono
collegati a PC o via TN5250-over-TCP/IP-over-Ethernet, oppure via
scheda dedicata 5250-over-AX-over-Twinaxial.
Nel secondo caso, il programma fornito con la scheda sa gia' fare
il download dei files (almeno, sia l'emulatore PRAIM che l'IBM si
presentano con un file transfer via APPC).
Nel primo, l'AS/400 ha spesso una interfaccia TCP-IP, che, sempre
se non ricordo male, si attiva con STRTCP qualchecosa dal livello
QSECOFR o QPGMR; una volta che sia attiva, i files si prendono da
AS/400 in formato ASCII o binario col normale FTP.
D'accordo che l'operazione non e' poi semplicissima, ma in Win 95
c'e' persino il client ftp fornito di serie, clone di quello Unix
e come quello capace di prendere comandi da file esterno.
Capirei se si dovesse prendere un file di database (visto che nel
sistema AS/400 la codifica non e' ASCII), ma un tabulato...?
Leonardo
".signature": bad command or file name

stato fulminato.
Io o lui?
Leonardo che gira sempre con suole di gomma


sistema AS/400 la codifica non e' ASCII), ma un tabulato...?
Oh, tanto per tua conoscenza: prendendo un DB As/400 il server FTP
dell'AS effettua automaticamente la conversione EBCDIC<->ASCII in
entrambe le direzioni...
Nicola Brion
SysAdmin
Unitessile Spa
Dosson (TV) Italy

entrambe le direzioni...
Cosi' credevo. In effetti, con TYPE ASCII il testo mi viene giusto,
ma i numeri sono sbagliati. Non so da che dipenda, forse da qualche
parametro di configurazione (che pero' non ho trovato).
Alla fine prelevo i dati in TYPE IMAGE, e faccio la conversione con
una piccola utility autocostruita. A lettera uguale corrisponde una
lettera uguale, e per i numeri uso una losca traduzione da EBCDIC o
quel che e'.
Leonardo "non funziona benissimo, ma mi basta e avanza"


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Connessione con VB5 ad un foglio Excel97 in "formato" DB

Ciao a Tutti !!
Voorei fare un pgm che acceda ad un foglio Excel97 (dove la prima riga
contiene i nomi dei campi) come se mi collegassi ad un DB di Access.
Come posso fare ???

 contiene i nomi dei campi) come se mi collegassi ad un DB di Access.
ODBC. Non e' un sistema semplicissimo e forse non e' nemmeno il modo
migliore di interagire con i fogli di Excel, ma il risultato somiglia molto
a quello che chiedi.
--
Ciao.
Maurizio
Newsgroup: it.comp.lang.visual-basic
Titolo: Chi mi aiuta?

Per voi è sicuramente una banalità, viste le domande e le risposte che vi
date. E allora perché nessuno risponde alla mia stupidissima domanda?
Io ve ne sarei molto grato!
Volevo sapere : avendo fatto un programmino e volendolo inviare ad un amico
(che non possiede V.B.6) via e-mail che devo fare?
Penso che dovrei fare un pacchetto di installazione, è giusto?
Io c'ho provato e credo di esserci riuscito , ma il punto è che in questo
pacchetto ci sono una decina di file. Che devo fare inviarli tutti quanti?
E' normale quello che sto facendo?
C'è qualcuno tra di voi che mi può spiegare in due righe o quantomeno dirmi
se ho fatto bene?
Grazie in anticipo.
Vincenzo

un'applicazione scritta in vb (non importa la versione) necessità sempre di
un certo numero di files (runtime, e dll OLE) inoltre se hai usato degli ocx
particolari o dll esterne sarà necessario distribuire anche quelle.
saluti,
                    davide

...


se ho fatto bene?
La prima volta devi inviare tutti i files elencati + eventuali tuoi files ad
uso personale.
Poi basta che invii l'exe.
Consiglio di ripetere l'installazione completa ogni volta che dai via un
prog con un OCX o dll in più rispetto alle ver. precedenti.
Il setup wizard analizza il progetto ed individua tutti i files che sono
necessari per far girare correttamente il prog.
E' buona norma lasciarli tutti selezionati a meno che tu non sia sicuro che
non siano già stati installati con un'installazione precedente.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione automatica di query o filtri per un recordset

Il mio problema più comune è : dato un recordset effettuare sullo
stesso delle query  filtrando i dati su qualsiasi campo (stabilendo
anche degli AND / OR per ognuno) del recordset e poi specificare
l'ordinamento e quali di questi campi deve comparire nel risultato
finale.
Esiste qualche Activex o qualcosa che posso scaricare e riutilizzare ?
Grazie

 Esiste qualche Activex o qualcosa che posso scaricare e riutilizzare ?
brain.ocx ;-)
seriamente, se hai bisogno della massima flessibilita` ed affidabilita`
penso nulla sia meglio di rigenerare il recordset reinterrogando il
server con il nuovo comando sql modificato secondo l'esigenza.
i vantaggi che ho riscontrato personalmente da siffatto approccio sono
stati:
- totale indipendenza dai vari bachi e bachetti degli oggetti di accesso
ai dati forniti da Microsoft;
- sfruttamento del motore del database ed indipendenza dalle caratteristiche
hardware e software del client (ancora oggi ho programmi vb che girano
egregiamente con vecchi win98 e 32 MB di RAM, altro che .net!);
- liberazione dalla necessita` di impararsi a fondo tutte le novita`
e perversioni che escono ad ogni aggiornamento Microsoft;
- una volta che sai maneggiare le stringhe, riesci a lavorare quasi 
indifferentemente in qualsiasi linguaggio di alto livello;
- devi conoscere l'SQL, ma se lavori con i database e` *obbligatorio*.
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Tasto X di un form

Qualcuno sa dirmi come posso fare x disabilitare la X in un form??
Premetto che lo stile del form deve essere "Fixed Single"...
So che esiste un modo per disabilitare il tasto X ma non so dove
recuperare qst informazione....
Buon lavoro a tutti!
Miki
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Miki
Ciao! Devi impostare la proprietà della form, ControlBox = False.
Ciao...Ciao!!!
--------------------------------
Inviato via 
http://usenet.libero.it

 Ciao...Ciao!!!
Si, ma in qst modo non posso più utilizzare il MinButton e non posso viene
visualizzata neppure l'icona del form...
Non esiste un modo per rendere Enabled=False il tasto X???


A parte tutte le motivazioni etiche che ti risparmio ti invio il codice:
Option Explicit
Private Const MF_BYCOMMAND = &H0&
Private Const SC_CLOSE = &HF060&
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long,
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal
nPosition As Long, ByVal wFlags As Long) As Long
e nel form load
Dim hSysMenu As Long
hSysMenu = GetSystemMenu(Me.hwnd, 0)
RemoveMenu hSysMenu, SC_CLOSE, MF_BYCOMMAND
Ciao Gab

 ha scritto nel messaggio
news:basufg$qhp$1...@news.newsland.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: -*- Come funziona il TabStrip

-*- Come funziona il TabStrip
uso VB6,e non riesco a inserire i controlli nel controllo TabStrip
(contenuto in mscomctl.ocx).
Come si fa???
--
RISPONDETEMI SUL NEWSGROUP

...

Il tabstrip non è un contenitore: devi inserire tanti frame (o picture)
quante sono le linguette dello strip. I controlli andranno collocati nei
frame. A questo punto, devi sfruttare l'evento tabstrip_click per mostrare
(nascondere) i frame che ti interessano. I frame faranno parte di una
matrice di controlli per agevolare le cose.
Ciao Marco

Perche' non usi il "Microsoft Tabbed Dialog Control"? (TabCtl32.ocx)
Funge da contenitore e non ti fa impazzire come quello che stai usando.
Fabio Pagano


Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report problemiiiiii

Problemi con crystal report Versione 3.0 per visual basic 16 bit 4.0
NON GESTISCE I CAMPI TIME!!!!!! e/o DATETIME!!!!!!!!
chi mi sa dare una dritta, e ci sono fix path o altro????
GRAZIE! Marino

...


E' successo anche a me.
Ho convertito tutti i campi che dovevano
contenere un orario in una stringa ampia 5:
"hh:mm"
Per le date invece non ci sono problemi.
Ciao,   fabrizio.
-----


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!!!! Da DAO su mdb a DAO su SQL

Salve a tutti.
    Ho gia un'applicazione sviluppata in Visual Basic che utilizza il
controllo DAO per accedere ad un database remoto di ACCESS. Ora vorrei
convertire questa fonte dati in una di tipo SQL2000.
    La mia applicazione potrà accedere comunque al database utilizzando il
controllo DAO, oppure dovrò riconvertire tutto in ADO?
    Che cosa posso fare?
    Grazie



 ha scritto

Capisco che il dubbio ti possa sconvolgere, ma per prima cosa ferma la
tremarella dell'indice destro, di post ne basta uno.
In secondo luogo, se proprio hai voluto rovinarti il week-end, beh, eccoti
servito:
Pur potendo DAO gestire (con tabelle collegate e/o ODBC) SQL Server, ti
consiglio vivamente di passare a ADO.
Ecco come passerai sabato e domenica:
http://makeashorterlink.com/?Q3E212CD1

 tremarella dell'indice destro, di post ne basta uno.
mai nessuno cui tremi l'indice sinistro, per esc e adiacenti :P

 ha scritto nel messaggio
news:uuKi9.25714$Hc7.4...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] E sono 27!!!!!

Oggi è il mio compleanno :-)
Ciao,
Andrea

 ha scritto nel messaggio
news:li3Kc.12113$5D1.4...@news4.tin.it...


 Andrea
auguri!!!!!!!!!!!
good coding!!!
--
Alletun
"Se ti va di spassartela adesso
Prendi il Vettore oggi stesso."
Terre Desolate - Stephen King
Inviato da 
www.mynewsgate.net

 Oggi è il mio compleanno :-)
Auguri :-)!
-- 
Alex {per email metti '[NOSPAM]' nell'oggetto}
"Se i partiti non rappresentano più gli elettori, cambiamoli questi
benedetti elettori." (Corrado Guzzanti)

tanti auguriiiiiiii
ciao
ilario

 ha scritto nel messaggio
news:li3Kc.12113$5D1.4...@news4.tin.it...


 Oggi è il mio compleanno :-)
Auguri, non vorrei sbagliarmi ma, sei tu quello in foto vero ?
http://snipurl.com/7tn4
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 <Gigio2K>
Andrea

 Nu, non sono io, sorry. Cerca ancora... <g>
e te pareva che non confondevo le persone ?
Eppure ero convinto che ci fossimo incontrati a qualche meeting... umm !
Sto fuso !
AUGURI ancora


> Oggi è il mio compleanno :-)
Do While (nAnni < 100)
    Let nAnni = getAnniDiAndrea
    MsgBox "Auguri Andrea! Con oggi sono " & nAnni, _
        vbInformation, "Buon Compleanno"
Loop

 ha scritto nel messaggio
news:xG8Kc.13617$5D1.4...@news4.tin.it...



Tanti auguri!
Visto che stasera vado a festeggiare il compleanno di un mio amico, berrò un
bicchiere in più alla tua salute! ;-)
Ciao, Vincenzo

Auguri :-)
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
"Seminate Linux, che Windows si pianta da sč...." (Antico Adagio)
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
email spamtrap: 
spam...@nicolaottomano.it

[SNIP]
Grazie a tutti!
Andrea

 Oggi è il mio compleanno :-)
Anche se in ritardo, Tanti Auguri!
Moreno
Inviato da 
www.mynewsgate.net

 Moreno
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Doppio click con tasto destro del mouse....

Ciao a tutti,
in una form ho inserito un controllo "MSFlexGrid" al quale ho impostato
l'evento "MSFlexGrid1_DblClick".
Purtroppo questo evento viene avviato anche facendo doppio-click con il
tasto destro del mouse; io vorrei lo facesse solo con il tasto sinistro!
Ho provato con
If Button = vbRightButton Then
ma non funziona in quanto è attivo solo su "MSFlexGrid1_MouseDown"
Ho cercato la soluzione sui vecchi post ma non ho trovato nulla....
Spero voi possiate aiutarmi.
Ringrazio tutti in anticipo.
Ciao
Emiliano

 tasto destro del mouse; io vorrei lo facesse solo con il tasto sinistro!
Sul MouseDown ti setti un flag che indica se l'ultimo click è stato fatto
con il tasto giusto.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] dimensioni form

Ciao a tutti,
avrei una domandina semplice (per voi): io vorrei NON dare la possibilità di
modificare le dimensioni del form.
Cioè:
- un form con il MinButton, senza il MaxButton e con il bottone per le
chiusura ma SENZA la possibilità di allargare/stringere il form (angolo
basso-dx ecc.)
Se non ricordo male dovrebbe esserci una proprietà del Form (che non ricordo
e non trovo) oppure del codice (che non so e che non ho trovato).
Ho provato con:
Private Sub Form_Resize()
    frmRicerche.Height = 4650
    frmRicerche.Width = 6240
End Sub
ma quando riduco a icona il form mi da errore.
Grazie.
Ciao.
PRG

 basso-dx ecc.)
BorderStyle  -> Fixed Dialog
visuddhi

 ha scritto nel messaggio
news:an9v9h$c7oip$1...@ID-65104.news.dfncis.de...

Grazie per la risposta ma mi spiego meglio:
- il BorderStyle  deve essere Sizable e il MaxButton=False in modo tale che
posso iconizzare il form
PRG

 posso iconizzare il form
In Form_Resize:
       Call MsgBox ("Caxxo fai, birillo?" & vbcrlf & "Ora ti formatto il
disco!", vbCritical)
PS: Dalle prove che ho fatto non si verifica quando si iconizza
(chissà se J ha bisogno del Malox leggendo questo termine)

 posso iconizzare il form
infatti:
BorderStyle= 1 (Fixed Single)
MinButton=true
beppe

 posso iconizzare il form
Come la finestra di VB?
Dai un occhio al sito comune: il mio adHook riporta proprio questo esempio.
Ciao
--
' // Initialize the expression evaluator
Engines.Evaluator = CreateObject("
http://www.neodatatype.net
")
' // you can find resources for and from the NG here!
Me.SitoComune = "
http://www.it-lang-vb.net
"
Newsgroup: it.comp.lang.visual-basic
Titolo: Server client e filesystemobject: Aiuto!

Dopo lunghe ricerche... mi sono arreso:
ho bisogno di un aiuto o quantomeno di una direzione.
Il mio problema è questo:
ho una condivisione su un pc dove ho dei files (chiamiamolo server)
che gli utenti della rete si copiano sui loro pc.
Io vorrei gestire la copia (confrontando le versioni, cancellando
files obsoleti...) usando internet explorer con VBscript.
Ho fatto una prova sul mio pc e smanettando un po' con VBS ho fatto
una bella paginetta html  divisa a metà, con a destra il contenuto
della condivisione da cui scaricare e a sinistra quello della
directory destinazione del mio pc. Tutto bene fino a quando non ho
provato a spostare il file sul "server" in modo che gli utenti lo
possano usare: SORPRESA!! Tutta la parte del filesystemobject per
visualizzare il contenuto delle cartelle non funziona più!
Qualche suggerimento?
Ringrazio anticipatamente.

 possano usare:
Quale file?
Uno dei file di cui parli all'inizio, o la pagina html?
In questo secondo caso, hai messo l'html in una semplice condivisione di
file o in una condivisione web con IIS?
Alberto
-- 
Rigore è quando arbitro fischia

...


 che mi scrive la data e ora, funziona perfettamente.
Quello che mi viene in mente è che nel codice VBScript tu abbia utilizzato
dei riferimenti relativi, ossia dipendenti da dove si trova il file (tipo
app.path o .\), per cui trovandosi il file su una cartella di rete le cose
non funzionano.
Oppure ci possono essere problemi di diritti di accesso alle risorse W2k.
Oppure, per qualche strano miracolo della scienza, può essere che il tuo vbs
esegua sul server, dove c'è Norton Antivirus che, come noto, può bloccare il
FSO.
Ciao
Alberto

...trovato l'inghippo:
L'ultimo tentativo l'ho fatto fra 2 pc con Win2k: sorpresa!
Nella barra in fondo di IE mi appare il simboletto giallo, quello
degli errori negli script.
Doppio click e...
Errore: il componente ActiveX non può creare l'oggetto
"Scripting.FileSystemObject"
Un'abbassata totale del livello di protezione e... FUNZIONA!
Bene. Ma ci sarà un modo per far eseguire il codice con la protezione
mediobassa anzichè la bassa?

 mediobassa anzichè la bassa?
Puoi impostare la protezione personalizzata per i siti attendibili, e
inserire il server fra di essi. Ma va fatto per ogni Client.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] come importare testo in word?

Devo creare un modello di documento word; nei campi stabiliti devo andare a
inserire il testo che preleverò dalle tabelle:
il codice VB dovrebbe essere questo, ma non riesco a impostare il modello di
word: qualcuno sa aiutarmi? so che devo creare un campo di testo, ma
nient'altro.
Dim rap_doc As Word.Document
Set rap_doc = rap_app.Documents.Add("c:\documenti\.......dot")
With rap_doc
    .FormFields("campo_Nome").Range = "steccus"
end with
grazie
    stefano

> Steccus:

    .FormFields("campo_Nome").Result = "steccus"
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

 ha scritto nel messaggio
news:95105r$e9m$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: pulsante di chiusura

Qualche tempo avevo trovato ilmodo di inibire la chiusura di un form tramite
la X in alto a destra, solo che non riuscivo a ricordare come avevo fatto.
Sul NG ed in giro ho trovato le soluzioni piů geniali, ma quella che usavo
io ricordavo che era +semplice.... visto che alcuni lo chiedevano posto la
soluzione a questo problema:basta mettere nell'evento query_unload del form
il seguente codice
If UnloadMode = vbFormControlMenu Then
Cancel = True
End If
preciso che il codice non l'ho realizzato io.... avevo trovato la risposta
in un vecchio messaggio.... ora lo riposto
ciao a tutti


ad integrazione.......
Questo sistema funziona lato utente...ossia se l'utente clikka sulla "x"
se però vuoi impedire anche la chiusura da codice (perchè ad esempio vuoi
subordinare la chiusura ad un test o al completamento di una operazione)
devi gestire la proprietà Unload di Query_Unload
che può avere i valori
vbFormControlMenu
Valore= 0
 È stato scelto il comando Chiudi dal menu di controllo del form.
vbFormCode
Valore= 1
L'istruzione Unload viene richiamata dal codice.
vbAppWindows
Valore= 2
La sessione corrente dell'ambiente operativo Microsoft Windows è conclusa.
vbAppTaskManager
Valore= 3
L'applicazione è stata chiusa tramite Task Manager di Microsoft Windows.
vbFormMDIForm
Valore= 4
 Il form secondario MDI viene chiuso in quanto viene chiuso il form MDI
principale.


Con Clipcontrol la elimini dal form
Ciao
Fabio

 ha scritto nel messaggio
news:hVb09.123181$Jj7.2...@news1.tin.it...

Ho detto una baggianata. La proprietà cui mi riferivo è ControlBox, che
elimina i tasti riduzione ad icona, ridimensionamento finestra, scaricamento
finestra
Ciao
Fabio
Newsgroup: it.comp.lang.visual-basic
Titolo: Linee

Con VB5
Ho disegnato su un form una serie di linee con il metodo form.line; il
problema è che quando sovrappongo la finestra di un altro programma a quella
del programma in questione mi vengono cancellate le linee e non riesco a
trovare un evento che mi identifichi il momento in cui clicco nuovamente sul
mio programma per fare il refresh.
Grazie

 problema č che quando sovrappongo la finestra di un altro programma a

Newsgroup: it.comp.lang.visual-basic
Titolo: punto sul migliaio e decimali

Ciao a tutti.
Non riesco a far in modo di visualizzare come voglio io i numeri che mi
compaiono in una text box di un covertitore di moneta.
Es: Io vorrei che la test box mi visualizzi questo risultato 1.936,27  (dato
dalla moltiplicazione di 1* 1936,27) ma se imposto il tipo di dati con
questo codice
Dim ŁLire as Currency
Text3.Text = Format(ŁLire, "#,###,##")
il risultato č 1.936 (e quindi perdo i decimali perchč arrotondato)
oppure se imposto cosě
Dim ŁLire
Text3.Text = Format(ŁLire, "#,###.00")
il risultato č 1.936,27 (quindi č giusto come vorrei io)
ma se eseguo questa moltiplicazione 100*1936.27 sempre con questo codice
Dim ŁLire
Text3.Text = Format(ŁLire, "#,###.00")
il risultato č 193.627,00 (e qui mi trovo una virgola con due zeri che io
non vorrei visualizzare ben sapendo che sono i decimali).
Infine utilizzando questo codice (con questa moltiplicazione 100*1936.27)
Text3.Text = Text1.Text * 1936.27
il risultato č 193627 (quindi senza " ,00 ) ma perdo il puntino sulle
migliaia.
Insomma io vorrei che nella textbox comparissero i due decimali qualora
fossero diversi da zero e nello stesso tempo vorrei anche l'inserimento del
puntino sulle migliaia (es. 193.627 e non 193.627,00)
Chi mi aiuta???
(preciso che sono alle prime armi e ho gia provato e riprovato e riprovato
in vari modi).
Ciao e grazie


Intanto £Lire è Double e non Currency
Dim £Lire As Double
£Lire = "1.936,27"
Text3.Text = Format(£Lire, "#,###.##")
Ciao Carmelo


Format$(Valore,"#,##0.00")
Ciao

 Text3.Text = Format(ŁLire, "#,###.##")
Anche cosě non va:
se moltiplico 
p.es
. 10000 x 1.936.27 il risultato č:  19.362.700,
Come vedi c'č una virgola alla fine che non serve a niente ma compare.
Che fare?
Grazie comunque

 ha scritto nel messaggio
news:3c471b5a...@powernews.libero.it...




Sorry...
If Valore = Fix(Valore) Then
    Text1.Text = Format$(Valore, "#,#")
Else
    Text1.Text = Format$(Valore, "#,#0.00")
End If
Ciao

prova cosi
Dim ŁLire As Double, tot As Double
Dim num As Integer
Dim resto As Integer
ŁLire = 1936.27
num = 10000
tot = num * ŁLire
Text1.Text = Format(tot, "#,###.00;;##")
resto = Format(Int((tot - Int(tot)) * 1000), "0##")
If resto = 0 Then
    Text1.Text = Format(tot, "#,##")
Else
    Text1.Text = Format(tot, "#,###.00;;##")
End If
ciao carmelo
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB + MSDE - Problema con le date

In un Database di Tipo Msde ( SQL LIGHT) devo scrivere in una tabella
DATIRID il Campo DataEmissRID (di tipo DateTime)  e un campo logico di nome
EuroUffRID con questa istruzione Dao
connessione.execute ("UPDATE DatiRID SET DatiRID.EuroUffRID = 1,
DatiRID.DataEmissRID = " & Date & " Where (((DatiRID.EuroUffRID) = 0))")
Ora la procedura va avanti , ma se apro il database x leggere cosa ha
scritto
vedo 01/01/1900 ??????????
Se uso il debug il valore di Date e' 09/11/01 - oggi - perche' vedo
gennaio 1900
dove' che sbaglio.
Grazie in anticipo

 ha scritto nel messaggio
news:INRG7.30057$zu5.1...@news1.tin.it...


 wrote in message
INRG7.30057$zu5.1...@news1.tin.it...


 wrote in message
tXRG7.28610$zl4.7...@news2.tin.it...


 wrote in message
vWRG7.30094$zu5.1...@news1.tin.it...


 ha scritto nel messaggio
news:3FSG7.30222$zu5.1...@news1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Chi l'ha chiamato?

Ci sono 2 form: su Form1 ci sono 3 commandbutton e su Form2 uno solo: ora,
se io carico form2 con il cmdbutton1, come faccio, premendo il cmdbutton sul
secondo form, a fargli visualizzare un messaggio "1"; oppure "2" se form2 è
stato caricato premendo il cmdbutton2 sul form1 e così via x il cmdbutton3?
Form1:  Cmd1 - Cmd2 - Cmd3    Form2.show
Form2:                Cmd Msgbox "Il pulsante premuto sul form1 è..."
Spero di essere stato chiaro...
Grazie in anticipo,
Tiziano.
-- 
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:000001c0de29$5e360d80$dd801897@lightspeed...


poi fai un msgbox dove inserisci la variabile.
[cut]
Piuttosto che una variabile globale (le aboliranno prima o poi !), suggerirei cosi':
Sul form 2 (quello che viene chiamato):
Option Explicit
Public Function ShowMe (ByVal caller As Object, _
                  Optional ByVal showmode As FormShowConstants = vbModeless, _
                  Optional OwnerForm As Variant _
                  ) As long
 
           Set m_caller = caller
           If IsMissing(OwnerForm) Then
                   Me.Show showmode    
           Else
                   Me.Show showmode, OwnerForm
           End If
           ' messaggio di debug:
           MsgBox "Mi ha chiamato il pulsante " & caller.Name & " del form " & 
caller.Parent.Name
           ShowMe = 1
End Function
Il form chiamante (form1), avra' questo codice nell' evento click dei command:
Form2.ShowMe Screen.ActiveControl
oppure, se e' possibile che tale routine venga chiamata anche con un controllo attivo
diverso:
Form2.ShowMe Cmd1       ' nel caso di Cmd1_Click
hth, hal

Ciao,
io consiglierei piu' semplicemente di inserire all'interno della rtn
chiamata un:
    MsgBox Screen.ActiveForm.Caption & "  " &
Screen.ActiveForm.ActiveControl.Caption
beppe
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://www.comune.cento.fe.it/wwfaf
-----------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: estrarre indirizzo del mittente da mail

Come da oggetto o bisogno di recuperare l'indirizzo mail del mittente da una 
mail salvata come file ( eml ).
Ovviamente con VB6......
Sapete come fare?
Grazie
Ioson 

 Ovviamente con VB6......
E' un file di testo. Nelle prime righe, che si chiamano headers,
e che sono tutte quelle fino alla prima riga vuota, ce ne dovrebbe
essere una che inizia con "From:", � quella :-).
Apri il file, lo leggi riga per riga, dove trovi il from esci.
Codice scritto al volo e senza provarlo:
'********
dim FileLibero as integer
dim Riga as string
filelibero=freefile
open "nomedeltuofilecompresoilpercorso.eml" for input as filelibero
do while not eof(filelibero)
line input #filelibero, riga
if left$(ucase$(riga),5)= "FROM:" then
msgbox riga
exit do
end if
loop
close filelibero
********
Bye, G.

 filelibero=freefile
quindi per par condicio
filerepubblica=republicfile

"andrea palazzi" ha scritto

Mi hai messo un trojan sul pc e io non me ne sono accorto ?
=8-(
Un Paperino e i nomi delle variabili...

Grazie mille,
Ci avevo pensato, ma, per pigrizia, pensavo ad un controllo, dll o altro che 
lo facesse per me....
Ma forse � meglio cos�.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] Usare la porta seriale???

Ciao a tutti, ho una semplicissima domanda da porre: in 
vb.net
 con tutte
le tonnellate di novità, automazione, potenziamenti vari... ma hanno
dimenticato una diamine di classe gestita per controllare la seriale???
Che sia in qualche modo legato al fatto che la tendenza è quella di
eliminare la seriale dai pc e gestire le comunicazioni solo dai driver?
Ma se uno ha bisogno (uno a caso...) di comunicare con dei terminali
industriali? Con VB6 usavo l'MSComm ed andava egregiamente, ora in
VB.Net sono costretto ad utilizzare ancora l'MSComm (con tutto
l'overhead che deriva dall'usare un ActiveX)???
E chi non aveva VB6 che fa?
Sono sconcertato... Mi immaginavo una classe nel namespace 
SYSTEM.IO
 ...
O magari sono cieco e c'è tutto? Mica dovrò usare le API di
windows......?!
In ogni caso ogni notizia, link, ecc. mi da una mano, sono disperato!!!
Grazie!
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
db0570bbde71cbd27e9...@mygate.mailgate.org...

A quanto pare non sei cieco. Stesso problema tuo.
Vai al link qua sotto che c'è la classe di Corrado Cavalli per la gestione
della seriale col net...
Poi se riesci ad usarla magari ci risentiamo perchè io ho un problema di
fondo che mi sta facendo dannare.
Ciao!
Max

Ups... Il link... Sorry!
http://www.ugidotnet.org/goodies/goodies_category.aspx?ID=1
 (pagina 2)
Max

 Max
Ti ringrazio tantissimo! Non l'ho ancora usato effetivamente, ma almeno
è un punto di partenza (non avevo trovato nulla da solo...), inoltre mi
hai portato a conoscenza di un sito che tratta .net che non conoscevo...
grazie!
Se vuoi scrivimi in privato, io avrò occasione di utilizzare la classe
entro qualche settimana e se posso aiutarti lo farò volentieri.
Ciao!


entro qualche settimana e se posso aiutarti lo farò volentieri.
Penso che se ne discuterete sul NG si otterranno almeno tre vantaggi:
1. la conoscenza, trattandosi anche di una certa novita'
dell'argomento, andra' a beneficio di tutti;
2. si potranno individuare piu' facilmente problemi e soluzioni;
3. vista la grande disponibilita' che Corrado ha finora dimostrato, si
potra' anche contare sul suo efficace supporto ;-)
-- 
ciao, hal

 wrote in message
8aljfv8br0eiib5m6...@4ax.com...

Sicuramente nei avrei discusso sul NG, anche perchè Corrado l'ho già
contattato in merito alla sua classe e non vorrei rompergli troppo le
scatole visto che avrà anche altro da fare... Per cui se c'è qualcun'altro
che la usa e riesce a sciogliermi dei dubbi, ben venga...
Ciao!!
Max

 wrote in message
f507e858e5218675f33...@mygate.mailgate.org...

E' stato un piacere!!!
A presto!
Max
Newsgroup: it.comp.lang.visual-basic
Titolo: Quale sp? ?

Come individuo la presenza di un determinato service pack su VB5 ?
Giovanni

Giovanni
Se intendi visivamente è evidente all'avvio nella splash screen o nell'about
box.
Se intendi determinarlo da programma credo sia possibile ricavarlo dalla
versione delle dll.
Ciao
--
-
MIX (VB5SP3)
110 links ai siti VB
http://www.tempolibero.com/user/mix/
 (consigliato)
http://space.tin.it/computer/gaais
  (alternativo)
( TEMPORANEAMENTE ACCESSIBILI SOLO CON IE )
-

>Come individuo la presenza di un determinato service pack su VB5 ?
Dalla schermata iniziale di VB
La mia per esempio riporta "Edizione Professional versione 5.0 (SP3)"
RIMUO...@rocketmail.com
Newsgroup: it.comp.lang.visual-basic
Titolo: MMTimer del sito comune: conflitto con VB6!

Ho prelevato MMTimer dal sito comune è dopo qualche esecuzione da VB6 si
blocca.
Sapete da che dipende?
E' la stessa cosa con VB5?
Se avete una versione migliore per VB6 vi prego mandatemela!
GRAZIE IN ANTICIPO

 wrote in message 7vhfn1$1hg$1...@nslave1.tin.it...


 xxx ha causato un errore nel modulo ecc
Succede anche a me.
Peccato, mi serviva proprio!

A me dą errori diversi, dovuti soprattutto all'intervallo che metto; infatti
basandomi sulla velocitą del computer (p166 mmx) ho scoperto che per
determinate azioni (logico :-)) dovevo mettere un intervallo maggiore,
altrimenti o si verificava overflow o dava l'ERRORE IMPROPONIBILE in
mmsystem bloccando irrimediabilmente tutte le risorse multimediali.
Ciao Ciao

 wrote in message
zR2T3.9276$SV.1...@typhoon.libero.it...


Ciao sono Marco, è la prima volta che scrivo e quindi un saluto a tutti i
nottambuli come me E NON.
Sono alle prese con il mio primo 'UserControl' ed avrei bisogno di un
suggerimento (eufemismo !!).
Ho settato la proprietà 'Scadenza' As String.
Il mio controllo è invisibile a runtime e dovrebbe svolgere tra l'altro
questa funzione: controllare la data di sistema sul computer del cliente e
confrontarla con la stringa Scadenza del mio controllo e quindi scrivere
qualcosa sul Registry del cliente.
Qui sotto il codice che ho scritto per creare la proprietà in questione.
*********************************************************************
Private dScadenza  As String
Public Property Get Scadenza() As String
Scadenza = dScadenza
End Property
Public Property Let Scadenza(ByVal NuovaScadenza As String)
dScadenza = NuovaScadenza
PropertyChanged "Scadenza"
End Property
Private Sub UserControl_InitProperties()
dScadenza="31/12/1999"
End Sub
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
Scadenza= PropBag.ReadProperty("Scadenza", dScadenza)
End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
PropBag.WriteProperty "Scadenza", dScadenza
End Sub
**************************************************************
PRIMO GROSSO PROBLEMA: in quale punto mettere il codice per controllare la
data e scrivere sul Registry del cliente?
SECONDO PROBLEMA: come fare in modo che il controllo agisca solo in fase di
runtime e non anche in fase di progettazione ? In Delphi che io ricordi
utilzzavo una cosa del genere:
if not (csDesigning in ComponentState)  then .....
in VB come si fa ?
Grazie di cuore a tutti.

Newsgroup: it.comp.lang.visual-basic
Titolo: Valore RGB di un pixel

Programmatori e programmatrici ecco il mio problema: come posso far vedere
al mio programma di che colore è il pixel che gli dico di esaminare (x,y) ??
Cioè: come faccio a fargli vedere che valore RGB ha quel determinato pixel??
Avevo postato già in precedenza questo problema, ma non trovando una
risposta adeguata ci riprovo!
Ringrazio tutti coloro che si interesseranno.
Mucca
Enjoy yourself, but don't fuck too much!!

too much!!
Ciao

 wrote in message
iJj36.207446$hk4.7...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Semplice semplice

Quesro e' il mio problema:
ho una tabella di un db access dove un campo e' oggetto ole,un documento
immaging .
devo creare in VB una spece di catalogo dove in un form vengano visualizzate
trenta piccole immagini relative ai record
Se inserisco oggetti ole nel form e setto come datasource un controllo data
riferito alla tabella in questione se ho un data1.recordset.movenext
mi aggiorna tutte le immagini,che sono tutte uguali,mentre i ho bisogno che
ogni oggetto ole nel form sia riferito ad un campo diverso .....
L'unica soluzione che ho trovato e' inizzializzare un recordset per ogni
record ....ma mi sebra abbastanza ridicola come cosa!!!
PLz help me

Ciao
Premetto che non l'ho mai usato
ma forse il datarepeter di VB 6 fa al caso tuo
oppure prova con qualche griglia...
dovrebbe funzionare
ciao
Davide
Claudia <CIAO...@PIPPO.mil> wrote in message
87rpog$k8t$1...@nslave2.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: operando in una variabile

Salve a tutti non è proprio possibile effettuare un operazione matematica
tra due variabili numeriche usando come operatore una terza variabile
grazie
--------------------------------
Inviato via 
http://usenet.iol.it

 tra due variabili numeriche usando come operatore una terza variabile
una soluzione potrebbe essere
Function operazionematematica(a As Double, operatore As String, b As Double)
As Double
  Dim risultato As Double
  Select Case operatore
    Case "+": risultato = a + b
    Case "*": risultato = a * b
    Case "-": risultato = a - b
    Case "/": risultato = a / b
    Case Else: risultato = 0
  End Select
  operazionematematica = risultato
End Function
in questo modo nel codice puoi usare
op = "+"
x = operazionematematica(a, op, b)
:-) :-) :-) :-) :-) :-) :-) :-)
helios....@eshiol.it
http://www.eshiol.it
:-) :-) :-) :-) :-) :-) :-) :-)

>una soluzione potrebbe essere





Quello che avevo
in mente io era una cosa tipo 
text1.text=pope operando secop


 text1.text=pope operando secop
in vb6 non è possibile


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

msflexgrid.colisvisible(1) = false
qualcuno sa perchè non funziona l'assegnazione di questa proprietà?
mi dice: "Assegnazione alla costante non ammessa"


Se vuoi Devisualizzare la colonna n° 1 devi fare:
msflexgrid.colwidth( 1 ) = 1

 mi dice: "Assegnazione alla costante non ammessa"
In questo caso la colpa non è tua ma di MSDN.. :-)
Sulla guida è infatti riportato che la proprietà ColIsVisible..
"Restituisce o imposta un valore che indica se la colonna specificata è
visibile"
in realtà la descrizione esatta della proprietà è:
"Returns a value indicating whether a specified column is currently visible"
come correttamente riportato nella versione online.. e per spazzare gli
ultimi dubbi
di dice pure che :
"Remarks
A column is not visible when it's outside the client area of the control's
window.
In other words, when it's scrolled out of view".
In _other words_ per rendere "realmente" invisibile una colonna
devi impostarne la larghezza a zero ;-).
Ciao
 valter

 ha scritto nel messaggio
news:Z8PH8.7544$ie.1...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB2005] Strano comportamento DataGridView

Salve a tutti,
mi capita uno strano comportamento della DataGridView che non riesco a
risolvere.
Ho una funzione che esegue una query che gli viene passata come
parametro e popola un DataTable.
Alla fine di tutto assegna il DataTable ad una DataGridView e fa il refresh.
La parte incriminata ï¿œ questa:
DA = clsDati.ExecuteQuery(sql)
DT.Reset()
DA.Fill(DT)
'Aggiorno la visualizzazione della DataGrid
DGElenco.DataSource = DT
DGElenco.Refresh()
Alla prima iterazione tutto bene... alla seconda iteraziona il DataTable
viene popolato correttamente (controllato da debug), mentre la datagrid
si svuota e non si ripopola.
Se perï¿œ clicco con il mouse sull'intestazione di una colonna qualsiasi,
magicamente riappaiono i dati.
Che ci sia un bug nella Refresh()?
Nicola

Risolto magicamente.
Stamattina al riavvio del pc il tutto ha iniziato a funzionare.
Nicola

 Stamattina al riavvio del pc il tutto ha iniziato a funzionare.
Il vecchio adagio: "Esci e rientra" funziona sempre ;-)
ciao
stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Visual Studio 6 in Italiano

Salve a tutti,
Siccome ho intenzione di passare al Visual C, ho pensato di prendere il VS
6.0, vorrei sapere se il prodotto č disponibile in lingua Italiana.
In piů vorrei sapere quanti Service Pack esistono per VB5 Italiano e dove
posso reperirli.
Grazie
Ste.

 posso reperirli.
BOH!!!
Prova sul sito M$!!!
Ciaps
Stracca

 dove posso reperirli.
Sul sito Micro$oft, oppure piů semplicemente su qualche CD di programmazione
in edicola, fai sicuramente prima che a scaricarti 12-13 mega di roba...
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

Newsgroup: it.comp.lang.visual-basic
Titolo: Non capisco.

Buongiorno a tutti.
1)  Sub prova()
2)  Set MyRange = Worksheets("Foglio1").Range("a1:a7")
3)  Set YourRange = Worksheets("Foglio1").Range(Cells(2, 1), Cells(2, 5))
4)  End Sub
Con il codice di cui sopra, se ho selezionato il "Foglio1" tutto OK.
Se mi trovo su un altro foglio mi da il seguente errore sulla riga 3.
"Errore di run-time '1004'"
"Errore definito dall'applicazione o dall'oggetto"
Perchč?
Grazie. 

 ha scritto nel messaggio 
news:FKhrk.45980$Ca.1...@twister2.libero.it...

Ho visto che puň funzionare se modifico cosě:
3)  Set YourRange = 
Worksheets("Foglio1").Range(Worksheets("Foglio1").Cells(2, 1), 
Worksheets("Foglio1").Cells(2, 5))
Non capisco perň xché la forma inziale non fosse valida.
Qualche indicazione?
Grazie
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] VB6 professional versione full e manuali cartacei..

Ciao a tutti.
Mi dite per favore se, comprando VB6 professional versione full, e NON
quindi la versione "licenza studente",  ti danno anche i manuali cartacei?
Sapete invece in quali casi NON ti danno i manuali cartacei?
Grazie a tutti a chi vorrà darmi questi chiarimenti.
Max.

quindi la versione "licenza studente",  ti danno anche i manuali cartacei?
Che io sappia, no.
Sembra che sia la nuova filosofia di vendita: la documentazione c'č,
ma in versiona elettronica; per qualcosa di "concreto", prego,
acquistare separatamente.
Parlo anche con un minimo di esperienza: giusto ieri mi č arrivato VB6
Professional (upgrade dalla 4.0, ma mi dicono che non ci siano
differenze in quanto a contenuti della scatola), e nulla di cartaceo.
Beh, a parte un manualetto che ti spiega cosa hai comprato! :)
Ciao...

>Mi dite per favore se, comprando VB6 professional versione full ti danno
anche i manuali cartacei?
NO! Se li vuoi, paga a mamma M$ ! E' una nuova politica per vedere sempre
più *contenti* i loro clienti ...... azz....  -____-
Mi spiace.
Ciao
Tommy

 acquistare separatamente.
Confermo.
Sennò come li vendono i libri di MSPress tradotti dalla Mondadori ?
Zeross

 Ciao! Nella versione 6 del Visual Basic Professional non sono compresi i
manuali, infatti sono Online sotto MSDN. Comunque se ti interessa l'acquisto
del VB6 Professional ad un prezzo molto conveniente, contattami. Io utilizzo
Visual Studio, di conseguenza non ho più bisogno di avere un'altra copia di
VB.
Se la cosa ti interessa contattami al seguente indirizzo:
elia...@tin.it
P.S.
        Il prodotto è nuovo e la licenza Microsoft non è stata ancora
spedita.
Newsgroup: it.comp.lang.visual-basic
Titolo: Differeze VBA tra Excel 95 e Excel 2002

Salve, 
dovrei fare il porting di alcune applicazioni realizzate con VBA per 
Excel 95 in VBA per Excel 2002. 
Sapreste indicarmi dove trovare informazioni sulle differenze fra le 
due versioni di VBA? 
Grazie per l'aiuto
Inviato da 
www.mynewsgate.net

 due versioni di VBA?
su un ng che si occupi di excel?
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

Newsgroup: it.comp.lang.visual-basic
Titolo: [Forse un pò OT] Access e MySQL

Salve,
ho utilizzato un DB Access come fonte di dati per un mio programma
realizzato in VB.
Vorrei trasferire il contenuto del DB access in un DB MySQl per visualizzare
i dati su un sito Internet.
Come posso fare?
Posso utilizzare un altro DB al posto del DB MySQL per realizzare il sito
con pagine dinamiche in PHP?
Grazie per l'aiuto.
Croupier

 ha scritto nel messaggio
news:B%0Cb.193705$hV.72...@news2.tin.it...


 ha scritto nel messaggio
news:B%0Cb.193705$hV.72...@news2.tin.it...


 direttamente il DB con il codice PHP.
Se ha a disposizione un DB mysql utilizzi quello! ;-)

 ha scritto nel messaggio
news:B%0Cb.193705$hV.72...@news2.tin.it...

io uso MySQLFront, che trovi mi sembra su 
mysql.org
.
io mi sono trovato bene, perchè permette di importare dentro un db mysql
dati provenienti da altri database, passando per odbc. e poi è comunque una
bella GUI per mysql.
dato che devi scrivere php, non ti consigli di passare ad altri database.
Non me ne intendo molto, però so che php ha comandi/istruzioni nativi per la
connessione ai database in formato mysql
good coding!!!
-- 
Alletun
Sorry, ask me if you want to get my e-mail!

 Se ha a disposizione un DB mysql utilizzi quello! ;-)
Ma lui ha un DB access e deve passare i dati in un DB MySQL ed Access se non
ho capito male è alla base dell'apllicativo che già funziona.
In ogni caso sono d'accordo con voi, meglio usare MySQL anche con VB.

 good coding!!!

 Come posso fare?
Crearti un programma che legge i dati da access e li scrive su mysql.
Praticamente un recordset che prende i dati dalla tabella in access e una
stringa SQL da inviare a mySQL.
Non è molto complicato.
-- 
Ciao,
        Fabrizio
<=- 
http://www.negusweb.it
 -=>

 Non è molto complicato.
ed i dati cancellati?
E quelli moificati tra gli aggiornamenti?
Sincronizzare è molto più incasinato che ... una richiesta di recordset.


 Sincronizzare è molto più incasinato che ... una richiesta di recordset.
che sincronizzazione ? Lo fai una volta e basta.
Ma scusa, non stai migrando da access a mysql ?


 Ciao,
Caio Spieg
Newsgroup: it.comp.lang.visual-basic
Titolo: aiutooooo

ciao a tutti!
ho iniziato da poco ad usare visual 
studio.net
 2003, è praticamente
anche la prima volta che mi avvicino seriamente (SPERIAMO) alla
programmazione di applicazioni web oriented e vorrei trovere un manuale
on line , o provato a cercarne uno ma non ho trovato nulla, voi
potreste aiutarmi??? 
grazie mille a tutti 
Sil

 ha scritto nel messaggio 
news:1146134661.7...@i39g2000cwa.googlegroups.com...


>Online non si trova molto di serio, io ti consiglierei d'acquistare un libro
Hai almeno un titolo da suggerirmi?
Grazie mille 
Sil

Newsgroup: it.comp.lang.visual-basic
Titolo: creare integrità referenziale: on delete cascade...

dovrei creare delle tabelle e delle relazioni da codicee, su db Access.
Uso DAO 3.6.
Posso facilmente creare tabelle, posso facilmente creare indici e
relazioni...
creo la relazione così:
"ALTER TABLE x " & _
         " ADD CONSTRAINT [y] " & _
         " FOREIGN KEY ([z]) " & _
         " REFERENCES k([j]) "
ma non riesco a impostare l'integrità referenziale:
se ci aggiungo l'integrità referenziale:
"ON UPDATE CASCADE ON DELETE CASCADE"
non va, mi dice errore di sintassi.
Sapete come si fa?
Al limite, per questa operazione posso usare ADO...
grazie.

 ha scritto nel messaggio
news:c0d1sv$15kuv1$1...@ID-77234.news.uni-berlin.de...

Ciao,
con DAO non è possibile, lo puoi fare con il metodo Execute dell'oggetto
ADO.Connection, la sintassi del comando è quella da te indicata.
-----------------
Con.Execute "ALTER TABLE x " & _
                    " ADD CONSTRAINT [y] " & _
                    " FOREIGN KEY ([z]) " & _
                    " REFERENCES k([j]) " & _
                     "ON UPDATE CASCADE " & _
                     "ON DELETE CASCADE"
---------------------
Ciao Giorgio

ok, con ado 2.7 va.
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: [Ot] paypal ...risolto.

: Ecco cosa mi è arrivato oggi:
:       -.-.-.-.-.-.-.-.-.-.-.-.-.-.-
Attenzione, l'indirizzo (URL) dove c'e' "click here" NON
porta a PayPal! In
realta' e' un indirizzo fittizio! Inizia con 
www.paypal.com
,
ma non porta al
sito vero! Se guardate bene, l'URL riporta un indirizzo IP
(v. esempio di
seguito): 
http://www.pay...@112.121.57.43
 (o qualcosa di
simile,
l'indirizzo IP esatto non ce l'ho piu'). Comunque sia, NON
inserite dati nel
form che vi propone, e' un sito falsissssssimo. Ho gia'
indagato con l'aiuto
di PayPal, mi hanno risposto quanto segue (copio/incollo):
Thank you for contacting PayPal.
Thank you for bringing this suspicious email to our
attention. We can
confirm that the email you received; was not sent to you by
PayPal. The
website linked to this email is not a registered URL
authorized or used by
PayPal. We are currently investigating this incident fully.
Please do not
enter any personal or financial information into this
website.
If you have surrendered any personal or financial
information to this
fraudulent website, you should immediately log into your
PayPal Account and
change your password and secret question and answer
information. Any
compromised financial information should be reported to the
appropriate
parties.
If you notice any unauthorized activity associated with your
PayPal
transaction history, please immediately report this to
PayPal by following
the instructions below:
1. Go to 
https://www.paypal.com/
2. Click on the Security Center at the bottom of the page
3. Click on "Report a Problem"
4. Select the Topic: Report Fraud
5: Select the Subtopic: Unauthorized use of my PayPal
Account, and click
Continue.
6. Follow the instructions to access the appropriate form
If you have any further questions, please feel free to
contact us again.
Sincerely,
PayPal Account Review Department
PayPal, an eBay Company
: X.Gregorio Responsabile Tecnico Sviluppo Software
: It Consulting SRL : 
Http://www.xaziende.com
: Limbo59  %1 Hotmail %2
: (Manca una chiocciola e un ".com" )
:
:

 PayPal, an eBay Company
I miei sospetti sul fatto che fossero false le email di eBay ora sono quasi
certezza! :-)
purtroppo leggendole in web mail non posso consultare gli header...
    Ciao
        Allanon
-- 
- SPAMKILLER
 Rispondete a: 
itlangv...@michele.sytes.net
 e lasciate la parola SPAMKILLER nella risposta