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

Seguendo i suggerimenti che mi avete fornito, ho scritto una procedura che,
nel Form1, crea tante textbox e label quanti sono i campi di un database,
associandovi i campi dello stesso. Sorge ora un altro problema : se voglio
caricare la tabella di un altro database, come faccio a ripristinare la
situazione di partenza, con il form contenente solo il primo elemento degli
array di textbox e label (per potervi associare i nuovi campi) ?
Grazie,
           Stefano

 ha scritto nel messaggio
news:9rr45r$d7f$1...@newsreader.mailgate.org...

Semplicemente non devi utilizzare sempre lo stesso form.
In pratica, supponendo che Form1 dia il tuo form con la "situazione
iniziale", ogni volta che devi utilizzarlo per gestire diversi recordset
crei una nuova istanza del form di base usando codice tipo:
dim pippo As Form
set pippo = new Form1
pippo.Show
ciao
ugo


Unload !!!!!!!!!!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Chiudere un msgbox

Come e' possibile inviare un comando ad un messagebox da VB?
Per intenderci vorrei simulare da programma la riposta dell'utente ad un
messagebox generato da un altro programma.
Grazie a chi vorra' darmi qualche suggerimento.
Saluti
giuseppe
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Dichiara l'api findwindow  e la costante WM_CLOSE
Sostituisci "project uno con la caption della tua msgbox.
hwn = FindWindow(vbNullString, "Project1")
ret = SendMessage(hwn, WM_CLOSE, 0, 0)
Saluti
--
Piero Romani
HomePage:
http://digilander.iol.it/vbsegreti
"Non dico mai non si può fare."

Newsgroup: it.comp.lang.visual-basic
Titolo: Is Multithreading possible in VB ?

Hello,
1.How can I create threads in VB ?
2. Is it possible to create IDL(Interface Definition Language) for
Activex component created in VB ?
Have a great day,
Sundarram
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

>1.How can I create threads in VB ?
I read an article about this topic on VBPJ. Try looking for this topic in
the 
www.windx.com
 index
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Adodc e Datagrid

Salve a tutti,
Vorrei riempire una griglia Datagrid con un db.mdb. Sul form ho un controllo
ADODC e la Datagrid.
Ora se imposto il controllo ADODC manualmente tutto OK. Ma vorrei farlo
tramite codice. Così ho scritto:
Private Sub Form_Activate()
    Dim strSQL As String
    Dim strConnect As String
    Dim rstMacchine As New ADODB.Recordset
    strConnect = "User ID=Admin;Password=;Data Source=" & _
                App.Path &
"\MacchineCE.mdb;Provider=Microsoft.Jet.OLEDB.4.0"
    strSQL = "SELECT * FROM Macchine ORDER BY Matricola"
    rstMacchine.Open strSQL, strConnect, adOpenKeyset,
adLockBatchOptimistic, adCmdText
    Set adcMacchine.Recordset = rstMacchine
End Sub
In questo modo il recordset mi viene creato regolarmente, ma non viene
visualizzato nella griglia. Perchè ?
Vi ringrazio anticipatamente. Ciao
Michele

     Set adcMacchine.Recordset = rstMacchine
Prova A Cambiarlo con:
    Set adcMacchine.Datasource = rstMacchine ( se laDataGrid si Chiama
adcMacchine )
By Utente Win2k


adcMacchine e l' ADO Data Control. La propietą Datasource della datagrid lo
impostata sul DataControl. Hai qualche altro suggerimento ?

 impostata sul DataControl. Hai qualche altro suggerimento ?
devi impostare DataSource sul recordset non sul''ADODC ..
CIAO


Se intendi che devo fare una cosa del tipo:
set DataGrid.Datasource = adodc.recordset
l' ho già provato e non funziona.
Ad ogni modo quando vado ha modificare la proprietà Datasource di Datagrid
direttamente sul controllo, lui mi suggerisce come unica fonte di dati
disponibile l' ADODC ed in effetti funziona quando setto l' ADODC
manualmente, ma non funziona se lo setto via codice.Perche ? Proprio non
capisco.
Ciao

 l' ho già provato e non funziona.
dim conn as new ADODB.Connection
dim rs as new ADODB.Recordset
conn.Open StringaDiConnessione
rs.Open "Select * FROM Clienti",conn,adOpenStatic
set DataGrid.DataSource=rs
CIAO

 ha scritto nel messaggio
news:Prvc8.131$Zf3....@twister2.libero.it...

Attenzione, il cursore deve essere lato client
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Allineare una list box a destra

Come da oggetto

 Come da oggetto

 wrote in message 8d2b06$pcu$1...@nslave1.tin.it...


 > ci dev'essere una risposta di faber a strahd, di oggi.
Pal intendeva dire che avevo risposto alla stessa domanda oggi ad un
programmer di nome Strahd. scusami ma non riesco a ritrovare la risposta :)
in breve, suggerivo di
- Impostare un carattere non proporzionale per la ListBox (per es. Courier)
- Segnarsi da qualche parte il numero max di caratteri per riga che tiene la
ListBox (per es. 20)
- Quando si aggiunge un elemento alla ListBox fare
Dim DaAggiungere As String
DaAggiungere = "Quello che vuoi"
List1.AddItem Space(20 - Len(DaAggiungere)) & DaAggiungere
occhio, se Len(DaAggiungere) > 20 ti da errore
Ciao!
Faber

 wrote in message
GC4J4.123859$pn3.1...@news.infostrada.it...


 > > Come da oggetto


Prova cosi' :
Dim iMaxChar as Integer   ' Numero di caratteri della listbox
Dim sPattern as string
iMaxChar = 20        '20 caratteri ad esempio
sPattern = String$(iMaxChar, "@")
List1.AddItem Format$("Prova", sPattern)
List1.AddItem Format$("naturalmente", sPattern)
List1.AddItem Format$("con un", sPattern)
List1.AddItem Format$("font", sPattern)
List1.AddItem Format$("a spaziatura", sPattern)
List1.AddItem Format$("fissa", sPattern)
List1.AddItem Format$("per la listbox!", sPattern)
Ciao
Ven.
Newsgroup: it.comp.lang.visual-basic
Titolo: DAO 3.51

Option Explicit
Private Enum MyEnum
txtnome = 0
txtcognome
txtdata_di_nascita
End Enum
Private db As Database
Private rs As Recordset
Private Sub cmdregistra_Click()
rs.AddNew
SaveRecord
rs.Update
End Sub
Private Sub Form_Load()
    Set db = OpenDatabase("C:\Database")
    Set rs = db.OpenRecordset("MiaTabella")
    End Sub
