mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Gif Animate Come Visualizzarle in VB???

Ciao a tutti è la prima volta che posto qui....
Un aiuto ... qualcuno sa come potrei visualizzare in un form o in una
picturebox una gif animata?
Un grazie anticipato a chiunque mi aiuti..

Sul sito comune c'è un OCX che fa al caso tuo.
Ciao
Cesare Nicola
http://digilander.iol.it/cesare

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo on fly

E' possibile visualizzare un controllo del form come ad esempio una label
creandola durante l'esecuzione e non con l'editor ??
L.O.

 creandola durante l'esecuzione e non con l'editor ??
1) Metodo "classico" valido a partire da VB3 (almeno), non supportato dal
futuro 
VB.NET
:
crea in design un unico controllo e imposta la prop. Index = 0 e , se e' il
caso, Visible = False; in questo modo hai creato un array di controlli con
un unico elemento che funge da "template" per i successivi, per aggiungere
un nuovo controllo in esecuzione usa
Load MiaLabel(<indice>)
MiaLabel(<indice>).Move x,x,x,x
MiaLabel(<indice>).Visible = True
incrementando <indice> di volta in volta
2) Metodo nuovo valido a partire da VB6 e (spero) successivi:
Utilizza il metodo Add dell'insieme Controls, non richiede alcun intervento
in design
Dim MiaLabel As Label 'oppure 'Dim WithEvents ...' se serve
Set MiaLabel = Me.Controls.Add "VB.Label", "MiaLabel"
MiaLabel.Move x,x,x,x
MiaLabel.Visible = True
In pratica risulta quasi sempre piu' utile il primo...
Ciao
--
Luca Dormio
luca....@tin.it

 In pratica risulta quasi sempre piu' utile il primo...
Perchč?
Ciao
Alfonso

 wrote in message
9nnvg0$8m8jn$1...@ID-89238.news.dfncis.de...

Mi riferivo in particolare agli eventi.
Perche' spesso, e' solo la mia opinione, queste aggiunte di controlli al
volo vengono fatte per creare visualizzazioni dinamiche tipo griglia e
simili e risulta piu' semplice scrivere i gestori di evento avendo a
disposizione l'array di controlli.
Per i controlli aggiunti con 'Controls.Add' devi invece dichiarare le
istanze con
Dim WithEvents Text1 As TextBox
Dim WithEvents Label1 As Label
e quindi, se e' vero che i controlli li aggiungi dinamicamente, i gestori di
evento sono invece predeterminati... se decidi di aggiungere un TextBox in
piu' sei gia' fregato: puoi farlo ma rimane un "contenitore di property"
senza eventi.
L'ideale sarebbe poter combinare le due cose ma , sfortunatamente, non e'
possibile usare WithEvents con array di controlli...


 e' possibile usare WithEvents con array di controlli...
mesi fa avevo scritto una classe assurda che permetteva l'utilizzo di
withevents con gli array.. più tardi do' una raschiata al cestino, se la
ritrovo
la inoltro al sito comune :)
--
Fibia "Sakamoto" FBI

 wrote in message
9nps83$93vec$1...@ID-66902.news.dfncis.de...

Forse c'era anche un esempio su un numero di VB Journal... vedo di raschiare
anch'io ;-)


 ha scritto nel messaggio
news:9nnsjq$1e7i$1...@stargate1.inet.it...


 wrote in message
news:9nnsjq$1e7i$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: ShutDown remoto

qualcuno può indicarmi in che maniera posso realizzare da VB uno shutdown
 si scrive così ??  :-)  ) di un computer remoto?
Grazie a tutti..
Marcello


Usa il winsck(come bel Sito Comune) e metti un bel Call shell("rundll32.exe
user.exe,ExitWindows") X 9x
Ciao
--
Timothy Redaelli
timothy....@email.it

 wrote in message
9ced39$di30o$1...@ID-87006.news.dfncis.de...


 Marcello
Credo sia impossibile!!!!
Ciao


Ciao
basta che il client invii al server una stringa che venga interpretata come comando, ad esempio se
gli invia "Spegni", quello chiama la exitwindowsex...
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.msvbsite.net
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.it-lang-vb.net
---------------------------------------------------------------------------

 wrote in message
bs4ret092lc7clmbh...@4ax.com...


tipo : net time ecc...
mmm.....
ma se hai detto che sul server non deve girare niente, non puoi neanche per un momento dire al
server "fai qualcosa", la vedo dura...



Si potrebbe usare l' InitiateShutdown, in remoto se puň entrare come
administrator....
Se ti interessa ti mando la mia Dll (a proposito devi avere WinNT o 2k sul
server e credo anche sul client)
Cosě non dovresti scrivere NULLA sul server.


server e credo anche sul client)
Sě, ma a questo punto tanto vale lanciare sul server l'applicazione winsock...


 ha scritto nel messaggio
news:b3i2ftkk28ct9mm1l...@4ax.com...


 winsock...
Non č vero, se puň connettersi come Administrator via modem, puň spegnere il
computer a distanza SENZA scrivere NULLA sul server....


 Così non dovresti scrivere NULLA sul server.



Che server è con Win98, cmq te la mando, l'email è buona?
Anche se col 98 *SICURAMENTE* non funziona (API del c*zzo....)..


 wrote in message
9cuh98$fegkq$1...@ID-87006.news.dfncis.de...




Ah, in quel senso? Allora passo...


Crea un file con il notepad,  nominalo Spegni.asp
Inserisci queste istruzioni:
<% language=VBScript  %>
<%
set  wsh=server.createobject("WScript.Shell")
wsh.Run("rundll32.exe user.exe,ExitWindows")
%>
Con un Programma FTP Upload il file in una directory del server
In questo modo dovresti potere spegnere il tuo computer da remoto
Basta collegarti ad Internet all'indirizzo dopo si trova il file spegni.asp
esempio:  http:\\<indirizzo > / miaCartella / Spegni.asp  è qualcosa
succederà speriamo...
P.S. Ti sarei molto grato se potessi rispondermi per dirmi se è successo o
meno qualcosa
Grazie

 wrote in message
9cv3kt$k18$1...@nreadA.inwind.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: visual studio .net

vendo come da oggetto, versione professional originale mai registrato ne
attivato.
per informazioni shean chiocciola libero punto it
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 attivato.
A chi te lo sei rubato? :))
Cap.


 > attivato.
quanto?
alex
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.471 / Virus Database: 269 - Release Date: 10/04/2003

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Tipo di Dati

