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

Il DTPiker seleziona sempre la data, a meno che, non si inserisce il
checkBox che, oltretutto non ha un evento per intercettare se il chek č
selezionato o meno.
C'č un sistema per non selezionare la data, senza usare il checkBox?
Carmelo.

Il 12/01/2004 14.41, Carmelo scrisse:

Io uso il ccrp DateTime picker e se utilizzo il checkbox, quando si 
clicca sul cb per selezionare si scatena l'evento change
Private Sub ccrpDtp1_Change(NewValue As Variant)
NewValue contiene una data valida
Se deseleziono il checkbox NewValue e' Null
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 Se deseleziono il checkbox NewValue e' Null
Stessa cosa per il dtpicker: se non ha il checkbox la data è null.
Non ricordo se effettivamente si scatena o no l'evento change.
Ciao

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

Come si fa a far suonare uno dei suoni predefiniti? (es. Avvio di windows)
Andrea
anr...@tin.it

 Come si fa a far suonare uno dei suoni predefiniti? (es. Avvio di windows)
Probabilmente c'č qualche API che risolve il tuo problema. Ma io non so
qual'č!
Comunque potresti usare anche questo metodo:
Nel registro di configurazione trovi il nome del file ".wav" associato
all'evento specifico.
Una volta trovato il nome del file che ti interessa lo fai suonare con il
metodo che preferisci
Per esempio il nome del file ".wav" associato all'avvio di Windows
(dell'utente corrente) lo trovi qui:
HKEY_CURRENT_USER\AppEvents\Schemes\Apps\.Default\SystemStart\.Current
 __     __
<o>  <o>
      []
  \____/   ......(Statti bene!)
Pasquale Minerva
mine...@libero.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Zen e....

 Insegnamento Zen:
 ....Siate come la piccola supposta che quando č
 chiamata a compiere il suo dovere lo fa fino in fondo
 e senza mai guardare in faccia nessuno.
 Si mette subito in cammino cercando umilmente la
 propria strada. E se qualcuno le si para davanti
 dicendole con presunzione ed arroganza: "Lei non sa
 chi sono io" - intimamente sa gią che non puņ essere
 altro che uno stronzo...

  altro che uno stronzo...
Muahahhaha ! Sono appena rientrato in ufficio dopo 2 ore sotto il sole
cocente in auto con l'aria condizionata rotta , Friciu' sei un grande,
finalmente il primo sorriso di oggi ^____________^

 Rodney Dangerfield

 Insegnamento Zen:
(snip)
carina, ma posso permettermi di fare il guastafeste?
affrontare la vita partendo dal presupposto che incontrerai sempre e
comunque solo degli stronzi non mi pare un buon viatico.
Salutoni
Sergio


Il pessimista ha sempre belle sorprese nella vita. ;-)
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic Online Tutorials

Does anyone know of any Online tutorials for Visual Basic.
Thanks
Steven Houghton
h...@netsprint.net.au

 wrote in message

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Ado, Datacontrol e modifica dati

Sto iniziando a utilizzare ADO in modo "serio".
Ho un grosso problema:
se associo una tabella a un DataGrid e abilito la possibilità di creare e
modificare record tutto funziona se la tabella è del tipo:
Tabella (modificabile)
Nome -> char [20]
Categoria -> char [20]
se creo una query di unione di due tabelle:
Tabella A (modificabile)       Tabella B(non modificabile)
Nome                   |----->     ID_TabellaB
ID_TabellaB   ----|               Categoria
Risultato query:
Tabella Risultato
Nome
Categoria
Quando tento di inserire un nuovo record giustamente mi viene visualizzato
un GIUSTAMENTE un errore.
Come faccio con la DataGrid ad creare un nuovo record nella Tabella A, dove
l'operatore al posto di inserire manualemente il valore ID_TabellaB deve
selezionare la relativa voce Categoria della Tabella B?
Grazie 1000
xandr...@SPAMhotmail.com
(rimuovere NO SPAM)

La datagrid non è il posto ideale per fare data entry.
Personalente uso le datagrid per il browsing dei recordset ma porto SEMPRE
il dataentry su comuni controlli testo/datacombo ...
ciao
ugo

il dataentry su comuni controlli testo/datacombo ...
concordo in pieno :)
oltretutto, si alleggerisce il lavoro del server perche' la griglia puo' cosi' essere
alimentata con un recordset / resultset in sola lettura, decisamente piu' veloce
e senza problemi di lock.
ciao, hal


Esattamente quello che faccio.
Ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Grafici

Esiste qualcuno che abbia un po'    dimestichezza con il controllo di VB per
fare i grafici?Intendo quello che fa i grafici simili a quelli di Exel.
Ho necessità di implementare questo controllo, ma non riesco a trovare
documentazione che illustri come funziona.
Anche sui vai libri che ci sono in giro non viene detto quasi nulla.
Qualcuno puo' aiutarmi?

Ciao Giovanni
Immagino che stai parlando di MsChart
Nel cd di vb esiste un ottimo esempio. Cerca la cartella ChrtSamp
A presto

Newsgroup: it.comp.lang.visual-basic
Titolo: Registro di configurazione