Sub SaveRecord()
rs.Fields("nome") = Text1(txtnome)
rs.Fields("cognome") = Text1(txtcognome)
rs.Fields("Nato_il") = Text1(txtnato_il)
rs.Fields("Città_Nat") = Text1(txtCittànat)
End Sub
Spiegazione: Ho una matrice di text1 sul form, le ho enumerate, ma quando
vado a rs.update....
errore run-time 3421
Data Type conversion error !!!!!
I fields sono tutti testo tranne la data di nascita, ho provato a
convertirla con Cdate( ) ma niente...... qualcuno può aiutarmi ? Grazie
a tutti  Ciao 8)

 ha scritto nel messaggio
news:loLJ4.135900$pn3.1...@news.infostrada.it...

Hai fatto un controllo sulla validità del Text con la data? Tipo
if isdate(Text1(txtnato_il)) then
    ......
--
 
federic...@planet.it
Eliminare NOSPAM dall'indirizzo! Delete NOSPAM from address!

 ha scritto nel messaggio
news:8d813i$tqn$1...@news.planet.it...

No non l'ho fatto un controllo, però è strano, perchè anche senza controllo
la txt dovrebbe restituire X/X/1900, o mi sbaglio ?


nell'esempio da te allegato
rs.Fields("Nato_il") = Text1(txtnato_il)
non tentando nemmeno di convertire Text1, inserisci una stringa vuota nel
campo Nato_il se non è stata inserita una data, o comunque una stringa di
testo. Non mi pare proprio che avvenga una qualche 'nascosta' conversione di
tipi automatica in questo caso.
La proprietà .Text di un TextBox restituisce una stringa di testo, sempre.
Sta a te convertirla in Data, Numero o quello che vuoi. L'assegnazione ad un
campo di database non comporta una conversione automatica anche perché VB
non può sapere il tipo del campo a cui assegni un valore. Non è così
perspicace. Il controllo del valore assegnato avviene solo sul motore del
database nel momento che lo chiami in causa con Update, ma è troppo tardi.
Ti consiglio nuovamente di controllare a priori cosa assegni a
rs.Fields("Nato_il") controllando con isdate() se passi una data valida.

Newsgroup: it.comp.lang.visual-basic
Titolo: Un banalissimo problema per i più

Prova cosě: nella casella combinata usi l'autocomposizione e scegli
tutti e tre i campi, nel formato metti numero colonne a 3, larghezza a
4;0;0, cosě vedi solo il primo campo. Nella sezione evento, alla voce
dopo aggiornamento, scrivi: if not isnull(casellacombinata) then   
testo1 = casellacombinata.column(1)    testo2 =
casellacombinata.column(2) endif Sostituisci alla parola
"casellacombinata" il suo nome effettivo. Buon lavoro

 ha scritto nel messaggio
news:adfmub$i4e$1...@gossip.excite.it...


- 
http://www.it-lang-vb.net/docs/Manifesto.txt
Condivido l' osservazione ed aggiungo anche:
- evita il cross-posting quando non necessario (cioe' evitalo sempre ;-)
-- 
ciao, hal

 Paolo.
Ciao,
un altro suggerimento:
- quando posti, prima, leggi il manifesto di questo NG
(
http://www.sitocomune.com/netiquette.htm
)
Ciao.
--
Sergio MAZZA

 Paolo.
Beh, PAOLO che dire, sei fortunato perchè non c'è BISIO in arte ANTONIO
ma sinceramente l'autocensura in questo caso......!!!!
SI POSTA DOPO IL QUOTING come indicato nelle norme di questo NG.
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


E' vero, lo so, ma visto che stavo postando ad una persona che NON sa cosa
voglia dire POSTARE, non volevo che magari non vedesse la mia risposta SOTTO
la sua!!
Ciao.
Paolo

 la sua!!
LOL... hai ragione. A proposito, che sia per questo che
tanti niubbi non leggono le risposte alle loro domande ?
Non le trovano :-))))))
Bye, G.

+---< RISPOSTA
|
| > "Paperino" [...]:
| > > "PaoloP" [...]:
| > > > "Alessandro" [...]:
|
| > > > SI POSTA DOPO IL QUOTING come indicato nelle norme di questo NG.
|
| > > E' vero, lo so, ma visto che stavo postando ad una persona che NON sa
| > > cosa
| > > voglia dire POSTARE, non volevo che magari non vedesse la mia risposta
| > > SOTTO
| > > la sua!!
|
| > LOL... hai ragione. A proposito, che sia per questo che
| > tanti niubbi non leggono le risposte alle loro domande ?
| > Non le trovano :-))))))
|
+---> Ca`spita, e` vero! Non ci avevo pensato!
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.lang.visual-basic
Titolo: evento keypress

salve, dovrei gestire l'evento keypress in modo che anche se tengo premuto
non mi scrive il carattere a ripetizione sulla textbox
come posso fare
grazie per i suggerimenti

 wrote in message
TC3rb.435799$R32.14...@news2.tin.it...



Non puoi utilizzare gli eventi KeyDown e KeyUp?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

> Non puoi utilizzare gli eventi KeyDown e KeyUp?
certo, ma se tengo premuto il tasto.........


Prego
Ciao,
Giuseppe
Newsgroup: it.comp.lang.visual-basic
Titolo: visual style in .net

Ciao a tutti,
son mezza giornata che sto tentado di capire come implementare i visual
style con VB .NET. Il framework fornisce qualche cosa di facile
implementazione?, mi potreste dare qualche consiglio/idea?
grazie mille per l'aiuto.
Marco

Se usi VS2003 prova a dare un occhiata qui
http://www.ugidotnet.org/tips/tips_read.aspx?ID=103
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog


Non uso VS2003!     :(
Ci posso provare uguale?
Marco

Si ma in modo diverso
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dv_vstechart/html/vbtchUsingWindowsXPVisualStylesWithControlsOnWindowsForms.asp


Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto estrapolare

Come posso fare a leggere una
riga alla volta da una text box
ad esempio inserisco in una text box:
roma pisa napoli
milano torino genova
albero porta riga
come posso fare ad estrapolare
una riga alla volta
(riga) roma pisa napoli
(riga) milano torino genova
(riga) albero porta riga
grazie

 grazie
Prego,
Ricky

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] Editing video

