mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: struttura e cbsize

Vorrei capire meglio questo fatto del bsize emerso qualche post
addietro.
Ho questa struttura
Type BITMAPINFOHEADER
    biSize As Long
    biWidth As Long
    biHeight As Long
    biPlanes As Integer
    biBitCount As Integer
    biCompression As Long
    biSizeImage As Long
    biXPelsPerMeter As Long
    biYPelsPerMeter As Long
    biClrUsed As Long
    biClrImportant As Long
End Type
Il valore biSize corretto è 40?
ma a casa mia 4x11=44
Forse il biSize non si conta?


Mi pare che biPlanes e biBitcount siano definiti Integer (Short), quindi 
contano per 2 e non per 4.
Bye
Raf 

 per cui la dimensione della struttura e' 4 * 9 + 2 * 2 = 40
GRAZIE
Grazie mille
Newsgroup: it.comp.lang.visual-basic
Titolo: aiutoo!!! urgente su file registry!!!!!

Salve a tutti,
vi pongo una questione che mi ha lasciato spiazzato:
mi occorre uno script ( se esiste ) che mi permetta di leggere o scrivere
dei valori delle chiavi del registry per
riportarle all'interno di un campo in un file HTML o Java Script.
Domanda: E' possibile implementarlo in Java Script?
                E' meglio usare VBScript?
                Qualcuno ha qualcosa di simile sul suo hard disk?
                Qualcuno mi aiuti........aaarrrrrrrggggggghhhhhh!!!!!
Disperato!!!!!
roby...@tiscalinet.it
roberto.m...@libero.it

                 Qualcuno mi aiuti........aaarrrrrrrggggggghhhhhh!!!!!
Se trovo qualcuno che lo fa su una pagina che apro col browser, lo sbrano !
Si', pal, lo so che congiuntivo e condizionale esistono ancora, ma avrebbero
perso forza ! :-)
Ciao
Aldo

                 Qualcuno mi aiuti........aaarrrrrrrggggggghhhhhh!!!!!
Se trovo qualcuno che lo fa su una pagina che apro col browser, lo sbrano !
Si', pal, lo so che congiuntivo e condizionale esistono ancora, ma avrebbero
perso forza ! :-)
Un Hal paranoico o°-)

Newsgroup: it.comp.lang.visual-basic
Titolo: problema con le icone

Ho associato delle icone a una image list, poi ho associato la image list
alla listview e ho fatto apparire in fase di esecuzione le icone.
Ora però devo associare alle icone così visualizzate degli eventi, es. la
pressione del tasto sull'icona, come devo fare(visto che in fase di
progettagione le icone non ci sono)?
--------------------------------
Inviato via 
http://usenet.libero.it

 fase di progettagione le icone non ci sono)?
come non ci sono??
Una volta che hai associato l'imglist
alla listview, basta che in corrispondenza dell'evento desiderato
assegni all'item l'indice dell'icona corrispondente nell'imglist.
sono stato chiaro?
MIk

 scusami milk ma non ho ancora capito, vai più nei dettagli.
e grazie


 progettagione le icone non ci sono)?
ma... non avevi posto la stessa domanda qualche ora fa?
Ma il cretino son oio che risponde pure?
Ciao

 scusami milk ma non ho ancora capito, vai più nei dettagli.
Cosè che non ti è chiaro?
MIk

 Ma il cretino son oio che risponde pure?
Zi zi :-)
-> GbC|
www.gbcweb.com

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di compatibilità

"Impossibile impostare il componente compatibile con la versione..."
Cosa vuol dire questo messaggio ? Grazie.
Stefano
sme...@tin.it
--------------------------------
Inviato via 
http://usenet.iol.it

Cosa vuol dire questo messaggio ? Grazie.
Building, Versioning, and Maintaining Visual Basic Components
http://msdn.microsoft.com/library/en-us/dnvb600/html/msdn_bldvbcom.asp
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Shell con file multipli

Ciao a tutti
Sto provando a scrivere un FileManager (tipo FreeCommander Xe), ma sto trovando qualche intoppo nel lancio dei file.
Mi spiego: con il doppio click (o INVIO) su un file, uso la API ShellExecute cosi'
   ShellExecute 0, "Open", sFile, "", sPath, SW_SHOW
e funziona benissimo, gestisce anche in automatico i programmi associati alle estensioni dei file (per un .txt mi apre il NotePad, per un .mp3 mi lancia il Player, ecc.). Solo che vorrei gestire anche il lancio di più file. Ad esempio, se seleziono 5 file .mp3, alla pressione di INVIO dovrebbe aprirmi il player (io uso Foobar2000) creando una nuova playlist. Esattamente come fa Esplora Risorse.
 
Qualche idea?
 
Grazie a tutti
Bye by SixaM 8-]

 creando una nuova playlist. Esattamente come fa Esplora Risorse.
 
 
e' roba che l'ultima volta che ho toccato e' stato 10 anni fa, ma
a braccio mi pare di ricordare:
 
 
Sub ciccio()
 
Dim Vg as string
Dim ListaArgomenti as String
 
Vg = chr(34) ' virgolette
 
' supponendo di dover passare i seguenti file come argomento:
' pinco.mp3
' pallo.mp3
 
ListaArgomenti = Vg & "pinco.mp3" & " " & Vg & "pallo.mp3"
 
' nota che la stringa risultante è
' "pinco.mp3" "pallo.mp3"
 
 
ShellExecute 0, "Open", sFile, ListaArgomenti, SW_SHOW
 
end sub

 ListaArgomenti = Vg & "pinco.mp3" & " " & Vg & "pallo.mp3"
 
ERRATA CORRIGE:
 
 ListaArgomenti = Vg & "pinco.mp3" & " " & Vg & "pallo.mp3" & vg
Newsgroup: it.comp.lang.visual-basic
Titolo: Unload Me su Form Load!!!