Quando eseguo la sub qui sotto riportata mi si genera
un'errore Overflow (errore 6)
Domanda al posto di Double cosa posso usare ??
Private Sub Command2_Click()
' 
2147483648
Dim temp As Double
temp = 
2147483648
temp = temp Xor 1 '
Debug.Print temp
End Sub
Ringrazzio.

Il 14/03/2004 15.25, virus scrisse:

Preggo!?
Stessa domanda 2 giorni fa:
http://groups.google.com/groups?dq=&hl=en&lr=&ie=UTF-8&threadm=%25Sq4c.37959%24z23.1683692%40news3.tin.it&prev=/groups%3Fdq%3D%26num%3D25%26hl%3Den%26lr%3D%26ie%3DUTF-8%26group%3Dit.comp.lang.visual-basic%26start%3D25
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

Newsgroup: it.comp.lang.visual-basic
Titolo: Connessione remota automatica

E' possibile avviare una connessione remota senza che venga visualizzata la 
finestra
con il tasto "componi", passando quindi direttamente alla composizione della 
stessa?
Con Rasphone riesco solo ad avviare la connessione, ma è lo stesso 
necessario
cliccare su "componi" per avviarla.
Grazie, Riccardo 

Riccardo wrote:

Possibile è possibile...
Però queste, sono sempre richieste a cui rispondo malvolentieri.
Qual'è esattamente la tua necessità di effettuare un connessione dial-up 
senza che l'utente debba intervenire?
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 
http://community.visual-basic.it/gianluca
Ho trovato come fare nelle MSDN, grazie lo stesso.
La mia necessità è quella di fare in modo che un pc, dopo l'accensione si 
colleghi direttamente ad Internet.
Questo PC deve servire da server a cui si devono collegare diversi utenti, e 
deve quindi essere sempre connesso.
Vorrei quindi fare in modo che l'intervento umano fosse limitato il più 
possibile.
Non preoccuparti. Non volevo che il tutto avvenisse di nascosto, senza che 
l'utente si accorgesse.
Non sto cercando di creare dialers o cose del genere.
Semplicemente non doveva essere necessario che chi accendeva il computer (ad 
esempio dopo una interruzione
di energia) dovesse anche avviare la connessione.
Cmq grazie lo stesso
Ciao, Riccardo

beh, sarebbe carino che facessi sapere anche a noi come hai fatto...
almeno così questo rimane un thread "chiuso e risolto"

 ha scritto nel messaggio 
news:1125521545.7...@f14g2000cwb.googlegroups.com...
beh, sarebbe carino che facessi sapere anche a noi come hai fatto...
almeno cosě questo rimane un thread "chiuso e risolto"
Dopo aver avviato la connessione con rasphone ho aggiunto una riga con
Senkeys  {Enter}
In questo modo non č necessario premere Connetti
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] metodo find di ADO e carattere ( ' )

scusate se forse la domanda potrà risultare banale, ma ho un dubbio e non
riesco ad uscirne.
uso il metodo in oggetto in questo modo:
        adoRS.Find "Descrizione = '" & txtCliente.Text & "'", ,
adSearchForward, 0
tutto funziona egregiamente, a patto che nella textbox non sia presente il
fatidico carattere (') apice singolo.
come posso fare per gestire questo inconveniente?
PS
Per completezza il DB è creato con access2000, per la connessione uso ADO

 ha scritto nel messaggio
news:2up1m8F...@uni-berlin.de...


 ha scritto nel messaggio
news:hpIhd.4773$p21....@tornado.fastwebnet.it...


 suo interno?
Te l'hanno appena detto.
La query non puň contenere l'apice nella descrizione del testo:
SELECT Nome, Eta
FROM TuaTabella
WHERE Cognome='DELL'ERA'
In questo caso la query č errata sintatticamente.
Per evitare ciň, devi fare in modo che la query venga costruita in 
questo modo:
SELECT Nome, Eta
FROM TuaTabella
WHERE Cognome='DELL''ERA'
con DUE apici nel punto in cui si presenta l'apice del testo da cercare 
(DELL'ERA -> DELL''ERA).
ERGO devi modificare il codice VB come ti hanno suggerito:
strFind = Replace$(txtCliente.Text, "'", "''")
adoRS.Find "Descrizione = '" & strFind & "'"
-- 
Quando noi ignoranti eravamo di piů, tutto era piů bello (A. Celentano).
  ___   _   ___ _  _______   _______ ___
|   \ /_\ | _ \ |/ / _ ) \ / /_   _| __|
| |) / _ \|   / ' <| _ \\ V /  | | | _|
|___/_/ \_\_|_\_|\_\___/ |_|   |_| |___|

 adoRS.Find "Descrizione = '" & strFind & "'"
chiedo venia, soltanto copiando e incollando il codice mi sono realmente
reso conto della stringa,
in effetti vedevo una sostituzione dell'apice singolo con un apice doppio,
invece che con 2 apici singoli!!!!!
Vi ringrazzio
PS
Ovviamente provato e funzionante!! :-))))

 invece che con 2 apici singoli!!!!!
Prova a guardare le impostazioni del tuo newsreader, e a usare un 
carattere fixed-size per leggere/scrivere sui NG :)


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

Debian, Redhat, SUSE, FreeBSD, Windows Servers
http://www.italiaserver.net


hai, hai, hai.
gli spammer qui capitano male.
infatti te ne puoi pure annnà a fanculo!
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.471 / Virus Database: 269 - Release Date: 10/04/2003

gli spammer qui capitano male.
pero' HAI ragione ;-)
-- 
ciao, hal
uhm, io a 15 anni distinguevo gia' i verbi dalle interiezioni ;-)

 uhm, io a 15 anni distinguevo gia' i verbi dalle interiezioni ;-)
tu dichi?
lol

Newsgroup: it.comp.lang.visual-basic
Titolo: data + ora acess..

salve a tutto ho un db in acces .
In una tabella salvo la data nel formato  data+ ora mi serve per altre tabelle.
ora xò vorrei reggruppara i record per data  ma se faccio un  group by data non funziona perche le 
ore sono diverse .
come posso fare?
"SELECT descrizione,data,count(*) as conteggio FROM operazioni WHERE data BETWEEN #" + inizio + "# 
AND #" + fine + "# GROUP BY data,descrizione"
inizio e fine sono in formato  mm/dd/yyyy
grazie

 by data non funziona perche le ore sono diverse .
Puoi raggruppare per una concatenazione di DATEPART (se Access supporta tale 
funzione), o per un FORMAT della data in un formato senza ora (sempre se 
Access supporta tale funzione), oppure per un DATEDIFF del campo data_ora, 
con granularità DAY, rispetto ad una data di riferimento, avente ora 00:00.
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene... 

