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

Sapete dirmi qualche sito da dove posso scaricare manuali e piccole
applicazioni fatte con questo linguaggio di script ?

http://msdn.microsoft.com/scripting

 applicazioni fatte con questo linguaggio di script ?
una piccola guida c'e' sul sito comune
http://www.it-lang-vb.net
clicca su documentazione e poi su varie
--
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

applicazioni fatte con questo linguaggio di script ?
Purtroppo sono rarissimi:
Win32 Scripting..... Automate!
http://cwashington.netreach.net/Home.asp?Page=/site/news.asp
MSDN Online Library facilities to automate scriptlets creation (ricomporre):
http://msdn.microsoft.com/isapi/msdnlib.idc?theURL=/library/partbook/dhtml/h
tml/chap6facilitiestoautomatescriptletscreation.htm
VBScript Tutorial
http://users.turboline.be/btl10148/vbscript/VBSTUTOR.HTM
Tecnologie di script Microsoft
http://www.microsoft.com/italy/scripting/default.htm?/italy/scripting/relate
d/
Newsgroup su VB, VBS e VBA:
news:it.comp.lang.visual-basic
Sito Comune del NG suddetto, con documentazione VBS scaricabile.
http://www.murialdo.it/it_lang_vb/
SAPIEN Technologies Windows scripting and more!
http://www.sapien.com/
Windows Script Host Bazaar
http://www.borncity.com/WSHBazaar/WSHBazaar.htm
io pure sto' studiando il VBS per automatizzare amministrazioni di rete...
--
il SElidori....
... vi piace il cinema ?
Non mancate all' unico sito italiano di errori nei film:
http://www.bloopers.it

 io pure sto' studiando il VBS per automatizzare amministrazioni di rete...
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

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

Qualcuno sa come creare un file .Zip da Visual Basic 6? Grazie

Qualcuno sa come creare un file .Zip da Visual Basic 6? Grazie
se vuoi ho (leggi <dovrei ancora avere>) un documento che spiega la
struttura dei files zip e c'č anche una spiegazione in pseudo C degli
algoritmi di compressione.
Non sono riuscito a capirci granch'č, ma tirar fuori la lista dei files da
un archivio e' relativamente semplice.
Ciao.

 wrote in message
383ee365...@news.tiscalinet.it...


 Qualcuno sa come creare un file .Zip da Visual Basic 6? Grazie
ftp://ftp.gepinformatica.it/pub/Varie/Lucas
trovi degli ocx che ti possono essere d'aiuto




 wrote in message
niz04.9787$Wa.9...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Dritta sui text box (Rich e non)

Allora:
sto scrivendo un telnet in VB6 e per mostrare i dati trasmessi e
ricevuti utilizzo un rich text box
perche' poi vorrei implementare il terminale a colori.
per mostrare i dati che arrivano utilizzo questo sistema:
nomebox.text = nomebox.text & nuovastringa
a questo punto il cursore mi va a finire in cima a sinistra, pero' io ho
bisogno che stia in basso a destra perche' devo continuare a scrivere:
quindi nell'evento onchange di nomebox faccio eseguire:
nomebox.selstart = len(nomebox.text)
che riporta il cursore alposto giusto.
Risultato? quando ci sono dentro una decina di righe comincia a
sfarfallare tutto il textbox.
Qualcuno conosce un metodo migliore?
Negli applicativi microcozz come MSCHAT i dati cambiano spesso nel box
ma non sfarfalla niente.
Chi mi sa aiutare? sono sicuro che ci sia una tecnica piu' efficace,
solo che programmo in VB appena da qualche settimana.
Ciao.


Usa il RichTextBox e per aggiungere una stringa usa:
mioText.SelText = nuova stringa & vbCrLf
in questo modo ti aggiunge il testo nella posizione del cursore.
Ciao

Grazie! sei un figo!


Cara Meimi, penso che "figo" non te l'aveva ancora detto nessuno ^__^
A proposito, Stefano, ti sei documentato sull'arcoseno? ^__^

Ora sto implementando i colori, con selcolor imposto il colore del
carattere, ma qual'e' la proprieta' per impostare il colore di sfondo del
singolo carattere?
Grazie ancora se vorrai rispondermi, mi sei stato di grande aiuto :)

> Mi correggo,  Meimi, sei una dea :)

Grazie! sei un figo!
"Peccato" che Meimi sia una LEI e non un LUI !!! ^___^
Cmq, vista l'applicabilità del suddetto complimento anche
al "gentil sesso", devo proprio farti i miei complimenti...
...si vede proprio che hai studiato ad Oxford !!! ^_______^
Zeross
____________________________________________
"Colui che prima di bere una bottiglia di birra, la stappa !"

...


 volta.
Vedi, io con il metodo selcolor imposto gia' il colore, dopodiche' inserisco
in coda le nuove stringhe.
Solo che selcolor imposta solo il colore del testo, mentre deve esserci
qualcosa che imposta anche il colore di
sfondo del carattere.
c'e' backcolor ma imposta il colore di sfondo di tutto il text box, e non va
bene...

singolo carattere?
Non puoi farlo... puoi impostare solo il colore di background per l'intero
controllo.
Ciao

Allora mi sa che per quello che devo fare il rich text box non basta.
Che mi consigli?
Newsgroup: it.comp.lang.visual-basic
Titolo: Query su campi di tipo DateTime piu' lente (2)