Buonasera a tutti,
mi sapreste dire se esiste qualche pezzo di codice da scaricare dove 
lo scopo è quello di editare filmati video ?
Poi secondo voi è possibile trovare anche qualcosa che invii il flusso 
video sulla lan ?
Ancora una cosa :) ...... qualcosa sul soft-edge ?
Grazie, Alverman

 video sulla lan ?
...ecco, usa VLC Videolan e vivi tranquillo :-)
Bye, G. 

 Ancora una cosa :) ...... qualcosa sul soft-edge ?
Mhm, scusa l'ignoranza ma, cos'è il soft-edge?
Ciao,
-- 
Carmine
Webmaster di 
www.thetotalsite.it
Blog 
http://blog.thetotalsite.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto Come posso trovare un record attraverso l'utilizzo di un filtro.

Come posso trovare un record attraverso l'utilizzo di un filtro.
Es. Rubrica
database con due campi : cognome e telefono.
nella casella di testo text1 è collegato il campo cognome
nella casella di testo text2 è collegato il campo numero
Il mio problema è questo:
Considerato il database già pieno.
L'utente, inserendo un cognome in una terza casella di testo text3, e
premendo l'apposito pulasante Filtro, dovrà vedere nella casella di testo
cognome, il cognome da lui inserito e il relativo numero di telefono.
Grazie
cub...@libero.it

 ha scritto nel messaggio
news:CiU87.22082$0Z1.8...@news.infostrada.it...

Supponendo che rsRubrica sia il tuo recordset contenente la rubrica...
With rsRubrica
    If .RecordCount > 0 Then
        .MoveFirst
    End If
    .Find "COGNOME >= '" & text3.text  & "'", 0, adSearchForward, .Bookmark
End With
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Help me MatchEntry?

Ciao
Vorrei sapere come utlizzare la proprieta' MATCHENTRY per la ricerca in
una DBlist
visto che non riesco a farlo! e la documentazione scarseggia.
Grazzzzie.
Franco
fra...@iname.com

una DBlist
La proprieta' MATCHENTRY può avere 2 impostazioni:
dblBasicMatching = 0
dblExtendedMatching = 1
Definisce come si deve comportare il controllo quando tu digiti un
carattere, cioè
1° la selezione si posiziona sull'elemento con la prima lettera = al
carattere digitato, ridigitando il carattere trova l'elemento successivo.
2° i carratteri digitati vengono intesi come stringa da ricercare.
La proprieta' non viene utilizzata per ricercare 'da codice'
Ciao Andrea

AndreaB wrote:

Grazie per avermi risposto ma forse non mi sono spiegato bene
quello che tu mi dici e giusto ma facendo girare il mio codice da VB
e provando a inserire dei caratteri (che sono sicuro sono le iniziali di voci
incluse nell'elenco)
non mi  'ricerca' un bel tubo, cioe' non mi riempe la caption della dblist,
devo inserire qualche cosa nel Codice o basta modificare la proprieta'
dell'oggetto?
Grazzie ancora
Franco
Newsgroup: it.comp.lang.visual-basic
Titolo: Qualcuno ha già usato OLE per inviare FAX con Winfax???

Ringraziamo per eventuali suggerimenti e aiuti che potete darci.
Quarta inf. 1 I.T.I.S. Marconi Piacenza

E' abbastanza facile, occorre referenziare la type library di Outlook e
guardare la struttura della classe. Basta impostare poche proprietà ed
inviare
~~~~~~~~~~~~~~~~~
Adriano Ghezzi
Avion Sistemi Srl
mailto:
agh...@isp.it
http://www.isp.it
marconi ha scritto nel messaggio <01bd7f28$291c93c0$0e00a8c0@user4>...


Carissimo Adriano, grazie della risposta, forse tu di questo sei un
esperto, ma noi di come inviare un Fax via OLE non abbiamo capito nulla,
per favore cerca di essere più indiscreto.


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

 
          Buongiorno a tutti, mi succede una cosa strana:
ho un programmino che serve per generare delle statistiche che mi riporta il
seguente errore: errore di run-time '-
2147417848
 (80010108)':
             errore di automazione
             L'oggetto invocato si è disconnesso dai client corrispondenti.
Premetto che:
            Parlo di VB6 Sp6, Access 97 (motore 3.51), la connessione è ADO
            In interpretato l'applicazione funziona correttamente
           In compilato mi riporta l'errore
           Compilando il programma con dei msgbox di debug l'ultima finestra che mi
visualizza è la 11.
           Qualcuno è già incappato in qualcosa del genere? Mi potete dare una mano?
           Questa è la routine incriminata:
Private Sub SRstPeriodo()
    MsgBox "5"
    If GlbObjEnv.rsRcsS2.State = 1 Then GlbObjEnv.rsRcsS2.Close
    MsgBox "6"
    GlbObjEnv.rsRcsS2.Open "SELECT Anno & Mese AS AaaaMm FROM TabAnagrafico
Where Società=" & Me.TxtSocietà.Text & " Group By Anno,Mese Order BY Anno
DESC,Mese DESC"
    MsgBox "7"
 
    Me.TxtPeriodo.DataField = "AaaaMm"
    MsgBox "8"
    Me.TxtPeriodo.DataFieldList = "AaaaMm"
    MsgBox "9"
    Me.TxtPeriodo.DataFieldToDisplay = "AaaaMm"
    MsgBox "10"
    Me.TxtPeriodo.DataMember = "RcsS2"
    MsgBox "11"
    Me.TxtPeriodo.DataMemberList = "RcsS2"
    MsgBox "12"
    Set Me.TxtPeriodo.DataSourceList = GlbObjEnv
    MsgBox "13"
    Me.TxtPeriodo.Columns(0).Width = 800
    Me.TxtPeriodo.Columns(0).Caption = "AaaaMm"
    Me.TxtPeriodo.Columns(0).DataField = "AaaaMm"
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Problema risolto, ho dovuto rimuoverre e rimettere il componenete nella
maschera incriminata. Cosa era successo non lo so nemmeno ora, ma comunque
tutto funziona come prima.
Grazie lo stesso.

Newsgroup: it.comp.lang.visual-basic
Titolo: Occupazione risorse di sitema

Salve a tutti!
Se io faccio un programma che si avvia
con win e fa alcuni controlli ogni secondo
occupo molte risorse di sistema????
Questi controlli in particolare sono:
-Verificare se è attiva una qualsiasi connessione
    di accesso remoto
-In quel caso il programma controlla anche qual'è
    in particolare quella attiva e, se è effettivamente
    connesso, fa partire un timer
(ringrazio Moreno, dal cui sito ho preso tutte
le informazioni per il controllo di accesso remoto)
Grazie a chi mi aiuterà
--------------------------------------------
             ASSA
http://web.tiscalinet.it/Assatarram
Napster: Assatarram3
it.comp.lang.visual-basic: Assatarram
--------------------------------------------

 ha scritto nel messaggio
news:906d7v$4ht4$1...@ID-60516.news.dfncis.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Corsi Visual Basic 2005 dove?

C'è qualcuno che saprebbe dirmi dove posso fare dei corsi riguardanti la 
programmazione in Visual Basic 2005 in Friuli o in Veneto?
Grazie a tutti
Federico

 Grazie a tutti
Se vuoi farlo a casa tua, puoi chiamare quelli di codearchitects... uno 
staff di tutto rispetto capeggiato da F. Balena. Puoi personalizzarti il 
corso come vuoi. L'unica problema è la cifra che vuoi spendere.
Ciao, Vincenzo 

VincePik ha scritto:

E' un'idea,ma non penso di avere un budget di tale livello!
Cercavo corsi di formazione validi a prezzi abbordabili, anche non 
personalizzati.
Ho cercato su google, ma ho trovato poco e niente!
Ciao
Federico

 la programmazione in Visual Basic 2005 in Friuli o in Veneto?
Ciao,
dai un'occhiata qui:
http://www.visual-basic.it/vb6tovb2005course.asp
A Padova si terrà il 19 e 20 aprile (è un corso di 2 giorni)
Per altri chiarimenti, puoi contattarmi anche in privato.
Ciao!
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

Newsgroup: it.comp.lang.visual-basic
Titolo: Urgente Aiuto.......

Ho sviluppato una procedura usando Vb6 con SP3 con tecnologia
Ado, installando il programma su Windows Nt4 WorkStation, non mi 
da nessun problema, ma quando tento di accedere al DataBase, mi
visualizza il seguente errore: ADO COULD NOT FIND THE SPECIFIED
PROVIDER.
Se qualcuno mi puņ aiutare........ vi ringrazio.
Maurizio Piantanida
-- 
Posted from [195.250.226.3] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Prova a fare queste verifiche:
-E stata installato la versione corretta di ADO insieme al prg
-Indirizzo del server dove si trova il DB
-Se hai usato ODBC verifica la connessione
-se hai incrociato le dita prima di far girare il prg...:-)
Ad ogni modo deve essere una questione di settaggi e non di 
codice
Ciao
Jolly
Newsgroup: it.comp.lang.visual-basic
Titolo: Record count