con una stringa tipo questa?
"SELECT descrizione,format(data,'mm/dd/yyyy') as data2,count(*) as conteggio FROM operazioni WHERE 
data BETWEEN #" + inizio + "# AND #" + fine + "# GROUP BY format(data,'mm/dd/yyyy'),descrizione"
ho provato ma non funziona e dai vari help on


 ho provato ma non funziona e dai vari help on
Siccome sono abbastanza sicuro di quello che dico, ho provato:
SELECT format(data,'dd/mm/yyyy') as data2, count(1) as Conteggio
FROM tabella1
GROUP BY format(data,'dd/mm/yyyy');
e funziona perfettamente.


ma la data come la salvi?  come data e come data + ora?


 ma la data come la salvi?  come data e come data + ora?
La data è una campo data/ora di Access.
Per provare, avevo inserito diversi record, di cui due con stessa data ma 
orari diversi.
E il conteggio tornava 2, per quella data.

Newsgroup: it.comp.lang.visual-basic
Titolo: il drag+drop costa troppo?

ho installato access 2000, sperando che almeno il drag+drop da gestione
risorse l'avessero implementato. non se ne parla.
risultato: in questo momento, con access97 e 2000, aprire un db diventa ogni
volta un giro del perdono dalla common dialog.
mi sono detto: aggiungo "apri con access2000" alle opzioni in gestione
risorse.
1. bisogna mettere fra virgolette tutto il percorso, seno' non la capisce:
"C:\Programmi\microsoft office\office\msaccess.exe" %1
suppongo a causa dello spazio prima di office.
2. non la capisce comunque neanche se ci sono spazi nel nome del db:
provando con
C:\___\_ex_zip\Rubrica Telefonica\db1.mdb
mi dice:
"impossibile aprire C:\___\_ex_zip\Rubrica.mdb"
ma i programmatori ms si parlano ogni tanto fra loro ? o e' del tutto
inconcepibile che uno abbia piu' versioni di access ?

 wrote in message
8rd8ka$ha4qo$1...@ID-51318.news.cis.dfn.de...


 all'indirizzo qui sotto (il newsgroup lo leggo poco)
grazie mille, ti sei spiegato benissimo. l'idea e' ottima.
solo che in win2000 la cartella sendto e' sparita, ho appena cercato su due
installazioni.
ho provato a cercare col regedit "clipboard as name" che e' la dizione di
uno dei sendto installato dai vecchi powertoys w95, ma ho trovato solo
chiavi impraticabili.
correzione in corso: con tweaki sono riuscito a creare adesso
    invia a access 97
e
    invia a access 2000
e sembra funzionare.
ma se uno non ha tweaki come fa ? sai che si riesca a creare un "sendto" via
vb ?
grazie, a.

 installazioni.
C:\Documents and Settings\USERLOGIN\SendTo
-vibino

 pal,



prova a dare un occhiata in
"HKEY_CLASSES_ROOT\.mdb\ShellNew"
e in particolare alla stringa "Command" (per Access97)
su questo PC non ho installato Access2000, ma suppongo che il meccanismo sia
lo stesso; oppure prova a dare un occhiata al valore predefinito in
"HKEY_CLASSES_ROOT\.mdb"
e cerca la chiave
"HKEY_CLASSES_ROOT\(valore predefinito trovato)\Shell\Open\Command"
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: connettersi a sql senza password

salve a tutti
mi dovrei connettere ad un db sql server
e vorrei evitare di inserire tutte le volte la password
con quale istruzione posso passarla direttamente da codice ?
grazie

 ha scritto nel messaggio
news:abf1384e.04060...@posting.google.com...

Da 
www.connectionstrings.com
Standard Security:
"Driver={SQL Server};Server=Aron1;Database=pubs;Uid=sa;Pwd=asdasd;"
Trusted connection:
"Driver={SQL Server};Server=Aron1;Database=pubs;Trusted_Connection=yes;"
Prompt for username and password:
Conn.Properties("Prompt") = adPromptAlways
Conn.Open "Driver={SQL Server};Server=Aron1;DataBase=pubs;"
Ciao, Vincenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Vantaggi di un EXE activex rispetto un EXE standard

Scusate la domanda... ma ho iniziato a programmare in vb da pochi anni....
ho una serie di programmini, da me realizzati, che vorrei riutilizzare nelle
future applicazioni.
Debbo scegliere se compilarli come exe standard (soluzione più comoda in
quanto non dovrei procedere ad alcuna modifica) o activex.
Volevo sapere che vantaggi avrei a compilarli sotto forma di EXE activex?
Grazie a tutti


Se non son fatti per essere EXE ActiveX non avrai nessun vantaggio!
Gli EXE Activex puoi vederli come un incrocio di Exe Standard e Dll 
Acxtivex.
Nel senso che un Exe Activex può sia essere avviato da solo che utilizzato 
tramite gli oggetti che espone (come una DLL Activex). Ad esempio Excel puoi 
avviarlo da solo o usare gli oggetti che espone (mettendo un riferimento 
alla libreria di Excel) da un tuo programma in VB.
Come minimo dunque il tuo programma Exe Activex deve prevedere delle classi 
e non essere un insieme di form e moduli di codice.
Ciao,
    Diego

Newsgroup: it.comp.lang.visual-basic
Titolo: barra degli strumenti

Oggi ho provato a personalizzarmi la barra degli strumenti, suddividendo tutti i
controlli in piu' schede, per una piu' facile ricerca.
Con mio dispiacere, mi sono accorto che la barra degli strumenti non puo'
contenere piu' di 5 schede (compresa la "Generale" che e' gia' inserita).
Mi potete confermare quanto sopra?
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~
Gabriele Bertolucci - NT4WKSITA+SP3 - VB5PROITA+SP3
pbe...@vi.ats.it
http://members.spree.com/sip/pberto/
ICQ #: 9732192
~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~#~

...


Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO - lettura file DICOM

  Si dice DICOM o DYCOM ?
Ho la necessità, da un programma VB, di leggere dei file DICOM per poi
visualizzarne le immagine e magari anche il testo.
Sicuramente dovrò reperire un ocx da qualche parte, magari a pagamento.
Non è un problema.
Qualcuno mi sa aiutare ?
Grazie a tutti.
Gianfranco
la...@libero.it

 wrote in message
news:tBS96.2902$Ai2....@twister2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: VB collegato a database access in web server?