Ciao a tutti.
Ripropongo la questione della query perche' dopo aver rimosso la
funzione DateValue() ho ottenuto un 
parziale miglioramento, ma non ho risolto il problema.
La query con DateValue() impiegava 4.5 secondi per essere eseguita,
rimuovendo la funzione sono passato ad un tempo di esecuzione di 2.5
secondi, ma sempre troppo alto in confronto al tempo impiegato dalle
altre query su campi che non siano DateTime pari a 0.05 secondi!!!
La nuova query e':
1   sSQL = "SELECT * FROM Liste WHERE "
2   sSQL = sSQL & " TDatum BETWEEN #" & sDate & " 00:00:00#"
3   sSQL = sSQL & " AND #" & sDate & " 23:59:59#"
4   sSQL = sSQL & " AND Number = TPNr "
5   sSQL = sSQL & " ORDER BY ColNr "
Ho notato pero' che rimuovendo la condizione espressa alla riga 4
(Number = TPNr) oppure ponendo Number = 1 (o intero qualunque) la
query va veloce come le altre, ossia 0.05 secondi.
Deduco che il confronto fatto dal motore Jet su i due campi rallenta
in qualche modo la query.
Tutti i campi su cui faccio le query sono indicizzati.
Number e TPNr sono campi integer di tue tabelle diverse (ma la query
la faccio su un recordset risultato di una query di selezione creata
in Access). 
Per complicare la faccenda la condizione del rigo 4 (Number = TPNr)
non rallenta le altre query che non contengano campi di tipi DateTime.
In altre parole, la query seguente, che pure contiene alla riga 4 la
condizione incriminata, ma non presenta campi di tipo DateTime ma solo
string e integer, viene eseguita in 0.05 secondi.
1   sSQL = "SELECT * FROM Liste WHERE "
2   sSQL = sSQL & "OrdNr = '" & Trim$(txtOrd.text) & "'"
3   sSQL = sSQL & "AND ArtNr = '" & Trim$(txtArt.text) & "' AND " _
4   sSQL = sSQL & " AND Number = TPNr "
5   sSQL = sSQL & " ORDER BY ColNr"
Su un database che cresce di 300 record in 24 ore la situzione si
rende critica giorno per giorno.
Avete qualche suggerimento?
Grazie per il vostro aiuto.
Ciao,
 Giovanni 
  ( Ing...@XYZweb.de )
To reply please remove 'XYZ'

 ha scritto nel messaggio
news:b4ks7tgomoi17ntq6...@4ax.com...

Dipende anche da come visualizzi i dati, non so come è strutturato il DB e
quindi non so se è fattibile, ma non puoi visualizzare prima i record di
Liste, e poi quando selezioni il singolo record visualizzi i dettagli? Se
non è fattibile dovresti verificare se non puoi ottimizzare anche Viste o
spostare qualche criterio da una query all'altra, o eliminare, se c'è,
l'ordinamento da Liste  o provare a portarlo su Liste eliminadolo dalla
seconda query, o ancora provare a mettere la query sul DB utilizzando i
parametri. Inoltre negli indici che tu hai definito sono ammessi valori
Null? se si dovresti evitarli, sempre ammesso che sia possibile.
Queste sono solo alcune possibilità, che cominque dipendomono da come è
strutturato il DB o il programma.
Ciao VB
Newsgroup: it.comp.lang.visual-basic
Titolo: www.programmazione.it 3.0

Salve,
    rubo pochi K per comunicare a tutti gli interessati che finalmente è on-line la nuova versione di 
www.programmazione.it
Non stò qui ad elencare tutte le novità dato che vorrei evitare di essere bollato come spammer al 100% :-D
Abbiamo comunque un'area interamente dedicata a VB che ci piacerebbe far crescere col contributo di tutti (come del resto è cresciuto Programmazione.it fino ad oggi).
Grazie per l'attenzione, buona giornata.
Marco Abis
Http://www.programmazione.it
ab...@programmazione.it
-- 
Posted from [212.177.19.137] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Questo post mi era piaciuto (davvero :).
Peccato che un runtime error "Object required" venga generato da 
document.getElementById('cont').style
Sara' perche' il firewall ha segato banner e popup invasivi ?
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Form e bottoni

Come faccio a nascondere il bottone di chiusura (Quello con la X) di una
Form ?

 wrote in message
8ol6b1$jq3$1...@pinco.nettuno.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi di compilazione con VB5Pro

Dopo la compilazione il programma funziona correttamente, ma se viene
installato su un pc che non ha su VB, mi crea dei problemi, inizia a
cercarmi i file "estensione della applicazione", a tentativi, vedendo il
file mancante installo le librerie.
E' un metodo un po' spartano,  ma no sono riuscito a fare di meglio.
Se qualcuno puo' indicarmi se c'e' un metodo automatico per sapere quali
sono le librerie da copiare o se il compilatore e' in grado di creare un exe
senza l' utilizzo successivo dei DLL.
Ciao e grazie.
--
Per rispondermi privatamente togli  "nospam"  dal
mio indirizzo e-mail.
l.cas...@sicurdata.nospam.it
La pubblicita' ha un limite !!!!!

Ciao e grazie.
Puoi fare tramite setup wizard un set di installazione.
Purtroppo non c'è modo di non portarsi a spasso tutte le pesanti DLL
necessarie.
--
                    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
 

Devi creare il kit di installazione:
Avvio (o Start)
Programmi
Microsoft Visual Basic 5.0
Autocomposizione Installazione
Ciao, Stefano
Newsgroup: it.comp.lang.visual-basic
Titolo: aiutino facile facile ...

ciao a tutti ...
penso di essere venuto sul ng giusto edi nno essere troppo OT.
penso che il mio problema riguardi Visual Basic Script, è di quello
generato da word nel produrre delle macro.
ve lo posto ... il suo scopo è quello di sostituire ad un "ritorno a capo"
uno spazio ...
visto che sono assolutamente digiuno di questo linguaggio vi chiedo aiuto
per fare una cosa semplicissima e cioè inserirre un ciclo che permetta la
sostituzione del carattere solo nel caso in cui si trovi solo dopo il
70-esimo carattere della riga ...
Sub Macro2()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "^p"
        .Replacement.Text = " "
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub
vi prego di aiutarmi ... non posso fare questa cosa tutta a mano perchè ci
sono in ballo migliaia di documenti.
PauLoX

Ciao, cerca nei vecchi post. C'è stata una lunga discussione a riguardo.
Ciao,
Mattia

 70-esimo carattere della riga ...
Non Conosco VBA di Word, comunque credo che di basti fare questo:
Documento.Content.Text = Replace(Documento.Content.Text, vbCrLf, " ", 71)
Dove Documento è un Word.Application.
Cioè devi dichiarare una var di tipo Word.Application, fare per tutti i
documenti che ti interessano una .Open, poi la riga che ho indicato sopra e
poi la .Save()
è un For-Next che scrivi in 10 minuti anche se sei inesperto.
Ciao
P.S.: fatti prima una copia di tutti  i documenti ;)
--
Math Parser, VB.Framework : 
http://www.neodatatype.net
Sito Comune               : 
http://www.it-lang-vb.net

 P.S.: fatti prima una copia di tutti  i documenti ;)
Personalmente io avevo scelto un'altra strada, cioč
farmi dei documentini di prova da utilizzare nei test :-)
Andrea

 farmi dei documentini di prova da utilizzare nei test :-)
