mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Problema con UpdateAll

Salve a tutti.
Sto realizzando un primo progetto in 
VB.NET
 con interfaccia ad un SQL 
Server.
- Da SQL Server creo la mia tabella (Dipendenti) molto semplice.
- Da VB creo la stringa di connessione e includo nell'origine dati il 
dataset alla tabella.
- In un windows form trascino i campi (nome, cognome, etc) dall'origine 
dati.
- Adesso ho: il DataSet, BindingSource, TableAdapter, 
TableAdapterManager e Binding navigator.
- ho fatto una semplice Text box per la ricerca del dipendente di cui 
voglio visualizzare i campi:
	Pos = DipendenteBindingSource.Find("Gognome", txtCognome.Text)
         DipendenteBindingSource.Position = Pos
Fin qui funziona tutto.
Poi vado a modificare qualche campo, (più campi dello stesso dipendente 
o campi a dipendenti diversi) tramite questo comando:
             Try
                 DipendenteBindingSource.EndEdit()
                 TableAdapterManager.UpdateAll(DataSet)
             Catch ex As Exception
                 MsgBox(ex.Message)
             End Try
ma se pur non mi genera nessun errore, spesso non mi salva i cambiamenti 
oppure alcuni li salva ed altri no.
da cosa può dipendere ?
Grazie a tutti per l'attenzione


Beh la palla di cristallo non mi funziona
...però sarebbe bello togliere il try e vedere cosa ti comunica il tuo
pc quando non salva!
Il try catch è buonissima idea metterlo in situazioni critiche o dove
si ha paura che escano situazioni impreviste.
Comunque vada...NON SI METTE MAI nello sviluppo di un
programma...altrimenti come fai a capire se qualcosa va storto???
Questo post al 90% è inutile...probabilmente se togli il try ti si
solleverà un errore che sarà molto esplicativo e AL LIMITE potrai fare
una domanda MOLTO più precisa e pertinente!
Quindi...spengiamo (detto alla toscana) la palla di cristallo e tira
via tutti i try catch della tua appllicazione  in sviluppo!
Debug questo sconosciuto eh!
:)


Ciao,
intanto ti ringrazio comunque per avermi risposto.
Non mi trovo però molto d'accordo con il tuo ragionamento.
Try ... catch è esattamente un gestore di errore, va messo nei punti 
critici del programma non per nascondere gli errori, ma per gestirli.
Infatti, nel mio caso, se si dovesse verificare una qualsiasi 
problematica questa verrebbe gestita dal catch e mostratami in una msgbox.
Comunque ho trovato il mio problema ed ovviamente si trattava di un 
errore mio. Senza accorgermene avevo associato ad una PictureBox un 
campo del database già associato ad una textbox e quando salvavo, 
evidentemente, le 2 associazioni andavano in conflitto e su quel campo 
non mi faceva salvare, mentre se quel campo non era affetto da modifiche 
il salvataggio non dava nessun problema.
Grazie
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: DB su Server

Ciao a tutti avrei una domanda,
io ho un db sul mio sito internet, e vorrei fare un programma in vb6 che
interagisca con esso.
si può connettersi al db se è sul server o tutte le volte lo devo
scaricare?
grazie
-- 
www.lezious-team.com
  se riuscite batteteci...
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 scaricare?
Se è possibile accedere al db dall'esterno, certo che puoi.
Ciao,
   Fabrizio
=== 
http://www.negusweb.it
 ===

 scaricare?
Boh
Non ci ho mai provato, anche se sul newsgroup qualcuno diceva che fosse
possibile.
Quando mi sono trovato nella necessità di farlo ho sempre preferito fare
una "interfaccia" in asp per poter interagire con il database remoto.
-- 
Salutoni
Sergio
C'è il giorno in cui nasci e quello in cui scegli di vivere


 Se č possibile accedere al db dall'esterno, certo che puoi.
mi spieghi come? 
io ho fatto delle pagine asp che ci parlano, ma ora vorrei evolverlo e
farlo tramite vb6... 
cioč mi fai un esempio del tipo
dim cn as connection
set cn = new Connection
cn.open ???
il db č ACCESS


 il db è ACCESS
Se il db è Access non puoi farlo interagire in rete dalla cartella del
sito.
Le cose sono due: o il sito Internet è sulla rete locale (e quindi
puoi definire una unità logica collegata alla cartella dove si trova
il database) oppure utilizzi ASP.
Mario De Ghetto
www.deghetto.it

 il db è ACCESS
Considera che stiamo parlando di ACCESS, quindi di un database su file.
Questo è ovviamente un vincolo perchè tramite il protocollo HTTP
diretto sul db potresti al massimo leggere il db, ma non scriverlo.
Sicuramente l'idea proposta di creare un'interfaccia in XML (o a questo
punto un webservice) è sicuramente un'ottima idea.
Se avessi avuto a disposizione un RDBMS (mysql, postgre, ecc.) e le
porte di comunicazione aperte, allora il discorso sarebbe stato
completamente diverso e sicuramente più semplice. Altrimenti la
soluzioni dell'interfaccia (o webservice) è una strada sicuramente
percorribile.
Ciao,
     Fabrizio

 il database) oppure utilizzi ASP.
quindi mi tocca utilizzare asp... 
ok! grazie!


 ok! grazie!
Confermo che si puo'  interagire facilmente, utilizzando in locale un 
programma sviluppato con VB6, con un MDB posto su Internet.
Puoi trovare indicazioni nel sito comune (articolo di Moreno Sirri) o 
nell'esempio del capitolo 9 di "Il modo migliore  di usare ADO" di R. 
Vaughn. Richiede una o due pagine ASP sul server, pagine interrogate appunto 
da un programma in VB6.
E' una tecnica che utilizzo abitualmente con risultati soddisfacenti.
Ciao
AlpVir
Newsgroup: it.comp.lang.visual-basic
Titolo: Public Declare Function Sentence...Alias..(ByVal Phrase...)

il VB altro non è che un giocattolino 

 il VB altro non č che un giocattolino
E ci sei arrivato adesso che sono 3 anni che non č piů in commercio?
Svegliaaa!!!
Ciao 

Senti, giovanotto: visto che Lupin comunque non lo prenderai mai,
perchè non ti riprendi le tue macchinine e vai a giocare altrove?

 il VB altro non è che un giocattolino
?????!!!!!????
Bye,
-- 
Carmine ( 
pikachu...@gmail.com
 (Togli la scritta NOSPAM) )
NUOVISSIMO SITO!!! The Total Site 4 : 
http://www.thetotalsite.it
MariokartDS Codice Amico: 532639027909 - CarmineC in MarioKartDS 

 Bye,
Ragazzi 'sto qui è da qualche settimana che trolla su diversi newsgroup,
ignoratelo.
Starsky

 newsgroup, ignoratelo.