Problema:
all'interno di un recordset la proprietą recordcount mi dą       -1: perchč?
(Ovviamente ho gią eseguito la query)
Grazie anticipatamente.
Dota

Tutti gli help dicono di fare prima movelast per riempire il
recordset!!!
Oppure ti restituisce -1 perche' il risultato della query e' vuoto ;-)
ciao
		maxx


 wrote in message
news:OOBO4.58996$xt2.7...@news.infostrada.it...


 -1 non vuol dire recordset vuoto anzi!
anzi ?
(non lo so, davvero. in dao vuol dire vuoto.)
tia, pal
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

Non so cosa volesse dire con anzi, ma so che restituisce -1 anche quando si
lavora con un acollegamento a una TableDef (con Jet credo).
Comunque per non avere come dice ANDREA una spesa troppo grande in termini
di prestazioni, io proporrei di usare la proprietà EOF, che indica se si è
alla fine di del recordset con un bel ciclo do..
---------
ciao
Sabba

 wrote in message news:8efjhr$rtf$1...@nslave1.tin.it...



-------------------------------------
Non mi stancherò mai di imparare...
Grazie a tutti!
dario.m...@SONOlibero.it 
(ovviamente da correggere)

Dota

Newsgroup: it.comp.lang.visual-basic
Titolo: Come si crea un OCX ?

E' possibile farlo in VB 5 ? Se si come ?
Grazie in anticipo per l'aiuto.
Carlo
---
"Errare e' umano, ma per incasinare davvero tutto ci vuole un computer"
---
Per eventuali quanto gradite risposte in e-mail 
c.f...@flashnet.it

Ciao
Si e' possibilissimo.
Per crearlo c'e' un tutorial da seguire passo passo sul book on line di VB5
Using Visual Basic -> Creating ActiveX Component -> Creating an ActiveX
Control

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Left e Left$

Che differenza c'e' tra Left e Left$ ?
Ciao.

che la Left è più corta da scrivere della Left$!!!
ahhahahah
ciao

 wrote in message
news:8q4pcp$liv$1...@fe2.cs.interbusiness.it...


> Che differenza c'e' tra Left e Left$ ?
la prima restituisce un Variant, la seconda una stringa
Faber

e quindi è più veloce Left$()


 stringa.
credo che sia più veloce solo in casi tipo questo:
Dim MyStr As String
MyStr = Left("Miao", 2)
perchè, in questo caso, c'è la conversione implicita da Variant a String ...
penso che questi due casi siano indifferenti:
1)
Dim MyStr As Variant
MyStr = Left("Miao", 2)
2)
Dim MyStr As String
MyStr = Left$("Miao", 2)
però potrei sbagliarmi...
Ciao
Faber

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT](Forse)VB e Programmazione ad Oggetti.

Salve a tutti,ho un dubbio amletico:
ma allora cos'e' veramente la progr. ad oggetti?Con VB posso fare tutti
quei programmi 'Normali', ma la programmazione ad oggetti cos'e'
veramente?Come potrei fare per iniziare a capire come utilizzare questo
metodo con VB?In quali tipi di programmi e' conveniente utilizzarla?E'
uscita la versione in italiano del libro di Deborah Kurata :Oggetti e
Visual Basic 6.0?
Ringraziamenti anticipati a chiunque voglia rispondermi.

 wrote in message
37C646D1...@daewoomotor.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Libri Visual Basic

Salve a tutti!
Ho scarsissima conoscenza del linguaggio puro di Visual Basic perchè uso VBA
per Access.
Vorrei seriamente conoscere, a fondo, questo linguaggio e dopo svariate
spese, abbastanza consistenti, come il libro dell'Apogeo (non si capisce a
che livello di conoscenza potrebbe servire), mi sapreste indicare,
gentilmente, una SERIA guida per iniziare DA ZERO lo studio di questo
meraviglioso linguaggio?
Grazie a tutti anticipatamente.
Marco.

 ha scritto nel messaggio
