mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] sollevare evento keyup con argomento

Ciao,
devo sollevare un evento che contiene alcune procedure, il problema è che
tale evento è un keyup con un controllo se viene premuto "enter", quindi
non mi basta richiamare l'evento:
txtIDarticolo_KeyUp(sender, e)
ma devo specificare che "e" è "enter". Ho provato in diversi modi ma non
riesco a trovare la sintassi giusta.
grazie
questo è il codice dell'evento che devo richiamare:
Private Sub txtIDarticolo_KeyUp(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles txtIDarticolo.KeyUp
        If e.KeyCode = Keys.Enter And Not txtIDarticolo.Text = Nothing Then
...........
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Nothing Then ...........
RaiseEvent (me, New KeyEventArgs(Keys.Enter))
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

 riesco a trovare la sintassi giusta.
Provato ad assegnare enter al KeyCode di e? :)
Ciao

grazie mille Corrado, 
ho modificato il mio codice così è funziona benone! Continuo a non capire
perché in .net alcune volte si usa "new", altre no, comunque..... :-)
txtIDarticolo_KeyUp(sender, New KeyEventArgs(Keys.Enter))


 txtIDarticolo_KeyUp(sender, New KeyEventArgs(Keys.Enter))
La pratica che stai attuando è davvero deprecata, in qualsiasi linguaggio.
Sarebbe meglio che tu ti facessi una tua sub e lasciassi fare agli eventi
quello per cui sono stati inventati.
Poi, forse Corrado intendeva qualcosa del tipo
Me.Invoke(New KeyEventHandler(AddressOf Form1_KeyUp), _
            New Object() {Me, New KeyEventArgs(Keys.Enter)})
Per quanto riguarda l'uso del New, se non hai ben chiaro questo concetto di
consiglierei di fermarti e di rifletterci un po' su :)
Ciao

 Me.Invoke(New KeyEventHandler(AddressOf Form1_KeyUp), _
 New Object() {Me, New KeyEventArgs(Keys.Enter)})
Non mi pare si sia parlato di threads e quindi non capisco l'uso della
ISyncronizeInvoke, mi sono perso qualcosa?


 ISyncronizeInvoke, mi sono perso qualcosa?
I thread non c'entrano niente :) e quel codice non è nemmeno corretto dato
che Form1_KeyUp non è un nome significativo per la procedura dell'evento,
però quello che hai postato tu non compila nemmeno :P
Ciao


Ok, visto che l'evento non è accessibile e, se anche lo fosse, sarebbe
corretto invocare Mybase.OnKeyUp(...) a questo punto direi che è possibile
'aggirare' l'ostacolo usando
  txtIDArticolo_KeyUp(TextBox1, New KeyEventArgs(Keys.Enter))
HTH


Newsgroup: it.comp.lang.visual-basic
Titolo: Funzioni Excel in VB

Dovrei utilizzare la funzione finanziaria TIR.X di excel in visual basic.
E' possibile richiamare una funzione di Excel in VB? Come si fa a sapere se
tale funzione è definita in una dll o in una aggiunta xla?
Qualcuno sa darmi qualche aiuto? Esistono delle dll di terze parti che
permettono di utilizzare funzioni matematiche finanziarie?
grazie

 permettono di utilizzare funzioni matematiche finanziarie?
Immagino di si', ma io passo.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: curiosità varie!

Scusate l'ignoranza ma sono alle prime armi:
1. come si  fa ad utilizzare la clessidra mentre carica qualcosa? esempio
2. come si fa ad automatizzare lo spostamento dei bottoni o griglie quando
ridimensioni il form? nel senso che quando ridiensioni un form non esce la
barra di scorrimento e i bottoni che magari stanno giù scompaiono premetto
che ho messo dei valori nel form_load del tipo:
me.height
me.width etc
3. come si da il tempo alla schermata iniziale? nel senso che esce la
schermata iniziale del programma (dove sta scritto anche il tuo nome) e
voglio che dopo poco scompare e parte il programma. posso usare l'evento
timer ma come?
grazie ai "GURU DI QUESTA NEWS"
Alex

 timer ma come?
metti (appunto) un bel timer nel form, imposti la proprietà Interval a
tuo piacimento, ti assicuri che la proprietà Enabled sia = True, poi
scrivi
Private Sub tmrTimerClose_Timer()
    Unload Me
End Sub
Ciao
Faber
P.S.: l'oggetto Me è un riferimento all'istanza della classe corrente -
in questo caso il form

 Leggi  il librom di Balena lì c'è tutto e più .Ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: Printer e textbox multiline come fare?

Avevo già postato il msg in precedenza, volevo sapere come fare per
allineare il testo in una determinata posizione, con l'oggetto printer,
utilizzando un testo con l'opzione multiline=true, mi hanno suggerito la
funzione Split, per spezzare la stringa, ho cercato con F1, ma non ho
risolto.
Chiedo cortesemente, un es. con del codice.
Grazie a chi risponderà, ciao, Apuleius.

 ha scritto nel messaggio
news:9cu00e$mc6$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:9cu45v$k2g$1...@nreadB.inwind.it...


 ha scritto nel messaggio
news:9cu5n3$oer$1...@lacerta.tiscalinet.it...


 ha scritto nel messaggio
news:9cugke$tp5$1...@nreadB.inwind.it...


 stampa come voglio io!
Non sono sicuro ma non mi sembra che printer.print acetti array, forse devi
mettere un for...
Se ho scritto q.che c*zzata avvertitemi
Ciao
--
Timothy Redaelli
timothy....@email.it

Non vorrei essere troppo invadente...
  Allora evita di quotare interamente un messaggio cosi' lungo per
aggiungervi solo poche righe...
  Ciao :-)
  Massimo
  Nell'indirizzo, inserire una "h" tra la "t" e la "u"
  In the address, insert an "h" between the "t" and the "u"
Newsgroup: it.comp.lang.visual-basic
Titolo: click un bottone in webbrowser

sto cercando di imparare ad automatizzare la navigazione con un
browser, senza essere davanti al monitor.
[Sarei anche contento di contattare altri che hanno lo stesso
interesse]
Oggi sono incappato in un ostacolo che non riesco a superare in modo
elegante
se ad esempio il codice html attribuisce un nome al bottone
esempio1
TD width=74 class=txt>&nbsp;<input size=5 name="password" 
type=password class=txt></TD>
</TR>
<TR><TD colspan=3 align=center><input type=image name="immagine1"
src="/pics/vai.gif" border=0></TD></TR
il problema e' semplice
    WebBrowser1.Document.All.Item("password").Value = "miapass"
    WebBrowser1.Document.All.Item("immagine1").Click"