E' possibile collegarsi via VB5 ad un databse di access che ho sul server
web del mio sito. Con le pagine ASP sono riuscito a fare parecchie cose, ma
ora dovrei costruire un' applicazione che interagisce direttamente col
database da VB. E' possibile o e' un'utopia??
Grazie a tutti
Ciao
Federico

Prova a leggere un po' di documentazione sul provider MSRemote.
Luciano.

 ha scritto nel messaggio
news:9hsr2e$6pv$1...@nreadA.inwind.it...


 database da VB. E' possibile o e' un'utopia??
ti consiglio due articoluzzi ghiotti
sito comune
http://www.it-lang-vb.net/Documentazione/Articoli/DBRemoto.htm
mio sito
http://vbsimple.virtualave.net/activity/act_15.htm
onore a Moreno per aver scritto questa meravigliosa soluzione
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #25 delle Mitiche Brigate Takahashi sezione Sud

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] SPAM... non ho parole :)

Ecco una degli ultimi titoli arrivati per e-mail:
"sick of deleting spam email !? Spam Remedy kills all spam automatically"
Esterefatto chiedo... cosa bisogna pensare dei post cosě?
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Esterefatto chiedo... cosa bisogna pensare dei post cosě?
Cosa vuoi che si possa pensare di un programma antispam reclamizzato tramite
spam?
E' come se un obeso facesse la pubblicita' ad un dimagrante...;-)
-- 
Ciao!
   -DocDoc-
--- Per scrivermi: 
do...@despammed.com
Sei anche tu stanco dei messaggi spam? Usa Terminator, il programma
anti-spam italiano FREEWARE! 
http://www.sertel.net/terminator/

 Esterefatto chiedo... cosa bisogna pensare dei post cosě?
Esterrefatto rimango io !
Ancora detti trovano lettori.
giuseppeD

 Esterefatto chiedo... cosa bisogna pensare dei post cosě?
"schizofrenia di uno spammer" ?
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto con i Data

Ciao sono Marco . Sto scrivendo per chiedere se riuscite a risolvermi alcuni
problemi con Visual Basic.
1. Ho un Textbox che a seconda di quello che è scritto nel caption di un
Label deve collegarsi ad un Data preciso (Es. Nel caption del Label1 c'è
scritto "Marco", quindi il textbox deve prendere i dati del DataMarco,
invece se c'è scritto nel Label1 "Rosario" deve prendere i dati del
DataRosario.)
2. Ho un Listbox che a seconda del text di un ComboBox deve inserire
determinati dati nel list del Listbox.
3.Ho un DbCombo collegato ad un Database precisamente al campo "Posto in
classifica", come faccio a spostarmi di record in record selezionando una
voce del DbCombo? (Es. Seleziono nel DbCombo 3° posto e automaticamente mi
dovrebbe spostare il Data al record 3)
Vi ringrazio in anticipo ciao.

dovrebbe spostare il Data al record 3)
il dbcombo non sposta il record ma popola solo la list con i dati
provenienti da un datacontrol
per  spostare il datacontrol  puoi usare la prop selecteditem del dbcombo
che restituisce il bookmark del record selezionato (se usi un db che
supporta il bookmark come access) fai cosi:
data.bookmark =dbcomboselecteditem
Ciao stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: ?[vb6]oggetto command

per creare un nuovo oggetto command basta fare
dim CMM as ADO.Command
ma come lo si inizializza?
inoltre lo devo par puntare ad un recordset esistente RCS
set CMM...... = RCS
cosa ci va al posto dei punti?
grazie mille
ciao, Daniele

dimenticavo:
il CMM lo devo assegnare al Datamember di un Datareport
oppure indicatemi un altro metodo per assegnare a runtime il recordset
ad un Datareport
grazie


 wrote in message 39883E98...@beta80.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: richiesta HTTP - non ce ne vengo fuori

dev'essere una banalità, ma ricercando su google non riesco ad ottenere 
la risposta che mi serve..
in 
ASP.NET
, ho bisogno di inviare una richiesta HTTP e di leggerne il 
responso.
googolando, trovo riferimenti all'oggetto HTTPWebRequest, ma tale 
oggetto lo trovo solo nell'ambiente di sviluppo per applicazioni 
standalone, mentre per le applicazioni WEB non c'è...
ho provato ad usare HTTPRequest, ma non sembra essere di aiuto..
come si fa???
grazie
giovanni

 wrote in news:200811140849526050
@
mynewsgate.net
:

probabilmete non hai messo i riferimenti corretti; se un oggetto c'e' nel 
framework, c'e' sempre, non e' che sparisce se cambi il tipo di progetto.
questa e' una richiesta POST copiata da una pagina aspx:
Dim req As Net.HttpWebRequest
Dim reqStream As IO.Stream
Dim reply As Net.HttpWebResponse
Dim replyStream As IO.Stream
req = Net.HttpWebRequest.Create(WEB_URL)
reqStream = req.GetRequestStream()
reqStream.Write(postBytes, 0, postBytes.Length)
reqStream.Close()
reply = req.GetResponse
replyStream = reply.GetResponseStream
leggi poi il contenuto di replyStream e hai la tua risposta.
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: bilanciamento delle operazioni!!!

Salve gente...
Volevo chiedere a voi che sicuramente siete piu' esperti di me, come poter
eseguire piu' processi nello stesso momento utilizzando visual basic.
Spiego in maggior dettagli:
sto cercando di fare un'applicazione che dovra' elaborare un certo pacchetto
UDP che mi arriava da una qualsiasi macchina, questo pachetto in una
variabile di una classe, e poi elaborare i dati di questo pacchetto.
Il problema e' che questa elaborazione e' molto lunga e nel fra che sta
elaborando il pacchetto appena letto, devo avere la possibilita' di prendere
un eventuale nuovo pacchetto ed generare un'altro oggetto.
In questo genere di programmazione sono veramente estraneo e mi servirebbe
qualche spiegazione (magari con esempi) o anche qualche riferimento sulla
MSDN.
Io avevo pensato a delle activex EXE in modo da far aprire altri piccoli
programmi che elaborano i dati, ma mettendo la gestione degli eventi a tale
Activex, non riesco a generarne degli array.
E poi cmq sia per fare questo multithread c'e' sempre di mezzo sto timer!!
Non esiste un modo alternativo visto che dovrei generare n sessioni ?
Grazie in anticipo a tutti coloro che mi aiuteranno.. E spero in un domani
molto prossimo che le nottate che faccio mi diano la possibilita' di
ricambiarvi!

Activex, non riesco a generarne degli array.
E' una soluzione dispendiosa in termini di tempo e risorse.
--
Roal Zanazzi
z...@iol.it