Ma il troll sarei io o zenigata?


 Ma il troll sarei io o zenigata?
Zenigata chiaramente :-) Basta fare una rapida ricerca su groups.google con
il suo nick per vedere il contenuto dei suoi interventi
Ciao
Starsky

 interventi
Umh sono curioso...


 il VB altro non č che un giocattolino
Sei proprio un coglione!
Vai a rompere le palle da un'altra parte, anzichč dare fastidio a chi i NG 
li usa anche per lavorare.
Visto che ti piace tanto fare lo spiritoso perchč non usi anche un indirizzo 
e-mail valido.
A mai piů... coglione!
Vincenzo

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

Scusate per la domanda stupida(sono alle primissime armi con il VB) ma come
si fà
per sapere se un numero è pari o dispari?Grazie!
Marco Cecchini: 
marc...@tiscalinet.it

 ha scritto nel messaggio
news:9h1l96$9ka$1...@pegasus.tiscalinet.it...

Lo dividi per 2 e vedi se ha resto.
ciao
ugo

per sapere se un numero è pari o dispari?Grazie!
Come ti ha detto Ugo, ma in modo più veloce:
Pari = ((Numero Mod 2) = 0)
Ciao

 Lo dividi per 2 e vedi se ha resto.
e per favore usa subject piu' descrittivi.
puoi guardare il manifesto del ng, credo l'abbia postato anche ieri roal
zanazzi.
inoltre: sentirai parlare spesso del "sito comune" del ng:
www.it-lang-vb.net
facci un giro, troverai molte cose utili.
ciao, a.

 zanazzi.
Hai perfettamente ragione, è ora di finirla con questi subject penosi!!!
Mi chiedo perchè c'è sempre chi risponde ugualmente, è ovvio che in questo
modo non cambierà mai nulla...


Hai trovato un sostenitore :)
Possiamo anche iniziare da subito ;-)
ciao, hal

 ha scritto nel messaggio
news:B_YY6.9681$4J1....@news2.tin.it...

Ancora piu' veloce:
    Dispari = Numero AND 1
Ciao
Giuseppe

    Dispari = Numero AND 1
Acc! E' vero!
Ciao

 writes:
Z> Pari = ((Numero Mod 2) = 0)
Probabilmente più veloce (una volta lo era) :
	dispari = 2 and 1
	pari	= not (2 and 1)
--
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 )

Possiamo anche iniziare da subito ;-)
Ok, ok, non lo faccio più se non per rimproverare.
Va bene?
ma... a questo messaggio avrei dovuto rispondere? :P
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Linguaggio macchina in visual basic

Il succo del discorso dovrebe essere questo:
Prima stabilizzate la versione appena uscita e poi ne fate una nuova.

E' possibile inserire istruzioni in linguaggio macchina dentro codice visual
basic 5? o altrimenti è possibile accedere direttamente alla memoria con
istruzioni tipo basic peek() e poke()?
grazie!

istruzioni tipo basic peek() e poke()?
Quale memoria? quella fisica o quella dello spazio di indirizzamento del
processo? Comunque, no nel primo caso. Sě, parzialmente, con RTLMoveMemory,
nel secondo (dipende da che cosa devi fare).
Ecco le dichiarazioni di RTLMoveMemory con degli utili alias:
Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (dest As Any,
Source As Any, ByVal Length As Long)
Declare Sub CopyMemoryFromPointer Lib "kernel32" Alias "RtlMoveMemory" (dest
As Any, ByVal Source As Long, ByVal Length As Long)
Declare Sub CopyMemoryAsAny Lib "kernel32" Alias "RtlMoveMemory" _
                      (pDest As Any, _
                       pSource As Any, _
                       ByVal dwLength As Long)
Ciao,
Domenico
Newsgroup: it.comp.lang.visual-basic
Titolo: Query con parametri

Non sono un esperto di visualbasic e mi sono fermato davanti ad uno
ostacolo che non riesco a superare e non riesco neanche a trovare
documentazione a riguardo.
Vorrei riempire una griglia con una selezione fatta da una query con
parametri su un database access.
Quando ho bisogno di una semplice query scrivo del codice del tipo:
 
Set wksDbase = CreateWorkspace("", "admin", "", dbUseJet)
Set Dbase = wksDbase.OpenDatabase("MioDB.mdb")
Set rstDbase = DBase.OpenRecordset( _
    "SELECT DISTINCTROW DB.campo1 FROM DB GROUP BY DB.campo1 ", & _
    "ORDER BY DB.campo1 DESC", _
    dbOpenDynaset, dbReadOnly)
  Do While Not rstDbase.EOF
    Griglia.AddItem rstDbase.Fields(0), 0
    rstDbase.MoveNext
  Loop
e la cosa mi funziona.
Quando invece voglio inserire un parametro mi sembra di aver capito che
potrei fare una cosa del genere:
Parametro = "prova"
Set rstDbase = DBase.OpenRecordset( _
  "PARAMETERS [Parametro] TEXT; " & _
  "SELECT DB.campo1, DB.campo2 " & _
  "FROM DB " & _
  "WHERE ((DB.campo1) = [Parametro]) " & _
  "ORDER BY DB.campo1 DESC", _
  dbOpenDynaset, dbReadOnly)
ma va in errore dicendomi che non ci sono sufficenti parametri.
Qualcuno mi da una dritta su dove sto sbagliando e eventualmente mi
indirizza a documentazione in merito?
Grazie
--
Ciao,
      Peppo
 
ICQ    : UIN 5709387

Prova così: ... where Campo1 = " & Parametro & " order by ...
Se parametro è una stringa fai così: ... where Campo1 = " & chr$(34) &
Parametro & chr$(34) & " order by ...
Leva "PARAMETERS [Parametro] TEXT; " che non tiserve.
Un'altra cosa, se fai una group by è inutile mettere DISTINCTROW davanti al
campo, la group by di per se già provvede a prendere tutti i valori
differenti di un campo e a ordinarli in ordine asc.
Ciao Luciano.

Io di solito faccio cosi' (se ho capito il tuo problema, eh?):
sSqlDetOrdiniFind = "SELECT DetOrdini.IDOrdine, DetOrdini.Situazione" + _
                    " FROM DetOrdini" + _
                    " WHERE IDOrdine=" & sOrdini
se sOrdini e' numerico oppure
                    " WHERE IDOrdine='" & sOrdini & "'"
se sOrdini e' alfanumerico
Ciao
Luka