news:hc%w8.13359$8D3.3...@news1.tin.it...


 ha scritto nel messaggio
news:aa2tiv$42o$1...@lacerta.tiscalinet.it...


Grazie Nello,
il libro che ho citato è "Guida completa", una vera delusione e non ho
capito se è per chi già è " un'artista " nel campo o meno.
Comunque ti sarei grato se potresti confermarmi (non me ne frega niente di
quanto costa, l'importante è che sia ottimo) se è per neofiti e se potresti
ripetere il titolo esatto, la casa produttrice e, magari, dove potrei
maggiormente reperirlo.
Grazie della cortese attenzione.
Marco.


Ciao
Ho visto oggi che e' in allegato a una rivista (pc magazine mi pare) a sole
9.19 Euro....
....Io non sapevo niente di VB e con quel libro ho fatto passi da
gigante...ci sono esempi semplici....aggiungici un po di intuizione e vedrai
che ti soddisfera'!!
Ciao
posa

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

Salve, uso in un progetto il componente dbgrid32.ocx su una macchina con
windows 98 e funziona tutto bene.
Apro lo stesso progetto sul mio portatile che monte windows xp e mi dice che
non ho l' autorizzazione ad usare il componente in modalità di
programmazione. Come è possibile ciò ? Il componente è regolarmente
registrato anche in xp.
Grazie, saluti
Silvio.

 Silvio.
E' una patchda scaricare sul sito di MS, e forse anche sul Sito Comune
Se non la trovi te la spedisco in PVT
-- 
Ciao Gab
ICQ#158859446

 ha scritto nel messaggio
news:bfgtf9$es1r7$1...@ID-126639.news.uni-berlin.de...


Newsgroup: it.comp.lang.visual-basic
Titolo: Creare indici per file DBase III da codice.

Ciao,
premetto che non ho mai lavorato direttamente con i DBF.
Ho la necessità di creare (ed eventualmente ri-creare) i file di
indice per delle tabelle DBase III e volevo trovare il modo di farlo
via codice...qualcuno ha indicazioni da darmi?
Tnx.
Daniele.

via codice...qualcuno ha indicazioni da darmi?
Premetto che non sono un esperto.
Ma in attesa di una risposta da parte di qualcuno piu' autorevole, ti
espongo quello che sapevo finora.
Gli indici NDX vengono gestiti normalmente da Visual Basic 5 e 6.
(per la versone 2005 non ti so dire) 
http://support.microsoft.com/kb/625654/it
Per gli indici NTX bisogna appoggiarsi a delle librerie tipo Apollo e
Codebase 
Per gli indici CDX  dovrebbero essere gestiti facilmente da Visual
basic. con la limitazione pero' che l'indice deve essere impostato su
un solo campo non su una composizione di campi
Ciao


Non certo con VB.
Con Clipper, VisualObject, ecc   si.
Ciao, Sauro
Newsgroup: it.comp.lang.visual-basic
Titolo: Uso di ADO con VB6

Ciao a tutti.
In questo periodo sto scoprendo (a volte con fatica) le novità e le nuove
tecniche di programmazione in VB6 tra cui gli ActiveX Data Object (ADO)
forniti da Microsoft ed orientati al trattamento delle informazioni presenti
su databases Access (.MDB).
Da quel poco che ho visto e provato, non sono riuscito ad utilizzare la
proprieta' ".RecordCount" relativa ad un oggetto "ADODB.RecordSet" avente la
proprietà ".CursorLocation = adUseServer". Per vari motivi, ho la necessità
di mantenere il cursore del RecordSet come "adUseServer": con tale tipo di
cursore, la proprietà ".RecordCount" ritorna sempre 0 (sebbene nel RecordSet
aperto siano presenti più records).
C'e' qualquno che sa dirmi se è possibile sfruttare questa proprietà con
tale tipo di cursore utilizzado solamente Proprietà e/o Metodi forniti dagli
oggetti ADO (altrimenti sono costretto a risolvere tale esigenza tramite
codice -Loop+contatore-) ?
Fiducioso che arrivi una dritta, vi ringrazio anticipatamente.
Roberto.

piccola rettifica:
E' possibile utilizzando un cursore Keyset o Statico ottenere, dalla
proprieta' RecordCount un valore corrispondente al numero di righe peresenti
nel momento dell apertura (open) del recordset.
le istruzioni sono:
AdoRecordset.CursorType = adOpenStatic
Crea una copia del Recorset su tempdb (in SQL server)
AdoRecordset.CursorType = adOpenKeyset
Crea una copia della/e colonna/e della/e PK del Recorset su tempdb (in SQL
server)
tutto cio' permette l'uso di RecordCount.


Newsgroup: it.comp.lang.visual-basic
Titolo: prog per connessione pc via lan

avrei bisogno di comunicare (leggere, scriver file...) con pc connessia via
LAN
con che comandi posso soddisfare questa esigneza...
occorrono delle api specifiche????
??????
grazie

...

si, l'Ape Maja... hihihi...
scusa ma sono reduce da un esame di elettrotecnica...
Micio





>occorrono delle api specifiche????
Per leggere e scrivere file bastano i comandi "normali" (open, read, write, close) indicando il percorso di rete del file.
O forse non ho capito la domanda?
Antonio
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con la Data

Sto facendo delle select  su  campi data,  usando un campo text  che poi
formatto ed assegno ad una variabile di tipo date  ,  e uso  poi i
delimitatori ## nelle select.  Mi fa confusione  e mi inverte il mese con il
giorno  ( es. se scrivo 11/01/2002  mi trova 01/11/2002)    avete
suggerimenti grazie .

 ha scritto nel messaggio
news:advej9$d94$1...@pluto.news.dsi.unimi.it...


 ha scritto nel messaggio
news:advej9$d94$1...@pluto.news.dsi.unimi.it...


 ha scritto nel messaggio
news:advej9$d94$1...@pluto.news.dsi.unimi.it...

Mai usare i campi date!
Testo nella forma "AAAAMMGG" e sarai felice per tutta la vita e in ogni
punto del mondo.

 tuo applicativo.
A me risulta esattamente il contrario :)
se non specifichi niente VB usa le impostazioni internazionali, ma in questo
caso se il mese supera il 12 inverte mm con gg facendo un casino.
Usando ## invecie occorre specificare la data (e viene interpretata in modo
inequivocabile) nel formato americano (mm/gg/yyyy) oppure ISO (yyyy/mm/gg).
Sia con VB ceh con Access.
Ciao

 Sia con VB ceh con Access.