...



Intanto dai un'occhiata sul Sito COmune di questo newsgroup:
www.murialdo.it/it_lang_vb
mi pare ci sia un esempio di multithreading.
Per quanto riguarda l'API, dovresti specificare di quale funzione stai
parlando (quale delle diverse GetThread***, visto che non mi pare esista
GetThread.)
E riporta anche la declare che utilizzi.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Jpg in visual bsic... Aiuto

Come si può far convertire un'immagine a Visual Basic, ad esempio da bmp a
jpg ?
Da quello che so devrebbe essere necessario un ocx costoso.
Qualcuno conosce un'alternativa gratis?
Secondo problema molto + semplice:
come si fa ad fare ottenere come risultato le dimensioni reali in pixel di
un'immagine bmp?
Io come stratagemma ho impostato le proprietà di PictureBox Control a
autosize. Poi gli faccio caricare un'immagine, e mi faccio restituire i
parametri di width e height dal PictureBox Control.
Qualcuno conosce un metodo più veloce ed efficente ?
Grazie a tutti.
Ciao

...

1) se usi vb6 (il cinque mi pare, ma non ne sono sicuro) il .jpg e il .gif
sono supportati, quindi per convertire un'img. basterebbe caricarla in una
picturebox e poi salvarne il contenuto con .SavePicture().
2)E' molto più semplice di quanto può sembrare:
    ti servono 2 strutture (le trovi nel Win3xApi.txt)
    a)BITMAPFILEHEADER
    b)BITMAPINFOHEADER
    poi
    Dim bfh as BITMAPFILEHEADER
    Dim bih as BITMAPINFOHEADER
    Open "Bitmap.bmp" for binary as #1
        get 1,1,bfh
        get1,,bih
    Close #1
    adesso in bih.biWidth hai la larghezza e in bih.biHeight l'altezza.
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: Programma x creare un help

Esiste un buon programma che permetta di scrivere l'help di un programma e
poi di allegarlo a un progetto di VB6???
Possibilmente in italiano e che possa ricercare le parole di un determinato
argomento...
scusate se e' troppo... grazie...

 poi di allegarlo a un progetto di VB6???
la microsoft ha fatto "HTML Help", cercalo su
download.microsotf.com
bye
Vale

 
download.microsotf.com
E' da un po' che lo cerco, ma sul sito MS non riesco a trovarlo. Se lo cerco con
Google, mi rimanda a pagine MS non più esistenti.
C'è qualcuno che ha un url diretto?
Grazie!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)


prova questi...
//
download.microsoft.com/download/msdnlib/Install/1.32/W9X2KMeXP/EN-US/HelpD
ocs.ZIP
//
download.microsoft.com/download/msdnlib/Install/1.32/W9X2KMeXP/EN-US/hhupd
.exe
//
download.microsoft.com/download/msdnlib/Install/1.32/W9X2KMeXP/EN-US/htmlh
elp.exe
//
download.microsoft.com/download/msdnlib/Install/1.32/W9X2KMeXP/EN-US/htmlh
elpj.exe
ciao ciao

 ha scritto nel messaggio
news:aamc3t$t1j$1...@newsreader.mailgate.org...

Graziole!


> Graziole!
 ciočbbelin sono troppo un mito!
:-)
Newsgroup: it.comp.lang.visual-basic
Titolo: inserimento gif

Salve a tutto il NG
Ho provato ad inserire una gif anima all'interno di un controllo picturebox
e in uno image ma il risultato non cambia: la gif resta fissa e non si
anima...
Come posso fare??
Grazie a tutti...

 ha scritto nel messaggio
news:61mDa.66362$g92.1...@news2.tin.it...


secondo me puoi farla vedere dentro il webbrowser anche senza codice html,
quindi anche senza star lě a scrivere una pagina html fittizia......
hai mai provato da Explorer a far aprire direttamente un'immagine, anche gif
animata?
la vedi eccome!!!
good coding!!!
-- 
Damiani Liborio Igor
ig...@igordamiani.it
 - 
soft...@igordamiani.it
 - 
idam...@hotmail.com
http://www.igordamiani.it
ICQ : 11847262

Ti invio la gif89.dll che ovviamente dovrai copiare insieme alle altre
(\windows\system) e caricare nei componenti di VB.
L'utilizzo è semplicissimo. Trasporta il controllo nel form, se vuoi che la
gif sia sempre animata fin dall'inizio dell'apertura del form basta che
inserisci il percorso ove è situata la tua gif nella proprietà FILENAME,
altrimenti la andrai poi a richiamare in un evento con la sola riga di
comando:
nomegif.filename = "c:\temp\smile.gif"
ed il gioco è fatto, se hai bisogno di altre info a riguardo io sono a tua
disposizione.
Saluti Elio
--------------------------------
Inviato via 
http://usenet.libero.it

 quindi anche senza star lì a scrivere una pagina html fittizia......


Newsgroup: it.comp.lang.visual-basic
Titolo: DLL Entry Point

Ho scritto una DLL in C++ 6.0.
Dal programma VB 6 che la dovrebbe utilizzare ottengo sempre il messaggio
che non e' possibile rilevare il punto d'entrata della routine chiamata.
Suggerimenti?
Grazie
Enzo Franchini

 wrote in message
news:8onoju$2n9$1...@nslave1.tin.it...


 wrote in message
8oo2ha$280a$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Proprietà PrinterDefault

Salve a tutti
Come da oggetto il mio problema è questa volta la proprietà PrinterDefault.
Si, perchè funziona solo in parte.
Infatti memorizza come stampante di default la stampante indicatagli
dall'utente nel CommonDialog, ma non memorizza affatto le impostazioni
scelte, come il colore e la qualità di stampa....qualcuno sa perchè? una
soluzione?
Grazie a tutti

[*Giuseppe Marini* = 
giusepp...@katamail.com
 in
news:VqLwb.94706$
hV.35...@news2.tin.it
] ha scritto:

Qui 
http://makeashorterlink.com/?V3FE26F34
 c'è qualcosa che serve a superare
certi problemi in ambiente NT/2000/XP...

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto errore di automazione





Ho creato un applicazione che visualizza un oggetto 
browser ed permette l 'esportazione su excel e word


Quando creo il programma di installazione con 
visual studio installer 1.1 o creazione guidata pacchetti di installazione tutto 
bene


Se installo il programma su un computer diverso nel 
momento in cui apro la finestra in cui uso il browser o quando cerco di 
esportare su word o excel si verifica un errore di automazione.


Sicuramente manca qualche libreria.