Ciao,
ho un problema riguardo un programma in VB5. A seconda di una condizione, il
programma deve essere terminato. Pensavo che inserendo una Unload Me (anche
se all'interno della Form Load), il programma veniva interrotto e scaricato
dalla memoria.
Invece, ho notato che nella Form Load, inserendo un UNLOAD ME all'interno di
una IF, questa viene eseguita, dopodiché l'esecuzione riprende all'
istruzione successiva all'interno della IF. Di seguito riporto la parte del
codice incriminata.
Private Sub Form_Load()
.
.
.
    If File.ListCount <> 0 Then
          Unload Me
    End If
.
End Sub
Private Sub Form_Unload(Cancel As Integer)
        Unload Me
End Sub
In quale altro modo potrei fare?
Ringrazio tutti coloro che mi diano delucidazioni.

 End Sub
questo non so se e' utile. e' *gia'* in unload. servirebbe semmai in
qry_unload.


A me in VB6 funziona.
Prova magari a fare il test nella Form_Activate anzichč nella Form_Load.
Altrimenti non so. E nella Form_Unload non č necessario fare l'Unload Me,
lo fa da solo.

Un unload me all'interno di un Form_load dovrebbe dare errore.
In ogni caso, ti conviene sempre fare così:
(1) dichiarare una variabile nel modulo della form:
Private m_BadInit as Boolean
(2) nella Form_Load imposti m_BadInit=True se la Form dev'essere richiusa
subito (meglio se chiami una funzione che fa tutto il lavoro di
inizializzazione e che ritorna True/False in m_BadInit)
(3) in Form_Activate metti:
If m_BadInit Then
    Unload Me
    Exit Sub
End If
----------------------------------------------------------------------
Stefano Minardi
zet...@mclink.it
----------------------------------------------------------------------

Newsgroup: it.comp.lang.visual-basic
Titolo: Mdac_Type.exe

Dove posso trovare Mdac_Type 2.6

Sicuramente nel sito Microsoft oppure direttamente nel Service Pack 5
per Visual Studio 6
M. Garcia


 Dove posso trovare Mdac_Type 2.6
se non e' cambiato:
http://www.microsoft.com/data/download.htm

In un qualsiasi Service Pack di Visual Studio


 ha scritto nel messaggio
news:ysoP6.4045$zb1.2...@news.infostrada.it...


Hai ragione, la 2.6 è su SP5
Ciao,


Newsgroup: it.comp.lang.visual-basic
Titolo: Applicazione come SERVIZIO

Qualcuno di voi sa dirmi se è possibile far partire un'applicazione come
servizio di windows?
O meglio ... so che è possibile .. ma non so come si fa :)))!!!
In generale avrei la necessità di far attivare un'applicazione VB ad ogni
avvio del pc senza inserirla nella cartella "esecuzione automatica". Chi può
darmi quache soluzione?
Vi ringrazio anticipatamente!!


-- 
Sidewinder  
---------------------------------------------------------------------
- DDD no longer requires the librx library.  Consequently, librx
  errors can no more cause DDD to crash.
	-- DDD
---------------------------------------------------------------------

 wrote in message
slrn8utubi...@aegis.in.ilsole24ore.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Contare i campi di un file TXT

Salve a tutti devo importare in un db dei file di testo scritti in questo
modo
Write #1, campo1,campo2,campo3,....,campoN
Il mio problema è contare quanti campi ci sono in ogni riga.
(non vanno bene le virgole)
Grazie
Pigi

...


 >Il mio problema č contare quanti campi ci sono in ogni riga.


Sbaglia proprio perchè ci sono delle virgole nei campi che devo importare.
Pigi

Il problema è un po' complicato perchè in casi del genere (file di spool che
contengono informazioni per riempire un DB) è buona norma utilizzare
separatori che NON devono far parte del testo.
Dato che la "," è un carattere che può essere presente (come nel tuo caso)
soprattutto in campi numerici, si dovrebbe utilizzare un'altro separatore,
oppure trovare un criterio con cui si stabilisce la fine di un campo e
l'inizio del successivo.
Magari prova a postare un file che vuoi convertire, e se puoi, cerca di
cambiare il carattere separatore (generalmente è "#" o "|" ).
Bye
--
Tango
www.af.mil
ICQ: 35463931

...


 wrote in message
news:9038l0$a08$1...@fe1.cs.interbusiness.it...


Ho trovato questo modo e sembra funzionare
in RigaInt metto la prima riga del file
Open "c:\temp\ricezione" & "\testx.txt" For Output As #1
    Print #1, RigaInt
Close #1
Open "c:\temp\ricezione" & "\testx.txt" For Input As #1
While Not EOF(1) = True
    Input #1, Textpass
    ContaCampi = ContaCampi + 1
Wend
Close #1
Brutto ma funzionale.
(le " le elimino in fase di scrittura del file)
Pigi

Newsgroup: it.comp.lang.visual-basic
Titolo: Stretchblt di gdi32

Qualcuno sa dirmi perchè?
Ho il form1 in cui ci sono le picturebox1 e
picturebox2 e una routine che tramite la funzione stretchblt passa
l'immagine dalla picturebox2 (origine) alla picturebox1 (destinazione).
Dal form2 una routine imposta un'immagine come proprietà picture della
picturebox2, richiama la routine con la funzione stretchblt, scarica il
form2.
Risultato: sulla picturebox1 non si vede l'immagine presente nella
picturebox2, ma una porzione del form2.
Grazie per l'attenzione, ciao.
--------------------------------
Inviato via 
http://usenet.iol.it

 Grazie per l'attenzione, ciao.
Se ho capito bene, il problema nasce dal fatto che tu ricavi l'immagine da
un HDC che fa riferimento al Video. Quindi copi ciò che compare a video in
quell'istante, non ciò che è l'immagine reale mantenuta in memoria dalla
PictureBox.
Per risolvere il problema mi sa che devi lavorare + pesantemente con le API,
evitando di mettere l'immagine nella picturebox2 ma gestendotela tu a
manina.
Il come... in 2 minuti proprio non zo...
Ciao
Ettore Maronese, il Mes
Newsgroup: it.comp.lang.visual-basic
Titolo: Num Campi

Ho la necessità di creare una tabella con più di 255 campi, ma ciò non è
possibile con access.
Esiste un database che non dia questa limitazione?

Esiste un database che non dia questa limitazione?
Innanzi tutto ritengo molto remota la necessità di usare una tabella con un
così elevato numero di campi.
Se comunque vuoi tutti questi campi prova a gestire due tabelle collegate e
a richiedere i dati tramite query.
Ricorda comunque che non puoi avere delle query con più di 255 campi.
Se devi mettere più di 255 campi all'interno di una maschera puoi comunque
usare più query e delle sottomaschere.
Tieni presente che questo limite è comune a svariati motori database
(MSSQLSERVER 6.5 ha "solo" 250 campi)
Ripensa il database ;-)
-----------------------------------
Paolo Spellani
TecnoGraphica s.r.l.
FOLIGNO (Pg) - ITALY
-----------------------------------

Esiste un database che non dia questa limitazione?
Di solito quando ci sono cosi' tanti campi in una tabella e' per una carenza
di progettazione del database (db non normalizzato, di solito).
Se, pero', hai veramente la necessita' di avere tutti quei campi, potresti
spezzare la tabella in due o piu' tabelle in relazione 1 a 1.
In pratica suddividi la tabella in piu' tabelle aventi la stessa chiave
univoca.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: aprire file .exe