se sOrdini e' alfanumerico
Non utilizzare il + per concatenare le stringhe...  può essere davvero
insidioso! :-(
Usa & che è l'operatore corretto per concatenarle..
Ciao
Remove CUTME from E-Mail address to reply!
Visit Hardware Tips: 
http://www.hardwaretips.com

 wrote/scrisse:
Ringrazio entrambi.
Piu' semplice di quanto potessi pensare.
In realta' la cosa non l'avevo detta tutta :-)
I parametri erano due, uno stringa e uno numero e operando su entrambi allo
stesso modo non coglievo mai la condizione corretta :-)
Utili anche le, per cosi dire, dritte aggiuntive...


?????
Io uso DA SEMPRE il + proprio perche' voglio un controllo stretto e
non mi va giu' l'overhead della gestione a Variant di una cosa gia'
lenta di suo come le stringhe.
Scusa, ma tu, che problema hai avuto?
Ciao!
Luca Menegotto..


Scusa, ma tu, che problema hai avuto?
Tempo fa era pure stato postato un esempio esplicativo sul NG...
appena lo ripesco te lo riposto...

Newsgroup: it.comp.lang.visual-basic
Titolo: problemi di installazione di visual studio 6 enterp con xp

Salve 
mi chiamo fabrizio e da poco tempo sto usando XP...
pochi giorni fa ho disinstallato la mia versione di visual studio 6 su
xp nell'unità E senza riscontrare alcun problema..ieri ho deciso di
spostare l'applicazione di visual studio sull'unità C di windows XP e al
termine dell'installazione l'errore di XP è stato questo..
IMPOSSIBILE CREARE UN ACCOUNT UTENTE DCOM PER LA REGISTRAZIONE DI
C:\PROGRAMMI\MICROSOFT VISUAL
STUDIO\COMMON\TOOLS\VS-ENT98\VANALYZR\VALEC.EXE
praticamente l'installazione viene interrotta.... 
cosa cavolo vuol dire?? ho provato a rimettere visual studio nell'unità
E ma niente..
se sapete come posso fare mi fareste un grande favore
grazie mille
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 grazie mille
č un errore che capita spesso...
č un bug di visual studio troverai un metodo per installare su microsoft...
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q257413
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Comunicazione MikroPOS SWEDA e VB5

Ho un grosso problema di comunicazione 
Devo stampare gli scontrini da un programma in VB5
Mi collego con l'istruzione MSCOMM1.SETTING = "2400,e,7,1"
Digito sul registratore fiscale il codice di emulazione tastiera 793 e
ricevo l'OK
Invio sulla seriale la stringa di CLEAR "KXCL" ma il registratore fiscale
si blocca
Qualcuno mi sa dire dove sbaglio
AIUTO, GRAZIE

Abbiamo collegato il Micropos e il Poseidon 35 senza nessun problema,
potrebbe dipendere dalla scheda logica del registratore dicassa (già
successo per uno sbalzo di corrente da un ns. cliente)
sono disponibile presso 
sof...@hesnet.net
se mi dai la tua e-mail e il tempo di aprire il file dei parametri dei
registratori di cassa e ti invio le stringhe corrette.
ciao
.
GCaso ha scritto nel messaggio <01bde8c2$8d9cb9c0$6f85d8d4@mio>...


Ciao,
    ho fatto anche io qualcosa con un registratore simile,