ma se il testo html non assegna il nome al bottone?
come nel caso del sito che sto provando in questo momento?
TD width=74 class=txt>&nbsp;<input size=5 name="password" 
type=password class=txt></TD>
</TR>
<TR><TD colspan=3 align=center><input type=image 
src="/pics/vai.gif" border=0></TD></TR
    WebBrowser1.Document.All.Item("password").Value = "miapass"
    WebBrowser1.Document.All.Item("???????").Click"
Spero che altri siano interessati all'argomento, in modo da poterci
confrontare e scambiare info, anche via email.
Ciao
Alberto

> ma se il testo html non assegna il nome al bottone?
dovresti gestire tramite oggetto form nella collection forms ....
Non ho mai provato ma penso che dovresti iniziare da quel punto.
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: text to speech

salve, dove si può scaricare il componente text to speech per far parlare
il programma?
     grazie
       lupo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

        lupo
Uhm... qui abbiamo già un Lupo e tu non sembri l'originale! ;)

> Uhm... qui abbiamo già un Lupo e tu non sembri l'originale! ;)
E vabbè... Sarà di un'altro branco >:-)
Antonio Mirarchi


www.cerretosoft.it/ita/software/multimediali/sayit
qui, non solo trovi una mia piccola applicazione che utilizza la sintesi
vocale,
ma anche dove scaricare le librerie che la fanno funzionare, e che farebbero
funzionare
anche una tua applicazione.
--
Mauro Cerreto


Finalmente cominciano a ripopolarsi  ^__^
giuseppeD

> Finalmente cominciano a ripopolarsi  ^__^
[mode ultrasadico on]
Ok, ragazzi: da oggi è aperta la caccia ai lupi da Newsgroup!!!  >:-)
[mode ultrasadico off]
Antonio Mirarchi

 [mode ultrasadico off]
Specie protetta... 'n ce prova'. >:-|
Bye, G.

 Specie protetta... 'n ce prova'. >:-|