Attenzione:
"SELECT * FROM tabella WHERE data = #" & "01/02/2000" & "#"
è diverso da
"SELECT * FROM tabella WHERE data = " & #01/02/2000#
Il secondo può causare gli errori di cui sopra, per ovvi motivi.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: FINE STAMPA (ENDDOC?)



Il mio problema è il seguente: La mia applicazione stampa biglietti
su rotolo continuo.Facciamo il caso che stampa 20 biglietti uno dietro
l'altro. Come faccio ad individuare il 
momento effettivo in cui la stampante
ha finito di stampare il biglietto
 (e non che sia ancora nel buffer?)
per far partire una taglierina montata davanti alla stampante che taglia
il biglietto?

Con EndDoc io invio la stampata ma non so quando questa ha finito la
stampa fisica.

Grazie.


 wrote in message
39F84851...@tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Emulare tastiera in un programma esterno

Salve gente,
Stasera sto lottando contro il s.o. e sto perdendo...mi dareste una mano 
?!?!
Il problema è presto descritto...
sto cercando dalla mia applicazione vb di scrivere del testo all'interno di 
un altro applicativo...
All'inizio ho provato a dare il fuoco all'applicativo esterno e poi a fare 
una sendkeys...ed il risultato è stato perfetto..
Ora volevo fare in modo che non ci fosse bisogno di dare il fuoco 
all'applicativo in cui voglio scrivere...
ho preso Spy++ mi sono visto l'handle della finestra e mi sono tracciato gli 
eventi della tastiera...
Ok niente di magico...
manda nell'ordine un
PostMessage con WM_KEYDOWN con crepeat=1
PostMessage con WM_CHAR con crepeat=1
PostMessage con WM_KEYUP con crepeat=1
Penso...va beh non è difficile...
E invece dopo un'oretta sono ancora qui a non riuscire ad emulare la 
spedizione di caratteri a questo applicativo....
Mi date na mano ? (articoli,codice,suggerimenti)
Grazie Giuseppe

> ho preso Spy++ mi sono visto l'handle della finestra
mmm... forse non hai scelto la finestra giusta. Cioè: magari tu mandi i 
messaggi alla finestra del programma anziché al controllo dove vuoi 
"digitare"...
(o forse ho detto una fesseria)

Mi date na mano ? (articoli,codice,suggerimenti)
trova l'handle della finestra di destinazione
con le API
FindWindowEx    oppure    EnumChildWindows(ex)
poi usi l' API
SendMessage  (prova con il suo 'lParam' dichiarato come ByVal )
abbinata al parametro
Const WM_SETTEXT = &HC
Esempio:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam
As Any) As Long
SendMessage (hWnd, WM_SETTEXT, 0, "ciao" & Chr$(0))
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Icone su form e su desk bar

Ciao.
Ho notato che mentre Norton Antivirus scandaglia il mio pc alla ricerca di
virus ha un'icona sulla finestra (che rappresenta una borsa da dottore per
la cronaca) e sul pulsante sulla barra del desktop appare un'icona diversa.
Come si può fare in vb? Subclassing del form come per la barra sfumata?
Stefano

P.S.: Su vb5 sp3 e Win 95 Osr2.

Newsgroup: it.comp.lang.visual-basic
Titolo: Query incrociata tra SQL Server 2000 e Access 97

Vorrei sapere se qualcuno è a conoscenza di un sistema per fare una query
collegando una tabella di Access 97 e una di SQLSERVER 2000 senza passare da
tabelle di appoggio. Il tutto all'interno di VB 6, utilizzando ADO...
Grazie anticipate a tutti.
Francesco.

Vorrei sapere se qualcuno è a conoscenza di un sistema per fare una query
tra una tabella di Access 97 e una di SQLSERVER 2000 senza passare da


 ha scritto nel messaggio
news:zR3U6.32337$Uo3.1...@news6.giganews.com...


Forse mi sbaglio... ma... NUN SE POTE! :)
            Ciao
                Allanon

uhm
Ti indico come fare una query tra 2 sql diversi, forse (forse) l'OPENROWSET
è adattabile anche ad access (visto che gli si indica il driver da
usare).....
fai le solite connessioni ADO, poi
select arc.mcodice as server1_mcodice, arc2.mcodice as server2_mcodice from
OPENROWSET('sqloledb','DRIVER={SQL
Server};SERVER=server2;UID=uidserver;PWD=pwdserver',tuodb.dbo.tuatabella) as
arc2 join altrodb.dbo.altratuatabella arc on arc2.mcodice=arc.mcodice
Non so se funziona tra sql e access; alternativamente puoi aprire access e
allegare la tabella sql; oppure aprire sql ed importare la tabella come
temporanea...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DataSource della DataGrid impostata a runtime : come ?

Salve, forse il problema è già stato risolto ma cercando nei vecchi post non
ho trovato ...
ho una datagrid collegata ad un oggetto adodc, ora ... invece di collegarla
all'adodc vorrei collegarla direttamente ad un recordset. allora ho fatto :
rs.Open "Select ID, Nome, Cognome FROM Clienti",conn,adOpenStatic
set datagrid1.datasource=rs
il problema è che non mi permette di effettuare modifiche sulla griglia ...
è come se fosse in sola lettura ... eppure ho settato le proprietà
allowAddNew, AllowUpdate ... ecc...
dove sbaglio ?
Grazie

 allowAddNew, AllowUpdate ... ecc...
Mmmm, non sono un esperto di ADO, ma adOpenStatic non imposta un cursore che
non consente l'aggiornamento?
Ciao,
Carlo.

 non consente l'aggiornamento?
No. Semplicemente non riflette le modifiche fatte dagli altri utenti.
Come fai (Claudio) dovrebbe andare bene. Il problema sarà in altro.
Prova a fare una refresh dopo la set .datasource o postaci altro codice.
ciao
ugo

 ha scritto nel messaggio
news:9tu2ur$4v67q$1...@ID-96367.news.dfncis.de...


 ha scritto nel messaggio
news:9tvglk$237$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: <VB6> decomprimere un file .zip

salve
come fare a decomprimere un file ZIP e mettere i suoi file in una nuova 
cartella ,il tutto all'interno di un sorgente in VB6.
grazie
leonello 

cartella ,il tutto all'interno di un sorgente in VB6.
Si può fare agevolmente con la Zlib.dll
http://is.gd/bcO2Z
--
ciao
  Stefano

 ha scritto nel messaggio 