Vero, ma poi io preferisco fare altri test sui dati reali, e comunque, anche
quando sono sicuro che tutto è ok mi faccio prima una copia dei dati
originali :)
Ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Activex o classe

Ho sviluppato un'activex e una classe basato su codice ado per la gestione
dei db access. Entrambi funzionano allo stesso modo (navigazione,
salvataggio ecc.). Considerando che non ho quasi idea di come sia la
programmazione in 
vb.net
 vorrei sapere quale delle due tecniche mi conviene
usare nei programmi futuri e perchč.
Grazie
Luciano


Forse la classe, perche' COM dovrebbe andare a sparire.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di stack

Per cortesia, qualcuno mi potrebbe spiegare il perchè, avendo io in un mio
form due
controlli Crystal Report 4.6, se io li richiamo uno di seguito all'altro mi
si blocca il pgm.
dandomi un errore di stack?
Ringraziandovi anticipatamente, vi saluto.
=====================
Gianni RABBIA
=====================
gia...@gem.it
=====================

Crystal è un programma abbastanza problematico; devi prima circoscrivere il
problema provando a mandarli a video piuttosto che a stampa, a lanciarne uno
solo ma in più copie, poi l'altro; devi vedere se l'errore si genera durante
la compilazione delle tabelle o al momento del lancio di Crystal; si deve
vedere COSA deve fare il tuo report(se calcoli ecc.)
Fà tutte le prove possibile, poi forse...
Giorgio

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con VBMail

Salve a tutti,
    ho un piccolo problemino... avete mai provato ad
    usare il programma VBMail che viene fornito con
    VB5?
    Io ci ho provato ma ha lo strano difetto di non funzionare
    su tutti i computer con Windows 95 versione:
    USB 4.00.950 B
    In particolare non funziona sul fetch della mail (il client di posta
    installato e' Exchange che di per se' funzionerebbe).
    Non viene mostrato alcun messaggio di errore... semplicemente
    si inchioda VB.
    Qualcuno che ha lo stesso mio problema?
    Anzi, meglio... qualcuno che sa come risolverlo? :-)
   Grazie a tutti
   Michele
 
mba...@easynet.it



Newsgroup: it.comp.lang.visual-basic
Titolo: directory di lavoro visual basic

Salve a tutti,
scusate la banalità della domanda, ma come posso fare a settare ad un
programma la path di lavoro cioè il percorso
dove trovare eventuali files di lavoro (es. database o file di
configurazione ?)
Saluti Massimo

 wrote in message
news:8kckmb$j1g$1...@fe1.cs.interbusiness.it...



Esiste anche App.Path che ti restituisce il percorso da cui è stato
lanciato l'eseguibile, quindi, ad esempio, se ha il DataBase nella
sottodirectory Dati, puoi fare
Percorso=App.Path & "\Dati"
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

Newsgroup: it.comp.lang.visual-basic
Titolo: spostare 1 finestra splash

Non mi ricordo i tasti da premere per spostare una finestra
splash bloccata a video, per vedere il messaggio sottostante
nascosto da essa .
saluti e grazie

 nascosto da essa .
forse alt/F4 ?  :P
;))))))))))
ciao :)

"> forse alt/F4 ?  :P
Devo spostarla solo...
sai la combinazione di tasti per aprire il suo menù di controllo?
Poi faccio sposta con le frecce di direzione....
ciao

 sai la combinazione di tasti per aprire il suo menų di controllo?
Ma cosa dico?
E' una finestra splash, mica un normale form !!
Hai presente le videate introduttive temporanee dei programmi?
Mi si freeza in quel momento, non ci sono pulsanti di chiusura!!!
ariciao!

 Mi si freeza in quel momento, non ci sono pulsanti di chiusura!!!
Prova ALT+SPACE
--
Fosco

Funziona!
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Programma che linka un prg. sviluppato in VB 5 (ver. 5.0 PRO) in un unico file EXE

Tempo fa su questo NG si parlň di un programma del genere; mi interesserebbe
avere quante piů informazioni possibili.
TIA
alex

[snip]
...scusate se ho ripostato 2 volte lo stesso msg. ma solo ora mi sono
accorto che era stato inviato correttamente... manco da molto e ci ho perso
un po' la mano... ;-)
alex

alex ha scritto:

Ti ho risposto sul primo che hai inviato...
Ciao
:-) Hd (-:
Newsgroup: it.comp.lang.visual-basic
Titolo: Utente loggato a db Access

Ciao a tutti,
ho un database access al quale si loggano attraverso un softwarino diversi 
utenti.
Questo db, contiene le userid e pwd di tutti gli utenti registrati, di 
conseguenza, per poter accedere al programma
attraverso ADO in Vb6 apro la connessione, controllo la digitazione di uid e 
pwd ed eventualmente do accesso al soft.
Bene...ma � possibile sapere chi � loggato in quel momento? O meglio, ho 
trovato in rete questa qui:
DB.OpenSchema(adSchemaProviderSpecific, _
, "{947bb102-5d43-11d1-bdbf-00c04fb92675}")
che io ho utilizzato e che correttamente mi restituisce una lista degli 
utenti connessi, ma a dire il vero,
mi restituisce il nome della postazione (del pc in rete) che si connette al 
DB e non l'utente loggato.
Quanluno potrebbe aiutarmi a risolvere questo problema?
Grazie a tutti come sempre
SLB
 


Leggi qui:
http://msdn.microsoft.com/en-us/library/aa155436.aspx
In particolare:
"This particular schema recordset contains the following information:
� COMPUTER_NAME. Identifies the workstation as specified in the system's 
Network control panel.
� LOGIN_NAME. Specifies the name the user entered to log into the database, 
if it's secured. If it isn't secured, this field returns Admin.
� CONNECTED. Returns True (-1) if there's a corresponding user lock in the 
LDB file.
� SUSPECTED_STATE. Returns True (-1) if the user has left the database in a 
suspect state. Otherwise, this value is Null. "
In pratica il nome dell'utente, sottolineo _del database_ (se � protetto), 
*non quello di Windows*, lo trovi nel campo LOGIN_NAME.
Bye
Raf 

 Quanluno potrebbe aiutarmi a risolvere questo problema?
Immagino che le coppie "nome utente - password" siano in una tabella, e che tu 
vada a leggere quella per autorizzare o meno il login.
Se ï¿œ effettivamente cosï¿œ, Access non puï¿œ avere cognizione di quali di questi 
utenti siano effettivamente loggati. In fin dei conti, l'intero concetto di 
utente riguarda esclusivamente il tuo programma, ï¿œ il database non ne puï¿œ sapere 
niente.
Il nome utente con cui ti connetti ad access ï¿œ molto probabilmente sempre lo 
stesso, quello scritto nella stringa di connessione.
In conclusione, quello che vuoi fare tu *assolutamente* non si puï¿œ fare in 
maniera diretta.
Potresti (schifo) scrivere in una tabella il nome dell'utente ad ogni login, e 
poi fare una query su quella. E' una cosa che fa schifo perchï¿œ - per dire - 
basta che salti la corrente e ti trovi con dei dati inutili.
In alternativa (molto, molto meglio), quando un utente si logga, recuperi il 
nome della macchina e lo mappi a quello dell'utente. Con DB.OpenSchema recuperi 
poi il nome delle macchine connesse, e... beh, insomma, sei a posto.
-- 
S.

 . SUSPECTED_STATE. Returns True (-1) if the user has left the database in 

Newsgroup: it.comp.lang.visual-basic
Titolo: Trovare il maggior valore tra alcune variabili

Salve a tutti.
Sto compiendo i primi passi in Visual basic for application.
In questo momento quello che mi interessa è prendere 5 valori assegnarli a
delle variabili e poi sapere qual è il maggiore (come numero naturalmente e
non come variabile, cioè voglio che venga fuori 15 e non a come risposta se
a=15 fosse il maggiore di quell'elenco)
Il mio codice era di questo tipo
a = Worksheets("Punteggi").Cells(97, 5)
b = Worksheets("Punteggi").Cells(97, 7)
c = Worksheets("Punteggi").Cells(97, 9)
d = Worksheets("Punteggi").Cells(97, 11)
e = Worksheets("Punteggi").Cells(97, 13)
Worksheets("Punteggi").Cells(10, 17) = Max(a;b;c;d;e)
Ma naturalmente non va bene!
Qualche suggerimento??
Grazie mille


ovviamente il modo + veloce sarebbe quello di inserire nella cella 15 la
formula  = Max(....)
da basic io scriverei un semplice ciclo for next, dopo aver assegnato i
valori ad una matrice:
dim flag
dim a(1 to 5)
a(1) = Worksheets("Punteggi").Cells(97, 5)
a(2) = ...........
e poi, buttata lě:
flag=0
for x=1 to 5
if a(x) >=  flag then flag = a(x)
next
alla fine del ciclo nella variabile flag ci dovrebbe essere il maggiore tra
i tuoi valori
ciao

Qualche suggerimento??
Worksheets("Punteggi").Cells(10, 17 =
Application.WorksheetFunction.Max(a,b,c,d,e)
-- 
hth, hal

 Qualche suggerimento??
    Un esempio fa lo stesso?
Option Explicit
Public Sub xPål27()
  Dim objXlApp As Excel.Application
  Dim objXlWsh As Excel.Worksheet
  Dim objXlRng As Excel.Range
  Set objXlApp = Excel.Application
  Set objXlWsh = objXlApp.ActiveSheet
  With objXlWsh
    Set objXlRng _
      = objXlApp.Union( _
            .Cells(97, 5) _
          , .Cells(97, 7) _
          , .Cells(97, 9) _
          , .Cells(97, 11) _
          , .Cells(97, 13))
    .Cells(10, 17).Value _
      = objXlApp.WorksheetFunction.Max(objXlRng)
  End With
  Set objXlRng = Nothing
  Set objXlWsh = Nothing
  Set objXlApp = Nothing
End Sub
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

 ha scritto nel messaggio
news:b5esl5$28s3b2$1...@ID-52090.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: [facile-facile]

Ho bisogno di una funzione che mi  permetta di rinominare un file, senza
utilizzare il "Filecopy"
Ciao e grazie a tutti

 senza utilizzare il "Filecopy"
ma non ti avevano gia' risposto ? se ho sbagliato persona allora vuol dire
che non hai letto i messaggi vecchi di ... ieri o l'altro ieri
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

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

E' possibile cambiare il contenuto di una pagina specifica di un datareport?
Ad esempio cambiare il contenuto di una label della pagina 1 e lasciare
nelle altre pagine quello di default?
Grazie.
Ciao.
Luca

 ha scritto nel messaggio
news:LbVNb.128710$_P.45...@news4.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] data environment

scusate la 'gnoranza!!
ho questo codice che devo sfruttare per tre command
devo riscrivere questo codice per ognuno oppure c'è una soluzione +
professionale?
DataEnvironment1.rsCommandA.MoveFirst
If DataEnvironment1.rsCommandA.BOF Then Exit Sub
 Do Until DataEnvironment1.rsCommandA.EOF
    Codice = DataEnvironment1.rsCommandA.Fields.Item(0)
    Anno = DataEnvironment1.rsCommandA.Fields.Item(1)
    TxtFile.writeline "PARTITAIVA" & Codice & Anno & Mese & Giorno & Comodo
& Zeri
    DataEnvironment1.rsCommandA.MoveNext
Loop
grazie luciano

mi sembra e aspetto valanghe di insulti!
for each comandi in dataenvironment1.commands
  Do Until DataEnvironment1.rsCommandA.EOF
    Codice = DataEnvironment1.rsCommandA.Fields.Item(0)
    Anno = DataEnvironment1.rsCommandA.Fields.Item(1)
    TxtFile.writeline "PARTITAIVA" & Codice & Anno & Mese & Giorno & Comodo
& Zeri
    DataEnvironment1.rsCommandA.MoveNext
Loop
next

 ha scritto nel messaggio
news:98287i$728$1...@pinco.nettuno.it...



 for each comandi in dataenvironment1.commands
   Do Until DataEnvironment1.rsCommandA.EOF
     Codice = comandi.rsCommandA.Fields.Item(0)
     Anno = comandi.rsCommandA.Fields.Item(1)
     TxtFile.writeline "PARTITAIVA" & Codice & Anno & Mese & Giorno & Comodo
& Zeri
     comandi.MoveNext
 Loop
 next
Ora dovrebbe andare!
E scusate di nuovo!

mi spiego meglio
ho tre command diversi a scelta dell'utente che generano tre file txt
diversi
e cioč rsCommandA,rsCommandB,rsCommandC
dovrebbe essere  una cosa del 
genera.ad
 esempio....
dataenvironment1.variabilecommand.movefirst..
la tua soluzione prende sempre il commandA......(se ho capito bene) cmq
GRAZIE
non insulto mai chi si trova sulla mia stessa barca................
ciao
Luciano

La mia soluzione prende tutti i comandi presenti nel dataenvironment te la
riposto forse ho sbagliato qualcosoltro!
 for each comandi in dataenvironment1.commands
  Do Until comandi.EOF
     Codice = comandi.rsCommandA.Fields.Item(0)
     Anno = comandi.rsCommandA.Fields.Item(1)
     TxtFile.writeline "PARTITAIVA" & Codice & Anno & Mese & Giorno & Comodo
& Zeri
     comandi.MoveNext
 Loop
 next
Se ci sono altri command e tu vuoi operare solo su quelli che si chiamano
commandA,commandB,commandC il codice dovrebbe essere questo:
for each comandi in dataenvironment1.commands
if 
comandi.name
="commandA" or 
comandi.name
="commandB" or
comandi.name
="commandC" then  'Stai attento alle maiuscole minuscole
  Do Until comandi.EOF
     Codice = comandi.rsCommandA.Fields.Item(0)
     Anno = comandi.rsCommandA.Fields.Item(1)
     TxtFile.writeline "PARTITAIVA" & Codice & Anno & Mese & Giorno & Comodo
& Zeri
     comandi.MoveNext
 Loop
endif
 next

IL TUO RAGIONAMENTO E CORRETTO MA DEVO RENDERE VARIABILE IL CODICE TRA **
***
MA PENSO CHE SIA IMPOSSIBILE IN QUANTO HO PROVATO CON UN FOR.NEXT NIDIFICATO
MA NON ACCETTA IL 
RECORDSET.NAME
 CMQ GRAZIE
Newsgroup: it.comp.lang.visual-basic
Titolo: Progress Bar su FileCopy

E' possibile visualizzare una progress-bar durante
l'operazione filecopy, ovvero e' possibile reperire
da qualche parte un counter?
Ciao.

 l'operazione filecopy, ovvero e' possibile reperire
Con file copy non puoi, l'unica soluzione e' creare una routine di copia del
file durante la quale determini lo stato di avanzamento
Sul sito comune esiste un mio programma per copiare e spezzare un file  con
la stessa routine (e poche modifiche) puoi semplicemente copiare il file e
determinare lo stato di copy ed utilizzarlo per es con la progress ba
Ciao stefano

 determinare lo stato di copy ed utilizzarlo per es con la progress ba
Non e' fondamentale, era solo una cosa coreografica dato che il file da
trasferire su
floppy è contenuto (200K), anche se imho sapere che il pc lavora ma non vedo
nulla
mi da' fastidio (cerco sempre di pensare da utilizzatore del sw quando lo
scrivo).
Grazie lo stesso, ne terro' conto.

da qualche parte un counter?
cerca su 
msdn.microsoft.com
:
HOWTO: Use the Animated Copy Functions in Windows 95/98 
ID: Q151799 
che spiega come usare la funzione SHFileOperation dell' api della shell.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Far diventare una finestra quella attiva

Vorrei far diventare una finestra quella attiva (per ora passa da minimizzata a 
normale ma mi rimane in background) !!!
Grazie

...





Per rendere attiva una finestra, cioč visualizzarla in primo piano, puoi
utilizzare l'istruzione VB
AppActivate "Nome finestra"
Se hai bisogno di maggiori informazioni su questa istruzione, consulta la
Guida in linea di Visual Basic in relazione a questo argomento. Ciao
Marco Minerva

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 Standard o Pro ?

Scusate la domanda che credo sia stata posta migliaia di volte ma ho la
necessità di acquistare uno dei due prodotti che mi propongono a 300.000
Lire circa il primo e a più di 1.000.000 se non ricordo male il secondo, ma
in pratica quali sono le differenze sostanziali ? Io sarei per questioni di
budget propenso per il primo ma...insomma datemi dei suggerimenti
considerando che devo distribuire eseguibili.
Thanks!

 ha scritto nel messaggio
news:crtg6.13953$GM6.7...@news.infostrada.it...


 Pro per forza
Ok ma vale il prezzo? la differenza è sostenziale? insomma sono un profano,
datemi motivi validi.
Grazie!

 Ok ma vale il prezzo? la differenza č sostenziale? insomma sono un

Newsgroup: it.comp.lang.visual-basic
Titolo: 8¬!:"Stampare Grafici di una PictureBox e` semplicemente IMPOSSIBILE?"

Pur seguendo le "delucidazioni" dell' help,
VB5 mi stampa solo una finestra grigia.
La form contiene solo un pulsante (per tracciare anche solo un puntino)
e una PictureBox (con propieta` AutoRedraw=TRUE)
Private Sub Command1_Click()
    Pic.Line (10, 10)-(4000, 2000), 0
    Pic.Line (10, 10)-(2000, 4000), &HFFFFFF
    Pic.Line (10, 10)-(2000, 2000), 1000
End Sub
Private Sub Pic_Click()
    PrintForm
End Sub
Grazie per l'Aiuto, FenixX.
|:-D| FenixX |(-:|
ICQ: 16201896
http://www.angelfire.com/ok/fenixx/
http://space.tin.it/scienza/dfelisar/
FenixX=Visual=Book=Marks=System:[Meteos]-[SuperBarZell]-[MangAnime]-[Music]
WebStation: Main Menu
[SearchEngines] [HotPages] [InternetServices] [MessagesServices]
[Hardware] [Software] [InternetSoftware]
[Friends] [People] [Audio-Music-Radio] [Video-Live-Cam-TV]
[MangAnime] [Doc-Info] [NewsPapers] [Lombardia] [Links2Links]
  ("`-''-/").___..--''"`-._
   `6_ 6  )   `-.  (     ).`-.__.`)
   (_Y_.)'  ._   )  `._ `. ``-..-'
     _..`--'_..-_/  /--'_.' ,'

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema risolvibile ma fastidioso!

Sono incappato su uno di quei problemini fastidiosi che fanno saltare i
nervi + che perder tempo:
Con il comando Format(Time, "hh:mm:ss)  ho come risultato l'ora di sistema.
Con il comando Format(Time, "hh:mm)   ho come risultato l'ora di sistema nel
formato ristretto di hore.minuti.....   OK
Con il comando Format(Time, "hh")    ottengo solo le ore..... OK
Con il comando Format(Time, "ss")    ottengo solo i secondi.....  OK
Qualcuno/a sa spiegarmi perchè con l'istruzione Format(Time, "mm")   ho come
risultato 12????
Non riesco a capirlo: il risultato è sempre 12 qualuncue ora sia!...si
antimeridiana che postmeridiana, sia che i minuti correnti siano 2 (es
17.02) , 8 ,12, 30, 45 ec..
Ho risolt temporaneamente il problema con l'istruzione Mid(Format(Time,
"hh:mm),2,4)   Ma vorrei evitare di driblare l'ostacolo in questo modo.
Grazie a chiunque voglia/sappia rispondermi!

> U T:

Format$(Time, "n") ... come indicato nella guida;-)
n=Minuto (Minute)
m=Mese (Month)
Pero` VB "ti viene incontro" se usi "m" invece che "n" con
altri simboli che inequivocabilmente riguardano la parta
oraria di una data ("h", "s"). Usato da solo VB interpreta
che, "inequivocabilmente", vuoi ottenere il solo mese di una
data. Quindi ricava la parte data da Time, come se scrivessi
Format$(Time, "d/mm/yyyy").
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

risultato 12????
Perché nella funzione Format, "mm" restituisce il mese, mentre "Time" restituisce solo l'ora....
O usi:
Format(Minute(Time),"00")
oppure
Format(Time,"Nn")
Per maggiori info cerca "Formati di data e ora definiti dall'utente (funzione Format)" nella guida
in linea.
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Date

So chè è una domanda che è già statao posta, ma non riesco a trovarla
perchè se faccio
Preventivi.Index ="DataConsegna"
Preventivi.Seek "=", cDate("25/02/99")
Funziona e se faccio
Preventivi.Index ="DataConsegna"
Preventivi.Seek "=", cDate("6/2/99")
Non fa quello che deve? potrebbe essere perchè forse in questo caso mi
scambia mese/giorno?
non ne ho la più pallida idea, ringrazio chi mi aiuterà e mi scuso per aver
chiesto qualcosa di già detto

Esatto, il problema dovrebbe essere proprio quello. Prova così:
Preventivi.Index ="DataConsegna"
Preventivi.Seek "=", cDate(Format("6/2/99","mm/dd/yyyy"))
Saluti



grazie, e x lo stesso problema nelle ricerche SQL?

...

In SQL devi usare SEMPRE il formato U.S.A. (MM/DD/YYYY), oppure quello ISO
(YYYY-MM-DD).
--
Roal Zanazzi
z...@iol.it


z...@iol.it
come faccio a invertire giorno e mese dal formato "italiano"?
non è che per caso puoi ricordarmi come viene espressa la data? mi pare sia
un long ove l'intero è la data e l decima l'ora... le decine eunità il
giorno e poi il mese... non mi ricordo...
Grazie
Ciao

giorno e poi il mese... non mi ricordo...
Un long e' solo intero.
Le date sono in formato double (floating point in doppia precisione), ma e'
buona norma non fare diretto riferimento al tipo sottostante, ed utilizzare
le apposite funzioni per manipolare le date (DatePart, DateDiff, etc...)
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: Possibile che nessuno lo sappia?

...mi rifersco al mio precedente messaggio 'Come si realizza in VB
l'equivalente del comando File-->Nuovo in Gestione risorse?' 
Tale comando infatti permette di creare un nuovo file (vuoto ovviamente)
per un certo numero di applicazioni registrate. Ad esempio posso creare
un nuovo documento di Word o un nuovo foglio di Excel etc. etc. Ebbene
io vorrei potere reperire queste informazioni dal registro di Win95
cioè  vorrei presentare all'utente la stessa lista di files 'creabili'
ma... come si fa? Ci sono delle API apposite? mi devo andare a leggere
il registro con le relative API e rivavarmi le info manualmente? Boh...
Ogni vostro aiuto mi sara preziosissimo!!!
Grazie

 Grazie
Devi costruire una estensione della shell, non e` difficile ma devi
essere ben documentato, per evitare di mandare in crash l'explorer.
Consulta la documentazione del WIN32 SDK alla voce "Building a shell
extension", e` tutto spiegato nei dettagli.
Ciao,
 
--------------------------------------
*        Lorenzo Tanganelli          *
* Dipartimento Sistemi & Informatica *
* Universita` degli Studi di Firenze *
--------------------------------------

 
Spero proprio di avere capito quello di cui stavi parlando comunque per
prendere dei dati dal Registro di Windows devi usare la funzione
GetSettings o analoghe che puoi trovare sul manuale OnLine di VB5. Era
quello che cercavi?
Mosquito
Dal Books OnLine di VB5.0...
You can use the GetSetting and GetAllSettings functions to retrieve
registry values stored in your application's registry location. For
example, your application can retrieve registry settings to recreate its
condition at the time it was closed.
One Setting at a Time
To retrieve a single registry setting, use the following syntax for the
GetSetting function:
GetSetting(appname, section, key[, default])
 
The following code retrieves the value of the LastEntry key in the
"RegCust" application's Startup section, and displays the value in the
Immediate window.
Private Sub Form_Load()
	Dim intLastEntry As Integer
	intLastEntry = GetSetting("RegCust", "Startup", _
	"LastEntry", "0")
	Debug.Print intLastEntry
End Sub
 
Note that you can use the optional parameter, default, to set the value
returned by Visual Basic when there is no value listed in the registry for
the specified key.
Multiple Settings
To retrieve a list of registry keys and their values, use the following
syntax for the GetAllSettings function:
GetAllSettings(appname, section)
 
The following code retrieves a two-column list of registry keys and their
values in the "RegCust" application's Startup section, and displays the
results in the Immediate window.
Private Sub Form_Load()
	Dim avntSettings As Variant
	Dim intX As Integer
	avntSettings = GetAllSettings("RegCust", "Startup")
	For intX = 0 To UBound(avntSettings, 1)
		Debug.Print avntSettings(intX, 0), _ 
		avntSettings(intX, 1)
	Next intX
End Sub
 
For More Information   See "GetSetting Function" and "GetAllSettings
Function" in the Language Reference in Books Online.
Newsgroup: it.comp.lang.visual-basic
Titolo: Database protetti con VB

Salve a tutti,
ho un programma VB 6 che lavora con un db access. Vorrei proteggere il db
con password. Qualcuno sa dirmi che modifiche devo fare sul database mdb e
nel codice VB 6.
Grazie
ciao

 ha scritto nel messaggio
news:Z27_a.76328$cl3.2...@news2.tin.it...

non specifichi in vb come apri la connessione, in ogni caso nel momento in
cui apri la connessione dovrai impostargli la password... non vedo altre
modifiche che tu debba fare

Newsgroup: it.comp.lang.visual-basic
Titolo: FrameWork - SDK

Scusate la bestialità della mia domanda......
ho trovato su una rivista di informatica, l' SDK di Visual Studio
.NET.....ma  scusatemi..l'SDK non e' l'insieme delle parti componenti il
linguaggio e utili per adoperarlo?
Non dovrebbe essere venduto insieme al programma? Altrimenti un osi installa
solo l'SDK e ci lavora senza programma ..giusto? Stesso discorso vale per
Java, di cui si trovano diverse release dell'SDK
Mi chiarite questa improvvisa perplessita'?
Emanuele

 Java, di cui si trovano diverse release dell'SDK
E' proprio la stessa cosa.
Infatti stanno nascendo IDE di sviluppo per .net scritti con il solo 
.net framework.
Certo è che usare l'ambiente di sviluppo Microsoft è tutto un altro mondo.
Ciao


Grazie della delucidazione

> Grazie della delucidazione
Aggiungo:
http://www.icsharpcode.net/OpenSource/SD/Default.aspx
è un IDE freeware e OpenSource
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] 2 cose semplici semplici

Ciao,
sto cercando di imparare il Visual Basic (a proposito, cosa ne pensate del
libro "Visual Basic passo per passo), ho un paio di dubbi.
E' possibile inizializzare una variabile nel momento in cui viene dichiarata
?
(per esempio in c++ č int var=5;)
Come si dichiarano array pluridimensionali ? In c č int var[4][3] per
esempio ma in Vb
č cosi dim var(4)(3) as integer ???
Ciao
e GRAZIE
mXd

 č cosi dim var(4)(3) as integer ???
bada che non sono sicuro, guarda sull'help in linea... mi pare che si faccia
dim var(4,3) as integer
Ciao
Faber

 
-- 
--
Gio_F - mailto:
jg...@tiscalinet.it

E' possibile dichiarare ed assegnare solo nel senso che in VB non
e' necessario dichiarare le variabili,
Basta non avere "Option explicit" nella parte generale del form
(Dichiarazioni)
Come libro io ho trovato interessante
Francesco Balena
Programmare Visual Basic 6.0
Microsoft Press
Mondadori Informatica
ISBN 88-7131-898-6
Se non sei un programmatore alle prime armi (se 
p.es
. usi un C++ o delphi)
penso che ti sia piu' utile di un manuale "passo passo"
Il libro comunque parte dalle basi
Ciao
Davide
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Record corrente dopo un .AddNew ... .Update

Ciao a tutti.
Ho una domanda per voi:
dopo aver aggiunto un nuovo record in un recordset con i metodi .AddNew e
.Update, il record corrente è sempre il primo del recordset.
Però, seguendo il consiglio di Gianluca Pisano, ora ho la necessità di
aggiornare più tabelle con l'ID (contatore) che Access ha assegnato al nuovo
record e quindi non posso sapere con quale ID aggiornare le altre tabelle.
Esempio pratico:
Dim rsContatti As RecordSet
Dim rsTelefoni As RecordSet
[...]
With rsContatti
    .AddNew
    !Nome = txtNome
    !Cognome = txtCognome
    .Update
End With
With rsTelefoni
    .AddNew
    !Telefono = txtTelefono
    !Descrizione = txtDescrizione
    !IDContatto = rsContatti!ID
    .Update
End With
Beh, quando faccio 'rsTelefoni!IDContatto = rsContatti!ID' mi assegna il valore
1, cioè l'ID del primo contatto in assoluto che è stato inserito nella tabella.
C'è il modo di rimanere posizionati sull'ultimo record di rsContatti inserito, o
di poter sapere in qualche modo qual'è il numero che assegnerà Access prima del
metodo Update?
Grazie!
--
Esteban
Hosted by 
www.seber.it

 wrote in message
news:6WtR6.6710$i71.2...@news.infostrada.it...


 *******************************
Grazie, non ci avevo pensato... potevo anche fare una prova!
Ciao!
Esteban
Hosted by 
www.seber.it

Newsgroup: it.comp.lang.visual-basic
Titolo: puntatore mouse

Salve , ho un piccolo quesito:
dopo aver cliccato su un commandbutton vorrei che il puntatore del mouse
andasse automaticamente sopra ad un'altro commandbutton della stessa form.
Come fare ?
Grazie.

 ha scritto nel messaggio
news:i8bib.203792$hE5.6...@news1.tin.it...

Sub Nomebottone1_Click()
    nomeButtone2.setfocus
End sub
Simale

 wrote in message news:i8bib.203792

Devi usare la funzione GDI SetCursorPos()
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

*Elvis* ha provocato un errore irreversibile in mex.dll 
 Dettagli : "il newsgroup non poteva essere written" - Stack : 

Api : setcursorpos 
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 Simale
ciaociao

 ha scritto nel messaggio
news:i8bib.203792$hE5.6...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Visual studio 6.0 ver. professional ed enterprise

Salve a tutti,
chi mi saprebbe dire la differenza tra le due versioni in oggetto di
Visual Studio 6.0?
Grazie
BYe
sfr...@hotmail.com

 Visual Studio 6.0?
Possibilità di sviluppo di programmi Client/Server e... un pacco di milioni
! ^___^
Zeross

Newsgroup: it.comp.lang.visual-basic
Titolo: Determinare la durata di un video MPEG

Ciao a tutti, vorrei chiedere un'aiuto.
Ho una FileListBox dove sono presenti dei filmati MPEG da visualizzare. 
Come posso fare per determinare la durata di un video MPEG ??
Grazie, Salvatore


--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: esiste un sito dove reperire il VB3 ?

in commercio non si trova 

Franco:
  qualche tempo fa' mi era stato segnalato un "link" da cui
potevi scaricare tutte le vecchie versioni di VB, dall' 1 fino
alla 5.
Non so' se sia ancora attivo, ma l' indirizzo era:
 
http://qb4all.cjb.net/
Ciao ed a risentirci
Franco

Newsgroup: it.comp.lang.visual-basic
Titolo: screen didattico

sto studiando visual basic e vorrei , a scopo didattico ,realizzare uno
screen saver.Come posso gestire il periodo di inattività di windows?
Devo utilizzare qualche controllo in particolare ed eventualmente come
funziona?
grazie

 wrote in message
news:88c4hg$qjl$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: collegare un file hlp ad una applicazione VB 6

Vorrei sapere come posso da un'applicazione VB 6 richiamare un file di
help (hlp, o anche fatto in html compilato). Nota il collegamento non
dovrebbe avvenire solo tramite tasto F1, ma anche tramite il richiamo da
una voce della barra del menu.
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:ae5839acd06aca53d22...@mygate.mailgate.org...


 Ma non sapendo come hai compilato la guida non posso esser più preciso.
E per agganciare l'help (magari il Sommario dell'help) ad una voce di menù,
quella che si trova generalmente a destra con il carattere di "?" ??

 quella che si trova generalmente a destra con il carattere di "?" ??
Se non ricordo male dovresti fare riferimento alla proprietà TopicID che
imposti durante la
creazione della guida.In genere il menu della guida viene denominato index,e
ad ogni
argomento viene assogiato un numero di ID.
Bene. Devi fare fiferimento a quel numero.
Spero di esserti stato d'aiuto.
Cordialità
Johnny

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Come si imposta una proprietà di una classe come default?

Vi basta la richiesta nel subject?
Ho riparato OE, adesso potete rispondermi con l'NG.
--
E.G. er Cicca


In VB5 se premi F2, avrai le proprieta' degli oggetti...
Scegli la tua classe, la proprieta' che desideri, checka l'apposito checkbox
per settarla come proprieta' di default.
Io comunque, di solito uso il Class Wizard di VB5, e' piu' comodo.
--
Roal Zanazzi
z...@iol.it

Vi basta la richiesta nel subject?
Ho riparato OE, adesso potete rispondermi con l'NG.
--
E.G. er Cicca

...


Newsgroup: it.comp.lang.visual-basic
Titolo: run-time Access 97

Ho Visual Studio 6.0. E' possibile creare un'istallazione del run-time per
far girare un'applicazione Access 97 da chi non possiede Access? So che č
possibile con la versione Developer Edition di Office ma mi chiedo se posso
farlo anche con Visual Studio visto che č molto piů completo e sopratutto
molto piů costoso.
Ciao a tutti

 wrote in message
8rkjkk$a9n$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Avviare applicazione su specifiche coordinate

Si può avviare un programma esterno (esempio Notepad) visualizzandolo
su determinate coordinate dello schermo?
Mario

visualizzandolo su determinate coordinate dello schermo?
'Api
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOZORDER = &H4
Private Const SWP_NOREDRAW = &H8
Private Const SWP_NOACTIVATE = &H10
Private Const SWP_FRAMECHANGED = &H20
Private Const SWP_SHOWWINDOW = &H40
Private Const SWP_HIDEWINDOW = &H80
Private Const SWP_NOCOPYBITS = &H100
Private Const SWP_NOOWNERZORDER = &H200
Private Const HWND_TOP = 0
Private Const HWND_BOTTOM = 1
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private Declare Function SetWindowPos Lib "user32" ( _
    ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
    ByVal X As Long, ByVal Y As Long, ByVal cx As Long, _
    ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindowEx Lib "user32" Alias _
    "FindWindowExA" (ByVal hWndParent As Long, _
    ByVal hWndChildAfter As Long, ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Long
Private Declare Function GetWindowThreadProcessId Lib "user32" ( _
    ByVal hwnd As Long, lpdwProcessId As Any) As Long
Private Sub SomeSub()
    Dim PID As Long
    Dim hwndFound As Long
    Dim pidFound As Long
    PID = Shell("notepad", vbNormalFocus)
    Do
        hwndFound = FindWindowEx(0, hwndFound, _
        "notepad", vbNullString)
        If hwndFound <> 0 Then
            GetWindowThreadProcessId hwndFound, pidFound
            If pidFound = PID Then
                SetWindowPos hwndFound, 0, 100, 50, 400, 250, _
                    SWP_NOZORDER
                Exit Do
            End If
        Else
            Exit Do
        End If
    Loop
End Sub
Private Sub Form_Load()
SomeSub
End Sub
--
Fosco

Newsgroup: it.comp.lang.visual-basic
Titolo: Come creare dei report in VB6 con sottoreport alla maniera di Access

Salve,
come posso fare un sottoreport in VB6 con a lato altri campi o immagini ?
Ringrazio chiunque mi dia una dritta
Grazie
Giorgio

 wrote in message
4jyB3.117503$6C.2...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Impostazioni internazionali e formati stringa

Ho il seguente problema:
Sistema: Win NT 4.0, Sp5
VB6, Sp3
Db SqlServer 7.0
Nei Regional Settings, il formato della data e' yyyy/dd/mm (mi serve per
testare delle funzioni di conversione di data);
Leggo su un Db un campo DateTime (usando le connection ed i fields), e
il valore e' '2000/19/05', e fin qui tutto ok )ho scritto in quel campo
la data 19/05/2000);
Perche' se faccio la DateValue mi da type mismatch? L'help dice che la
DateValue accetta una stringa 'ben formata', seguendo le impostazioni
internazionali. Quindi DateValue("2000/19/05") dovrebbe ridarmi
"2000/19/05". Perche' non lo fa?
Problema corerelato: se cerco di estrarre dalla data il giorno (usando
la Format) anche questa esplode. Se cioe' chiedo Format("2000/19/05",
"dd"), che dovrebbe darmi 19, ho ancora un Type Mismatch.
Nota: Se inverto mese con anno, tutto funziona. Cio' vuol dire che VB si
conforma alle impostazioni internazionali solo a parole, ma che ha dei
suoi formati interni, o c'e' qualcos'altro?
Grazie a tutti per l'aiuto
Bye by Massimo

 ha scritto nel messaggio
news:392A4599...@txt.it...


esegui questo da query analizer
use tempdb
drop table datatest
create table datatest( datasc datetime)
insert into datatest( datasc) values ( convert(datetime,'20000415',112) )
select * from datatest
in vb
dim tt as date
dim rs as new adodb.recordset
with rs
    .open ,[imposta la connessione],"select * from tempdb..datatest"
    tt = !dataSc
    debug.print tt
end with
cosa ti da ?


Il problema e' che con la data settata nei Regional Settings a yyyy/dd/mm, VB
non la riconosce, e si ostina a volerla considerare come yyyy/mm/dd. Di
conseguenza, anche la format fallisce, perche' bove si aspetta di trovate il
mese c'e' il giorno.
Bye by Massimo 8-]

prova a mettere un asterisco prima e dopo le virgolette '..
Prova
ciao
filippo