Ciao a tutti.
Per cortesia, qualcuno sa dirmi se esiste un sistema per scrivere nella
chiave del registro di configurazione
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
da un programma visual basic?
grazie, ciao FM
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 da un programma visual basic?
Premesso che per scrivere in HKLM il programma deve girare con diritti
di amministratore, c'e` piu` di un modo:
1. Windows API
http://support.microsoft.com/kb/q145679/
2. Scripting Host
http://support.microsoft.com/kb/244675/EN-US/
3. file .reg
http://www.visualbasic.happycodings.com/Windows_and_Controls/code16.html
-- 
ciao, hal

 
http://support.microsoft.com/kb/244675/EN-US/
qua' mi accodo e posto un coso molto intuitivo :
(insomma in 3 riche di codice si ha tutto e d+)
'*.vbs
Dim oShell, bKey
Set oShell = WScript.CreateObject("WScript.Shell")
oShell.RegWrite "HKCU\Software\ACME\Pippo\", 1, "REG_BINARY"
oShell.RegWrite "HKCU\Software\ACME\Pippo\Pluto", "Minnie", "REG_SZ"
bKey = oShell.RegRead("HKCU\Software\ACME\Pippo\")
WScript.Echo oShell.RegRead("HKCU\Software\ACME\Pippo\Pluto")
'togli ' qui sotto per cancellare le key
'oShell.RegDelete "HKCU\Software\ACME\Pippo\Pluto"
'oShell.RegDelete "HKCU\Software\ACME\Pippo\"
'oShell.RegDelete "HKCU\Software\ACME\"
--
Fosco

 (insomma in 3 riche di codice si ha tutto e d+)
si`, lo scripting host e` stata davvero una bella mossa da parte
di Microsoft: con uno script si riesce a fare praticamente di
tutto a costo zero.
-- 
ciao, hal

 tutto a costo zero.
ed anche una bella batosta il ILoveYou.vbs del, se non vado errato,
filippino semi principiante.
--
Fosco

 filippino semi principiante.
eh si`, qualche problemino di sicurezza...
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: RaiseEvent

Sto facendo un controllo in VB5 SP3.
ho degli eventi da scatenare, ma questi eventi debbono essere scatenati
da moduli basic (non dalla classe del controllo).
Dal controllo e' sufficiente fare RaiseEvent NomeEvento
ma come si fa al di fuori del controllo a scatenare un evento del controllo?
Attualmente ho messo public delle funzioni chiamate FireNomeEvento che
scatenano l'evento, ma queste funzioni sono viste anche dall'utente dell'OCX.
Come si puo' fare?
Gazie
-- 
Hi, Ciao
Ettore                 By -MES-
http://www.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb

La strada giusta č proprio quella che hai scelto tu. Solo, invece che
Public, le funzioni FireNomeEvento, devono essere Friend, cosě saranno viste
dal modulo bas ma non all'esterno del'ocx.
Domenico
Ettore Maronese ha scritto nel messaggio <01bda907$0f991dc0$2e2c4bc2@mes>...


 
Ciao Domenico,
Ci avrei giurato che la soluzione sarebbe arrivata da te  :-)))
GRAZIE 1000


GRAZIE 1000
Prego.
:-)
Domenico
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Uso ADO....si cancellano le tabelle

Ho sviluppato un grosso programma usando ADO come accesso ai database; per
ora utilizzo Access come db, ma potrebbe essere che un giorno debba
utilizzare SQL Server.
Ogni tanto mi succede che nel database scompare qualche tabella, e finisce
nel nulla. Il programma è utilizzato in un ambiente multiutente (più o meno
una decina di client) e le tabelle che spariscono sono effettivamente quelle
che hanno maggior accesso.
Mi spiego meglio: la tabella che viene cancellata più spesso è la tabella
Log, che contiene tutte le operazioni che gli utenti fanno con il programma.
Ogni minima cosa viene registrata nella tabella. Può essere che diversi
utenti accedano contemporaneamente alla tabella e che questa si rovini?
Una volta mi sono fatto mandare via e-mail il database ben compattato e ho
scoperto che spesso la tabella non si cancella. Se si apre il db con Access
2000 essa compare ancora fra le altre tabelle, ma è impossibile aprirla.
Quando faccio doppio-clic, la tabella non si apre e Access non fa più nulla.
Se tento di compattare e ripristinare il database, Access si inchioda.
Cosa può essere?
L'unica soluzione fattibile è quella di creare un nuovo db vuoto e importare
da quello rovinato tutte le tabelle e le query, tranne la tabella Log, che
deve essere ricreata da zero, o importata da qualche altra parte.
E' un problema piuttosto serio, a qualcuno di voi è mai successa una cosa
del genere?
Aiutatemi!!!
Damiani "Alletun" Igor
ico...@simcity.it

 wrote in message
8fp7ul$dqe$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Attesa caricamento form

Qualcuno sa dirmi come posso fare i modo che il mio prg attenda di disegnare
completamente il form prima di passare ad eseguirmi un'altra operazione..?
In pratica il form che porta la scritta "Elaborazione in corso" non appare
mai in modo "deciso".. quasi trasparente :-)..
Io provavo con vbModal .. funziona.. ma non mi esegue piů l'operazione
successiva ....
Grazie Gabriele.

 wrote in message
ufsI4.112524$pn3.1...@news.infostrada.it...



io utilizzo un trucchetto :
quando ho operazioni lunghe da eseguire  utilizzo un timer
form_load()
timer.interval=20
timer1.enabled=true
end sup
timer1_timer
timer1.enabled=false
....istruzioni da eseguire
end sub

 > Io provavo con vbModal .. funziona.. ma non mi esegue più l'operazione


Newsgroup: it.comp.lang.visual-basic
Titolo: Una text per tante funzioni

Ho creato un server e un client.
Apro il client che ha una textbox in quest'ultima scrivo "open" quindi la
textbox si deve svuotare (testo.text="") e dovrebbe attendere che ci scrivo
il nuovo comando!!!
Quindi
Scrivo open (nella list mi appare inserisci username)
allora io dovrei inserire la mia user nella textbox e il mio prog dovrebbe
segnarsi la user e srichiedere la password
Per ora avevo saltato il problema uando delle inputbox ma addesso ho proprio
bisogno della textbox!!!
Grazie in anticipo!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: un' info su stringa

Come si fa a scrivere ricorsivamente un carattere per un tot di volte?
Grazie


String(carattere,QuanteVolte)

 Come si fa a scrivere ricorsivamente un carattere per un tot
di volte?
Function String$(Number As Long, Character) As String
    Member of VBA.Strings
    Returns a repeating character string of the length
specified
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: Toni DTMF

ciao a tutti.
c'è un modo con vb6 o con .net di "sentire" i toni dtmf di un telefono?? o
letto che le tapi dovrebbero foarlo ma la documentazione è scarsa
sull'argomento...
è anche possibile con un modem ricevere gli sms e interpretarli??? grazie
mille ciao

mille ciao
Forse questo link ti puň aiutate, qui spiega la TPU degli SMS
http://www.riccibitti.com/tinyplanet/tiny_sidebar.htm
ciao
  Stefano

 è anche possibile con un modem ricevere gli sms e interpretarli???
Si , comandi AT , AT+CMGF e simili , passare via PDU e' molto + ostico ma
permette di gestire anche gli SMS data tipo i PDU nokia che (ai miei tempi)
erano quasi uno standard.
Trovati le rfc sugli AT mi pare una .3 avesse la parte sulla rubrica e sugli
sms ,
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 ha scritto nel messaggio
news:P4K7c.83694$Kc3.2...@twister2.libero.it...



guarda sul sul sito comune
http://www.it-lang-vb.net
e cerca   SmsClient.zip
e su
http://www.visual-basic.it
cerca SMS
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: [Repost] Re: [RICHIESTA] ... Lavorare sui singoli bit

 Spero che questa funzione ti aiuti a capire un po la dinamica binaria.
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm
 

> 0 and 0 = 1
0 and 0 = 0
Ciao.
-- 
BSD is for UNIX lovers -- linux is for Windows haters.

 0 and 0 = 0
Emm emm... scusate qualcuno conosce corsi serali per riprendere il diploma e 
magari la licenza di 3° media ?
-- 
[un Gigio2k con il cappello d'asino nell'angolino dietro la lavagna :( ]


Newsgroup: it.comp.lang.visual-basic
Titolo: Usare le form per stampare!

C'è qualcuno che sa dirmi come impostare un form di dimensioni più grandi
dello schermo per simulare un report?
Questo perchè non riesco a impostare la proprietà Height del form di
dimensioni maggiori 11520

Io ci riesco...l'ho messa pure a 30.000...prova a mettere il BorderStyle a
0...o Fixed Single...e poi dovresti riuscirci.
Gianni Moretti

Newsgroup: it.comp.lang.visual-basic
Titolo: connessione internet

Come posso fare a vedere quando è attiva o disattiva una connessione di
accesso remoto?
Grazie
--
___________________________________
BIG 
thebi...@tin.it
UIN 45561492
The Big HomeRpage 
http://big.freeweb.org
"Two beer or not two beer
this is the question"
(ShakesBeer)
___________________________________

 Come posso fare a vedere quando è attiva o disattiva una connessione di accesso remoto?
Cerca sul sito comune... Dovrebbe esserci un articolo di Moreno Sirri, e
qualche programmino di esempio.
Ciao,
Brando
-- 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Sito comune di it.lang.vb  :  
http://www.murialdo.it/it_lang_vb
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''



Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Finestre dell'editor

Che vergogna. :-(
Ho disancorato le finestre dell'editor vb e ora sono ore (!) che sto
cercando di rimetterle come erano prima e non ci riesco.
Il fatto e' che io vorrei le finestre ancorate ma disposte in verticale,
cioe' a forma di colonna lunga e stretta.
Sulla sinistra quella degli oggetti, alla destra una sull'altra proprieta'
progetto e proprieta'.
In pratica era la disposizione iniziale se non ricordo male.
Adesso pero' ogni volta che provo ad ancorarle mi si dispongono sempre per
linee orizzontali.
Scomodissimo.
Ho anche provato a reinstallare vb "sopra" ma non cambia niente.
Perche' non si riesce a fare ancorare un finestra sul bordo verticale (a
destra o sinistra) ma solo in alto e in basso?
Poi, dato che ormai la figuraccia l'ho gia' fatta... vorrei sapere ma come
accidenti si fa a far visualizzare la finestra "Disposizione form"?
nell'help dicono Menu->Visualizza->Finestra disposizione form.
Eh se fosse cosi' facile ci arrivavo anche io, ma nel menu visualizza quella
voce io non ce l'ho.
E guarda che ora e' :-(
ciao
Paolo

 cercando di rimetterle come erano prima e non ci riesco.
Ci sono riuscito. :-/
Era perche' con la finestra massimizzata non trovava bordi a cui attaccarsi.
La finestra "disposizione form" invece rimane una desaparecidos.
Mi sa che e' visualizzata ma alta un pixel
Provero' a cercarla...

Newsgroup: it.comp.lang.visual-basic
Titolo: office web component

Buonasera a tutti.
Sto realizzando un semplice programmino, che utilizza il componente office 
excel.
Dove posso trovare un aiuto per utilizzare al meglio questo controllo?
Nella fattispecie: come si fa ad aprire o salvare lo spreedsheet appena 
elaborato?
Grazie 

 ha
scritto:

Registra una macro che lo fa e metti prima dei comandi il nome dell'oggetto. L'aiuto lo
trovi nell'help di vba, ma anzichč i parametri denominati (filename:=...) devi scrivere i
parametri nell'ordine descritto nell'help.
set xl=createboject("excel.application")
xl.Visible = TRUE
oXL.WorkBooks.Add
oXL.cells(1,1)= "Directory: " 
Giovanni.
-- 
Giovanni Cenati (Aosta, Italy)
Write to user "Reventlov" and domain at katamail com
http://digilander.libero.it/Cenati
 (Esempi e programmi in VbScript)
-- 

 --
Grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: HELPPPPPP!!!!!!!!!

salve a tutti...vi volevo chiedere un aiuto..
domani devo consegnare un programma per la gestione di un folgio firma degli
insegnanti di una scuola...ho un problema quando vado a memorizzare le
assenze.
quando inserisco un nuovo insegnate, chiudo il form di inserimento, lo
riapro e memorizzo un nuovo insegnate con un periodo di assenze mi cancella
l'assenza dell'ins precedente e mi memorizza in una nuova.
vi metto anche il codice spero che qualcuno abbia 5min da peredere per
dargli un'occhiata!!!
Private Sub Form_Load()
lunghezzarecin = LenB(insegnante)
fidin = FreeFile
Open "c:\insegnanti.dat" For Random As fidin Len = lunghezzarecin
lunghezzafile = LOF(fidin)
nrecin = LOF(fidin) / lunghezzarecin
lunghezzarecass = LenB(assenza)
fidass = FreeFile
Open "c:\assenze.dat" For Random As fidass Len = lunghezzarecass
nrecass = LOF(fidass) \ lunghezzarecass
----------------------------------------------------------------------------
------------------
Private Sub Inserisci_Click()
With insegnante
     .nome = Text1.Text
     .cognome = Text2.Text
     .gglibero = Combo1.Text
     .cod = 1000 + nrecin
End With
Put #fidin, nrecin + 1, insegnante
If AssenzaSi.Value = True Then
                             With assenza
                                  .codinsegnante = insegnante.cod
                                  .inizio = AssenzaInizio
                                  .fine = AssenzaFine
                                  .motivo = AssenzaMotivazione.Text
                             End With
                             Put #fidass, nrecass + 1, assenza
                             nrecass = nrecass + 1
End If
nrecin = nrecin + 1
Text1.Text = ""
Text2.Text = ""
AssenzaInizio.Value = Date
AssenzaFine.Value = Date
Combo1.Text = "Lunedi"
AssenzaMotivazione.Text = ""
----------------------------------------------------------------------------
------------------
Private Sub Form_Unload(Cancel As Integer)
Close fidin
Close fidass
GRAZIEEEE
--
Saluti
Antonello PINNELLA

dargli un'occhiata!!!
Non potresti inviare un codice più chiaro ?
Eventualmente mandami i sorgenti nell'email.
Newsgroup: it.comp.lang.visual-basic
Titolo: Trascinare un form senza barra

Salve a tutti,
   avrei la necessità di poter trascinare un form senza
barra del titolo.
Qualcuno sa darmi delle indicazioni in merito?
Grazie
Peter
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
news:212Z216Z18Z195Y...@usenet.iol.it...


Crea un form e mettici questa roba qui:
Declare Function SendMessage Lib "user32" _
    Alias "SendMessageA" (ByVal hWnd As Long, _
    ByVal wMsg As Long, _
    ByVal wParam As Integer, _
ByVal lParam As Any) As Long
Declare Sub ReleaseCapture Lib "user32" ()
Public Const WM_NCLBUTTONDOWN = &HA1
Public Const HTCAPTION = 2
Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y
As Single)
    Dim lngReturnValue As Long
    If Button = 1 Then
        Call ReleaseCapture
        lngReturnValue = SendMessage(Me.hWnd, WM_NCLBUTTONDOWN,
HTCAPTION, 0&)
    End If
End Sub
Clikki e tieni premuto sul form e lo muovi.
Ok?
Puoi attaccarlo a qualsiasi evento MouseMove.
-> GbC
http://www.chiappori.net
http://www.gbcweb.com

 Grazie
ciao, a.
Const HTCAPTION = 2
Const WM_NCLBUTTONDOWN = &HA1
Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" _
Alias "SendMessageA" (ByVal hwnd As Long, _
ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y
As
Single)
If Button = 1 Then
Dim ReturnVal As Long
X = ReleaseCapture()
ReturnVal = SendMessage(hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0)
Else
Unload Me ' o quello che vuoi
End If
End Sub

 ha scritto


Funziona (c'erano dubbi?)
Un grazie a tutti
P.

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] inizi con le stored procedure..

ciao,
mi sto cimentando per la prima volta ad utilizzare le stored procedure con
ado2.6 e vbsp5. ho provato a modificare l'esempio dell'msdn e a fare delle
prove
ho creato l'sp su sql 7.0
 CREATE PROCEDURE [comme] @CODCOM AS varchar(20)
AS
SELECT * FROM COMMESSA WHERE [ID COMMESSA]=@CODCOM
e scritto questo codice in vb:
 Set cnn1 = New ADODB.Connection
   strCnn = "dsn=pippo; "
   cnn1.Open strCnn
   Set cmdByRoyalty = New ADODB.Command
   Set cmdByRoyalty.ActiveConnection = cnn1
   cmdByRoyalty.CommandText = "comme"
   cmdByRoyalty.CommandType = adCmdStoredProc
   cmdByRoyalty.CommandTimeout = 15
 Set prmByRoyalty = New ADODB.Parameter
   prmByRoyalty.Type = adVarChar
   prmByRoyalty.Direction = adParamInput
   prmByRoyalty.Value = "600"
   cmdByRoyalty.Parameters.Append prmByRoyalty
Arrivato qui mi va in errore: metodo append dell'oggetto parameters non
riuscito.
Che significa? ho provato a commentarlo e alla riga successiva:
        Set rstByRoyalty = cmdByRoyalty.Execute()
mi dice: Procedure [comme] expect parameter '@CODCOMM' , wich was not
supplied....
chi mi sa dare una dritta per capire la strada giusta?
grazie mille
ciao

 supplied....
ma qui (lui) cita CODCOMM (con 2 M)

ho sbagliato a scrivere, č codcom da tutte le parti...



Non ho guardato MSDN cosa dice in proprosito .. comunque
    set prmByRoyalty = cbdByRoyalty.CreateParameter()
    prmByRoyalty.Type = adVarChar
    prmByRoyalty.Direction = adParamInput
    prmByRoyalty.Value = "600"
    cmdByRoyalty.Parameters.Append prmByRoyalty
Saluti
Newsgroup: it.comp.lang.visual-basic
Titolo: Funzione da convertire...

Salve a tutti, ho scritto una piccola funzione per generare parole casuali.
In pratica le parole sono della stessa lunghezza di text1. Se per caso il
programma imbrocca la stessa stringa che c'č in text1 allora si blocca.
Il problema č che per fare questo ho dovuto usare una seconda textbox
(text2) per eseguire il confronto: infatti sostituendo le textbox con delle
stringhe non funziona piů niente! Forse sbaglio qualcosa con gli operatori
di confronto tra stringhe: io metto if str1 = str2 then... Magari bisogna
mettere qualcosa come in java if str1.isEqual(str2)...
Insomma, qualcuno puň convertirmi questa funzione per adoperare le stringhe
invece delle textbox? In questo modo dovrei velocizzare di molto il
programma giusto?
Grazie!
Ecco la funzione:
Do While Text1.Text <> Text2.Text
Text2.Text = ""
    Do While Len(Text1.Text) <> Len(Text2.Text)
        Randomize
        Text2.Text = Text2.Text + Chr(Int((26 * Rnd) + 97))
    Loop
If Text1.Text = Text2.Text Then goto endsub
Loop

 Loop
Ecco la tua funzione che usa una stringa (strText2) al posto del textbox
(Text2): non capisco che difficolta abbia potuto avere!
In piů, se sostituisci anche il textbox Text1 con una stringa la funzione
gira piů veloce: ho appreso in questo ng che leggere la proprietŕ di un
controllo č piů lento che non leggere una variabile:
    Dim strText1 As String
    Dim strText2 As String
    strText1 = Text1.Text
    Do While strText1 <> strText2
        strText2 = ""
        Do While Len(strText1) <> Len(strText2)
            Randomize
            strText2 = strText2 + Chr(Int((26 * Rnd) + 97))
        Loop
        If strText1 = strText2 Then Exit Do
    Loop
Ciao!
-- 
Esteban
www.seber.it

Era proprio in confronto tra stringhe che non andava... Mi hanno detto di
usare il metodo strcmp per comparare le stringhe, ed ora funziona...
Grazie comunque!

 usare il metodo strcmp per comparare le stringhe, ed ora funziona...
strcmp da quello che mi ricordo è una funzione di C.
-- 
Esteban
www.seber.it

 strcmp da quello che mi ricordo è una funzione di C.
StrComp esiste anche in VB ed è più performante dell'= in binary compare.
Certo bisogna perlomeno sbattersi a leggersi la guida per sapere come
usarla.
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 usarla.
Beh di StrComp ignoravo l'esistenza, ma per sicurezza, come spesso faccio,
sono andato a leggere la guida alla ricerca della funzione strcmp (che è
diverso da StrComp) e quindi, non avendo visto attinenza con Visual Basic ho
dato quella risposta.
Quindi il problema non è tanto lo sbattersi a leggere la guida, quanto
sbattersi a leggere bene quello che chi posta chiede.
Se poi avessi scritto qualcosa del tipo: 'Ma che accidenti dici, strcmp è
una funzione di C e non c'entra come il cavolo a merenda con Visual Basic',
allora avrei accettato il tuo post scritto in quel modo.
-- 
Esteban
www.seber.it

 Quindi il problema non è tanto lo sbattersi a leggere la guida
Non era riferita a te questa frase.


 Non era riferita a te questa frase.
Bene, amici come prima? ;)
-- 
Esteban
www.seber.it
Newsgroup: it.comp.lang.visual-basic
Titolo: file list help plese

            Hi all
    I am stuck!
    i need to be able to select multi files from a file list box and store
them and there path in some sort of array.
    I can select the files with the usual dir box etc but have no idea how
to code it.

...


Check the following codes:
Private Sub Command1_Click()
Dim j As Integer
For j = 0 To File1.ListCount - 1
  If File1.Selected(j) = True Then
    List1.AddItem File1.List(j)
  End If
Next j
End Sub
To test the code, first create a form, place a file listbox with "File1" as
the name, a listbox named "List1", and a command button named "Command1"
Paste the above code into the form and press F5 to run it
Hope this helps
Hartono Sudja, VB App Developer


Newsgroup: it.comp.lang.visual-basic
Titolo: Altezza ToolBar

C'è qualcuno che mi sa dire come si fa a rilevare l'altezza della
toolbar e la posizione del video in cui si trova (sinistra, destra,
ecc.)?
Mi capita di aprire delle finestre piuttosto grandi che devono avere le
maggiori dimensioni possibili.  La mia toolbar l'ho settata in modo che
si nasconda automaticamente, ma non è detto che sia sempre così.  Capita
quindi che alcuni pulsanti rimangano nascosti dalla toolbar e non
possono essere utilizzati se non con una certa difficoltà.
C'è qualche API da chiamare? 
Grazie a chi mi darà una dritta...        BEPI
-- 
/-------------------------------------------------\
| Bepi Rospi                                      |
|                                                 |
| mailto:
be...@multiwire.net
                       |
\-------------------------------------------------/


Se stai parlando del controllo Toolbar (quello dei Common Controls) basta
che usi le proprieta' Left, Top, Height e Width, come per tutti gli altri
controlli.
Altrimenti non capisco a cosa ti riferisci.
--
Roal Zanazzi
z...@iol.it



Ooops.   Volevo dire TaskBar e non ToolBar.   Evvabbè ho avuto un
momento di confusione.    
Da come avevo esposto il problema mi pareva che fosse chiaro a cosa mi
riferivo.
Ok, come si fa a rilevare le dimensioni della TaskBar (quella che
contiene il pulsante Avvio a Sinistra e la Status Area a destra?)
C'è poi anche il problema di sapere dov'è, visto che si può spostare in
alto, in basso, a sinistra, a destra...
A Ri-grazie...             Bepi


Dai un occhio ai messaggi di qualche giorno fa,ho postato un  esempioo che
fa proprio al caso tuo
Ciao
Corrado

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Diamogli focus! :-)

Ho un problema con il "focus" di una form.
Io ho un'applicazione che si trova nel tray (ossia ho registrato l'icona, e
contemporaneamente la form corrispondente, frmStato, e' hidden), e vorrei
che quando si fa doppio click sull'icona sul tray la form venga in
foreground e con il focus su di essa indipendentemente da quale altra
applicazione e' in quel momento attiva.
Ho provato vari metodi, ma tutti e' pur vero che mi permettono di richiamare
la form, pero' questa non si pone in foreground quindi si limita a
lampeggiare nella taskbar (e' il sistema che fa questo quando una finestra
richiede il focus) costringendo quindi l'utente a cliccare sulla taskbar e
richiamare cosi' la form mentre io vorrei che comparisse subito.
In pratica nell'evento WM_LBUTTONDBLCLK (generato dalla form associata al
tray) ho provato prima:
        frmStato.Show
        frmStato.SetFocus
poi ho anche messo, dopo la SetFocus:
        SetForegroundWindow Me.hWnd
e ho provato persino ad aggiungere:
        SetActiveWindow Me.hwnd
ma il risultato e' sempre lo stesso...
C'e' un modo per mostrare immediatamente (ossia con il focus) una form di
un'applicazione?
--
   Alex Palmese
--- Per scrivermi elimina "LOSPAM" dall'indirizzo ---
Sei anche tu stanco dei messaggi spam? Usa Terminator, il programma
anti-spam italiano FREEWARE! 
http://www.sertel.net/terminator/


Di solito uso questo codice per il cambio di state delle win gestite  nella
traybar,
proprio per trappare e gestire le diverse casistiche che si possono
presentare...
Private Sub ChangeState()
    With Me
        If .WindowState = vbMinimized Then
            .WindowState = vbNormal
            .Show
            SetForegroundWindow (Me.hwnd)
            DoEvents
            If .WindowState = vbNormal Then
                AppActivate .Caption
            End If
        Else
            .WindowState = vbMinimized
        End If
    End With
End Sub
ciao
ugo

             End If
BINGO! :-)))
Grazie, era proprio l'"AppActivate" che mi mancava, ora funziona
benissimo!!!


Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6 + Access] Funzione LIKE ....

Non capisco la cosa seguente .... Ho una query SQL che utilizza al suo
interno la funzione LIKE ..., tipo CAMPO1 LIKE '*pippo*'. L'applicativo che
lancia questa query è un client VB e il database si trova in remoto.
L'esecuzione di questa su db remoto non mi ritorna un bel niente mentre in
locale se la eseguo (su una copia del file .mdb remoto) mi restutuisce
record. Se modifico la dicitura di LIKE utilizzando il simbolo di % anzichè
*, allora anche in remoto mi restituisce record.
Perchè ??
Vi ringrazio.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Perchè ??
Non dipende dalla posizione dal DB, ma dal motore che usi.
DAO vuole * e ?
ADO vuole % e _
Ciao
-- 
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net
Newsgroup: it.comp.lang.visual-basic
Titolo: Errore di Run Time 429

Vorrei capire se i file che sono presenti sul sito di vbaccelerator sono con
licenza d'uso e se si posso usare liberamente.
In particolare ho scaricato (  nell'intento di vedere in cosa consisteva) la
skin neo al link
http://www.vbaccelerator.com/home/VB/Code/Controls/Skins/VB6_NeoCaption_Full_Source.asp
Avviando il file -exe presente all'interno mi da un errore di rin time 429:
Il componente ActiveX non può creare l'oggetto.
Cosa vuol dire?
Io ho inserito dentro alla cartella le librerie che sono state mensionate
ossia la ssubtmr6.dll e la msxml3.dll.
Qualcuno mi saprebbe dire cosa manca?
Grazie
__---Liz--___

 ha scritto nel messaggio
news:B0%Rb.12834$VS6....@tornado.fastwebnet.it...


 ha scritto nel messaggio
news:bvapc3$c2f$1...@carabinieri.cs.interbusiness.it...


 ha
scritto:

per registrarle basta effettuare la registrazione classica ossia: regsvr32
"percorso completo"
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

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

SI, MA DOVE POSSO TROVARE QUALCOSA DI APPROFONDOTO SULLE API?
Per quel che ne so io, paghi 355.000+IVA (16%) di tangente alla
Microsoft e ti registri al MSDN, livello base.
Poi ti ingegni a trovare nei CD MSDN quel che ti serve, visto che di
informazioni ce ne sono davvero una marea. 
Bye,
Gregorio Loppi

SI, MA DOVE POSSO TROVARE QUALCOSA DI APPROFONDOTO SULLE API?
--
Federico Galli
--------------------------------------------
   SSSSSSS
 SS                      Programmare sul Web
S                                in
 SS                            Delphi
   OOOO   IDERALIS                e
   OOOO   PROGRAMS          Visual Basic
       SS
         S
       SS
SSSSSSS
http://www.geocities.com/colosseum/loge/2151
--------------------------------------------
--
Posted from ro...@SoftHome.net [204.144.231.3] via Mailgate Server - 
http://www.mailgate.org

Newsgroup: it.comp.lang.visual-basic
Titolo: Esportazione Report DB Access in formato RTF

 
Qualcuno sa dirmi se è possibile (e come) esportare in formato RTF o .doc un
report creato in un DB access?
Grazie mille
Emanuele
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 report creato in un DB access?
un report access può essere utilizzato solo all'interno di access, o
comunque facendo ricorso al suo object model, il che vuol dire ancora
access.
visual basic non c'entra assolutamente nulla in tutto ciò, quindi ti
invito a controllare sulla documentazione di tale prodotto. per quanto
ricordo io, le possibilità di esportare i report in vari formati era
diversa a seconda delle versioni.
-- 
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: Convertire documento in formato PDF

Sapreste indicarmi dove poter trovare ocx o sorgenti VB che convertino un
documento di testo o di word in formato pdf
Vi ringrazio anticipatamente
-- 
Posted from [213.26.185.228] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:91A6AA381A41D41185E20006295706320FA199@SAS5000_1...


Newsgroup: it.comp.lang.visual-basic
Titolo: Help Installazione Pacchetti

    Utilizzando il file Setup generato con l'utility di creazione guidata
pacchetti di VB6 mi esce un errore e l'installazione si arresta,
disinstallando quanto già caricato.
    L'errore è:
*** ERRORE: Impossibile trovare e quindi registrare il file
'C:\WINDOWS\TEMP\msftqws.pdw\$(DLLSelfRegisterEx)'.
    Che vuol dire?

 wrote in message 87mpq3$1cl$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: istruzione sql complessa

1) Se in una tabella ho 2 date (data iniziale e data finale), č possibile
visualizzare il numero di giorni fra le 2 date?
(Es:
data iniz. data fin.   giorni
1/1/2004  10/1/2004  10
12/1/2004 15/1/2004  4
..)
2) Se in una tabella ho 2 date (data iniziale e data finale), č possibile
visualizzare il numero di giorni fra le 2 date, perň nel corso di anno,
cioč se ho date a cavallo fra 2 anni mettere i giorni in entrambi gli
anni? 
(Es:
data iniz. data fin.   Anno in.     Anno fin.
21/12/2003  3/1/2004    11                3   
30/12/2003 3/1/2004      2                 3
5/1/2004     7/1/2004      3                 0
..)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 gli anni?
Vedi "iif" insieme a "datediff"
termoPilucco


Ciao aleale
se il db č di Access prova questo esempio
--------------------------------------------
SELECT DataInizio,
       DataFine,
       IIf(Year([DataInizio])<>Year([DataFine]),
           DateSerial(Year([DataFine]),1,1)-[DataInizio],
           [DataFine]-[DataInizio]+1) AS AnnoIn,
       IIf(Year([DataInizio])<>Year([DataFine]),
           [DataFine]-DateSerial(Year([DataFine]),1,0),
           0) AS AnnoFin
FROM t_Date
WHERE Year([DataFine])-Year([dataInizio]) Between 0 And 1
-------------------------------------------
ovviamente funziona se la max differenza in anni č 1
Ciao Giorgio

grazie tante, appena posso provo

Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] Licenze

Qualcuno sa dirmi se il compilatore Vb e' incluso nel Framework (in quello
redistribuibile?) e se quindi e' possibile sviluppare applicazioni (ok, col
Notepad) anche senza dover acquistare licenze? Grassie
DisgustingAngel

Il compilatore 
VB.NET
 (vbc.exe) (come C# tra l'altro) e' disponibile nel
Framework SDK che puoi scaricare gratuitamente dal sito MS, questo significa
in oche parole che per sviluppare applicazioni .NET non sei obbligato ad
acquistare Visual Studio, senza ridursi ad usare notepad esistono delle
bellissime IDE freeware che puoi usare in alternativa a Visual Studio.
Un esempio 
http://www.icsharpcode.net/OpenSource/SD/
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP - MCP]
UGIdotNET - 
http://www.ugidotnet.org

 bellissime IDE freeware che puoi usare in alternativa a Visual Studio.
Alle informazioni di Corrado aggiungo che per lo sviluppo
di pagine web in 
ASP.NET
 puoi utilizzare Web Matrix che č scaricabile
gratuitamente presso il sito 
www.asp.net
.
L'installazione dell'SDK č consentita solo su sistemi "pro"
del tipo Windows 2000 / XP/ 2003. Nel caso in cui tu non disponga di tali
sistemi
operativi potresti installare la versione Redistributable del .NET Framework
che
ti permette comunque di compilare ma ovviamente hai grossi limiti rispetto
all'SDK.
(non sono in molti a saperlo e a farlo, ma qualcuno l'ha fatto con
successo).
HTH,
Antonio Cangiano
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Webmaster 
www.visualcsharp.it
"Great spirits have always encountered violent opposition
from mediocre minds." A.Einstein
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.481 / Virus Database: 277 - Release Date: 13/05/2003

 successo).
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&selm=DTcn9.3725%24cS4.1232
44%
40news2.tin.it
&rnum=1
giuseppeD

 Un esempio 
http://www.icsharpcode.net/OpenSource/SD/
Altri interessanti link per IDE freeware?


personalmente ritengo che il progetto sharpdevelop sia il piu' interessante,
tra l'altro le ultime versioni sono anche 'visuali'... (almeno x il c#)
Newsgroup: it.comp.lang.visual-basic
Titolo: [semi OT] formattazione in word

Ho incontrato questo problema:
http://support.microsoft.com/kb/304387/it
 
 
In qualche maniera sono riuscito ad avere in stampa unione  un campo 
Nato_Il nel formato orginale in Access dd/mm/yy invece di mm/dd/yy.
 
Sono però rimasto perplesso nel vedere che funzione format è cambiata; 
infatti la stringa consigliata: MERGEFIELD date \@ "MMMM d, yyyy" non 
stampa il mese per esteso e maiuscolo, e le la cambio con "mm" non 
funziona più.
 
Inoltre quando si va a modificare la stringa questa non è piu visibile 
ma si vede solo il nome del campo con a fianco il suffisso "date", 
quindi reincolla tutta la stringa del supporto e provare altra 
modifica!
 
Era un bel software word, ma temo abbia fatto o stia facendo la fine di 
vb6
 
-- 
Greg
 
 

Scriveva Greg giovedì, 06/03/14:
 
Aggiorno, se qualcuno dovesse imbattersi in una stampa/unione con word 
2010:
 
questa stringa: "mm/dd/yyyy" restituisce 00/01/1982
e questa: "MM/dd/yyyy" resituisce il risultato corretto
 
E non capisco il perchè dal momento cheil supporto dice:
Nota Nel parametro di formattazione è rilevante la distinzione tra 
maiuscole e minuscole.
 
-- 
Greg
 
 


In teoria "mm" indica i minuti mentre "MM" i mesi.
 
Non so se ciò vale anche su Word, ma su .NET e SQL Server è sicuramente così.
 
Nicola
 
 

 Non so se ciň vale anche su Word, ma su .NET e SQL Server č sicuramente cosě.
 
Esatto, in vb6 si usava nn per i minuti.

 Nicola
 
Ho capito, grazie. Così ha un senso e si riesce a gestire
 
-- 
Greg

Newsgroup: it.comp.lang.visual-basic
Titolo: Open in .net e icone

Ho due domande da porvi:
1) In vb6 usavo per leggere tre righe questo comando:
open (app.path & "\file.txt") for input as #1
 line input#1, text1.text
 line input#1, text2.text
 line input#1, text3.text
close#1
In .net cosa posso fare per leggere tre stringhe?
2) Vorrei aggiungere delle icone al mio programma tramite una toolbar.
I problemi sono 2:
 1) Dove trovo delle icone fatte bene con disegnato le solite cose (Nuovo,
salva allinea in centro...)
 2) Come posso fare l'effetto office, adesso con le modifiche che ho fatto
al manifest sono riuscito ad avero l'effetto di windows xp, ma non sono
riuscito ad avere quello di office xp
Grazie in anticipo.

In .net cosa posso fare per leggere tre stringhe?
<lettura riga per riga>
Imports System
Imports System.IO
Module LeggiFile
	Public Sub Main()
		ReadTextFile("D:\ElencoStatiNazioni.txt")
	End Sub
	Sub ReadTextFile(ByVal path As String)
		Dim sr As StreamReader
		Dim riga As String
		sr = New StreamReader(path)
		Do While (sr.Peek() <> -1)
			Console.WriteLine(sr.ReadLine())
		Loop
		sr.Close()
	End Sub
End Module
</lettura riga per riga>
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Telnet con VB (per proffessionisti del VB)

Ciao a tutti,
vengo subito al punto:
volevo realizzare un'applicazione stile TELNET, ma non un client, volevo
realizzare un Server Telnet, da far girare su un PC Windows 9x. C'e' pero'
un problema che non riesco a risolvere, come faccio a creare una SHELL DOS e
ri-indirizzarla su TCP verso il client TELNET??
Grazie a chiunque volgia darmi anche solo un consiglio.
--
Saluti,  ><)))°> S H A R K Y
email:shark...@writeme.com

Il server deve inviare al client delle stringhe di testo del tipo:
LOCAL_PATH Comando :
Il client invia al server delle stringhe di testo che sono i comandi che devono
essere eseguiti.
Il server esegue quei comandi riconoscendoli tramite una select case.
Che shell d'egitto serve?
P.S. se hai la tabella con le stringhe standard ANSI COLOR me le posti qui sul
NG?

...


Visto che in una finestra DOS in ambiente windows puoi utilizzare il
copia-incolla, ogni x secondi ti prendi un'immagine dell'area testo  DOS
(80*25=2000 bytes che non sono tanti...) e analizzi il cambiamento rispetto
all'immagine precedente, poi invii solo i cambiamenti... comunque se usi PC
Anywhere stai prima (e ti supporta anche windows!). Se non altro guardalo
per prendere spunto.
Anche a me piacerebbe sapere come fare per intercettare il messaggio di
"cambiamento di qualcosa sul video" ma non ho trovato nessuna API in
proposito..

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] API e TreeView

Ho un programma che visualizza dati strutturati ad albero in una tree view.
Questi dati provengono da un database ed il processo di caricamento e
visualizzazione è lentissimo.
Pensavo che utilizzando le API il caricamento nella tree view degli items
possa essere più veloce.
Qualcuna sa da che parte cominciare ?.
Ho dato un'occhiata alle dichiarazioni ma non ho trovato nulla che assomigli
a 'treeview'.
Grazie comunque.
--
      Pino Saffioti
-----------------------------------
pino.s...@asl1.to.it











a 'treeview'.
E' necessario inviare un messaggio TVM_INSERTITEM.
Comunque leggiti la sezione dedicata alla Tree View sul Win32sdk.hlp
Ciao Bruno

Newsgroup: it.comp.lang.visual-basic
Titolo: HELP !!!! MSDN Professional

Qualcuno di voi può darmi informazioni sul MSDN Professional di
Microsoft ????
Inoltre vorrei sapere se le applicazioni .NET girano perfettamente
anche con sistemi Operativi vecchi tipo window 98/95 ????
Spero in una risposta 
Bye 

 anche con sistemi Operativi vecchi tipo window 98/95 ????
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnnetdep/ht
ml/NETFx1Redistreq.asp
Newsgroup: it.comp.lang.visual-basic
Titolo: Req: Aprire documento Word

Problema:
In una text-box ho il path del documento Word... facendo click sul "Button"
vorrei far aprire il suddetto documento. So che se uso il comando SHELL
posso lanciare un file .exe, e per Word? Potrei concatenare il "path
WORD.EXE" & "path documento" ma non ricordo la sintassi...
Qualcuno sa darmi una dritta?
Grazie 1K
Kripton

forse devi usare l'Api shellexecute, che avvia anche i file non eseguibili.
oppure devi caricare la libreria di Word come riferimento, e scrivere
qualcosa tipo Documents.Open("Nome file"), ma la sintassi ora sono io che
non la ricordo bene. ma è senza dubbio piu semplice la prima soluzione.
MarioH

 wrote in message
news:1pib6.29773$lV5.3...@twister1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: form di attesa....

Scusate la banalita' della domanda, ma non sono capace a far apparire un
form (con label "Attendere prego"...) mentre sto eseguendo una routine di
un altro form.
Qualcuno puo' spiegarmi come fare?
Grazie e saluti al ng
--------------------------------
Inviato via 
http://usenet.iol.it

 Qualcuno puo' spiegarmi come fare?
beh +/- formattesa.show prima di lanciare la routine...
ciao
Davide

Davide
--------------------------------
Inviato via 
http://usenet.iol.it
 

 beh +/- formattesa.show prima di lanciare la routine...
... e formattesa.hide non appena la routine è finita... :-)))
--
Er Roscio.

 viene proprio eseguita!
se non ti parte la routine significa che hai suato qualcosa che blocca il
flusso di esecuzione tipo
formattesa.show vbmodal
usa solo:
     formattesa.show
oppure
     formattesa.show vbmodeless, form_padre
e dopo che sei uscito dalla tua routine:
    unload formattesa
ciao
davide

Va bene.. ma perchč se il form chiamante č modale non posso invocare un
form "attesa"? VB vuole che invochi il form modale: cosě facendo si blocca
tutto!
Ciao
[cut]


 Er Roscio.
Unload formattesa NON hide (chi lo scarica altrimenti?)
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt

 tutto!
Evidentemente, essendo _modale_ non puoi aprire un'altro form _sopra_!
Soluzioni:
- Il form chiamante NON deve essere modale (ottimale).
- La routine la fai eseguire nel Form_Activate del Form attesa seguita
da Me.Unload(funzionante ma orribile)

Newsgroup: it.comp.lang.visual-basic
Titolo: Do loop until

Salve,
ho un problema:  come posso verificare l'evento keydown all'interno di un
Do... Loop Until di un'altra subroutine?
Ad esempio vorrei che il loop finisse una volta premuto il tasto esc.
Grazie.

 ha scritto nel messaggio
news:aq5v0b$b1s$1...@lacerta.tiscalinet.it...


 una volta premuto il tasto esc.
'A livello del form se il ciclo e'
'contenuto nel modulo del form che
'ha il keypreview, altrimenti in un
'modulo a parte dichiarata come public:
Dim bInterrompi As Boolean
'Inizializzata prima del ciclo
bInterrompi = False
Do
    'TuoCodice
    DoEvents
Loop Until bTuaCondizione Or bInterrompi
'Nel KeyDown del form
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = KeyCodeConstants.vbKeyEscape Then
        bInterrompi = True
    End If
End Sub
hth,
Lokar
--
Sito Comune: 
http://www.it-lang-vb.net/
Manifesto: 
http://www.it-lang-vb.net/docs/Manifesto.txt
UGIdotNET - 
http://www.ugidotnet.org

Newsgroup: it.comp.lang.visual-basic
Titolo: Tracciare una linea e poi afferrarla con il mouse

Dopo ripetute ricerche e letture varie, non ho ancora individuato una
spiegazione valida per risolvere il problema. Si tratta praticamente di
ricreare quello che normalmente si fa con un programma tipo publisher o
qualsiasi altro di grafica vettoriale: tracciare linee, forme, ecc. che
possono essere afferrate con il mouse e spostate o ridimensionate. Ma in vb
come si fa? Sto creando una sorta di report personalizzabile e vorrei dare
la possibilità, oltre che a me stesso, anche all'utente che ne farà uso di
crearsi da solo semplicemente disegnando i tracciati che verranno poi
stampati senza incrociare gli occhi scrivendo un file di testo pieno di
coordinate.
Dovrebbe essere questione di API ma questo argomento è per me tra i più
ostici e gli esempi scarseggiano.
Grazie fin d'ora per le vostre segnalazioni.

 Grazie fin d'ora per le vostre segnalazioni.
De nada. Anzi, tienimi informato, se puoi :-)
Bye, G.

IL ROBY ha scritto:

Io l'ho realizzato controllando che la distanza tra il segmento e il
punto in cui ho cliccato sia minore di un certo valore.
Per prima cosa ho determinato l'equazione della retta ottenuta
prolungando il segmento, in particolare ho desterminato i coefficienti
m ed n tali che l'equazione risulti y=m*x+n.
Se indichi con (x1, y1) le coordinate del primo punto e con (x2, y2) le
coordinate del secondo punto puoi scrivere:
m = (y2 - y1) / (x2 - y2)
n = y1 - m * x1
ora puoi calcolare la distanza verticale tra la retta e un punto (x, y)
e verificare che sia minore di un certo valore d:
Abs(x * m + n - y) < d
ora un ulteriore controllo, perchè stiamo cercando la distanza da un
segmento, non da una retta
(x > xs - d) and (x < xd + d)
dove xs = min(x1, x2) e xd = max(x1, x2)
(y > ys - d) and (y < yg + d)
dove ys = min(y1, y2) e yd = max(y1, y2)
-- 
Samuele Battarra
prova il mio newsreader:
http://digilander.iol.it/battarsa/programmi/news/