non sono tanto esperto di visual basic, ma sto tentando di fare un
programmino che a voi potrà sembrare una stupidata. vorrei fare aprire al
mio programma un file eseguibile, ma non so come si fa. mi servirebbe la
sintassi esatta. se è possibile farlo con vb e se qualcuno è in grado di
risolvere il mio problema lo prego di rispondermi..grazie in anticipo..
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 sintassi esatta. se č possibile farlo con vb e se qualcuno č in grado di


> > risolvere il mio problema lo prego di rispondermi..grazie in anticipo..
Ehm....LO prego o GLI prego ?
Credo che sia esatto dire Gli prego di rispondermi ....o no ?
Per andare al sodo della tua  richiesta ...
Trovati la Api Shell Execute , dichiarala in un modulo e vatti a cercare
come si usa :D
ps.: Fa partire un file associandogli il programma predefinito :D
--
[ Bin Laden - Hiroshima - Atomic Bomb - Terrorismo - USA - George Bush ]
 * * * * Facciamo Impazzire Echelon * * *
[Akuma] - 
Www.iltecnico.com
Limbo59-su-Hottestmail.com
Per scrivermi: togli 'test' e metti @ al posto di '-su-'

 Credo che sia esatto dire Gli prego di rispondermi ....o no ?
no ...

Per aprire un file exe devi prima togliergli il pacchetto... :-)
Ah, poi magari ti serve la chiave, ma dal ferramenta non ci
puoi andare... :-)
Infine se ce l'hai in un pacco devi prima aprire quello.
Ricordati infine, che aprire file exe che stanno su un CD
puo' essere pericoloso per il CD :-P
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: Con sp4 posso lavorare con access 97 e 2000 senza problemi?

Con sp4 posso lavorare con access 97 e 2000 senza problemi?

 wrote in message
news:aj29x3T...@newsmst.mcis.galactica.it...


Io sono passato dal 97 al 2000 e non ho riscontrato alcun tipo di
problema, forse il 2000 è leggermente piu' lento.
	Lore.


Si, io lo faccio senza problemi
Carlo
-- 
Posted from [212.239.0.40] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio nome file a form da OS

Ciao a tutti.
Ho bisogno di aprire il mio programma (svilupp in vb6) direttamente
dal file sorgente, nel mio caso un ".tiff".
Ma non riesco a capire in quale variabile andare a leggere
l'informazione del percorso del file per poi aprirlo all'interno del
mio form come funziona per tutti i programmi ma soprattutto con quale
funzione...
ho cercato in MSDN e in giro, ma... Niente....
grazie mille a tutti

 ha scritto nel messaggio 
news:1176725672....@q75g2000hsh.googlegroups.com...


 ha scritto nel messaggio 
news:1176725672....@q75g2000hsh.googlegroups.com...


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

private PrintSectionEventArgs
{
    SectionBase Section
}
private PrintPageEventArgs
{
    Page Page
}
private PrintPageEventArgs
{
    ItemBase Item
}
Event SectionBeforePrint(sender , PrintSectionEventArgs e)
Event SectionAfterPrint(sender , PrintSectionEventArgs e)
Event PageBeforePrint(sender , PrintSectionEventArgs e)
Event PageAfterPrint(sender , PrintSectionEventArgs e)
Event ItemBeforePrint(sender , PrintSectionEventArgs e)
Event ItemAfterPrint(sender , PrintSectionEventArgs e) 

 ha scritto nel messaggio 
news:42774...@x-privat.org...
Scusate, sono un cretino :)
Post inviato all'indirizzo sbagliato.
Ciao 


Io non l'ho pensato. Ho viceversa pensato che fosse opportuno
chiederti di presentarmi il tuo pusher, visto la roba buona che
tiene... ;-)
--
Ciao!
Luca Menegotto

 tiene... ;-)
Pensa che non ho solo sbagliato indirizzo: ho pure sbagliato programma, 
perchè uso OE per i NG e firefox per la posta :P
Ciao 

 Post inviato all'indirizzo sbagliato.
una bella vacanzina ?
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm
 

 una bella vacanzina ?
Ci starebbe dentro :P
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione turni aziendali

Ciao a tutti,
c'è qualcuno che può darmi qualche dritta che per la creazione di un
programma di gestione di turni (4 turni sulle 24 ore) per un certo numero di
operatori?
Io pensavo di interfacciarmi a un db access per tener traccia di operatori e
turni. Sapete se in giro si può trovare dei modulini che mi semplifichino la
vita?
Grazie per le risposte

 ha scritto nel messaggio
news:v_OB7.94307$1H1.9...@news.infostrada.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: campi binary in SQLserver