(i codici erano gli stessi) e mi pare di ricordare che il problema
fosse che il registratore funziona con protocollo halfdouplex,
(ricezione e trasmissione avvengono in tempi separati)
e che se le stringhe gli arrivano con troppa fretta si incacchia, :-(
Io avevo risolto, molto semplicemente, aggiungendo dei ritardi, (1
sec.circa)
tra un messaggio e l'altro. Intanto il registratore non e' certo un fulmine
a stampare,
e del ritardo non se ne accorge nessuno.


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

Voglio utlizzare sulla mia form un tipo di font che non è di sistema, 
come faccio?
Ho installato il font nel sistema ma cliccando ad esempio nel tipo di 
font della "label" il font in questione non compare in elenco
Come risolvo?
Ho trovato questo link 
http://www.matevarga.com/embedding-fonts-into-windows-forms/
ma i font personalizzati funzionano solo a runtime


Con vs2005 ottengo il comportamento sopra elencato, con vs2008 dice che 
il font deve essere di tipo true type (.ttf)
Risolto utilizzando un convertitore web da otf a ttf
Newsgroup: it.comp.lang.visual-basic
Titolo: Access e vb

E' la prima volta, dopo aver letto per parecchio tempo, che scrivo in questo
NG.... premetto che per vari motivi non ho a disposizione l'MSDN, ma solo un
libro (un po' scarno a dire il vero) che tratta VB.... ma vengo al dunque:
volevo fare in modo che accedendo ad un database ci fosse la possibilità
tramite apposito tasto di cercare un record che corrispondesse ad una
stringa indicata da un utente in un inputbox... quindi ho scritto nella
routine del tasto command1
Private Sub Command1_Click()
Dim variabile As String
variabile = InputBox("Inserire il cognome o la ragione sociale da
ricercare", Ricerca)
Data1.Recordset.MoveFirst
Data1.Recordset.FindFirst "cognome = variabile"
End Sub
ho provato anche inserendo come utlime stringhe
data1.recordset.findfirst "cognome ='variabile'"     oppure  cognome =
variabile    oppure inserendo direttamente ilnome da ricercare con
data1.recordset.findfirst "cognome = 'Rossi'"
ma in ogni caso mi segnala l'errore
Tipo di dati non supportato dall'oggetto.....
Dove sbaglio?
Un grazie a chi mi aiuta...

Un grazie a chi mi aiuta...
--------------------------------
Inviato via 
http://usenet.iol.it
 

 End Sub
----cut---
L'errore e' dato dal fatto che non fai la concatenazione delle stringhe
correttamente.
L'ultima riga e' da scrivere cosi' :
Data1.Recordset.FindFirst "cognome = '" & variabile & "'"
Ciao

 ha scritto nel messaggio
news:S4fz7.36571$1H1.3...@news.infostrada.it...



Prova cosě:
data1.recordset.FindFirst ("cognome ='" & variabile & "'") (note ci sono le
parentesi).
per controllare se la ricerca avuto successo c'č il metodo
data1.recordset.Nomatch, se true non l'ha trovato, se invece č falso
significa che il valore esiste nel recordset.

 >
----cut---
altro consiglio...
Se devi cercare una stringa ti conviene sostituire gli apici con i doppi apici,
nel caso di cognomi con l'apostrofo.
Data1.Recordset.FindFirst "cognome = " & chr(34) & variabile & chr(34)
Se vuoi rendere la ricerca più flessibile puoi usare il LIKE al posto dell = 
in maniera da poter usare i caratteri jolly nella stringa di ricerca. 
Puoi anche includere i caratteri jolly direttamente nel FindFirst.
Data1.Recordset.FindFirst "cognome LIKE " & chr(34) & "*" & variabile & "*" &
chr(34)
aloHa
elefante
-- 
Posted from 
ppp-237-26.30-151.libero.it
 [151.30.26.237] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Niente da fare, continua a segnalarmi lo stesso errore.....
A parte il metodo FindFirst, il resto funziona ?
Sei sicuro di aver impostato bene le proprieta' del controllo data ?
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] GETDISKFREESPACE

vorrei sapere da chi la già usata come funziona la funzione in oggetto??
l'ho provata ma sembra che gli debba passare i parametri dell'HD! ma se il
programma che utilizza questa funziona gira su un pc diverso da quello
originale??
max...@freemail.it

...

Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" _
 (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector
As Long _
 , lpNumberOfFreeClusters As Long, lpTotalNumberOfClusters As Long) As Long
Se ci fai caso tutti i parametri della funzione dopo il primo sono passati
"ByRef"; non sono quindi valori che devi passare tu alla funzione, al contrario
sono le variabili che conterranno ii risultato richiesto; il valore Long tornato
direttamente dalla funzione e' invece solo un codice di errore. In pratica:
Dim SectorsPerCluster As Long
Dim BytesPerSector As Long
Dim NumberOfFreeClusters As Long
Dim TotalNumberOfClusters As Long
Dim TotalBytes As Long
Dim FreeBytes As Long
Dim RetCode As Long
RetCode = GetDiskFreeSpace("C:\", SectorsPerCluster, BytesPerSector, _
          NumberOfFreeClusters, TotalNumberOfClusters)
If RetCode <> 0 Then
    TotalBytes = TotalNumberOfClusters * SectorsPerCluster * BytesPerSector
    FreeBytes = NumberOfFreeClusters * SectorsPerCluster * BytesPerSector
    MsgBox "Spazio totale: " & TotalBytes & " bytes." & vbLf _
            & "Spazio disponibile: " & FreeBytes & " bytes."
Else
    MsgBox "Errore"
End If
gia' che ci siamo, ti consiglio di dare un occhiata anche alla funzione
GetDiskFreeSpaceEx introdotta con Win95b (con la FAT32 quindi)
Ciao
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it

 GetDiskFreeSpaceEx introdotta con Win95b (con la FAT32 quindi)
ho provato ad utilizzare il codice che mi hai dato ma mi da errore di
overflow (cmq io ho un HD da 6.4Gb), ho provato ad usare double e currency
al posto di long ma mi da errori lo stesso.
allora mi sono cercato la funzione getdiskfreespaceex ma non riesco a
trovare da nessuna parte un esempio concreto e,magari anche funzionante, di
questa funzione..
sapresti mica dire come posso fare???
(cmq io ho un HD da 6.4Gb)
ciao max
max...@freemail.it
sito in costruzione: 
http://members.xoom.it/maxcic

 (cmq io ho un HD da 6.4Gb)
Scusa, da quanto è il tuo HD?
^__^
-- 
 Wayne lo Gnawl
      Dottore della Locanda delle Arti.Fantastiche
      IAFO #48 - Iscritto #1 LINU (Lega Iafi Non Umani)
      Fondatore AADD (Associazione Anti Denigratori della Dragonlance)
                       ICQ# 7367272
"400cc di salina. Irregolare! Carica. 400. Libera! ZZZZZT"
                        /\____/\    __
                      .'  """"  `,-'  `--.__
                 __,- :   -  -  ;  " ::     `-. -.__
              ,-sssss `._  `' _,'"     ,'~~~::`.sssss-.
             |ssssss ,' ,_`--'_    __,' ::  `  `.ssssss|
            |sssssss `-._____~ `,,'_______,---_;; ssssss|
             |ssssssssss     `--'~{__   ____   ,'ssssss|
              `-ssssssssssssssssss ~~~~~~~~~~~~ ssss.-'
                   `---.sssssssssssssssssssss.---'
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con i form...

Salve a tutti, ho iniziato a leggere oggi il newsgroup sperando di trovare
degli aiuti (e di darne, se posso...), non è da molto che ho iniziato a
programmare seriamente in VB ed ho ancora qualche problema...
so che a molti sembrerà una stupidata, ma non riesco ad uscirne... allora:
il form1 e il form2 possono richiamare il form3 dal quale devo associare un
valore ad un campo del form che lo richiama (form1.text1.text="ciao" oppure
form2.text1.text="ciao")
per non fare procedure pesanti volevo sapere come fare a definire qualcosa
tipo form_di_origine.text1.text="ciao"
è possibile? Come?
Grazie mille a tutti.

 ha scritto nel messaggio
news:9pl662$17n$1...@nreada.inwind.it...

'Primo metodo
In una Modulo dichiarati una variabile Pubblica
Public strValore As String
nelle Form puoi aggiungere:
Private Sub Command5_Click()
  strValore = "Luigi"
  Form3.Show
End Sub
Private Sub Command6_Click()
  strValore = "Treno"
  Form3.Show
End Sub
'----------------
'Secondo metodo
Nella Form1 dichiara
Public str As String
Private Sub Command5_Click()
 str = "Trenino"
 Form3.Show
End Sub
Nella Form3
Private Sub Form_Load()
  Me.Text1 = Form1.str
End Sub
giuseppeD

>> per non fare procedure pesanti volevo sapere come fare a
ooops.
era una risposta al post originale di Fabrizio, e non alla replica di
Giuseppe.
Silv:o)

 > è possibile? Come?
proprio come dici tu: dichiari nel form3 un oggetto chiamato form_di_origine
che memorizza la form chiamante.
Nella form3 dichiari
Public form_di_origine as Form
e nelle form chiamanti fai in modo che prima della chiamata ci sia la
dichiarazione del "mittente":
Set form3.form_di_origine = Me
form3.Show
Ciao, Silv:o)

 ha scritto nel messaggio
news:9pms2l$jje19$1...@ID-49224.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: controllo listview in vb6

è possibile far comparire una scroll bar verticale in un controllo listview?

 listview?
Appare automaticamente quando ci sono piů elementi di quanti riesce a
visualizzarne.
--
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: che libro x imparare a programamre in VB?

ciao, sto da pochi giorni esplorando il fantastico (?)
mondo di visual basic, basandomi su una Guida Completa della
Apogeo (di quelle tipo impara VB in 21 giorni, 600 pagg.)
Mi sembra abbastanza semplice come primo approccio, mi chiedevo,
se qualcuno conosce questo libro, a che livello mi porterebbe
una volta finito di studiarlo (nel senso se è possibile presentarsi
in giro dichiarando di avere una discreta conoscenza di vb)
e quale altro libro mi consigliate di studiare dopo aver finito questo,
premettendo di avere una discreta esperienza di programamzione
avendo utilizzato pascal e fortran ed essendo da qualche anno
programamtore web e multimedia (dhtml, javascript, lingo...ecc...ecc...)
grazie

 wrote

il libro che dici mi manca.
sulla "discreta conoscenza di vb", temo sia oltremodo soggettivo: io sono
tre anni e mezzo che lo maneggio, sia pure in modo non iperintensivo, e mi
sembra di non saperne una mazza...
altri ne trovi segnalati sul sito comune del ng:
http://www.murialdo.it/it_lang_vb/
ciao, a.
(ps -- non parlare di "programmazione (d)html" -- qui c'e' chi non gradisce
la definizione :)
--
andrea....@tin.it
p...@cedoc.mo.it
http://members.xoom.it/xday/_html/
free vb/sw - 
http://www.comune.modena.it/cittadini/apal/html/
--
p.f. nei messaggi usare solo testo normale, non html !
please use just plain text, not html, in your msgs !
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore run time VB6 & Crystal Report

Salve a tutti,
ho un problema con Crystal Report dovuto forse all'installazione sul
pc utente. Sul mio computer ho creato un'applicazione in VB che
utilizza CR per la stampa. Quando vado a fare le prove tutto ok.
Ho installato il tutto nel pc utente e dopo un errore con la
PDBDAO.DLL poi risolto, adesso quando vado a cliccare sul pulsante di
stampa mi dice:
Errore di run-time '20515':
Error in formula <Record_Selection>.
'{stampa.GIORNO}>= #2005/01/01# and {stampa.GIORNO} <= #2005/12/31#'
A number, currency amount, boolean or string is expected here.
Cosa devo fare?
Tengo a ribadire che nel mio pc funziona tutto correttamente e che il
database che usano i due pc è lo stesso copiato e incollato.
Sono disperato
Grazie 1000 a tutti.


Che tipo di campo è {stampa.GIORNO}?
Ciao
Alessandro 

 database che usano i due pc č lo stesso copiato e incollato.
Non mi risulta che in CR tu possa usare le date cosě come in VB.
Dovresti usare le sue funzioni che in questo caso mi pare sia
DateValue(yyyy,mm,dd)
Ciao
--
Reporting tool: 
http://www.neodatatype.net
Qualunque mentecatto puň scrivere codice che un computer possa capire.
I buoni programmatori scrivono codice che gli uomini possano capire.
[Martin Fowler]

 database che usano i due pc č lo stesso copiato e incollato.


 perchč nel mio pc dove ho il sorgente funzionava ?????
Ti do una spiegazione tecnica che ho sviluppato in questi anni di uso di
Crystal Report:
Perchč Crystal Report č un programma-latrina scritto da cani con delle
scimmie urlatrici nella scatola cranica.


Newsgroup: it.comp.lang.visual-basic
Titolo: Selezionare un oggetto da codice.

Io ho un form composto da un paio di command button una label ed una text
box; voglio fare in modo che ogni volta che il form riceve il "fuoco" sia
selezionata la text box e quindi possa digitare direttamente all'interno
della stessa.
Qualcuno sa dirmi come posso fare?
Grazie a tutti e buone feste!!!!

...


Newsgroup: it.comp.lang.visual-basic
Titolo: GFA BASIC : Cerco

Cerco GFA BASIC
Id...@tin.it

...
:Cerco GFA BASIC
:
Id...@tin.it
:
GFA Basic?
Che bei ricordi... Il primo Basic con le PALLE!
(Nato sull'Atari ST, porting su AMIGA, e su PC? Bhooo)
Non so se esiste ancora.. .. .
Ciao
By -MES-   Maronese Ettore
http:\\
ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://members.xoom.com/it_lang_vb

Mi sembra che i diritti siano stati acquistati da Powebasic
www.powerbasic.com
Ciao
corrao


Eh, già.
E si poteva lavorare con le stringhe senza la stramaledetta limitazione
dei 64K.
psmith nostalgico.
Newsgroup: it.comp.lang.visual-basic
Titolo: invio messaggi su rete lan

Salve a tutti
premesso che non sono un programmatore ma bensi un appassinato di VB,
quindi su alcune cose a voi magari banali io trovi enormi difficoltà.
Premesso questo passo subito a spiegarvi il mio problema ho un
realizzato un programmino che memorizza su un file di testo gli
indirizzi Ip di alcuni pc prensenti nella nostra piccola lan
aziendale,  fino adesso riesco a inviare msg ai pc uno alla volta, ma
se volessi mandare lo stesso messaggio a tutti i pc presenti nella
listview contemporaneamete come posso fare ?

 listview contemporaneamete come posso fare ?
Se hai una listview, ti basta un ciclo For..Next: non è proprio  
"contemporaneamente", ma ci si avvicina molto.
Altrimenti, se usi il protocollo UDP, per spedire a molti si usa un metodo  
chiamato "indirizzamento multicast".
Però sia chi riceve che chi spedisce devono adeguarsi a questa metodo.
Se usi il controllo microsoft, non mi pare sia supportato.
M.


ti chiedo troppo con un esempio di ciclo for...next ?

 ti chiedo troppo con un esempio di ciclo for...next ?
Dim i as long
For i = 1 To ListView1.ListItems.Count
    ' E qui usi ListView1.ListItems(i).Text
    ' oppure un elemento ListView1.ListItems(i).SubItems(N).Text
Next i
Cfr. l'help in linea, statement For.
M.


Gentilissimo lo proverò e ti farò sapere.
grazie ancora

 aziendale
Mi sapresti dire come si fa per rilevare i pc di una lan?
(vb 2005)
-- 
Christian
http://celtics.playitusa.com/
  il sito di riferimento italiano dei 
Boston Celtics (NBA)
www.chry2403.it
  programmi per Windows: contatti ed appuntamenti 
(AgendExpress) e creazione di campionati sportivi (TeamExpress)
Newsgroup: it.comp.lang.visual-basic
Titolo: Consiglio

Salve a tutti!
Premetto che sono un principiante. Ho appena creato un euro convertitore; il
risultante file exe "pesa" solo 24Kb, ma necessita di msstdfmt.dll per poter
funzionare. Ho seguito la procedura di creazione di un pacchetto di
autoinstallazione, ed ho notato però che oltre alla suddetta dll, me ne
include altre fino ad arrivare ad una grandezza del file troppo elevata (1,3
Mb), almeno per la trasmissione via internet. Che soluzione mi consigliate
di effettuare? Posso creare un pacchetto autoinstallante, eliminando però le
altre dll? Oppure esiste una serie di comandi che permettano al regsvr32.exe
di registrare msstdfmt.dll ? Aiutatemi, please, xchè non so proprio come
risolvere il problema
Ciao

 Ciao

 Ciao
coraggio: ho trovato un euroconvertitore nelle valute europee leggerissimo e
fatto bene. in c. benone. mica tanto. c _ms_: vuole la mfc42.dll ...
quanto al tuo:
la dll sei sicuro che vada registrata ? quelle non activex basta stiano o
con l'exe o nella windows\system ( winnt\system32).
a parte che 1 mb sulla rete ormai e' -- purtroppo -- abbastanza usuale, il
pacchetto e' l'unico modo per essere (abbastanza) sicuri che l'exe giri
dappertutto.
puoi pero' provare 8a volte l'ho fatto) a mettere fuori altri 2 zip
- uno solo con l'exe
- uno con anche la tua dll
uno puo' provare a tirar giu' gli zip piccoli. mal che vada c'e' il
paccone...
hth, ciao, j.
--
www.sundaysw.com

andremar wrote:

Secondo me della msstdfmt.dll puoi fare tranquillamente a meno e usare la 
Format$() al suo posto.
Per i runtime puoi escluderli dal pacchetto dato che molti PC li avranno 
già installati e aggiungere eventualmente un link ad un sito (anche alla M$ 
credo, o il tuo stesso) dove scaricarli per chi proprio ne è sprovvisto.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Mi date una mano ... ? - Grazie

Rieccomi qua.... !
Giuro che cerco di evitare il piu' possibile di rompervi le scatole ma, se
mi rivolgo al ng, e' perche' non so' che pesci pigliare.
Sto cercando di realizzare un piccolo applicativo per un mio amico che ha un
albergo.
Vorrebbe archiviare le anagrafiche dei suoi clienti nonche' gestire le
prenotazioni degli stessi.
Ho creato un DB access con due tabelle :
Clienti -    Contenente tutti i dati del cliente .... (idCliente,Cognome,
Nome, etc....)
Camere - Contenente l'elenco delle prenotazioni (idCliente, Data_Pren,
N_camera)
Nessun problema per cio' che riguarda il form di gestione dei clienti.
Ho qualche problema di "logica organizzativa", invece, per il form che
dovra' visualizzare l'archivio delle prenotazioni :
Mi spiego ....... :
Pensavo di mettere un combobox (oppure un dbcombo?) per permettere
all'utente di scegliere il cliente (pensavo di visualizzare il campo del
cognome nel combo).
Una volta selezionato il cliente, vorrei apparisse in una dbgrid (oppure...
??) la lista di tutte le prenotazioni con relativo n.di camera a fianco del
cliente selezionato.
Un esempio :
Cliente :  Rossi  (dbcombo)
data                N.Camera
01/01/01            45
06/02/01            55
etc.etc..
La cosa che mi sfugge, e' come mettere in relazione la dbgrid con il
combobox.
Non pretendo che mi scriviate per filo e per segno come fare (al massimo ..
la query..!!!) ma, quantomeno, in che maniera voi risolvereste il problema.
Inoltre, mi piacerebbe anche sapere se voi avreste utilizzato una soluzione
diversa per ottenere il risultato.
Come al solito ..... grazie !
Aldo
P.S.
Mi e' venuto un dubbio ...... e se ci sono due "Rossi" come clienti ???
Che controllo si potrebbe utilizzare al posto del combo ???

 ha scritto nel messaggio
news:96t98p$qth$1...@news.mclink.it...


 ha scritto nel messaggio
news:O0vk6.2758$_N1....@news.infostrada.it...


pezze ai programmi per farli funzionare.
]zac[

 ha scritto nel messaggio
news:ovxk6.3885$_N1....@news.infostrada.it...


Uè, sfotti poco DBG :-)

 solo il numero della camera...". Se questo programma sarà usato da
qualcuno,
---cut---

 A me capita di dover litigare, con i mie datori di lavoro, per fare gli
[...]


[...]

Ma allora so' de coccio! :-)
]zac[

 Comunque, per metterli in relazione devi gestire l'evento click del
combobox
---cut

Newsgroup: it.comp.lang.visual-basic
Titolo: service pack 3 di vb 5

dove posso trovare il service pack 3 per VB5?
all'indirizzo 
ftp://ftp.murialdo.it/software/
non riesco a collegarmi, mi risponde con informazioni troppo estese
potete aiutarmi ho un problema con printer e control data
grazie andrea

ftp://ftp.areacom.it/vb32/
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
Newsgroup: it.comp.lang.visual-basic
Titolo: CALCOLO STRAORDINARIO

CHI MI PUO AIUTARE DEVO CALCOLARE LE ORE DI STRAORDINARIO
TIPO ORA INIZIO 08:00  ORA FINE 10:00
GRAZIE

 TIPO ORA INIZIO 08:00  ORA FINE 10:00
Call MsgBox(CStr(10 - 8), vbInformation)
<g>
--
Faber

 TIPO ORA INIZIO 08:00  ORA FINE 10:00
2 ore
Silv:o)

Ore_Straordinario = cdbl(Data_Fine - Data_Inizio) * 24.0
Alberto

 Call MsgBox(CStr(10 - 8), vbInformation)
Rotfl

 Ore_Straordinario = cdbl(Data_Fine - Data_Inizio) * 24.0
A parte che lavorare 24 ore su 24 è antisindacale, ma per lo meno 8 ore
saranno bene di lavoro ordinario, no? ;-)
Ciao
*Roby*

 saranno bene di lavoro ordinario, no? ;-)
Cavolo, ma tu fai il cabarettista!!!
Ovviamente Data_Inizio è l'inizio dello straordinario... :-)
Alberto

 Ovviamente Data_Inizio è l'inizio dello straordinario... :-)
_data_ inizio ?
cioe' per l'inizio dello straordinario non basta segnare l'ora, ma bisogna
andare indietro nel calendario ? :)
j.staka.no

 andare indietro nel calendario ? :)
Certo.
Intanto se la variabile deve contenere l'istante da cui si comincia a
computare lo straordinario, deve contenere anche la data, quindi mi sembra
corretto usare una variabile data_xxxx.
Poi forse tu non hai mai visto la gente a cui finisce il turno di lavoro
alle 22. Prova ad immaginare se fanno tre ore di straordinario.....
Alberto

 Prova ad immaginare se fanno tre ore di straordinario.....
...nel caso sara' necessario modificare la formula:
data(inizio_starordinario) - data(fine_rapporto_di_lavoro)
:)
si, e' corretto quello che dici.
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: Individuazione di un codice all'interno di un eseguibile

Salve,
Ho un programma visual basic .net 2003 in cui con un numero esadecimale 
eseguo una decrittazione a chiave simmetrica di un file precedentemente 
criptato.
E' possibile individuare questo numero esadecimale all'interno del file 
eseguibile?
Grazie per qualunque suggerimento,
Nicola Taibi
whisk...@yahoo.it
www.geocities.com/whisky1767

 eseguibile?
Temo di sě. Perché non usi una password immessa dall'utente?
-- 
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Saluti, VITRIOL

 eseguibile?
Ovviamente si.
Quello che puoi fare, è renderlo più complesso.
Cioè, anzichè:
Chiave = "123ABC"
puoi fare:
Pippo = "AB"
Pluto = "123C"
Chiave = left(pluto,3) & pippo & right(pluto,1)
Che se uno va a decompilare, alla fine ci arriva lo stesso.
Ma con un semplice editor binario, quantomeno, è meno evidente.
Ciao
Alberto
-- 
La bellezza è opinabile, sulla bruttezza sono tutti d'accordo.


Ancora meglio se nel codice la chiave viene memorizzata in modo codificato con
una propria routine ad-hoc.
Chiave = "GnE7^5"     ' = MyEncode("123ABC")
...
DecryptFile(FileName, MyDecode(Chiave))
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

> Ma con un semplice editor binario, quantomeno, č meno evidente.


> Ma con un semplice editor binario, quantomeno, č meno evidente.

Newsgroup: it.comp.lang.visual-basic
Titolo: Scroll Bars...

Caro NG,
 ho un semplice problema.
1) Creo una Form (ci metto anche un bel menů).
2) Piazzo nella Form un barra di scorrimento orizzontale (HScroll1).
Se in un evento, come il ridisegno della Form, vado a mettere il seguente
codice:
Form1.HScroll1.Top = Form1.Height - Form1.HScroll1.Height
mi aspetto che la Scroll Bar finisca sul fondo della Form.
Sorpresa! Non ci va ! Ho provato a cambiare i vari fattori ScaleMode, etc...
non funziona nulla
La cosa funziona se alla Form tolgo bordo, barra del titolo, etc. ovvero la
riduco ad un pannello vuoto.
Perchč ? Come si fa a buttare in modo preciso la Scroll Bar sul fondo dello
Form ?
Grazie per eventuali risposte.

 ha scritto nel messaggio

stai usando l'altezza complessiva del form, mentre ti serve quella della
parte utile, appunto esclusi borfo, titlebar ecc. -- motivo per cui se togli
quegli elementi funziona.
lasciando stare scalemode come starebbe per conto suo, come va cosi':
    Form1.HScroll1.Top = Form1.scaleHeight - Form1.HScroll1.Height
?
dato che ripeti "form1", suppongo che il codice non appartenga al form. puoi
fare anche:
    with form1
        .hsc.top = .scaleheight - .hsc.height
    end with
specie se in mezzi al with/end hai altri riferimenti al form, diventa piu'
leggibile.
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: Reti Novell

Ciao!
Le reti novel non comunicano tramite tcp ip , come si fa per adattare un
programma di vb?
grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:2b2c1bcf91ba65fd92e...@mygate.mailgate.org...

In windows esiste il client per le reti Novell.
--
Massimo Bonechi
-----------------------------------
Nuovo Newsgroup al server : 
news.startit.it

grazie massimo


Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo MSComm32

Ciao a tutti,
ho un grosso bisogno di voi.
Ho installato VB6 Learning edition su una macchina con W2000 Professional
Il controllo MSComm32.ocx non viene registrato.
Ho già seguito il comando regsrv32 mscomm32.ocx nella cartella
WINNT\SYSTEM32
ma quando utilizzo l'oggetto in un progetto VB6 mi segnala la mancata
registrazione dell'oggetto!!!
come posso procedere???
ciao a tutti
Grazie Luca
--




Subject: Controllo MSComm32
Date: lunedě 12 marzo 2001 19.35
Ciao a tutti,
ho un grosso bisogno di voi.
Ho installato VB6 Learning edition su una macchina con W2000 Professional
Il controllo MSComm32.ocx non viene registrato.
Ho giŕ seguito il comando regsrv32 mscomm32.ocx nella cartella


Ciao a tutti,
ho un grosso bisogno di voi.
Ho installato VB6 Learning edition su una macchina con W2000 Professional
Il controllo MSComm32.ocx non viene registrato.
Ho già seguito il comando regsrv32 mscomm32.ocx nella cartella

Newsgroup: it.comp.lang.visual-basic
Titolo: Vb6/Win2000

Ho installato la versione di Windows2000 pro
presente sul CD di PC Professional in un vecchio
HD (ho i cassettini estraibili...). Per ora ho installato
Vb6 e aperto alcuni vecchi progetti(molto piccoli)
e tutto mi sembra OK.
Altri hanno fatto delle prove?
Chiamate API?
--
Mauro Gamberini
maurogs...@comune.cento.fe.it

 wrote in message
85eqd1$hpa$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Convertitore...

Ciao ragazzi dove posso trovare un convertitore
Dollari/Lire e Lira/Dollari?
Grazie

Stai scherzando, vero?


...


 ha scritto nel messaggio
news:0O7z5.13103$OI2.3...@news.infostrada.it...


...


 ha scritto nel messaggio
news:8qm9qj$o0i$1...@serv1.albacom.net...


...


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

Scusate l'ignoranza !
In MS office 2000, dove si trova L'MSDE ?
Grazie per ogni risposta...

In MS office 2000, dove si trova L'MSDE ?
<citazione>
MSDE is distributed in all versions of Office that include Access, 
such as Office 2000 Professional, Office 2000 Developer, and 
Office 2000 Premium
</citazione>
Sul cd di office 2000 developer c'e' una directory che si chiama
proprio "Msde" ;-)
Fino a qualche tempo fa era scaricabile gratuitamente dal sito
di microsoft, ora non piu'.
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: [RAM] quale contollo?

Secondo voi, occupa di più un contollo label o un controllo image (senza
nessuna immagine caricata)?
Mi serve per fare un'interfaccia che, al posto di usare controlli per le
immagini usi il paintpicture, e una volta ridotto ad icona le scarichi tutte
per liberare memoria, però sotte le immagini disegnate devo fare in modo che
clikkandici sopra si acceda a delle opzioni...
Grazie in anticipo, Filer


Ne' l' uno, ne' l' altro.
Leggi le coordinate del mouse al momento del mousedown per stabilire se e su quale
immagine si trovi.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Insert into o update con campi vuoti o con virgole

come si può eseguireun insert into oppure un update indipendentemente che
nel textbox vi sia un valore oppure no?
Nella fase di salvataggio trasferisco in variabile il contenuto .text del
textbox poi la passo alla stringa sqt dell'oggetto command-
Mi dà errore ..Grazie


E chi indovina l'errore vince un dvd di Selen?
Newsgroup: it.comp.lang.visual-basic
Titolo: database Access in VB6

Quando Apro il progetto VB5 in VB6
mi dice che non riesce a caricare Crystl32.ocx
(provato ad aggiungerlo nei componenti del prj ma niente)
Provo ad andare avanti lo stesso ma va in debug proprio sul primo
tentativo
di apertura del db accesse 97 con errori su Vbjet.dll e Vbjet32.dll ??
Qualcuno sa' come risolvere questo simpatico problemino???
grazie.

 grazie.
--
.......................................................
         ALLEANZA SETTORE CARDASSIA
     comandante della Ka'zan KELDON class
             it.fan.startrek
.......................................................
Da Cardassia 1
VARAZ Di VEKRUD
figlio di Gozard
Je-Rev!!
=/\= 
va...@planetmail.com
 =/\=
Consigliere Khellian
--
Garak -Non dire mai la stessa bugia due volte di seguito!-
.......................................................
                     Member 1 of
 - Space Cruiser YAMATO - Long Live The Star Force!-
   Gilda's
.......................................................
PAVS-GEN

Newsgroup: it.comp.lang.visual-basic
Titolo: Come visualizzare i gif animati?

Salve a tutto il N.G.
 
Qualcuno mi può cortesemente spiegare come visualizzare i gif animati con 
V.B. 2010 Express?
 
Grazie anticipate a tutti coloro mi risponderanno.
 
Pippo.
 
 


http://it.letmegooglethatforyou.com/?q=vb.net+gif+animate
 
 
Ciao, Vincenzo


 
sono due righe in C# ma ci metti un secondo ad adattarle
 
System.Drawing.Bitmap gifPic = new 
System.Drawing.Bitmap("e:\\Gif_Animate_Animali428.gif");
this.pictureBox1.Image = gifPic;
 
ciao
stefano
 

 ha scritto nel messaggio 
news:51e4f3ef$0$1377$4faf...@reader1.news.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: ActiveX DLL

Carissimi,
    ho realizzato una DLL ActiveX ed oltre a delle classi ho aggiunto dei
Form che sono utilizzabili tramite le classi. L'unico problema è che NON
riesco a utilizzare le funzioni, subroutine e classi presenti nel progetto.
Insomma non riesco a fare comunicare i form con le sub/functions chiamanti.
Potete aiutarmi ? Grazie,
                                        Davide Manca
------------------------------------------------------------
Ph.D. Davide Manca
CIIC Department
Politecnico di Milano
P.zza Leonardo da Vinci, 32
20133 MILAN - ITALY
For separate reply my e-mail is: !
davide...@polimi.it
web:   
http://www.polimi.it/ciic
Tel. 
+39 02 23993271
     Fax. 
+39 02 70638173
-------------------------------------------------------------

 Potete aiutarmi ? Grazie,
No, se non posti un po' di codice...


Ho una classe CMyClass con una funzione ad esempio del tipo:
Public Function DirettorioDiWindows() as string
    ...................
    ...................
    exit sub
end
Ho un form frmDemo appartenente al progetto ActiveX DLL
Posso lanciare il form demo da una sub/function della classe CMyClass
tramite:
Dim fff as frmDemo
Set fff = New frmDemo
e fin qui tutto a posto !!!
NON funziona viceversa nell'evento del form load di frmDemo la seguente
istruzione:
Sub Form_Load()
    Chdir DirettorioDiWindows()
end
in quanto viene emesso un errore che dice che la funzione
DirettorioDiWindows č sconosciuta anche se nell'elenco a tendina delle
sub/functions utilizzabili č mostrata ed apparentemente utilizzabile la:
DirettorioDiWindows.
Si noti che la classe CMyClass ha come attributi di Istancing:
GlobalMultiUse.
Potete aiutarmi???
Ciao e grazie,
                                            Davide Manca
-------------------------------------------------------------
Ph.D. Davide Manca
CIIC Department
Politecnico di Milano
P.zza Leonardo da Vinci, 32
20133 MILAN - ITALY
For separate reply my e-mail is: 
davide...@polimi.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6]DB e TextBox

Buongiorno a tutti,
vorrei sapere come popolare delle text box con dati presenti in unDB. 
es.: nome tabella ---> Fornitori
       nome campi ---> IDfornitore
		        Nome
		        Indirizzo			
Ora mi spiego:
--------------
Private Sub Form_Activate()
 
Me.Caption = "DataBase = " & nomeDatabase
nomeTabella = Me.Tag
CN.Open "Provider = Microsoft.Jet.OLEDB.4.0; Jet OLEDB:Database
Password = " & frmTabelleDB.lblPassword & "; Data Source = " &
nomeDatabase
QR = "SELECT * FROM " & "[" & nomeTabella & "]"
RS.CursorLocation = adUseClient
RS.Open QR, CN, adOpenDynamic, adLockBatchOptimistic
' viene usato il blocco "adLockBatchOptimistic" per poter modificare
il
' contenuto delle celle di DataGrid1, senza che avvenga l'immediata
' registrazione nel database quando si passa dalla cella modificata
' ad un'altra cella.
'DataGrid1.Caption = nomeTabella
'DataGrid1.AllowAddNew = False   'non aggiunge la riga per
l'inserimento di
                                'un nuovo record
'DataGrid1.AllowUpdate = True    'consente la modifica del testo delle
celle
'Set DataGrid1.DataSource = RS   'costruisce la griglia del DataGrid1
e vi trasferisce i dati del recordset
Set frmMostraDB.Text1(i).Text = RS        <-----------
'se il recordset è vuoto, esce dalla routine
If RS.EOF = True And RS.BOF = True Then RS.AddNew: Exit Sub
End Sub
--------------
ecco fino a che popolo un DataGrid tutto ok ma per esigenza devo
inserire i dati in un array di text box. Purtroppo non so come fare.
Dove ho messo la freccia è dove penso vada no riempite le mie text. Ma
come? Grazie 1000.
Andrea.

 inserire i dati in un array di text box. Purtroppo non so come fare.
In ogni punto, quando RS è composto e disponibile, puoi ricavare ogni suo
campo con RS!nome_del_campo oppure RS("nome_del_campo").
Quindi Text1.Text=RS!NOME, oppure Text1.Text=RS("COGNOME")

>Quindi Text1.Text=RS!NOME, oppure Text1.Text=RS("COGNOME")
Grazie funge alla grande!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Liberare memoria! Come fare?

Ciao a tutti.
Come si può fare per controllare che nel mio codice non mi sia dimenticato
qualche recordset aperto che pian piano mi "mangia" tutta la memoria?
Esiste in fase di debug qualche cosa che tiene sotto controllo gli oggetti
aperti e segnala quelli non chiusi alla fine?
Grazie a tutti in anticipo.
Ciao.          Corrado.

Come si puņ fare per controllare che nel mio codice non mi sia dimenticato