due o tre l'anno li trovano lungo la superstrada che faccio per venire ad
Avezzano. Magari prima o poi 'chiappano quello giusto! ;-)
Scherzo, speriamo non ne prendano più. : - (
Ciao, SK
--
La pasienzia non è mai troppo (Totò)
<><><>
Esistono 10 tipi di persone: chi conosce il binario e chi no
Newsgroup: it.comp.lang.visual-basic
Titolo: Unione celle mshflexgrid

Ciao a tutti. Mshflexgrid mi sta veramente facendo diventare pazzo!
La mia necessità è quella di popolare una flexgrid, dove le varie
righe vengono generate man mano. La prima colonna è una data.
Una cosa del genere:
10/02/2004    PIPPO     
-------------------------------------------
10/02/2004    PLUTO   
-------------------------------------------
12/02/2004    PIPPO    
A me piacerebbe che le celle contenenti la stessa data si fondessero
insieme:
10/02/2004   PIPPO   
                      -------------------
                      PLUTO 
-----------------------------------------
12/02/2004   PIPPO
Ho provato a settare la flexgrid come:
msh.MergeCells = flexMergeFree
msh.MergeCol(0) = True
e quindi con un ciclo, aggiungo i vari elementi con msh.Additem
Quello che ottengo è però una lista dove la prima colonna non ha
elementi "fusi insieme".
Cosa sbaglio?? Il codice è questo:
msh.MergeCells = flexMergeFree
msh.MergeCol(0) = True
While rs.EOF = False
             msh.AddItem (CStr(data) & Chr(9)  & rs!dato1 
             rs.MoveNext
Wend
msh.refresh
Grazie!
				Cristian

 Wend
Hai provato a spostare il ciclo prima di settare mergeCol=True ?
Ossia:
While rs.EOF = False
            msh.AddItem (CStr(data) & Chr(9)  & rs!dato1
            rs.MoveNext
Wend
msh.MergeCells = flexMergeFree
msh.MergeCol(0) = True
Non garantsco che funzioni, ma in un caso analogo per me ha funzionato.
Poi facci sapere.
Bye!

msh.MergeCol(0) = True
Hai ragione! Funziona!
Per entrambi i controlli la "fusione" avviene correttamente non appena
venga messa a True la proprietà MergeCol(0) e a 1 la MergeCells, a
patto, come dici tu, che ciò avvenga una volta popolata la flexgrid.
Purtroppo si nota un artefatto, che è il passaggio da tante righe alla
forma fusa in una sola cella.
Ho cercato una soluzione che eliminasse questo difetto e sono arrivato
a quanto segue:
msh.Redraw=False
While rs.EOF = False
            msh.AddItem (CStr(data) & Chr(9)  & rs!dato1)
            rs.MoveNext
Wend
msh.MergeCells = flexMergeFree
msh.MergeCol(0) = True
msh.Redraw=True
Bloccando il redraw automatico, popolando e settando la griglia "al
buio", quando riabilito il redraw viene immediatamente visualizzata
nella forma raggruppata.
Grazie mille 
					Cristian

Newsgroup: it.comp.lang.visual-basic
Titolo: risalire ai controlli in un form

Il problema è questo .........
data una applicazione che lancio con la
shell ottengo un valore di ritorno.
Da questo valore è possibile
risalire all'handle della relativa finestra e dei controlli in essa
contenuti ?
Grazie a tutti.
--------------------------------
Inviato via 
http://usenet.iol.it

contenuti ?
Non e' detto che il processo avviato abbia una sola finestra.
Per trovare tutte le finestre appartenenti a quel processo
1.  enumerarle tutte (vedi EnumWindows)
2. per ogni finestra leggere l' id del processo che le ha create
    (GetWindowThreadProcessId);
3. confrontare tale id con quello di cui disponi;
hth, hal

Grazie mille.
Almeno adesso so da dove cominciare.
Ciao, Claudio.
Newsgroup: it.comp.lang.visual-basic
Titolo: VB6  service pack  problemi

ho installato il service pack  6 di vb&
l'installazione e' andata ok senza problemi
ma una volta attivato VB6 Pro ilcontrollo Optionbutton mi da dei
problemi,funziona solo in modalita grafica,se esegue un eseguibile con dei
controlli option button NON grafici,li vedo tutti neri
come riparare il problema
grazie1000
leonello


come riparare al problema non so ma io prima di installare l'sp6 ci avrei 
pensato bene... guardati la lista dei nuovi bug:
http://www.microcosmotalk.com/images/xpsp6/
CIAO

Newsgroup: it.comp.lang.visual-basic
Titolo: ADO non "lascia" la connessione

Ciao a tutti,
premetto che uso Firebird come DB.
Ho una routine che fa più o meno questo:
-------------------------------------------
Dim ADOCN as adodb.connection
Adocn.Open
  (altre operazioni e Call routine)
Adocn.close
Set Adocn=Nothing
-------------------------------------------
Ovviamente tutti i recordset usati all'interno sono distrutti
correttamente:
    RsOld.Close
    Set RsOld.ActiveConnection = Nothing
    Set RsOld = Nothing
La AdoCn.State mi da valori corretti.
Il problema è che se provo a cancellare quel DB mi dice che è aperto,
almeno che non chiuda il progetto.
Ho tralasciato qualcosa per distruggere il tutto?
Tnx

 Ho tralasciato qualcosa per distruggere il tutto?
Credo di aver capito,
in pratica se ho altri oggetti ADO Connection attivi (su altri Database),
in qualche modo la connessione rimane attiva.
Dato che con MDB non lo fa, credo sia un problema del provider di firebird
Newsgroup: it.comp.lang.visual-basic
Titolo: problema con più form...

salve a tutti
devo fare in modo che, su un evento di un bottone del form2, venga 
scritta in una label del form1 una stringa.
Il problema è che non so bene come cercare, oltre che una questione 
tecnica è anche una cosa di esperienza...
avete dei suggerimenti?
grazie


nell'evento del tuo button sul form2 scrivi semplicemente
form1.label.caption = tuastringa
dove ovviamente label è il nome dell'etichetta presente nel form1 e
tuastringa la stringa che vuoi scrivere.
spero di aver capito la domanda....
ciao!
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Combo Box ed SQL

Come posso caricare in una Combo Box dei record prelevati da un database
attraverso la mia bella stringa SQL ?

 wrote in message
88cfsi$59u$1...@pegasus.tiscalinet.it...


Io uso questo metodo:
Dim dbs As Database
Dim rst As Recordset
Dim sql As String
 
 Set dbs = OpenDatabase(PATH)
 
    sql = "SELECT anagrafica.IDANAGRAFICA, anagrafica.nome" 
 
    Set rst = dbs.OpenRecordset(sql, dbOpenDynaset)
    Cmb_elenco.Clear
    While Not rst.EOF
        Cmb_elenco.AddItem rst!nome
        Cmb_elenco.ItemData(Cmb_elenco.NewIndex) = rst!IDANAGRAFICA
        rst.MoveNext
    Wend
 
    rst.Close
    dbs.Close
ciao
		maxx

-- 
Massimo Conter
<Consulenze Informatiche e Sviluppo Software>
email: 
emm...@laserinforma.com
email urgenti:	
03397...@posta.tim.it

 wrote in message
38AAEABA...@laserinforma.com...


Newsgroup: it.comp.lang.visual-basic
Titolo: ordinamento listbox

ciao ciao ho un piccolo problemino chi mi puņ aiutare?
devo inserire in una listbox una stringa che prelevo da una combo e devo
ordinarla in base al numero che inserisco in una text ogni volta che scelgo
un elemento dalla combo. Nella listbox non deve essere visibile il numero
che ho inserito nella text
esempio:
nella combo ho i valori: "stampa", "file", "cartelle"
io scelgo "stampa" e scrivo nella text "2" e lo inserisco nella listbox ora
scelgo dalla combo "file", nella text scrivo "1" e nella listbox devo
inserirlo prima di "stampa" come posso farlo?
vi ringrazio x il vostro aiuto
MOKI

 io scelgo "stampa" e scrivo nella text "2" e lo inserisco nella listbox
ora scelgo dalla combo "file", nella text scrivo "1" e nella listbox devo
inserirlo prima di "stampa" come posso farlo?
Per esempio cosi` (senza il controllo di eventuali valori duplicati in List1
che non so se ti occorre):
Option Explicit
Private Function List1AddItem( _
) As Boolean
  Dim lngIndex As Long
  With Text1
    If IsNumeric(.Text) Then
      lngIndex = .Text - 1
    Else
      Exit Function
    End If
  End With
  With List1
    If 0 <= lngIndex And lngIndex <= .ListCount Then
      .AddItem Combo1.Text, lngIndex
      List1AddItem = True
    End If
  End With
End Function
Private Sub Command1_Click( _
)
  Command1.Enabled = False
  DoEvents
  If Not List1AddItem Then Beep
  Command1.Enabled = True
End Sub
Private Sub Form_Load( _
)
  With Combo1
    '.Style = 2 - Dropdown List
    .AddItem "Stampa"
    .AddItem "File"
    .AddItem "Cartelle"
    .ListIndex = 0
  End With
  Text1.Text = 1
End Sub
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: problema sp vb

Ho un grosso problema, Aiutatemi!!!
Ho installato l'ultimo service pack per vb e ho un problema con l'oggetto
calendar che prima funzionava benissimo.
In pratica quando provo a inserirlo in una form, si chiude il VB.
Se inserisco l'oggetto da un altro pc senza service pack con MS Windows ME e
avvio l'eseguibile dalla macchina con MS Windows 2000 Professional, con o
senza service pack, mi da un errore strano:
Errore imprevisto. L'oggetto invocato si è disconnesso dai client
corrispondenti.
Errore di automazione
Grazie mille a chi potesse aiutarmi.

 ha scritto nel messaggio
news:x22s7.42812$P04.3...@news2.tin.it...


 Ho un grosso problema, Aiutatemi!!!
CUT

Newsgroup: it.comp.lang.visual-basic
Titolo: !!! - UNSIGNED - !!!

Ciao a tutti,
sono un programmatore in VB4 e ho un problema:
ho la necessità di creare delle variablili intere che contengano un numero
da 0 a 65535, proprio come le variabili "unsigned int" del C/C++.
Vorrei, se è possibile, evitare di utilizzare variabili di tipo "Long" o
più grandi.
Vi ringrazio anticipatamente per il vostro aiuto.
	Vendicator

Long) As boolean
Ciao
Corrado
0 - Vendicator ha scritto nel messaggio
<01bd0d9a$68cc8340$e5b71fc3@amicel>...


Visual Basic non ha il tipo di dati unsigned long,quindi se vuoi agevolmente
gestire questi tipi di dati ti consiglio di usare il tipo long (che nei
sistemi a 32 bit risulta essere più veloce degli int essendo il tipo di dati
nativo del processore).
Nel caso sappi che a tutti gli effetti un uint e un int sono entrambi dei 16
bit l'unica differenza sta nel fatto che nell'int con il
segno i bit più significativo è quello del segno.
Questo problema appare spesso quando ti interfacci a delle dll.
Se sei disposto a gestirti questo famigerato bit di segno,con delle semplici
routine puoi benissimo gestire gli uint come int.
Domanda:Te ne vale la pena?


Newsgroup: it.comp.lang.visual-basic
Titolo: Chi mi aiuta??!

Certo di un vostro immancabile aiutino eccomi quà con due nuovi problemucci:
1° Ho realizzato un exe di un programma e lo copiato in un nuovo pc, ma al
momento di lanciare l'exe
   ( nel nuovo pc ) mi copare un messaggio che m'informa di non aver copiato
nell'exe l'MSCOMCTL.OCX o uno dei suoi
   attributi, successivamente premendo invio termina il programma.
   Come faccio a trovare questo questo benedetto MSCOMCTL.OCX e copiarlo
sull'exe.
2° Dopo aver creato un'exe di un programma si è creato un file con il
seguente txt :
   Riga 101: impossibile impostare la proprietà OleObjectBlob in DBGrid1.
   Riga 101: impossibile caricare il controllo DBGrid1; licenza non
disponibile.
   Come faccio ad avere le licenze per utilizzare il dbgrid, quale versione
del vb contiene tutte le licenze degli oggetti,
   c'è un modo per aggirare il problema.
   é possibile che il primo problema dipenda proprio dal fatto di non aver
la licenza del DBGrid???
GRAZIE 1000. MAX

1° Ho realizzato un exe di un programma e lo copiato in un nuovo pc, ma al
]zac[
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] ADO ed SQL condizione WHERE

Problema:
Trovare in un DB tutti i record in cui i campi X, Y e Z abbiano un valore
immesso in 3 textbox.
Con il metodo Find di ADO so già che è impossibile immettere più di una
condizione WHERE, quindi lo scarto altrimenti dovrei andare a fare ricerche
concatenate, ma troppo lungo.
Posso agire invece sulla stringa del recordset impostando li le 3 condizioni
WHERE ?
Insomma, posso raccogliere tutti i record che soddisfano i miei requisiti (X
and Y and Z)?
ci ho provato separando le 3 istanza con delle virgole, ma VB mi risponde
con errore di sintassi e stranamente riesce ad essere anche preciso, dice
che la colpa è delle virgole. A questo punto mi sorge il dubbio, o devo
usare un carattere diverso oppure non è solo il metodo Find che non accetta
più di una clausola, ma anche le stringhe di aonnessione.
Soluzioni? Grazie dell'aiuto

 wrote in message
99ckh6$da4$1...@pegasus.tiscalinet.it...


la query è qualcosa del tipo:
SELECT * oppure i nomi dei campi che vuoi
FROM tabella
WHERE (condizione1)
AND (condizione2)
AND (condizione3)
....
tutto qui
per condizione intendo ad esempio:
        nomecampo1=text1
        nomecampo2=text2
        nomecampo3=text3
Ciao Massimiliano

 ha scritto nel messaggio
news:NIlu6.65015$yl2.6...@news1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: XML e VB

Salve, devo realizzare un progetto col quale poter recuperare dati da un
file .XML
Conoscete qualche sito dove poter scaricare librerie o classi per gestire
tali file o che trattino l'argomento?
Grazie, bye
--
Tango
www.af.mil
ICQ: 35463931

 tali file o che trattino l'argomento?
Prova a vedere a 
http://www.vbxml.com/

Newsgroup: it.comp.lang.visual-basic
Titolo: Mantenere i valori di variabili e matrici passando da un form all'altro

CIAO AMICO!!!
Avrei bisogno di un aiutino.Premettendo che sono un
dilettante con VB
come faccio a mantenere i valori di una variabile o
matrice anche passando da un form all'altro e cioč per tutta la durata di
un programma?
GRAZIE IN ANTICIPO
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
62Z98Z159Z78Y9...@usenet.iol.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [CERCO] setup1.res

Ciao a tutti.
Per pigrizia ed ignoranza sto cercando le traduzioni di setup1.res o
setup1.rc in tedesco, francese e spagnolo.
Se per caso qualcuno mi indicasse dove reperirli lo ringrazieri moltissimo.
Ho trovato la versione in portoghese.
Una volta trovati pensavo di mandarli al S.C.
Ciao, Giorgio

Scusate, ho dimenticato.
Qualcuno sa forse se su qualche disco di MSDN  si trovano questi files
Ciao, Giorgio

 setup1.rc in tedesco, francese e spagnolo.
http://snurl.com/p4q
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

Grazie mille.
Ho passato ore sul sito Microsoft senza trovare nulla!
Ciao, Giorgio
Newsgroup: it.comp.lang.visual-basic
Titolo: Modificare impostazioni internet su lan

Devo realizzare un programmino in grado di inserire o meno l'uso di un proxy
nella connessione internet via lan. In pratica qualcosa che mi permetta di
"togliere e mettere" la spunta nella casella. Esiste qualche API che fa al
caso mio ? C'è una voce di registro ?
Scusate l'ignoranza ... ma non è colpa mia :-)
Vincenzo

caso mio ? C'è una voce di registro ?
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings]
"ProxyEnable"
"ProxyServer"
"ProxyOverride"
-- 
hth, hal

 ha scritto nel messaggio
news:aacjnj$9m9jg$1...@ID-56381.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB5 Service Pack

... dove scaricare l'aggiornamento ?
Grazie

 Grazie
--
http://members.xoom.it/vbup

Newsgroup: it.comp.lang.visual-basic
Titolo: adodb.recordset e Datagrid

come si collega a runtime un Datagrid (.datasource) ad un adodb.recordset?
Grazie, Emas!

Grazie, Emas!
Melon.
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] TabStrip: possono contenere oggetti ?

Scusate la banalità ma dovrei usare le Tabstrip come dei Frame altrimenti
per passare da una scheda all'altra devo inserire tanti frame da rendere
visibili e invisibili.
Mi sono perso qualche proprietà ? oppure ne esiste una version + sofisticata
?
Grazie
Roberto

 ha scritto nel messaggio
news:AtdX5.40504$hk4.1...@news.infostrada.it...


Mi sono perso qualche proprietà ? oppure ne esiste una version + sofisticata
I Tab non sono dei contenitori. In alternativa potresti usare le SSTab o altro, ma ti porteresti
dietro un OCX in più, mentre le TabStrip sono contenute nei common control (che ti porti dietro
quasi sempre...)
Eccoti un esempio di utilizzo:
Disegna in un form un controllo TabStrip, chiamato TabStrip1, un vettore di picture composto da tre
elementi (Picture1(0), Picture1(1), Picture1(2)), e disponi la Picture1(0) nella posizione
definitiva;
Disegna, nelle picture i controlli che vuoi e poi:
Private Sub Form_Load()
 
    Dim i As Integer
 
    Cornice = 0
    For i = 1 To 2			'Allineo le Picture
        Picture1(i).Visible = False
        Picture1(i).Top = Picture1(0).Top
        Picture1(i).Left = Picture1(0).Left
    Next i
 
End Sub
Private Sub TabStrip1_Click()
 
    Dim i As Integer
    If TabStrip1.SelectedItem.Index = Cornice Then Exit Sub
 
        For i = 0 To 2
            If i + 1 = TabStrip1.SelectedItem.Index Then		'A differenza degli SSTab,
l'indece dei TabStrip parte da 1
                Picture1(i).Visible = True
            Else
                Picture1(i).Visible = False
            End If
        Next i
    Cornice = TabStrip1.SelectedItem.Index
End Sub
Cornice è una variabile globale che mi fa si, nel caso in cui clicco nel tab corrente, di non
ridisegnare a vuoto i controlli.
Al posto delle picture puoi benissimo usare i frame.
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: BITONTO - bari Cerco PROGRAMMATORE

SALVE, CERCO BRAVO PROGRAMMATORE IN VISUAL BASIC disponibile PER
CONSULENZA A DOMICILIO, PER UNA GIORNATA! Bitonto - Bari
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 CONSULENZA A DOMICILIO, PER UNA GIORNATA! Bitonto - Bari
Non urlare.
BITONTO = 2*TONTO :-)
Ciao
--
Timothy Redaelli
Scusate ma non ho resistito

Newsgroup: it.comp.lang.visual-basic
Titolo: "AutoFit" delle colonne MSHFlexGrid

Qualcuno ha realizzato un autoFit per colonne del controllo di cui
all'oggetto?
COme quando in XL, da macro o da codice, seleziono delle celle e faccio
una cosa del tipo:
.columns.autoFit
Altrimenti, avreste dei suggerimenti da darmi su dove cominciare? Potrei
anche postare la funzione in tal modo ottenuta.
Grazie.
-- 
Emanuele Torrenti

Dopo dura riflessione, Manuel T ha scritto :

Ne ho fatte un paio di versioni.
Diciamo che puoi sfruttare le proprietà Type, ActualSize e DefinedSize 
del recordset che associ.
Ciclando nella collection Fields e contestualmente in quella Columns 
(parlo di DataGrid, ma immagino ci sia qualcosa anche nelle altre 
griglie), con qualche Select Case fatto bene dentro al ciclo ottieni 
dei bei risultati.
Ciao
Alberto
-- 
Autore di
"Petting for Dummies"

Manuel T ha scritto:

Emanuele, guardo pure qui, non dirmi che con google non l'hai trovato....
http://www.masterdrive.it/default.asp?modulo=Leggi&contenuto_id=846
(mi faccio il verso da solo)
-- 
Emanuele Torrenti

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

Mi sono reso conto che potrebbe essere più comodo e facile utilizzare nelle
applicazioni controlli OCX o DLL o ActiveX o quello che personalizzati.
Ma come faccio a crearli?
Grazie a tutti


Con Visual Basic e studiando i manuali che sono sui cd VB/MSDN.
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Come conoscere la posizione di un controllo sullo schermo???

 button) ma non funziona un tubo...
Le funzioni API generalmente restituiscono misure in pixel mentre VB usa i
twips:
Private Sub Command1_Click( _
)
Dim F   As POINTAPI
Dim C   As POINTAPI
Dim ret As Long
  Call ClientToScreen(hWnd, F)
  Call ClientToScreen(Command1.hWnd, C)
  With Screen
    Call Picture1.Move( _
        (C.X - F.X) _
      * .TwipsPerPixelX _
      , (C.Y - F.Y) _
      * .TwipsPerPixelY)
  End With
End Sub
--
Ciao.
Maurizio



Ciao utilizzo VB6.0


Ho creato una form entro la
quale ho inserito un button chiamato cmdButton.


Ho utilizzato la funzione
API ClientToScreen per ottenere la posizione del controllo ho cosi' fatto:


Private Type POINTAPI


    X As Long


    Y As Long


End Type


Private Declare Function ClientToScreen
Lib "user32" (ByVal hwnd As Long, lpPoint As POINTAPI) As Long


Dim P As POINTAPI


Dim ret As Long


ret& = ClientToScreen&(cmdButton.hwnd,
P)


ma ottengo valori assurdi...
non capisco.


In pratica ho la necessita'
di fare apparire una Dialog in posizione cmdButton.Left e cmdButton.Top,
avendo molti buttons ho pensato che tale funzione API facesse al caso mio
(basterebbe passargli l'handle del button) ma non funziona un tubo...


Potete aiutarmi???


Ciao e ancora grazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?API] SetWindowLong e SetWindowPos per cambiare lo stile di un controllo.

Allora:
Io per dare ad una picturebox uno stile superflat alla Office uso queste
istruzioni:
        picPB.BorderStyle = 0
        picPB.Appearance = 0
        'Retrieve the current border style
        lngRetVal = GetWindowLong(picPB.hWnd, GWL_EXSTYLE)
        'Calculate border style to use
        lngRetVal = lngRetVal Or WS_EX_STATICEDGE And Not WS_EX_CLIENTEDGE
        'Apply the changes
        SetWindowLong picPB.hWnd, GWL_EXSTYLE, lngRetVal
        SetWindowPos picPB.hWnd, 0, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE Or
_
                     SWP_NOOWNERZORDER Or SWP_NOZORDER Or P_FRAMECHANGED
Fin qui tutto bene.
Il problema è che non riesco più a fare il contrario. Cioè, come potrei fare
per togliere il bordo che queste istruzioni praticamente disegnano???
Thanks!
SebaMix

:)
-> GbC

va, oggi sono buono ;)
    Dim lngRetVal As Long
    'Retrieve the current border style
    lngRetVal = GetWindowLong(HWnd, GWL_EXSTYLE)
    'Calculate border style to use
    lngRetVal = lngRetVal And WS_EX_CLIENTEDGE
    'Apply the changes
    SetWindowLong HWnd, GWL_EXSTYLE, lngRetVal
    SetWindowPos HWnd, 0, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE Or _
                 SWP_NOOWNERZORDER Or SWP_NOZORDER Or SWP_FRAMECHANGED
-> GbC
http://www.gbcweb.com

> va, oggi sono buono ;)
:-* smack!
Peccato non serva... :-(
Ti spiego...
La picturebox č la mia vecchia progressbar, solo che ora mi sono deciso di
farne una ocx :-)
Alla ocx gli ho dato quindi le property borderstyle (None e FixedSingle) a
Appareance (3D, Office e Flat).
Con il tuo codice, il bordo office rimane lo stesso :-) e si che le nuove
chiamate API che mi hai dato vengono eseguite...
La curiositŕ č che la cosa si ripristina se chiudo il form che contiene
l'ocx e lo riapro... boh...
CiaoZ
SebaMix

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

Sono entrato nella pagina web, è scritto in inglese e ho capito poco.
Della versione in Italiano non fa riferimento o almeno non ho trovato
niente.
Dove la trovo?
E' cosi utile come tutti parlano?
Carmelo

 Dove la trovo?
Scarica quella che c'è sul sito. Si "localizza" da sola. Nel senso che
quando la installi i comandi li vedi tutti in italiano. Almeno a me che ho
il VB in italiano.

Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 popupmenu

salve
e' possibile creare e visualizzare PIU ( 3 ) popupmenu con nomi diverso
sulla stessa form ?
l'editor di menu fa vedere sempre il primo che ho creato.
bye
leonello

 sulla stessa form ?
...
Contemporaneamente? No, non e' possibile.
Se invece intendi dire che, in base a delle condizioni, vuoi mostrarne uno o 
l'altro, si puo' fare semplicemente.
If.... then
    Me.PopupMenu PrimoMenu
Else
    Me.PopupMenu SecondoMenu
End if

 ha scritto nel messaggio 
news:4b1fcd7b$0$8865$4faf...@reader5.news.tin.it...

li devo far apparire  separatamente.
il mio problema e' come fare a crearli con l'editor del menu del form.
leonello
. 

 . 
Dipende.
Se sono PopupMenu tutti legati alla stessa form, basta che nell'editor 
ti crei 3 voci di primo livello, che rendi invisibili, e sotto ciascuna 
voce metti i menu che ti servono. Poi, per chiamarli, lanci PopupMenu 
<chiave della voce invisibile>, ed e' fatto.
Se il tuo problema invece e' che lanci un popupmenu, e dalla scelta fai 
qualcosa che lancia un altro popupmenu, non puoi lanciare un popup 
'dentro' l'altro.
Io ho adottato un tucco del genere:
Public iMenuChiuche as integer
...
iMenuChoiche = -1
PopupMenu MioMenu
select case iMenuChoiche
   case 1
     ...
end select
private sub <la sub lanciata all'evento del click sulla voce del popupmenu>
   iMenuChoiche = <numero della voce
end sub
Bye by SixaM 8-]

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi Dimensioni Database in Access

Ho questo problema , il mio database in Access 97 data la mole di lavoro
prodotta aumenta di circa 100 Mb al giorno fino a diventare anche di
dimensioni di 1 Giga Byte , il problema di fondo è che non è possibile
compattare il Db ogni giorno.
Ho tentato di dividere le varie tabelle in *.mdb diversi usando le tabelle
collegate, ma mi dà errore il metodo OpenTable di Visual Basic.
Vorrei sapere se qualcuno di voi ha delle soluzioni a questo problema, vi
ringrazio in anticipo, se potete vorrei una risposta anche al mio indirizzo.
--
Saluti Francesco.

...



Giusta l'sservazione di Ipalma, comunque intanto usa OpenRecordset al posto
di OpenTable
Bye, Piero

 compattare il Db ogni giorno.
Domanda: includi delle immagini? Se č cosě *sbagli!* ;->
Facci sapere...
Flavio Ronco
f.ronco@*NonMiServeNiente*
flashnet.it
http:\\
www.geocities.com
\Paris\3461\
-------------------------------------------------------------
"Dio ha uno screensaver. Speriamo che non tocchi il mouse..."
Newsgroup: it.comp.lang.visual-basic
Titolo: ESPRESSIONI MATEMATICHE

esiste qualche anima santa che mi sa dire come fare a scrivere un codice che
presa un'espressione del tipo (5-4)*3 da una textbox
mi scrive il risultato (NUMERICO) su una variabile?????
per favore sono nelle vostre mani
grazie Vi][oZ

...

Sul Sito Comune c'e' l'esempio che fa per te: Eval.zip
http://members.xoom.com/it_lang_vb
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
 
(con OCX per stampare i Recordset)
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb



...




 grazie Vi][oZ
Mi sembra di averti gia risposto  (credo)
Sul Sito Comune (Vedi qui in fondo) c'e' un progetto FREE (con sorgenti) che fa esattamente quello di cui hai bisogno. Il
progetto si chiama Eval.zip.



http://members.xoom.com/it_lang_vb
scusate se non l-ho scritto nel post precedente ma
 eval.zip non c'e' (mi sa) piu'
Vi][oZ

...

E' un LOOP infinito.
Se Chr$(KeyAscii) = "3" allora non uscira' mai dal ciclo, almeno fino a che non va in overfloaw la somma tot=tot+val(char)


...

FALSO!
Vai sul sito comune ( 
http://members.xoom.com/it_lang_vb
 ), su "Progettati per te", in fondo alla prima tabella trovi
Eval.zip.



Il tuo problema sta nel ciclo do - loop che hai imposto, infatti quando
premi un tasto diverso da "=", entri in un ciclo infinito.
1    do until char = "="
2        tot = tot + val(char)
3    loop
supponi di digita 4
la condizione 1 non è soddisfatta, quindi esegui il passo 2 e ritorni subito
al passo1 e così via.
Ciao Bruno
Newsgroup: it.comp.lang.visual-basic
Titolo: dimensione tendina del ComboBox...

Ciao,
qualcuno mi sa dire se è possibile fare in modo che la larghezza del munù  
a tendina che appare sotto il comboBox, sia maggiore della larghezza del  
comboBox stesso???
Grazie per ogni suggerimento.
Piergiacomo

Dimenticavo, sto parlando di Visual Basic 6...
Grazie,
Piergiacomo


http://vbnet.mvps.org/code/comboapi/combowidth.htm
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.

Grazie mille,
mi è stato molto di aiuto!
Ciao, Piergiacomo
On Mon, 24 Jul 2006 16:28:46 +0200, Rafunk <rafun...@NOTHANKSlibero.it>  
wrote:


Newsgroup: it.comp.lang.visual-basic
Titolo: MultiPOP free...

In seguito al successo dell'applicazione (0 richieste), ho dedotto che non
frega niente a nessuno.
Allora ho deciso di renderla free...
MultiPOP è da me (ora la invio al sito comune), e consente di cercare in
automatico la prima linea libera quando si usano molti provider.
Non è un prg intrusivo (non modifica nulla nel sistema).
Magari ora che è gratis serve a qualcuno...
http://www.chiappori.net
--
--[GbC]--

Guarda, GbC, non ci crederai ma il giorno stesso che ho cominciato a provare il
tuo programma tutti i problemi che mi avevano convinto ad installarlo sono
spariti come per magia, e cosě non l'ho piů usato :)


Daccordo, ma secondo te l'idea è una stronzata o sta in piedi?
A me sembrava pratico...
--[GbC]--

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report e stampa dei saldi

Probabilmenta a qualcuno è già capitato, avventurandosi nei meandri del
Crystal (io uso la ver. 4.5), un problema di questo tipo...
Vediamo se esiste qualcuno così bravo che risolve il problema...
Poniamo di avere una tabella di questo tipo:
Soggetto        Data                       Importo
Alfa                01/01/2001            +1.000.000
Alfa                02/01/2001            -800.000
Alfa                03/01/2001            +100.000
Beta               01/01/2001            +2.000.000
Beta               02/01/2001            -1.000.000
Beta               03/01/2001            +500.000
Beta               04/01/2001            +60.000
E vogliamo ottenere in stampa un risultato tipo:
Alfa
    Data                            Importo                            Saldo
    01/01/2001                +1.000.000                        +1.000.000
    02/01/2001                -800.000                            +200.000
    03/01/2001                +100.000                            +300.000
Beta
    01/01/2001                +2.000.000                        +2.000.000
    02/01/2001                -1.000.000                        +1.000.000
    03/01/2001                +500.000                           +1.500.000
    04/01/2001                +60.000                            +1.560.000
(scusate la formattazione)
Visto così pare semplice...
in pratica, chiamatemi fesso, non ci sono riuscito.
Che diavolo di formula posso usare per creare il saldo?
Siete abbastanza bravi?
Ciao ragazzi!

Ciao, devi raggruppare l'elenco di records presenti nella tabella per il
campo Soggetto
Byez
Tango
Newsgroup: it.comp.lang.visual-basic
Titolo: MENU[?]

Come si realizza un menu che compare al clik del mouse e nella posizione del
cursore???
Grazie
Tommaso

Devi utilizzare la funzione Popupmenu
Prima di tutto crea un menů standard nel form (c'č l'editor) poi fai cosě:
nomeform.popupmenu <nome del menů>
Semmai premi F1 quando sei sopra alla parola Popupmenu ;)
CiaoZ
SebaMix

 nomeform.popupmenu <nome del menů>
Aggiunto il [FAQ] per Alex
--
Fibia "Sakamoto" FBI

Newsgroup: it.comp.lang.visual-basic
Titolo: Richiesta di aiuto

 Invece il controllo ADO come si usa ?
Con qualche accorgimento, nello stesso modo...
Ciao. A.D.

 Invece il controllo ADO come si usa ?
mi dispiace, non ne ho la minima idea. mai usato. sul sito msdn c'e' un
tutorial in varie (mi sembra 11) pagine su come passare da dao a ado, ma non
ho avuto il tempo di guardarlo.
ciao, a.

Newsgroup: it.comp.lang.visual-basic
Titolo: Come settare ADO per aggiornare

via Mailgate.ORG Server - 
http://www.mailgate.org

>Puo' darsi che la query che usi restituisca un recordset non aggiornabile...
come e' possibile ? Ho il dubbio che non setto bene le prop dell'adodc :((
Mi fai un esempio delle prorp ?


Newsgroup: it.comp.lang.visual-basic
Titolo: Connessioni via Internet con IP assegnato dal provider

Salve a tutti,
vorrei sapere se è possibile, ed eventualmente come, recuperare
l'indirizzo IP che ci viene assegnato dal provider quando ci si
collega a internet con un modem. Ho già provato con VB usando
l'oggetto WinSock su un pc collegato ad internet in cui c'era anche
una scheda di rete, ma mi ritorna sempre l'IP assegnato per la LAN.
Grazie per l'attenzione
BYE
sfr...@hotmail.com
fre...@tiscalinet.it
ICQ: Parsifal #41945202
Rimuovi NS per l'email

 una scheda di rete, ma mi ritorna sempre l'IP assegnato per la LAN.
Ho risposto al medesimo quesito 2 giorni fa. Ti riporto parte
di quello che avevo scritto.
-----------------------------------------------------------------
Per creare una sessione Winsock coerente, occorre creare un
nuovo socket per indurre un refresh della lettura dell'IP assegnato
alla macchina in un determinato istante.
Ponendo che l'oggetto Winsock si chiami "WSock", si crea
a design-time  un array di tale controllo impostando la proprietà
Index a 0. A run-time si scrivere:
   'Crea un nuovo oggetto Winsock con indice 1
   'Viene creato un nuovo socket
   Load WSock(1)
   'Termina la sessione di WSock(0)
   WSock(0).Close
   'LocalPort a 0 per evitare conflitti
   WSock(1).LocalPort = 0
   WSock(1).Listen
   'Mostra l'IP corrente
   Text1.Text = WSock(1).LocalIP
   'Chiude la sessione del socket creato (chiude il socket)
   Unload WSock(1)
Creando un nuovo socket, viene automaticamente aggiornato
il LocalIP della macchina locale.
Per conoscere l'Ip corrente della macchina, devi inserire il
codice descritto in una funzione, da richiamare al momento
opportuno - per ipotesi tramite un Timer.
In pratica, occorre creare un nuovo oggetto e poi distruggerlo.
Il nuovo oggetto contiene le informazioni aggiornate sullo stato
della macchina. Se non ricrei, ottieni sempre le medesime
informazioni.
Newsgroup: it.comp.lang.visual-basic
Titolo: File exel e VB

E' possibile aprire un file excel (ad esempio con ADO) senza conoscere
il nome del Foglio di Calcolo? Tanto per essere chiari, devo importare
in Mdb un listino in formato excel ma il produttore ogni volta che va
un listino lo chiama listino.xls ma la cartelal di lavoro cambia (ad
esempio Giugno 2000, Luglio 2000: come posso recuperarle per poterle
mettere nella proprietą RecordSource di ADO o DAO?
Grazie

> FDS:

Rispondo unicamente alla questione del nome.
Direi che le possibilita` sono, piu` o meno, le seguenti.
Ti viene fornito un file cartella di lavoro di Excel
"listino.xls":
1. che contiene *sempre e soltanto* *uno ed un solo* foglio di
lavoro;
2. che contiene piu` fogli di lavoro ma *sicuramente* quello
che devi usare e` il primo;
3. che contiene *uno ed un solo* foglio di lavoro il cui nome
e` una data valida priva del giorno;
4. come (3) ma i fogli col nome in forma di data sono piu` di
uno e tu devi usare la data piu` recente;
e cosi` via ipotizzando.
In pratica o il criterio e` "posizionale" o "nominale".
Se e` posizionale puoi riferirti al foglio cosi`:
    Dim xlWbk As Excel.Workbook
    Dim xlWks As Excel.Worksheet
    ...
    Set xlWks = xlWbk.Sheets(1)
se invece puoi riferirti al nome che rappresenta una data
allora potresti, per ogni foglio nella cartella, verificare se
il suo nome rappresenta una data:
    For Each xlWks In xlWbk.Sheets
      With xlWks
        If IsDate("1 " & .Name) Then
          ...
      End With
Ecc.
(Forse la sintassi non e` perfetta. Fa' attenzione.)
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

nella proprietà RecordSource di ADO o DAO?

Newsgroup: it.comp.lang.visual-basic
Titolo: Chi mi da una mano per il win.ini ?

Avrei bisogno di eliminare qualche sezione dal file win.ini o
unaltrofile.ini
Chi mi da una mano?
Uso vb4 e non vorrei usare nessun ocx.
Grazie
Andrea

 ...
Io creo una copia temporanea del file .ini da editare, lo apro e lo elaboro
con le normali istruzioni di VB per la gestione dei file di testo
(lineinput e print) ed al termine sovrascrivo il file .ini col file
temporaneo elaborato.
Infine elimino quest'ultimo ed il gioco è fatto.
Sembra complesso, ma se provi dovresti cavartela abbastanza velocemente.

unaltrofile.ini


Grazie a tutti anche se non so' se funzionera' in quanto devo eliminare
un'intera sezione e non modificare un valore di una sezione del file ini.
Andrea

 
Vuoi eliminare un'intera sezione.... Detto fatto, bastava dirlo subito :-))
-------------------------
Per i file ini "Privati":
-------------------------
Private Declare Function DeletePrivateSection Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As
String, ByVal lpKeyName As Long, ByVal lpString As Long, ByVal lpFileName As String) As Long
Call DeletePrivateSection("Prova1", 0, 0, "c:\t\prova.ini")
-------------------------
Per il WIN.INI:
-------------------------
Private Declare Function DeleteSection Lib "kernel32" Alias "WriteProfileStringA" (ByVal lpszSection As String, ByVal
lpszKeyName As Long, ByVal lpszString As Long) As Long
Call DeleteSection("MesProva1", 0, 0)
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal R. e orientamento pagina

Ciao, possibile che non riesco a trovare nessuna proprietą dell'oggetto
CR che mi permetta di modificare l'orientamento della pagina alla
stampante.
Qualcuno puņ aiutarmi ?
Grazie

 ha scritto nel messaggio
news:3BF91E6E...@istat.it...

Non vorrei dire una castronata.. ma devi utilizzare l'orientamento della
pagina direttamente sull'oggetto stampante.
printer.Orientation
--
Ciao
Franco

Newsgroup: it.comp.lang.visual-basic
Titolo: recordset.RecordCount = -1

Credo sara' un problema omai discusso n-volte. Purtroppo sfogliando il
newsgroup non ho trovato riferimenti/soluzioni.
PROBLEMA:
- popolo un recordset (ADO) tramite una select, i record sono presenti ma il
recordcount indica -1
Ho gia' provato a muovere il cursore al termine e all'inizio del recordset
nella speranza di "svegliarlo" ma non ho ottenuto
nessun risultato.
Grazie,
Francesco

deve impostare:
recset.CursorLocation = adUseClient
recset.Open NomeTab,Conn
recset.MoveLast
nrec=recset.RecordCount
se lo tieni a:
recSet.CursorLocation = adUseServer
e se non dici nulla quasi sempre te lo prende così!
recordcount ti indicherà sempre -1
Frank <ZZZZf...@netscape.netZZZZ> wrote in message
8iq4mr$5pg$1...@fe2.cs.interbusiness.it...


 nessun risultato.
Probabilmente è un problema di query (select). Sicuro di scrivere tutto
giusto?
Prova a postarla.
--
Ciao a tutto il NewsGroup
Alex
alm...@tin.it

Non credo, se estraggo i dati dal recordset tutto funziona correttamente.
Solo la proprieta' Recordcount e' impostata a -1.
Ho provato (come suggeritomi da messaggio precedente) ad utilizzare :
cursorLocation = adUseClient
e tutto funziona correttamente.
Grazie a tutti,
Francesco


Newsgroup: it.comp.lang.visual-basic
Titolo: *** Se una Form è aperta o no ***

Ciao a tutti,
con l'evento click su una voce a menu, mi apre una nuova maschera Deposito.
Dato che devo potermi spostare tra depositi e prelievi vorrei che sul click
su una delle due voci prima mi controllasse
se la form desiderata è aperta oppure no.
Grazie
Saimon

 desiderata è aperta oppure no.
If frmDeposito.Visible = False Then
    frmDeposito.Show
End If
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: Comprimere un file !!!

Cerco del codice vb per comprimere un file !

 ha scritto nel messaggio
news:941pne$94t$1...@news.panservice.it...