news:seoer59efef8k66o0...@4ax.com...

 mi puoi fare un semplice esempio (decomprimere )
grazie1000
leonello34
grazie1000 

 grazie1000
Il link che ti ha suggerito contiene sia la libreria che gli esempi
del caso...

 mi puoi fare un semplice esempio (decomprimere )
Gli esempi sono sul sito di vbaccelerator.
In alternativa puoi usare un metodo con i vbs
http://digilander.libero.it/Cenati/zip.htm
e poi da vb implementarlo con il late binding.
--
ciao
  Stefano


wrote:

qui abbiamo passato la fase della pappa pronta.
adesso stiamo alla pappa pronta e condita...
ma cazzo!!!
il link ti da tutto quello che serve!!!!

 adesso stiamo alla pappa pronta e condita...
e premasticata, pure
cia'
d.

Newsgroup: it.comp.lang.visual-basic
Titolo: Construir screensavers

Existe algum produto para construir screensavers? Urgente!!!!!

...

Newsgroup: it.comp.lang.visual-basic
Titolo: ancora datagrid+ado...

salve a tutti; mi sento un dinosauro della programmazione (oltre che
"hobbista")
---
ho un programma in VBA per autocad; ora lo sto ampliando e mi farebbe comodo
una tabella dati; ho provato l'esempio in VB6 "utilizzo del controllo dati
con un modulo di classe", ma in VBA non c'è la possibilità di impostare
DataSourceBehaviour su vbDataSource in un modulo di classe. Ho provato
allora a costruire un database; tutto funziona, nel senso che riesco a
registrare e a recuperare i dati di una tabella del database
Prova_Database.mdb, ma non riesco a popolare una flexgrid; con la Sub
seguente vedo il primo record in TextBox1 mentre la flexgrid  resta con solo
due colonne invece di 8 e non visualizza alcun dato, anche se -
stranamente - imposta il numero delle righe giusto (= al numero dei record)
e risulta sincronizzata  ad un controllo col quale visualizzo gli altri
record dentro TextBox1 (il triangolino delle righe della flexgrid si sposta)
Private Sub cmdVISUALIZZA_Click()
  Set con1 = New ADODB.Connection
  Set rcs1 = New ADODB.Recordset
  con1.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                       "Data Source=" & Path1 & "Prova_Database.mdb"
  rcs1.CursorLocation = adUseClient
  rcs1.CursorType = adOpenStatic
  rcs1.LockType = adLockBatchOptimistic
  rcs1.Open "tbLAM", con1
  Set DataGrid1.DataSource = rcs1
  DataGrid1.Refresh
  TextBox1.WordWrap = True
  TextBox1.Text = rcs1.Fields("HANDLE") & vbCr & _
                  rcs1.Fields("Pos") & vbCr & _
                  rcs1.Fields("TIPO") & vbCr & _
                  rcs1.Fields("PEZZI") & vbCr & _
                  rcs1.Fields("BASE") & vbCr & _
                  rcs1.Fields("ALTEZZA") & vbCr & _
                  rcs1.Fields("LUNGHEZZA") & vbCr & _
                  rcs1.Fields("VOLUME")
End Sub
dove sbaglio? ho passato la serata a leggermi le risposte a datagrid+ado
vecchie di qualche anno, ma non ne sono venuto a capo

"ötzi" <dmyö_ü@frfrfrrre.yd> ha scritto nel messaggio
[...]
ce l'ho fatta! inspiegabilmente ieri sera non funzonava. Oggi provo e
funziona perfettamente. mah. forse ieri con i miei esperimenti avevo
incasinato il computer.
- - -
scusate per aver intasato il ng con due post inutili

 scusate per aver intasato il ng con due post inutili
se confermi che il codice che hai utilizzato funziona, non direi che sono
due post inutili.
-- 
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: [?] form trasparente

Vorrei creare un'applicazione con un form invisibile (trasparente) che
contenga controlli visibili (pulsante, etichetta,...)
Grazie a chiunque mi possa aiutare.

Sul sito comune mi sembra ci sia qualcosa del genere.
Ciao
Cesare Nicola
http://digilander.iol.it/cesare
L'indirizzo del sito comune č:
http://www.murialdo.it/it_lang_vb

Anche qui c'è qualcosa: 
http://www2.armaditaggia.com/marco/apictlfr.htm
Ciao
Cesare Nicola
http://digilander.iol.it/cesare
L'indirizzo del sito comune è:
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: API windows

Ciao a tutti,
premetto che sono solo uno che si appena avvicinato da poco a VB5 e di
essere, ancora, in una fase di studio. La mia domanda č: Cosa sono le API di
windows?
Ringrazio tutti
Ciao da Giampiero

L' API (al singolare!)
A me piace di piů cosě:
Le api, l'ape.
1 euro, 2 euri.
ecc...
:)
Ciao





Newsgroup: it.comp.lang.visual-basic
Titolo: impostare la proprietà instancing

Ho generato un modulo classe che nomino CLASS1 
Vorrei che questa classe diventi pubblica. 
Come posso inserire la proprietą instancing? 
Se verifico le proprietą della classe trovo solo le seguenti: 
-(Name) Class1 
-DataBindingBehavior 0 
-DataSourceBehavior 0 
Grazie per il vostro contributo 
ulisse 
 
 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -DataSourceBehavior 0
Ciao ulisse,
come sta Penelope ?
Ricordo che con lei sviluppavo i primi programmi in vubissei, salutemela.
Ricordo che quel DataSourceBehavior la utilizzavamo come oggetto sorgente
dati, in quelle situazioni cui necessitava un oggetto alimentatore; infatti
selezionavo 1- vbDataSource.
Comunque se posizioni il cursore sopra la proprietà e premi F1, otterrai una
spiegazione.
Ho l'impressione che più che il nome della classe, sono i metodi contenuti
nella classe.
Guida in linea, e relativi esempi:
Public
Private
Friend
giuseppeD
-----------------------------------------
Lo Jonio è un mare stupendo.

 -DataSourceBehavior 0
Evidentemente hai aggiunto la classe in un progetto di tipo EXE Standard; in
questo caso non e' previsto che tu esportare all'esterno classi pubbliche, e
quindi la proprieta' instancing viene preimpostata a Private e nascosta.
Cambia il tipo di progetto in EXE ActiveX o DLL AciveX a seconda del caso.
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown
Newsgroup: it.comp.lang.visual-basic
Titolo: download di vb 6.0