Ho un database sqlserver con un campo dichiarato binary lungo 22
composto in realtà dalla somma di 5 campi stringa.
Qualcuno sa come scriverci da VB? Ovvero: come dichiaro il campo da 
comporre e passare poi alla stringa SQL, e come scrivo la stringa sql
per scrivere in quel campo (senza o con l'apice?)
Grazie in anticipo
Enrico
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

per scrivere in quel campo (senza o con l'apice?)
In sql i valori stringa si racchiudono fra apici singoli, ad es.
UPDATE miaTabella
SET mioCampoTesto = 'ciccio'
WHERE campoChiave = 1
-- 
ciao, hal

 per scrivere in quel campo (senza o con l'apice?)
salve,
dai BOL:
i campi binary sono rappresentati da un flusso di bit, per un massimo di
8000 byte... penso tu abbia un campo di 22byte..
ci si dovrebbe scrivere in esadecimale tipo
sCommand ="INSERT tabella VALUES ( 0x4F )"
per cui direi, con ado,
per x=A : x=10
miocampo.value= HEX(10)
non ho mai provato...
saluti
Andrea Montanari
montanar...@virgilio.it
http://utenti.lycos.it/asql/index.html
(my vb6+sql-dmo little try to provide MS MSDE 1.0 a visual interface) ver
0.0.46
--------- remove DMO to reply

prima di mercoledě non posso provare (problema di collegamento con
il data base). Per ora Grazie. 
Enrico
p.s. per 22 byte devo secondo Te fare una concatenazione di valori hex?


Ecco la soluzione:
sqlserver ammette nella stringasql l'istruzione CONVERT
con la seguente sintassi 
CONVERT(tipoconversione,valore)
ovvero nel mio caso dichiaro tranquillamente il campo come string
Dim VALORE as STRING*8
VALORE="PROVA  1"
STRINGASQL="INSERT INTO tabella(CAMPO1) VALUES (CONVERT(BINARY,'" _
            & VALORE & "'));" 
DBprova.execute STRINGASQL
Ai posteri...

Newsgroup: it.comp.lang.visual-basic
Titolo: Bitmap in un oggetto Picture

Qualcuno sa come serializzare un oggetto (tipo Picture) su un file,
oppure come estrarre un array di byte dalla bitmap di un oggetto
Picture e poi riassegnargliela ?
Paolo

 
Serializzarla su un file non si piu' (ovviamente ti fai una DLL in C/C++
fai tutto quello che vuoi),
quindi di consiglio di crearti una cartella per ogni serializzazione che
vuoi fare, e salverti
le bitmap in queste cartelle, con nomi del tipo: "1.bmp" "2.bmp" "3.bmp"...
  ecc... ecc..
Oltretutto cosi' l'accesso oltre che essere possibile sequenzialmente, lo
puoi fare anche
random!
Per salvare una Bitmap presente su una PictureBox fai:
      SavePicture Picture1.Image, "c:\t\1.bmp"
Per caricare una Bitmap presente su una PictureBox fai:
     Picture1.Picture = LoadPicture("c:\t\1.bmp")
Per disegnare nella PictureBox fai:
    picture1.AutoRedraw = True
    picture1.Print "Ciao Mondo"
    picture1.Line (picture1.Width / 4, picture1.Height / 4)-(picture1.Width
/ 2, picture1.Height / 2), , B
Io ho provato solo con VB 3.0  ma penso che funzioni anche con VB 4 e 5.
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes

Io ho provato solo con VB 3.0  ma penso che funzioni anche con VB 4 e 5.
Grazie, ma veramente io cercavo un modo piu' "hard": cioe' ottenere
dalla Picture un array di byte da manipolare (magari comprimere e
decomprimere in memoria in formato JPEG) e salvare, e riassegnare in
un secondo tempo alla bitmap. Ho bisogno di creare dinamicamente un
singolo file di risorse, e questo mi preclude l'idea della cartella.
Paolo

Newsgroup: it.comp.lang.visual-basic
Titolo: [Forse OT]Questo sconosciuto XSL?

Scusate in anticipo se sono OT ma sto diventando pazzo!
Sto entrando nel mondo di XSL ho fatto parecchi passi avanti ma mi sono
bloccato su un banalissimo problema: come cavolo si fà lo spazio in xsl?
Mi spiego meglio con il codice:
<table>
<xsl:for-each select="nodo /mio">
<tr>
<td><xsl:value-of select="Cognome"> <xsl:value-of select="Nome"></td>
^--------------------------------------  Ci vogli mettere ovviamente lo
spazio
</tr>
</xsl:for-each>
</table>
Ho girato tutto msdn(di luglio) ho trovato qualche tag xsl che fa prprio al
caso mio tipo <xsl:text>,<xsl:preserve-space> ma niente non funziona.
Dimenticavo se ci metto lo spazio normale non lo vedo se scrivo &bnsp va in
errore.
HHHHHHEEEEELLLLPPPP!
--
Ciao Maurik
mauro#SPAM#.buccioli#SPAM#@
tiscalinet.it
maurik77#SPAM#@
hotmail.com
Levare #SPAM# per inviare messaggi :-)

 se scrivo &bnsp va in errore.
[&#160;]
se mi ricordo bene...
Ciao.

"H.P.L." <u...@vaila.ble> ha scritto

fra l'altro, non e' come in html
    &nbsp;
?

 fra l'altro, non e' come in html &nbsp;?
Credo sia stato un suo errore di battitura.
Ciao.

lo spazio è &#160;
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Help = Tasto FRECCIA and SendKey

Ciao
Non uso il VB6 da lungo tempo... e, non ricordando proprio "tutto", vi
chiedo un piccolo aiuto. :-)
Sto scrivendo due righe per velocizzare un inserimento (estremamente
ripetitivo) di dati all'interno di un programma.
Attivo la finestra di programma nel solito modo, con AppActivate, e quindi
utilizzo SendKey per inviargli i dati che mi serve inserire.
Funzioan tutto ma.......
Problema!
Ad un certo punto, in quel programma c'è un combobox (senza possibilità di
scriverci, quindi non posso inviargli il "testo"), dal quale devo scegliere
uno dei dati presenti. Tale combobox -in quel programma- consente solo l'uso
del mouse, oppure i tasti freccia.
Con VB6 (textbox e funzione Keydown) ho visto che il codice della "freccia
giù" è "40" (senza uso di shift, che è = 0)
Ma se uso SendKey con quel codice... il mio programmino mi va in errore
(cod. 5).
Per la precisione scrivo:  SendKeys Chr(40), True
Cosa sbaglio?
Come devo fare?
Qual è il codice è giusto per il tasto "freccia giù"?
Grazie! :-)
--
Ciao da MioMao
__________________
* Prenditi un antivirus serio e controlla il tuo PC!
* Ecco dove puoi scaricare alcuni antivirus freeware (gratis!):
http://www.grisoft.com
 - 
http://www.free-av.com/index.htm
http://www.avast.com
 (italiano) - 
http://it.bitdefender.com
 (italiano)
* USALI * PROTEGGITI * USALI *

 Non uso il VB6 da lungo tempo... [......]
Se ti serve solo per questo fai prima a scaricare questi 500 kb :
http://www.hiddensoft.com/autoit3/
e poi per esempio :
 Run("notepad.exe","", 3)
 sleep(500)
   AutoItSetOption("WinTitleMatchMode", 4)
 WinWaitActive( "Senza nome - Blocco note", "", 5 )
WinMenuSelectItem("Senza nome - Blocco note","","&File", "&Salva")
WinWaitActive( "Salva con nome", "", 3 )
ControlFocus ( "Salva con nome","" , "ComboBox2" )
;interagisci col combo
$a =ControlGetText ( "Salva con nome", "", "ComboBox2" )
  MsgBox(0, "", $a)
ControlSend ( "Salva con nome", "", "ComboBox2", "T" )
$b =ControlGetText ( "Salva con nome", "", "ComboBox2" )
  MsgBox(0, "", $b)
;puoi usare anche il ControlClick() o ControlCommand()
;ControlCommand ( "title", "text", "classnameNN", "command", "option" )
ControlCommand ( "Salva con nome", "", "ComboBox2", "ShowDropDown", "")
--
Fosco

 Se ti serve solo per questo fai prima a scaricare questi 500 kb :
Grazie Fosco. Ora me lo guardo :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: (2) Inserire un'immagine nello sfondo di una Textbox

si può ?
vuoi che sia attraverso l'utilizzo di API, vuoi che sia utilizzando un' OCX
coi fiocchi.
qualcuno sa come fare ?

 ha scritto nel messaggio
news:bcJP8.32398$Kt3.7...@twister2.libero.it...