Qualcuno sa aiutarmi?


        
                
                
                
                
                
                
                
grazie per ogni aiuto


        
                
                
                
                
                
                
                
Michael


 



 wrote in message
news:OE19lU21T1UuO...@hotmail.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: Run a stor proc and OUTPUT parameters

 End Sub
Thanks in advance!

 wrote in message
news:42a43c0e.03081...@posting.google.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: file .help

C'è qualcuno che sa dirmi se è possibile tradurre i file .help? Se si come?
Grazie. Sergio

 Grazie. Sergio
posto che tu intenda i file .hlp --
tradurre, come ?
io usavo uno smartdoc share, che li avrebbe dovuti convertire in txt. a
parte il funzionamento rapsodico, dopo varie risme e foreste di pioppi
sprecate, mi tengo gli hlp a video.
cmq. se ci tieni, ti cerco il riferimento.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: MAPI

Ciao a tutti,
ho scritto un programmino in Word97, una specie di rubrica stile outlook
express.
Ora però avrei necessità di poter controllare da questa la posta
elettronica, senza
però creare istanze di outlook. Il metodo potrebbe essere quello di gestire
l'API, anzi la MAPI di win9x, ed è qui la mia richiesta: qualcuno
gentilmente
potrebbe fornirmi il codice relativo ovvero indirizzarmi ad un sito di
sicuro
interesse!?
Ve ne sarei oltremodo grato....!!!!!
PS ho già visitato un sito degnalatomi da un lettore, ma non penso che vi
sia
qualcosa che faccia al mio caso. 
http://www.vbapi.com/ref/funcc.html

Ve ne sarei oltremodo grato....!!!!!
la solita 
msdn.microsoft.com
: se cerchi MAPI ti inonda di links :)
(anche se la maggioranza degli esempi e' in C++ :(
ma magari questo aiuta:
PC MAPI: Visual Basic Example for C Code in Tech Reference 
ID: Q122998 
ce n'e' uno pure a 16 bit:
ACC: Sending a MAPI Mail Message Using Access Basic (1.x/2.0) 
ID: Q99403 
se puoi usare gli ocx in word:
HOWTO: How to Send/Receive E-Mail Messages with Visual Basic 
ID: Q185171 
su 
www.google.com
 cerca:  mapi +"visual basic" -cdo
tra cui ho trovato:
http://www.ifrance.com/stephanew/vbMAPI.htm
http://abstractvb.com/learn.asp?CID=82
http://kitap.ankara.edu.tr/0672308371/vbu25.htm
ciao, hal

 ha scritto nel messaggio
news:9aas4q$4c37r$1...@ID-56381.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: Ancora sul DOS

Salve a tutti,
ringrazio molto Igor Liborio Damiani per la risposta,
ma purtroppo l’istruzione sendkeys, come ho letto su
un sito specializzato, non funziona con la finestra
del DOS.
Quindi, per inviare un comando, non ho trovato di
meglio che
applicazione = Shell("C:\WINDOWS\
COMMAND.COM
 /k" &
comando, vbMaximizedFocus)
ma in questo modo posso inviare un comando solo, e per
inviarne due devo aprire due finestre DOS distinte, il
che è un pò scomodo per un utente che deve leggere
l’output del DOS.
MSDN non dice molto altro, un altro sito suggerisce di
passare per la clipboard con il codice
Clipboard.Clear
Clipboard.SetText comando & Chr(13)
AppActivate "MS-DOS prompt"
SendKeys "% ep", True
ma non mi funziona lo stesso. Perché?
Quindi, vi chiedo: qualcuno sa se esiste un modo per
aprire una finestra DOS e inviare ad essa due comandi
distinti uno dopo l’altro?
Ho provato a passare alla funzione Shell la stringa
"/k" & comando & chr$(13) & comando2
ma non funziona lo stesso.
Inoltre, già che ci sono (ma sarei già contento se mi
rispondeste alla domanda suddetta, non voglio
"sovraccaricarvi" !!): come si fa a "catturare"
l’output del DOS e metterlo in una stringa?? E come si
fa a chiudere la finestra del DOS?
Sarò veramente molto grato a chi mi risponderà,
infatti ho realizzato un piccolo editor che consente
di digitare velocemente programmi in C, l’unica cosa
che non riesco a fare bene è farlo interagire con il
DOS per compilare ed eseguire i programmi.
Giulio Simeone
=====
Giulio Simeone 
sito web : 
http://utenti.tripod.it/Giulio_Roma
e - mail : 
airo...@yahoo.com
______________________________________________________________________
Do You Yahoo!?
Il Nokia Game è on line! Clicca qui per iscriverti e partecipare alla nuova avventura multimediale entro il 3 novembre. 
Vai alla pagina del gioco 
http://it.promotions.yahoo.com/info/nokiagame.html
!
-- 
Posted from 
web12904.mail.yahoo.com
 [216.136.174.71] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:2001101923572...@web12904.mail.yahoo.com...


 ha scritto nel messaggio
news:2001101923572...@web12904.mail.yahoo.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Usare WinSock di VB6 con VB5

Ciao a tutti,
sapete se č possibile usare il componente WinSock del VisualBasic 6 in 
VisualBasic 5 e se č diverso?
sapete anche come?
sapete anche dove posso trovare i files?
Scusate l'eccesso di domande
Ciao a tutti
Marco R.

 sapete anche dove posso trovare i files?
sul tuo computer: sono già lì
vai in componenti aggiuntivi di VB e lo troverai lì

 sapete anche dove posso trovare i files?
Io ho VB5 con WinSock di VB5, mi serve WinSock di VB6.
Ciao
Marco 

non mi sono capito ;-)
winsock NON (*NON*) è un pezzo di vb6 o vb5, ma di WINDOWS.
è un OCX, quindi non è di vb6, ma è di vb6, di windows, di foxpro,
di c++, dipascal, di word... di chi lo usa.
certo che se prendi un componente winsock da un pc e lo metti in un
sorgente, poi porti il sorgente su un pc in cui hai una versione
precedente dell'OCX, potrebbe dare rogne.
devi aggiornare IL COMPONENTE ( e non so se installando vb6 ne mette un
altro, come non so se installando un service pack di windows venga
cambiato, e se installando word 2003 venga cambiato)...e reinserirlo
nel sorgente.

 devi aggiornare IL COMPONENTE
Sai come si fa?
Grazie,
Ciao
Marco

non mi sono capito ;-)
winsock NON (*NON*) è un pezzo di vb6 o vb5, ma di WINDOWS.
è un OCX, quindi non è di vb6, ma è di vb6, di windows, di foxpro,


 Sai come si fa?