qualcuno conosce un buon sito da cui poter scaricare visual basic 6.0 in
versione completa? o anche trial se esiste
grazie
bam...@netcourrier.com

 wrote in message
39B503EA...@netcourrier.com...


 wrote in message
news:oRct5.9887$_U1.1...@news.infostrada.it...


 essere tra i vecchi post e cmq c'e' in deja.
www.allapi.net
 direi ci sia la 5, vb5ccein.exe
(control creation edition, si fanno controlli ma non exe).
non so se esiste una wm/cce del 6. forse era su cp o qualcos'altro di inizio
anno.
prova magari vb6ccein.exe su
www.filez.com
o
http://ftpsearch.ntnu.no/
ciao, a.

effettivamente e molto grande ma su un sito lo visto spezzettato su più
file, vai su free.it.warez ( server libero ) e gurda l'indirizzo, se non
puoi accedere fai un fischio che guardo io

Newsgroup: it.comp.lang.visual-basic
Titolo: come far partire una applicazione come servizio di NT4 ?

Tempo fa qualcuno parlň dell'argomento, ma ho perso ogni traccia.
Qualcuno sa come far partire una piccola applicazione come servizio di
NT, cosě che vada in esecuzione sempre, indipendentemente dal login?
ciao ciao
Nicola
   Nicola Tornieri
   ----------------------------
  Manens Intertecnica srl
  tornieri[at]
manens.com
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

,

Sent via Deja.com
http://www.deja.com/


Newsgroups: microsoft.public.vb.yellowpages
            Sent: Sunday, October 31, 1999 7:12 PM
            Subject: Write NT Services in VB EASILY! FREE CONTROL! (no spam)
            > Greetings fellow programmers!
            >
            > I posted this message to let you know that you can easily
write NT
            Services
            > in VB using my free ActiveX control! No BS, no crippleware, no
strings.
            Just
            > go to the website, grab it, and use it all you want!
            >
            > The URL is 
http://www.cdctechnologies.com/vb/
            >
            > Seriously, this not a spam site or any such BS. Full help and
sample files
            > are included and this is a fully functional control. Enjoy!

Newsgroup: it.comp.lang.visual-basic
Titolo: gestione dei file, ma da remoto

ciao
ho bisogno di implemetare in un mio software vb che fa da server una
gestione dei files con relativa finestra che li visualizza e che permetta
operazioni come l'esecuzione, la copia, la cancellazione, l'upload, il
download, ecc..
ma tutto da remoto tramite il client. Sapete se esiste qualcosa del genere
in qualche esempio di codice client/server? o qualche ocx?

 ha scritto nel
messaggio 
news:pan.2005.01.10....@sfigato.com

winsock....
oppure usando l'ftp...il controllo relativo...controllo trasferimento file
esempi? beh qualche milione su San Google....sul SC...anche sull'help di VB!
-- 
------------------------------------------------
Sito web: 
http://www.martek.it
Newsgroup: it.comp.lang.visual-basic
Titolo: come stampare un form con altezza pari a A4?

Sto cercando di stampare un form (su una stampante epson
ink jet) il quale contenga una intestazione grafica e dei
list box con testi e, nonostante che sul manuale e' scritto
che il form viene stampato anche se e' di dimensioni
maggiori dello schermo, ottengo solo una stampetta non piu'
alta di 5 pollici. uso VB5 / 6
Uso il comando PRINTFORM
grazie
* Sent from AltaVista 
http://www.altavista.com
 Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping.  Smart is Beautiful

...


Collegati al sito comune 
http://www.murialdo.it:8000/it_lang_vb/
 e scaricati
dai sorgenti il file "StampaFPB.ZIP"
sotto la voce sorgenti.
Spero di esserti stato di aiuto.
Bye!!!
Omar


 Beautiful
Bello !
E per chi ha VB5 ?

Newsgroup: it.comp.lang.visual-basic
Titolo: Selezionare testo

Salve a tutti, espongo subito il problema.
Devo selezionare del testo da un file di testo.
Precisamente devo selezionare la prima parte di testo fino al carattere
vuoto della barra spaziatrice e poi selezionare la seconda parte di una riga
di testo dall fine dello spazio alla fine della riga es:
ctr45         600
1^Parte     2^Parte
Come faccio?
Intuirete che non sono un esperto di VB
Ma ringrazio chi mi vorrà aiutare.
Wryte

 Come faccio?
Cosa intendi con "selezionare"? Estrarre le due porzioni che
ti interessano e assegnarle a due variabili?
Se e` cosi`:
Option Explicit
Sub main()
' Dimensioniamo le variabili:
'
Dim s$  ' La stringa che contiene la riga di testo;
Dim s1$ ' La stringa che conterra` la 1^ parte;
Dim s2$ ' La stringa che conterra` la 2^ parte.
Let s = "ctr45         600"
' Accertiamoci, se opportuno, che non vi siano spazi
' ne' prima ne' dopo:
'
Let s = Trim$(s)
' Troviamo la posizione in cui si trova il 1^ spazio:
'
Dim p& ' Il Long cui assegneremo tale posizione.
Let p = InStr(s, " ")
' Ora abbiamo tutti gli elementi per ottenere le due stringhe:
'
Let s1 = Mid$(s, 1, p - 1)
Let s2 = LTrim$(Mid$(s, p))
' Verifichiamo i risultati nella "Finestra Debug", anteponendo
' e posponendo il carattere che identifica le stringhe per
' accertarci a colpo d'occhio che non vi siano spazi
' indesiderati:
'
Debug.Print "s  = "; Chr$(34); s; Chr$(34)
Debug.Print "s1 = "; Chr$(34); s1; Chr$(34)
Debug.Print "s2 = "; Chr$(34); s1; Chr$(34)
End Sub
Ulteriori considerazioni, ovviamente, nel caso in cui "s"
possa non essere come ci aspettiamo!...
--
Ciao.
Maurizio

 wrote in message


Ti ho scritto questo codice con molte funzioni cosě impari ad usarle (vai a
vederle nella guida per i chiarimenti o ricontattaci)...
Dim testo As String
Dim pParte As String
Dim sParte As String
testo = "ctr45         600"
pParte = Left(testo, InStr(1, testo, " "))
sParte = Right(testo, Len(testo) - InStrRev(testo, " "))
MsgBox pParte
MsgBox sParte
P.S.
Non č l'unico modo....
-------------
Ciao
Sabba