Metodo valido per tanti controlli:
1) inserisci il controllo (button, checkbox, ecc..)
2) metti la proprietà style a 2 (Graphical)
3) selezioni dalla proprietà Picture l'immagine che vuoi inserire come
sfondo.

Con un controllo Textbox non mi risulta possibile...
Puoi farlo invece con un controllo RichText (che inoltre è decisamente più
potente).
Sul ng it.comp.lang.visual-basic Utente Win2K ha trovato questa soluzione
(decisamente buona)
Option Explicit
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA"
(ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const STILE = (-20)
Private Const TRASPARENTE = &H20&
Private Sub Form_Load()
Dim Trasparenza As Long
    Trasparenza = SetWindowLong(rich.hwnd, STILE, TRASPARENTE)
End Sub
dove rich=NOME CONTROLLO RICHTEXTBOX
sul form metti un'immagine di sfondo e guarda il risultato.
Codice testato su WIN2k + VB6 + SP4
Ciao
Pixel
p.i....@katamail.com
http://vbios.cjb.net
irc azzurra:  #it_lang_vb   #vbios

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

Salve Nwsg..! Volevo un consiglio...!
Ecco il mio Problema:
1) Ho un database in formato DBF
2) Con un paio di mosse ho convertito il db nel format Access mdb...fin qui
nessun problema.
3) Ora avrei bisogno di convertire queste informazioni in un formato SQL. Mi
spiego meglio...dovrei passare quesi dati (Circa 200.000 articoli...e nn è
poco!!!!) in un formato SQL da eseguire su un Server mySQL tramite VB..! In
poche
parole dovrei creare un file con questo tipo di istruzioni:
CREATE Table....
......
INSERT Record....
.....
Ecc..!!!
Ora volevo Sapere....Esiste un Software che faccia questo....magari
convertendo direttamente il file DBF ?
Ditemi di si...nn vorrei aver vaneggiato..!
Grazie 1000 x l'help..!!!
Byez

 ha scritto nel messaggio
news:oF2r8.121595$1S3.3...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: compattare e ripristinare file Mdb Access 2000

Qualcuno mi sa dire qualii istruzioni di codice si usano
per compattare un database access .mdb su vb6
tramite un dataenvironement?
By Marlbory

 tramite un dataenvironement?
data-eccetera? Segare, segare alla fonte!
DAO (+1000) o JRO (+0). Qualcuno dice anche ADOX (-1000)

 wrote in message
news:9iJya.126641$3M4.2...@news1.tin.it...

Set objEngine = CreateObject("DAO.DBEngine.35")
 objEngine.CompactDatabase "path\database.mdb",
"path\compacted_database.mdb"
Trovi tutto qui
http://www.aspitalia.com/liste/usag/script.aspx?ID=58&Search=compattare
I comandi sono in vbscript, ma non dovrebbe essere un problema convertirli.
Ciau
Andrea

 ha scritto nel messaggio
news:bafpu8$sl4sb$1...@ID-174464.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: OCX.

Salve a tutti
Per un OCX fatto con VB quali sono tutte le piattaforme che lo possono
usare? Delphi, VC, FoxPro??!??
Fabio Guerrazzi

 usare? Delphi, VC, FoxPro??!??
Delphi si.
Artemis 23am


Se non e' data-aware (coem es. la True DBGrid), in Delphi e' utilizzabile.
Pero' (e qui parlo per me stesso), non userei mai un OCX fatto in VB, a meno
che non sia piuttosto complesso (come appunto la True DBGrid)... altrimenti
faccio prima a cercare un controllo nativo in Delphi (ne esistono migliaia),
oppure me lo faccio.
Per VisualC++, non credo ci siano particolari problemi, dopotutto e' M$
anche quello, no (appunto, ahia!)
FoxPro non saprei.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Licenza VB per vendere applicazioni?