distribuisci la tua applicazione con un pacchetto di
setup che includa i componenti usati.
-- 
ciao, hal

trovi il file aggiornato (e magari quello che hai è già l'ultimo...
quello che io mi sono trovato su XP funziona perfettamente)
deregistri il vecchio regsvr32 -u nomefile
copi il nuovo
lo registri regsvr32 nomefile.
...o installi un qualsiasi kit che lo contenga + nuovo.
comunque non ti dannare: winsock FUNZIONA piuttosto bene.



 sapete anche dove posso trovare i files?
http://support.microsoft.com/directory/article.asp?ID=KB;EN-US;Q193366&
attenzione alla "&" finale.
Bye, G.

 del suo kernel troveremmo pure codice del 1980 :->
Vero, io ho avuto modo di dare un'occhiata ai sorgenti di windows 2000 e
sono rimasto molto sorpreso di trovarci parecchio codice trasportato pari
pari da windows 95 ;-)

Perfetto,
grazie,
ottimi link.
Ciao
Marco R.
"Paperino" <non...@lo.dico> ha scritto nel messaggio 
news:db68v7$elc$1...@stargate1.inet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con i form senza BorderStyle

Ciao a tutti,
come faccio a capire quando il mio form (settato come on top) senza
BorderStyle ( e cioč settato a 0 ) non č piů la finestra con il focus?
Purtroppo non riesco a intercettare quando prende o perde il focus, qualcuno
di voi puň aiutarmi?
Grazie

di voi può aiutarmi?
Form_LostFocus e Form_GotFocus non funzionano?
Fammi sapere
Ciao
Aran Banjo

Newsgroup: it.comp.lang.visual-basic
Titolo: Tabelle con carattere -

Salve a tutti,
ho questo problema, ho acquisito un DB Access2000 in SQL Server, ma alcune
tabelle sono Nominate con il Carattere Meno, es.: TAB-Marche, e al momento
di assegnare l'ADO a questa tabella all'avvio del Programma mi da "...Errore
di sintassi dopo '-'".
Suggerimenti?
Grazie a tutti.
Max

di sintassi dopo '-'".
Se vuol dire che apri un recordset sulla tabella allora prova a
racchiudere il nome della tabella fra parentesi quadre
ciao

 ha scritto nel messaggio
news:ad2am0dr1fvq8r4gf...@4ax.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: Problema in VB6 con apertura database

O che sono scemo io, o...
Allora, ho aperto un nuovo project (standard exe).
Ho scritto queste righe di codice:
Private Sub Form_Load()
Dim db As Database
Dim rs As Recordset
Dim descrizione As String
Set db = workspaces(0).opendatabase(App.Path & "\produzione.mdb")
Set rs = db.openrecordset("Anagrafica articoli")
descrizione = rs("An_Descri")
Debug.Print descrizione
End Sub
L'esecuzione mi da' errore alla PRIMA RIGA!!
Dim db As Database
Compile error: User-defined type not defined.
Non credo che il tipo database sia un user-defined. Cosa succede??
grazie per i suggerimenti.

Devi mettere come riferimenti "Microsoft DAO 3.5", altrimenti non riconosce
l'object.

confermo
Cristiano Larghi Micronix2 <C.La...@Micronix.it> wrote in message
7rdm96$9pp$1...@fe2.cs.interbusiness.it...


Io ci ho rinunciato.
quando devo utilizzare un Db di Access 2000, me lo converto alla versione
precedente dal menu di Access
--
Posted from 
romeo.logikos.it
 [193.70.26.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

 wrote in message
7rdlt1$28n$1...@pinco.nettuno.it...


 wrote in message
7rdo98$nr5$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: creare un break temporaneo nel codice

Come posso fare a creare un break temporaneo nel codice.
tipo creo un istruzione e voglio che a meta lettura
per un secondo si blocca il codice
e poi riprende!..
Grazie

 Come posso fare a creare un break temporaneo nel codice.
manda a dormire il pc.
si, lo so, è una battuta vecchia: vuol dire utilizzare l'api "sleep"
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo
Newsgroup: it.comp.lang.visual-basic
Titolo: parametro tipo str da passare in sql per ado

Prego potete rispondere ad "un" mio limite?
In input ho due cifre (passatoX) tipo str  la sql deve selezionarmi tutte le
stringhe che hanno i primi due caratteri uguali al contenuto della
variabile,  ma questo codice  non funziona:  penso sia problema di sintax
Tenete conto che programmo per hobby
vi ringrazio
 oCmd3.CommandText = "Select prodotti.codice From prodotti Where
(prodotti.codice like '?*' )"
oCmd2.Parameters(0) = passatoX
   Set rstC3 = oCmd3.Execute()

    Set rstC3 = oCmd3.Execute()
oCmd3.CommandText = "Select codice From prodotti Where
left(codice,2)=left(passatox,2) )"
va?
perche' usi un command per una select ? chiedo, non sono pratico.
ciao

 wrote in message atr54q$1tjlm$1...@ID-51318.news.dfncis.de...


 ha scritto


 left(codice,2)=left(passatox,2) )"
Meglio sarebbe:
oCmd3.CommandText = "Select codice From prodotti Where left(codice,2)='" &
left(passatox,2) & "'"

 left(passatox,2) & "'"
y :)

 wrote in message atr7i1$1t3s5$1...@ID-51318.news.dfncis.de...


 wrote in message atsjbf$1q9ap$1...@ID-51318.news.dfncis.de...


non funziona?
Like in sql funziona benissimo.
-- 
ciao, hal

 wrote in message atr7i1$1t3s5$1...@ID-51318.news.dfncis.de...


Dai un'occhiata ai paragrafi dedicati al "Quoting", grazie ;-)
http://www.geocities.com/SiliconValley/Circuit/9810/Page7.html
http://herbert.the-little-red-haired-girl.org/en/quoting/
http://www.marco5x.net/usenet/quoting.php
-- 
ciao, hal

 in sql non funziona?
Il tuo primo comando:
oCmd3.CommandText = "Select prodotti.codice From prodotti Where
(prodotti.codice like '?*' )"
oCmd2.Parameters(0) = passatoX
   Set rstC3 = oCmd3.Execute()
prevede un parametro. Io non li uso, nè ne conosco la sintassi, ma ho la
sensazione che quel oCmd2.Parameters... debba essere un oCmd3.Parameters.
Inoltre, se ti interessano i primi due caratteri, cambierei in
oCmd3.Parameters(0) = Left(passatoX,2)
Sempre per supposizione, immagino che il parametro prenda il posto di quel
"?" verso la fine dell'istruzione SQL. Stai usando ADO, quindi l'asterisco
che segue, deve diventare % per indicare "qualsiasi cosa a seguire".

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: ADODC e DBGrid: form Master/Details con zero records nella sezione dettagli