Salve a tutti.
Vorrei vendere un'applicazione sviluppata in VB4. Per essere in regola mi
basta avere la licenza VB o servono altri requisiti?
Supponiamo che io passi alla versione 5, posso ancora vendere applicazioni
VB4 se nel frattempo ho venduto la licenza VB4 Profess. Edition (non posso
ad es. ricompilare perche' ho perso i sorgenti: caso peggiore)?
Grazie infinite
Claudio

Claudio
--
                    Ciao ANdrea!
--                 Adeo pauperes erant ut unum tantum equum aberent communem
     __ o   
    _`\<,         Andrea 'Parsifal' De Previde Prato - 
a.deprev...@telecomitalia.it
 __( )/( )__    home page 
http://space.tin.it/libri/adeprevi
 

Comunque non puoi sicuramente venderla.
Questo sì. La licenza specifica anche, di solito, che se viene venduto il
prodotto, bisogna consegnare al nuovo utente tutte le precedenti versioni.
Mario

Claudio
Ciao Riccardo

Newsgroup: it.comp.lang.visual-basic
Titolo: MSDE non mi fa eliminare i record

Ho provato con tanti metodi diversi...
ma niente, sono anche loggato come utente "sa"...
vi posto un paio di righe di codice...
premettendo che CN č attiva e Cmd č inizializzato
    Sql = "DELETE * FROM TABEL WHERE 
TABEL.ID
 = " & N_ID
 
    Cmd.ActiveConnection = CN
 
    Cmd.CommandText = Sql
    Cmd.Execute
oppure ho provato con un metodo assurdo, ciclando i record fino ad
arrivare a quello interessato (quindi non usando l'oggetto command ma
recordset) e fare Rst.Delete ma nulla anche cosě....
l'errore restituito č "errore 76: Impossibile trovare il percorso" in
tutti i casi
VI PREGO AIUTATEMI sono in mezzo ad una strada
grazie...
Xes

 tutti i casi
umm, strana cosa
Ciao Giorgio

Xes
L'unica cosa che trovo mancante e' l'indicazione del tipo di comando
che stai per passare. Prova cosi':
    Cmd.ActiveConnection = CN
 
    Cmd.CommandType= adCmdText 	
    Cmd.CommandText = Sql 	
Ah, giusto una cosa. SQLServer lo tollera, ma "DELETE * FROM" non e'
standard SQL. Lo standard e' "DELETE FROM".
--
Ciao!
Luca Menegotto

 standard SQL. Lo standard e' "DELETE FROM".
GRAZIEEEEEEEEEEEEEE cos? funzionaaaaaa !!!!!!!!
grazie milleeeeeeeeeeeeeeeee
a buon rendere !!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: api file in uso

Ciao a tutti,
volevo sapere se esiste un api (
framework.net
 2.0 oppure api windows)
che mi ritorni se un file e in uso e sopratuttto chi lo sta usando.
Grazie,
Vincenzo.

 che mi ritorni se un file e in uso e sopratuttto chi lo sta usando.
Piarebbe anche a me,  ma non penso ci sia un'ape che fa questo miele :)
Limitatamente ai file MDB c'è una dll che contiene una funzione che dice chi 
attualmente sta usando il file del database. Ma se il file è un .doc non 
saprei....
-- 
Greg 

ci sia un'ape che fa questo miele
che dolor :(
-- 
Greg 

 > che mi ritorni se un file e in uso e sopratuttto chi lo sta usando.
    'Prova ad aprire il file, se va in errore, fai un select case in
base all'estensione.
    'DOC: Verifica se esiste il file temporaneo creato da office: '~$'
& NomeFile
    'MDB: Vedi post precedente
    'ETC: ...
Ciao andrea

 ha scritto nel messaggio 
news:g40n5s$rea$1...@tdi.cu.mi.it...

Potresti dire qual'è questa DLL
Carmelo 

 Carmelo
Se non ricordo male è ldbuser.dll
Greg


Da Access 2000 in su non serve alcuna DLL.
http://support.microsoft.com/kb/198755/EN-US/
Se però il file è aperto in accesso esclusivo non funziona (per lo meno 
Access 2003), in quanto non utilizza il file LDB ma direttamente un lock sul 
file system.
http://support.microsoft.com/kb/824274
Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] About in controllo OCX

Qualcuno ha idea di come si fa a inserire un About all'interno di un OCX
fatto inVisual Basic?
Per esemplificare, vorrei che il mio OCX avesse una proprietą
"(Informazioni)" come quella ad esempio che si vede nella finestra di
proprietą del controllo standard di ProgressBar. Si puņ fare?
Grazie in anticipo
*Roby*

> Visto che non ti ha risposto nessuno...
Grazie!!! Stavo già per me meditare un repost e invece le vie del newsgroup
sono infinite...
Ciao
*Roby*

Newsgroup: it.comp.lang.visual-basic
Titolo: ingrandire una form

Salve. Come faccio (da programma) ad ottenere lo stesso risultato della
pressione del tasto "ingrandisci" posto in alto a destra del form ?
Grazie

pressione del tasto "ingrandisci" posto in alto a destra del form ?
premendo il tasto F1 (in alto a sinistra della tastiera)
Ciao,
Moreno
-- 
sirri at morenosoft dot com
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
---------------------------------------------------------------------------

e andando a cercare La proprietà "WindowState" dell'oggetto Form!
Ciao SIMO
ps: "Moreno senza Adsl ti vedo + arcigno :)))
--
__________________
www.sasim.net
Vb è relativamente semplice perchè c'è MSDN!
Server IRC : 
irc.azzurranet.org
 --> Canale: #it_lang_vb
Sito Comune Ng: 
http://www.it-lang-vb.net
Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt

Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] [?] CompactFramework??

Qualcuno sa dirmi come si fa ad installare il CFw su un PocketPC 2002?
Ciao

 Qualcuno sa dirmi come si fa ad installare il CFw su un PocketPC 2002?
Ok, questo č stato semplice: basta installarlo sul PC a cui č collegato 
il PPC e dal PC lanciare il setup.
Adesso la domanda č: posso scrivere applicazioni per il CompactFramework 
usando il compilatore csc o vbc del framework completo? (non ho a 
disposizione VisualStudio 2003)
Ciao


dovresti poterlo fare, solo che devi stare attento a utilizzare
metodi, proprietà e tipi di dato supportati anche dal CFw
dai un occhio a qui
http://groups.google.it/groups?q=vbc+compact+framework&hl=it&lr=&ie=UTF-8&oe=UTF-8&selm=%23RDlyHZGDHA.1552%40TK2MSFTNGP12.phx.gbl&rnum=2
-- 
bye BlackMagic
ICQ# 85485468

 
http://groups.google.it/groups?q=vbc+compact+framework&hl=it&lr=&ie=UTF-8&oe=UTF-8&selm=%23RDlyHZGDHA.1552%40TK2MSFTNGP12.phx.gbl&rnum=2
Provato (in effetti non avevo visto l'opzione /netfw, ma credo serva 
solo a dare degli errori nel caso di chiamate a metodi non supportati) 
però quando sul palmare faccio click sull'applicazione non succede 
niente (già non da errori di eseguibile non valido, e mi pare un buon 
inizio, però non fa niente... mi sta sfuggendo qualcosa...)
Ciao

 metodi, proprietà e tipi di dato supportati anche dal CFw
Ma va creato qualche specie di pacchetto d'installazione?


premesso che non ho mai provato,
credo che sia sufficiente procedere nel modo classico per le applicazioni
.NET, dovrebbe essere suff. avere il CFw installato
e poi distribuire l'applicazione



ciao
--
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://www.ugidotnet.org/4.blog

 CF, ma solo "robetta" a scopo di studio. :-)
Se hai già fatto qualcosa potresti darmi qualche dritta?
Attualmente mi interessa per lo meno realizzare la classica "Hello World".
- ho installato il C-framework
- ho copiato il mio exe (compilato con /netcf, che con csc non esiste 
nemmeno) in \\pocketpc\programmi\
Ma una volta che ci clicco sopra non fa niente di niente (nota che sul 
PC Desktop funziona :))
Ci sono dei punti da considerare nella realizzazione del programma?
Ciao


Az! Io uso VS .NET e, previo setup del CF sul dispositivo, non ho avuto
problemi... Tu stai provando su un Pocket PC "vero" o sull'emulatore?


 problemi... Tu stai provando su un Pocket PC "vero" o sull'emulatore?
Su un PPC 2002 *vero*, come dicevo non ho il VS2003 :(
Ciao

 Ciao
Ciao!
-- 
Lorenzo Benaglia
Microsoft MVP - SQL Server
http://mvp.support.microsoft.com
http://italy.mvps.org
Newsgroup: it.comp.lang.visual-basic
Titolo: Printer.print SBAGLIA?

Ho un foglio bianco nel form che contiene 8 parole in colonna, variamente
distribuite in altezza. Le devo stampare sul foglio bianco rispettando le
proporzioni del foglio sullo schermo (scala 1 : 2,9)
Questo è il codice di prova, nel quale disabilito la stampa:
   For a = 0 To NrRighePag1 - 1
   Printer.CurrentX = (PosCol(0) - 8.467) * 2.9
   Printer.CurrentY = (PosRigaPag1(a) - 4.233) * 2.9
   '''Printer.Print Voto
   Debug.Print "CuY = "; Printer.CurrentY
   Debug.Print "RST = "; RstStampaVOTI.Fields(a + 7).Value * 2.9
   Next a
   '''printer.enddoc
   End
FUNZIONA, e il debug dà questo risultato:
CuY =  49,30074
RST =  49,3
CuY =  78,2991
RST =  78,3
CuY =  107,2975
RST =  107,3
CuY =  136,2958
RST =  136,3
CuY =  162,4014
RST =  162,4
CuY =  194,2926
RST =  194,3
CuY =  217,5054
RST =  217,5
CuY =  240,7005
RST =  240,7
Lo stesso codice, in cui abilito la stampa:
   For a = 0 To NrRighePag1 - 1
   Printer.CurrentX = (PosCol(0) - 8.467) * 2.9
   Printer.CurrentY = (PosRigaPag1(a) - 4.233) * 2.9
   Printer.Print Voto
   Debug.Print "CuY = "; Printer.CurrentY
   Debug.Print "RST = "; RstStampaVOTI.Fields(a + 7).Value * 2.9
   Next a
   Printer.enddoc
   End
FUNZIONA... MA il debug indica uno scarto di 4,8 millimetri tra le due
variabili?
Qualcuno sa spiegarmi perché????
Viene forse aggiunta a CurrentY l'altezza dei caratteri (FontSize=12)???
CuY =  54,09853
RST =  49,3
CuY =  83,1498
RST =  78,3
CuY =  112,0953
RST =  107,3
CuY =  141,1465
RST =  136,3
CuY =  167,2168
RST =  162,4
CuY =  199,1432
RST =  194,3
CuY =  222,3384
RST =  217,5
CuY =  245,5336
RST =  240,7

 Viene forse aggiunta a CurrentY l'altezza dei caratteri (FontSize=12)???
effettivamente, ogni volta che fai un printer.print il currentx viene
portato a 0, e il currenty viene aumentato della quantità textheight del
font.
a meno che tu non metta un punto e virgola alla fine della riga,
naturalmente.
-- 
Salutoni
Sergio
Per rispondere... togli il group dall'indirizzo
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.visual-basic
Titolo: AAAIIUUTOOO conversione path windows95 in path DOS (8caratteri)

Mandi a tutti :-)
devo lanciare un programma DOS da VB5 con un file come "paramerto"
una cosa del tipo:
pkzip c:\windows\tutta la mia roba\miofile.txt
uso la funzione shell
shell (pkzip c:\windows\tutta la mia roba\miofile.txt)
ma il programma ovviamente non funziona perchè nella finestra DOS di
esecuzione il path corretto dovrebbe essere:
c:\windows\tuttal~1\miofile.txt
cioè un path compatibile 8 caratteri DOS standard...
...come posso fare la conversione?
Grazie.
Paolo Matteo Omero (Cassiel)
Via Coronini n° 20
34170 Gorizia - ITALY -
phone: +39 432 512824
Home page: 
http://www.student.toplinks.com/hp/omero/

>

Ciao,   fabrizio.
si' e' successo anche a me...ritornava sempre una stringa vuota....
...nel mio caso era colpa di un bug ASSURDO e cioe' che la dichiarazione
delle variabili non doveva essere fatta cosi':
Dim var1,var2,var3 as string
ma cosi'
Dim var1 as string
Dim var2 as string
etc.
Lo so sembra incredibile ma (ne mio caso) si trattava proprio di
questo...(sono impazzito prima di scoprirlo) in ogni caso il codice che ho
usato e' questo:
Dim pathlungo As String
Dim pathcorto As String
Dim destinaz_corta As String
Dim nome_file_wav As String
Dim lung_pathcorto, lung_destinaz_corta As Long    'lunghezze (cioe' numero
di caratteri) dei path
pathcorto = Space(255)        'crea il buffer
destinaz_corta = Space(255)
filename$ = List_queue_path.Text   'filenames$=questo e' il path del
file...lascia stare da dove lo prendo io...
pathlungo = filename$
lung_pathcorto = GetShortPathNameA(pathlungo, pathcorto, Len(pathcorto))
lung_destinaz_corta = GetShortPathNameA(prgDOS, destinaz_corta,
Len(destinaz_corta))




wrote:


 usato e' questo:
Non è un bug, il fatto è che dichiarando le variabili in questo modo:
Dim var1,var2,var3 as string
crei due variabili variant (var1 e var2) e una string, questo perchè la
dichiarazione delle variabili non funziona come in C, in VB ogni variabile
deve avere il suo tipo di dichiarazione, altrimenti vengono assunte come
variant.
La dichiarazione deve essere fatto o come hai fatto tu o così:
Dim var1 as string,var2 as string,var3 as string
	Ciao da Toni
Newsgroup: it.comp.lang.visual-basic
Titolo: eliminare righe con inner join

Ciao,
ho due tabelle Access, chiamiamole Fattura e Dettagli. Vorrei eliminare 
le righe in Fattura i cui record collegati in Dettagli hanno un campo di 
un certo valore. Ci sono tre campi chiave ed è attiva l'eliminazione a 
catena.
Ho fatto così:
db.Execute "DELETE Fattura.* FROM Fattura INNER JOIN Dettagli ON
(Fattura.chiave1 = Dettagli.chiave1) AND
(Fattura.chiave2 = Dettagli.chiave2) AND
(Fattura.chiave3 = Dettagli.chiave3)
WHERE Dettagli.campo='valore'"
Però così mi cancella le righe in Fattura con *almeno* un record 
collegato che ha il campo corrispondente alla proposizione WHERE. Io 
invece vorrei eliminare solo se *tutti* i record collegati hanno il 
valore corretto.
Come dovrei modificare la query?
Grazie!!
Marco / iw2nzm

 Come dovrei modificare la query?
Marco, occorre che le discussioni evolvano.
Hai già posto questa domanda, ti ho postato la soluzione (da adattare 
alla sintassi di Access, ma concettualmente funzionava), hai detto che 
avresti provato.
Adesso te ne esci ripartendo dall'inizio, come se non ci fosse stato 
alcun progresso nella soluzione del tuo problema.
Innanzitutto, per correttezza, si prosegue il thread preesistente, 
anzichè aprirne uno nuovo.
Poi, per educazione, se prometti di provare, sarebbe utile (soprattutto 
per me) un feedback.
Poi, per giusto metodo di apprendimento, se qualcosa non funzionava 
nella mia soluzione, si posta lo specifico problema e si cercherà di 
risolverlo, magari è una solamente una virgola nel posto sbagliato.
Ma così, è improduttivo.
Ciao
Alberto
-- 
A questo punto hanno trovato un muro,
un muro duro, molto molto duro,
che siamo noi.

 risolverlo, magari è una solamente una virgola nel posto sbagliato.
Chiedo scusa, non era mia intenzione mancare di rispetto.
Riguardo al vecchio thread ho provato sì la tua soluzione ma ricevevo 
troppi errori e non sono riuscito ad adattare la query correttamente. 
Proprio per evitare di intasare inutilmente il NG per richieste dovute 
alla *mia* inesperienza ho rifatto l'analisi della procedura e l'ho 
semplificata notevolmente. Mi spiace approfittare del NG con domande 
generiche o poco precise, per questo ho riproposto l'argomento in 
maniera più coincisa e semplice. Almeno questa era l'intenzione.
Ti do ragione sul fatto che avrei dovuto lasciarti un feedback e che 
avrei dovuto continuare nello stesso thread. Ma Thunderbird ha deciso di 
  non visualizzarmi più i thread di 3-4 giorni fa (dice messaggio non 
più disponibile) e allora - sbagliando - ho aperto un nuovo thread.
Spero di aver chiarito il malinteso e di non averti offeso.
Marco / iw2nzm
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Problemaccio con ActiveX scritto in C++

Carissimi, torno dopo un sacco di tempo per un problema che mi blocca ormai
da un paio di mesi.
Un amico mi ha scritto un controllo ActiveX in C++ usando ATL. E' talmente
semplice che ha usato il wizard.
Il controllo deve solo generare un evento e passare una stringa.
Quello che succede e' che, ricevendo la stringa e 'manipolandola',
l'eseguibile VB va in crash subito, mentre se lanciato dall'ambiente VB va
in crash dopo qualche ora (evidentemente l'ambiente e' meno rigido)
Per manipolazione intendo semplicemente, ad esempio:
Private Sub rbsFeed_OnMessage(ByVal Message As String)
  Text2 = Message
  Print Len(Message)
End Sub
Il crash e' davvero curioso: l'assegnazione alla textbox funziona, mentre la
Len lo manda in crash. Ma anche Len(Text2) lo manda in crash. E anche
Dim s as String
  s = Message
  Print Len(s)
oppure
  s = Text2
  Print Len(s)
E' chiaro che l'amico deve aver dimenticato qualcosa nell'ActiveX, oppure la
stringa che mi passa e' strana. Mi ha detto di aver usato la funzione che
converte una stringa C++ in Unicode. Sono quasi sicuro che il problema stia
qui. Gli ho anche detto di modificare il tipo da String a Variant, ma non e'
cambiato nulla.
Avete qualche consiglio? O magari, sapete dirmi (dirgli) come scrivere un
ActiveX semplice semplice in C++?
Grazie
Enrico

 in crash dopo qualche ora (evidentemente l'ambiente e' meno rigido)
...

Newsgroup: it.comp.lang.visual-basic
Titolo: Creare una tabella in un database

Ho una istruzione del tipo
Dim conn As New ADODB.Connection
  Dim rsTemp As New ADODB.Recordset
  conn.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source= ordini.mdb"
  rsTemp.Open "select * from ElencoOrdini order by DataOrdine", conn,
adOpenStatic
Set DataGrid1.DataSource = rsTemp
Come faccio a creare nel database ordini.mdb una nuova tabella chiamata
ordine2 contenente i campi numero e costo?
Spero potrete aiutarmi č molto importante.
GRAZIEEEEEEEEEEEE

>  conn.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source= ordini.mdb"
2 possibilità:
1) mediante ADOX (guarda su MSDN sotto ADOX)
2) Mediante SQL: CREATE TABLE (puoi cercare su internet per esempio su
http://www.html.it
 una guida ad HTML)
Ma la cosa migliore sarebbe...
CERCARE SU GOOGLE NEI VECCHI POST CHE A QUESTA DOMANDA SI E' GIA' RISPOSTO
1000 VOLTE... :-PPPPP
        Ciao
                            Allanon

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP - Scaricare Crystal Report ???

Dove posso scaricare la versione Crystal Report 4.6 per VB 6 ???
Grazie, Massimo

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Oggetto Printer

Salve,
ho bisogno di impostare il CR quando stampo una riga più lunga della pagina.
se scrivo
printer.print qualcosa di + lungo della pagina
mi mozza la stringa.
come faccio a dire alla stampante di andare a capo?
GRAZIE
Vincenzo

 ha scritto nel messaggio
news:9i9p89$ft5$1...@lacerta.tiscalinet.it...

Guarda qualche post piu' sotto Subject: Auito

 wrote in message
news:9i9p89$ft5$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Programma per analizzare reti.

Dovrei scrivere un programma che serva per la sicurezza di computer in una
LAN.
Il programma in question dovrebbe controllare su un range di IP se le porte
NetBios (quindi 138-139) sono aperte.
A questo punto dovrebbe loggarsi prima come guest, poi provare varie
combinazioni di password stupide tipo "password" & "admin" & "sesso" &
"invincibile" ecc. ecc.
Eventualmente poi manderei (con opzione a runtime) un messaggio "messanger"
sul computer "aperto".
Fino a vedere che la porta è aperta non è difficile.
Il problema è loggarsi..ovvero non conosco il protocollo NetBios..ed è
proprietario quindi non penso che la M$ abbia rilasciato nessuna specifica.
Ho pensato però : esiste Samba...samba funziona..quindi un reverse
engeneering lo hanno fatto..anche se cercando con google ho trovato poco di
quello che in realtà veramente mi interessava.
Una volta loggato mi piacerebbe sapere anche quante unità di rete sono
condivise e quanti dati sono condivisi .. se sono pochi Kb magari è la
SharedDoc dove non ci sono spesso file importanti..ma fosserò di più ci
vorrebbe un controllo più profondo.
Sapreste darmi uno spunto da cui partire?
Grazie Mille!
MarLaw

 in una LAN.
A meno che tu non lo voglia fare per motivi didattici, te lo sconsiglio.
Con la sicurezza non si scherza, ed è inutile reinventare la ruota;
esistono fior di programmi, anche open source o freeware, per fare
quello che dici: Nessus, Satan, Saint, Nmap... se ti serve per cose
"leggere", prova Languard: 
http://www.languard.com/lannetscan/
,
freeware per usi non commerciali.
Aggiungi che il VB non è assolutamente lo strumento più adatto
per sviluppare applicazioni del genere. :-(
Bye, G.

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

Ho appena acquistato l'MSDN Universal ed al suo interno ho trovato il SP6 per VS6.
Qualcuno l'ha gia' installato?
E' una versione stabile?
Grazie. Ciao. Stefano.


Io non l'ho installata e ne sono felice
ciaociao

 ha scritto nel messaggio
news:88ac4503.04062...@posting.google.com...

Cerca nei vecchi post!
Molti di noi non l'hanno installato perchè altri hanno avuto problemi che
sono stati manifestati sul NG
Ciao, Vincenzo

 E' una versione stabile?
ROTFL!
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
"Seminate Linux, che Windows si pianta da sè...." (Antico Adagio)
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it