Gentili sviluppatori,
ho un problema che non riesco assolutamente a risolvere e che secondo
me ha dell'incredibile. 
*PREMESSE*
Ho un form di ricerca, con i dati salienti di tutti gli ordini. Doppio
click apre un form master/details in cui troviamo due controlli ADO:
ADODC1.RecordSource: "select * from co_ordtes where cote_id= " & ID
dell'ordine cui è stato fatto il doppio click;
ADODC2.RecordSource = "select * from co_orddet where code_cote_id = "
& ID dell'ordine cu cui è stato fatto il doppio click
Quindi, mentre ADODC1 recupera la tesatta dell'ordine, ADODC2 recupera
per ogni ordine le varie righe di dettaglio.
Sul Form si trova un controllo datagrid che ha come fonte dati ADODC2.
Inoltre, il medesimo controlo consente l'aggiunta di nuovi record.
*IL FUNZIONAMENTO (TEORICO)*
Supponendo già esistenti le testate dei vari ordini, l'utente deve
richiamarle, entrate nella griglia dettagli di ciascun ordine ed
inserire i dati ivi richiesti.
*IL PROBLEMA*
Nella maggio parte dei casi, quando l'utente apre un ordine, la
griglia dettagli è vuota. Non appena inizia ad inserire i dati si
possono verificare due casi:
CASO A) tutto va bene, il nuovo record dettagli viene correttamente
inserito
CASO B) esce fuori un messaggio di errore: "CONTROLLO MICROSOFT
DATAGRID - LA RIGA CORRENTE NON E' DISPONIBILE".
*LE CONCLUSIONI*
In pratica, alcune volte, non avviene l'inizializzazione del record.
In particolare, appena entrato nell'ordine, le proprita' elencate
hanno i seguenti valori:
	DataGrid1.Bookmark			=
	Adodc2.Recordset.BOF			= VERO
	Adodc2.Recordset.EOF			= VERO
	Adodc2.Recordset.Supports(adAddNew)	= VERO
Se tutto va bene, appena si inizia a scrivere nella griglia:
	DataGrid1.Bookmark			= 1
	Adodc2.Recordset.BOF			= Falso
	Adodc2.Recordset.EOF			= Falso
	Adodc2.Recordset.Supports(adAddNew)	= VERO
Altrimenti, 
	DataGrid1.Bookmark			=
	Adodc2.Recordset.BOF			= VERO
	Adodc2.Recordset.EOF			= VERO
	Adodc2.Recordset.Supports(adAddNew)	= VERO
...e cio senza nessun apparente motivo logico.
 
Siccome sono certo che almeno qualche altro si sarà trovato alle prese
con il medesimo problema, volevo sapere quali soluzioni mi consigliate
di adottare.
A.



Ho risolto il problema con le seguenti righe di codice impostate
sull'evento Form_Load:
Set DataGrid1.DataSource = Adodc2
DataGrid1.ClearFields
DataGrid1.ReBind


 wrote in message
news:2sd8uskhemhbdof39...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Help API

Ciao a tutti,
vorrei chiedervi una cosa estremamente importante, vorrei sapere come si
usano le Api di windows.
Ho trovato questa Api Avifil32.dll come faccio a vedere come posso
utlizzarla e come dichiararla premetto che è una cosa che non ho mai fatto.
Se per favore mi spiegate passo passo come si usano le dll ve ne sarei molto
grato.
Grazie a tutti voi.
--------------------------------
Inviato via 
http://usenet.libero.it


Prima di usare le dll ti consiglio di provare a vedere i componenti (CTRL T
quando sei nell'ide di vb) di vb.
Se ti basta mostrare un filmato avi puoi usare il controllo MCI.
Se vuoi fare qualcosa di piu' complesso c'e' ActiveMovie.
Nella msdn trovi della documentazione su come usarli.
ciao
Paolo B.

Grazie di tutto
purtroppo vorrei rifare virtual dub ed ho un po di problemi... :-) cmq
grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Progressbar.ocx

Salve a tutti sapete dove posso scaricare Progressbar.ocx?
Grazie

 ha scritto nel messaggio
news:afeiqs$cuf$1...@lacerta.tiscalinet.it...


 > Grazie
usare i controlli comuni di ms windows pare brutto ?
project | components -> ms windows common controls
nb: scriverselo e' un buon esercizio, e risulta piu' leggero.
pero' quello ms e' pronto e comodo.
--
ciao, j.
www.sundaysw.com

Newsgroup: it.comp.lang.visual-basic
Titolo: mi sfugge...

Con
if error then goto Errore
oppure
if a=2 then Exit sub
tutto bene
Invece con
If Red > 255 Then Red = 255
Pur con lo stesso sistema operativo (XP), magari diversa versione, mi 
segnala un errore (per la verità mi scrive come err.number = 0 il che è 
già strano di per sè).
Se "correggo" chiudendo l'IF con
 
If Red > 255 Then
	Red = 255
End if
 
Tutto va a posto. mai visto una cosa del genere!
Da cosa può dipendere?
-- 
Gulp®

 Da cosa può dipendere?
 
Secondo me devi rivedere come  hai distribuito il flusso.
Nei primi due esempi tu fai un "salto" condizionato nel flusso di 
esecuzione del programma. Nel secondo caso no.
 
Se tu hai qualcosa del tipo eseguirai comunque ciò che si trova dopo 
"Errore:":
 
Public Sub TuaSub()
   On Error GoTo Errore
 
   If Red > 255 Then Red = 255
 
   Errore:
      ' Istruzioni
End Sub
 
 
 
Invece con il seguente adattamento no:
 
Public Sub TuaSub()
   On Error GoTo Errore
 
   If Red > 255 Then Red = 255
 
   Exit Sub
Errore:
      ' Istruzioni
End Sub
 
 
 

 Da cosa puï¿œ dipendere?
 
Ha ragione Loganino.
 
In pratica se tu metti un'etichetta per la gestione dell'errore come ad 
esempio:
 
...
Errore:
msgbox err.number
 
nell'etichetta ci salterï¿œ se avviene un errore, ma ci passerï¿œ anche se 
non ne avviene nemmeno uno se tu subito prima no ci metti un exit sub o 
exit function.
 
Errore 0 significa semplicemente che non si ï¿œ verificato alcun errore.
ciao
stefano