mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Dovrei scrivere un programma che...

prelevi una pagina web e la salvi in un file e poi cancelli in questo file
il carattere " (virgolette)
chi mi aiuta?



Questo per scaricare il sito.. primitivo ma dovrebbe funzionare.
Chiama connetti e per il resto dovrebbe fare tutto da solo... :))
sub connetti()
  open "c:miosito.txt" for output as 1
  winsock1.connect "
www.sito.it
", 80
end sub
Private Sub Winsock1_Connect()
tpage="
http://www.sito.it/sottodir/index.htm
"
    With Winsock1
      data1 = "GET " + tpage + " HTTP/1.1" + vbCrLf
      .SendData data1
      .SendData "Accept: text/plain" & vbCrLf
      .SendData "Accept-Language: en-us" & vbCrLf
      .SendData "Accept-Encoding: gzip, deflate" & vbCrLf
      .SendData "User-Agent: Mozilla/4.0 (compatible; MSIE_
5.0; Windows98; DigExt)" & vbCrLf
      .SendData "Host: " & varDom & vbCrLf
      .SendData "Connection: Keep-Alive" & vbCrLf & vbCrLf
    End With
end sub
private sub Winsock1_DataArrival(ByVal bytesTotal As Long)
  dim a as string
  winsock1.getdata a
  print #1,a
end sub
ciao 
Anders

grazie! gentilissimo e tempestivo!
una cosa....
devo anche cancellare tutte le " (virgolette) prima che salvi il file....
grazie ancora
"anders" <and...@ANTISPAMlibero.it> ha scritto nel messaggio
news:3d10c4ce...@news.virgilio.it...


grazie ancora
Prego, di nulla. Ho chiesto talmente tante cose al ng che mi sembrava
giusto contribuire :))
Ciao,
Anders

per togliere le virgolette bastava scrivere
a=replace(a,chr$(34),"")

a=replace(a,chr$(34),"")
eheh lo immaginavo.... ma che vuoi, sono rimasto al basic v2.0 :))
grazie comunque, cerchero' di ricordarmene la prossima volta che mi
servira'.
Ciao,
anders

 end sub
...................
Posso fare un domanda stupida?
Perchč a me non funziona e mi dice "necessario oggetto" sulla riga in cui
c'č
 winsock1.Connect
Ho come l'impressione che devo inizializzare il winsock prima di
utilizzarlo, ma non so assolutamente come fare.
Un'altra cosa, quali sono le differenza tra l'utilizzao del winsock e di
Inet (che peraltro non riesco ad utilizzare per lo stesso motivo?
Grazie,
Simone

 Inet (che peraltro non riesco ad utilizzare per lo stesso motivo?
Devi referenziare nel tuo progetto i componenti internet : Menu Progetto ->
Componenti.
Pero' adesso non chiedere quali sono, alemno cerca di trovarli da solo :-)

 Pero' adesso non chiedere quali sono, alemno cerca di trovarli da solo :-)
Per Inet l'avevo gią trovato "Microsoft Internet Controls" ma non mi aveva
funzionato, si vede che ho sbagliato qualcos'altro, e allora ho pensato che
non era la soluzione giusta.
Per winsock non ho ancora cercato, ma ora mi ci metto.
Ma quali sono le differenze tra i due?
Il mio scopo č quello di prendere ogni minuto una pagina on line (anzi un
file.txt raggiungibile tramite un server web) e leggerne il contenuto o
meglio le righe aggiunte, questo file puņ anche arrivare a raggiungere
dimensioni di qualche centinaio di Kb.
quale mi consigli tra i due?
Io sinceramente ho gią usato inet, ma da ASP e spesso e volentieri dopo un
uso abbastanza intenso mi inchiodava il server web spero non si inchiodi
anche su VB.
Ciao e grazie,
Simone
Newsgroup: it.comp.lang.visual-basic
Titolo: DB Table Field - Aiuto

Ho la necessità di modificare da codice la grandezza
di un campo, nella guida ho trovato i metodi append
e delete, qualcumo mi può dire come posso fare senza
utilizzare l'access?
Ciao
www.scozzaro.it


guarda un po' se access supporta una cosa tipo questa:
-- la colonna viene portata a 128 caratteri ed accetta i valori nulli
ALTER TABLE miaTabella
       ALTER COLUMN colonnaDaIngrandire varchar(128) NULL
hth, hal

 ha scritto nel messaggio
news:9fafea$30uii$1...@ID-56381.news.dfncis.de...

Si e no: Jet accetta la Alter Column solo a partire dalla 4.0.
Se usa la 3.5 temo che debba fare una ADD COLUMN, una seconda query di
Update del nuovo campo e una DROP COLUMN finale, se vuole usare SQL.
Oppure direttamente usare codice Dao per le modifiche delle proprietà dei
campi.
O codice Adox.
ciao
ugo

 wrote in message
9faig9$5p3$2...@lacerta.tiscalinet.it...


 >
se preferisci Ado.
Scegli una tecnica e ne riparliamo.
ciao
ugo

Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione VB6

Scusate io ho win Xp e quando installo Vb6 enterprise ho 2 problemi:
1) quando lo installo mi dice che non è riuscito a registrare vb nel
registro di sistema e l'installazione fallisce (i file installati rimangono
sull' HD e ho provato divesri cd)
2) (probabilmente causato dal precedente) se provo a fare una form guidata
con i database mi dice che non riesce a collegarsi se uso un file con ODBC e
che non trova la funzione "~" se uso il file diretto stesso problema se
faccio io un fata control e gli metto il dabase a mano
per favore aiutatami sennò non so come posso lavorare..

Newsgroup: it.comp.lang.visual-basic
Titolo: Non esiste GetLongPathName???


Si chiama GetFullPathName()
--
Roal Zanazzi
z...@iol.it

Qno ha una soluzione?
  Dovrebbe chiamarsi GetFullPathName
  Ciao :-)
  Massimo
  Nell'indirizzo, sostituire DIESPAMMERS con MC1258
  In the address, replace DIESPAMMERS with MC1258
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto un pelino" urgente

Chiedo per primo scusa se l'argomento è già stato trattato, ma purtroppo non
ho il tempo materiale per leggere i msg. precedenti.
Non ho grosse conoscenze di VB, se non per il fatto di aver studiato un pò
le basi per iniziare a capirne il funzionamento.
Qualcosina sono riuscito a "cacciare fuori", ma ora ho il seguente problema:
una mia cara amica ha un figlio di tre anni con dei problemi (una forma di
handicap), e mi ha chiesto se era possibile creare un prg che permettesse di
associare alle vocali , l'immagine corrispondente (es. A = Automobile) in
caso di risposta corretta, effettuando la scelta tra due vocali una giusta
ed una sbagliata in formato Picture.
Ho fatto tutto (ho usato la funzione frmPippo.Show) e funziona
perfettamente,, il problema e che ho creato tutto su un 15" a 800 x 600 con
le finestre al massimo della dimensione (mi pare 12000 x 9000 twip).
Provandolo su un 19" con risoluzioni di 800 x 600, 1024 x 768, 1280 x 1024
(che uso normalmente!) mi appaiono le picture nelle caselle  più piccole
dello spazio per contenerle (mentre sul pc che ha generato il prg erano
perfettamente contenute.)
Cosa ho sbagliato???
Ho provato a consultare un paio di testi (mooolto velocemente!), ma non ho
risolto.
Grazie a chi potrà aiutarmi.
Se potete rispondermi anche in mail riesco a velocizzare il tutto.
Paolo
=====================================
#include <iostream.h>
int main ()
{
  short  Name;
  cout<<"Enter 1 or 2 selction for return my E-mail addres:";
  cin>>Name;
  if (Name <2)
    cout<<" 
pao...@italnet.it
 " <<endl;
  else
    cout<<" 
Pro...@lycosmail.com
 " <<endl;
  return 0;
}
=====================================


Niente.
Il problema sta nel settaggio di Windows relativo al tipo di caratteri
(caratteri grandi, piccoli o personalizzati), che modifica la risoluzione
DPI e, in conseguenza, le dimensioni di alcuni elementi dell'interfaccia
utente.
Per il tuo problema, credo che la soluzione piu' semplice sia
1) usare controlli Image, invece di PictureBox
2) settare la proprieta' Stretch dei controlli Image
Spero di aver capito bene.
--
Roal Zanazzi
z...@iol.it

 =====================================
--
By matteo(olè)
Mail to: 
ori...@libero.it
 
vuoiunscinquant...@yahoo.it


Scusa, siccome è una cosa che interessa anche me, per disporre i cotrolli
secondo il tipo di risoluzione, sono andato sul sito comune ma non ho
trovato
quel che cercavo. In particolare sono andato in binari OCX/DLL.
Se mi puo dire dove cercare, ti sarei molto grato.
Newsgroup: it.comp.lang.visual-basic
Titolo: 2° form collegato al 1°

Salve
un quesito mi assilla da diversi giorni e cioč:
come faccio ad aprire un secondo form collegato al primo che contiene a sua 
volta un controllo ADO?
Mi spiego meglio:
- Il form principale contiene il controllo ADO e il controllo Text. Se 
digito una parola nel controllo TEXT vorrei che premendo INVIO mi si apre un 
secondo form (collegato al primo) che visualizzi il record contenente il 
termine digitato nel controllo Text del primo form.
Grazie tante per la risposta.
Questo NG č davvero di grande aiuto 


In che ambiente? Vb6 o .Net?
presumendo che lavori in VB6:
- Al posto di un controllo ADO isolato in una form, usa un oggetto 
AdoConnection (e relativi AdoDbRecordset), che puoi dichiarare pubblico 
nel progetto ed usarlo ovunque
- Se proprio devi usare un controllo ADO, da Form2 fai riferimento al 
controllo come Form1.Controllo.<proprieta'>. Ovviamente, Form1 deve 
essere ancora 'attiva' al massimo resa invisibile, ma non scaricata.
Se lavori in .Net, non sono pratico di quell'ambiente, quindi confieo 
che altri sappiano consigliarti.
Bye by SixaM 8-]

 ha scritto nel messaggio 
news:gn4g74$go5$1...@tdi.cu.mi.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa al contrario

E' possibile stampare del testo rovesciato? attraverso l'oggetto Printer ho
visto che posso rovesciare un'immagine, ma il testo? 
Grazie, Luciano  

Hai provato con il comando tnirP??? ^____^
A parte gli scherzi, memorizza il testo in una variabile e gira la variabile, cosě stampi il testo rovesciato.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

...


ho bisogno di ruotare i font di 180 gradi
OK, ora ho capito.
Vai sul Sito Comune di questo Newsgroup:
www.murialdo.it/it_lang_vb
c'č un esempio che fa al caso tuo...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] pulsanti nella toolbar

- W95 - VS6-SP3
In una ToolBar i pulsanti vengono gestiti tutti della stessa dimensione e
cioè quella relativa alla "caption" più lunga. Volevo sapere se esiste una
proprietà della ToolBar stessa o un messaggio apposito per ridimensionare i
pulsanti in base alla caption specifica.
"File", "Modifica" ecc.
Grazie in anticipo a chi saprà aiutarmi.
Walter

W95 - VS6+sp3
-----------------
Seguendo la documentazione MSDN e gli esempi riportati per VC++ ho
parzialmente risolto il problema inviando il messaggio TBSTYLE_AUTOSIZE ad
ogni pulsante ma mi rimane ancora uno spazio iniziale per l'icona.
Nella documentazione MSDN si fa riferimento ad una costante I_IMAGENONE per
poter avere una toolbar solo con caption (tipo i menu di VB) :
la documentazione è aggiornata alla verione 5.81 dei common controls,
la comctl32.dll è la versione 5.81 (probabilmente caricata da IE5.01)
il file con la dichiarazione delle costanti e delle strutture (commctrl.h)
di VC++ è ferma alla varione 4.72 e perciò mi mancano i valori di alcune
costanti tra cui I_IMAGENONE.
Se qualcuno conosce il valore della costante oppure se ha commtrl.h
aggiornato o sa dove poterlo scaricare mi fa un grande favore.
Saluti Walter
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto aiuto aiuto aiuto aiuto aiuto aiuto aiuto aiuto

Ciao ragazzi
Potete indicarmi per favore dove posso trovare manuali per Visual Basic 5.0
free  in modo da poterli scaricare
Ringrazio tutti
Federico

Federico ha scritto:

Sul cd originale ci sono....

free  in modo da poterli scaricare
Se ti interessa posso venderti il libro di Apogeo: Visual Basic 5,
Guida Completa.  Nuovo costa 69000, te lo posso vendere per 30.000 +
le spese di spedizione.
Paolo

Newsgroup: it.comp.lang.visual-basic
Titolo: Icone e file eseguibili: come fare?

Ho un problema: devo estrarre un'icona da un file eseguibile o una libreria
e poi salvarla come ICO su disco...
Non so da che parte cominciare.
Grazie,
Matteo

 Non so da che parte cominciare.[...]
Scarica l'esempio
GetIconProg.zip
dal sito comune
http://www.murialdo.it/it_lang_vb/
(č nella zona download sorgenti a pag 2)
Ciao
---
--
-
Maurizio Santaniello
MIX
170 links a siti VB
http://space.tin.it/computer/gaais/
http://web.tiscalinet.it/VBLINKS/
-
--
---
Curatore della "zona links" de:
Il sito comune di it.comp.lang.visual-basic
http://www.murialdo.it/it_lang_vb/

 (è nella zona download sorgenti a pag 2)


 wrote in message
7si08k$l57$1...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: HTML HELP

Ciao sono Serena ed ho creato un help scritto con HTMLHelp ora però lo devo
allacciare al mio programma scritto in VisualBasic. Non so come fare,
aiutatemi!
Grazie   Serena

Questo é il sistema migliore...
Private Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal
hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal
dwData As Long) As Long
HtmlHelp Form1.hwnd, "pippo.chm", &HF, HelpContextID
Ciao,
Corrado

 wrote in message
7qnt2t$o7o$1...@fe1.cs.interbusiness.it...


 wrote in message
7qnpsu$6v9$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Select Struttura tabella

Salve,
volevo sapere come fare per caricare una combo box con il metodo add item
con i nomi dei cambi della tabella che sono campi testo.
es.
TAB_UTENTI
NOME_UT
INDIRIZZO_UT
TELEFONO_UT
devo riempire una combo che contiene NOME_UT e INDIRIZZO_UT che sono testo
e non TELEFONO_UT che è numerico.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 testo e non TELEFONO_UT che è numerico.
ADO o DAO?
che DB usi?
ciaociao

 -- 
Utilizzando DAO se il tuo database per esempio e' MioDB guardati se
MioDB.Tabledefs(miatabella).fields(idcampo).type = dbText
IDcampo va da 0 a MioDB.Tabledefs(miatabella).fields.count-1
Ciao
____________________________________________________________________________
_________________ Fabio Mino
Web : 
http://www.codice.it

 e non TELEFONO_UT che è numerico.
Dopo esserti creato il tuo buon recordset, imposti un ciclo così:
With MyRs
   Do while Not .EOF
      MyCmb.Additem MyRs("NOME_UT") & "-" & MyRS("INDIRIZZO_UT")   
      .MoveNext
   Loop
End With
Guly


 Guly
ciaociao

 e non TELEFONO_UT che č numerico.
Grazie a tutti ho trovato come fare
myrs.fields(i).name mi restituisce il nome del campo
myrs.fields(i).type mi restituisce il tipo del campo

Newsgroup: it.comp.lang.visual-basic
Titolo: Split

Ciao a tutti dove posso trovare un componente che mi permetta di fare uno
split del mio form ?
Grazie

 split del mio form ?
Io l'ho fatto cosě:
una picturebox in mezzo al form che faccia da splitter.
in form_resize:
Private Sub Form_Resize()
     Dim lngLScaleHeight As Long
     On Error Resume Next
     lngLScaleHeight = ScaleHeight - sb.Height
     picSplitter.Move picSplitter.Left, 0, picSplitter.Width, 
lngLScaleHeight
	[...codice per posizionare i controlli a destra e a sinistra...]	
  End Sub
nel mouseup dello splitter:
Private Sub picSplitter_MouseMove
     If (Button = vbLeftButton) Then
         picSplitter.Left = x + picSplitter.Left
         Call Form_Resize
     End If
End Sub


Se attivi tra gli addins il wizard per la generazione di applicazioni, e poi
scegli un'applicazione in stile Gestione Risorse, vedrai che al termine la
finestra generata contiene tra l'altro il codice per la gestione di uno
splitter con una picturebox (probabilmente simile a quello che ti ha
suggerito Zanna)
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]"postumi" strani di compilazione

Buongiorno gente :)
Ho un problema abbastanza serio:
ho scritto un programmino facile facile per l'ufficio, che interagisce (DAO)
ad un database Access con ambiente Jet.
Terminata la stesura, l'ho sistemato, l'ho compilato, e ne ho generato il
relativo pacchetto di installazione,
A questo punto vengo in ufficio, lo installo senza problemi apparenti, lo
eseguo e.... SORPRESA!
-Mi da' errore di "formato non valido" del database
-Non mi visualizza NESSUNA label
-Mi perde dei tasti
Ambiente a casa: Win2k Server SP1 con VB6 (ODBC solo verso Access), database
creato con Access 2000 e convertito "alla precedente versione"
Ambiente in ufficio: WINNT 4.0 WS SP5 con ODBC verso ORACLE e altre belle
amenita' (ci sono una spanna di dsn nella pagina dell'ODBC), Office 2000.
Non sono (erano, ora ce li ho messi) presenti runtime di VB.
Potrebbe essere (ma non credo) che non ho sostituito dei files durante
l'installazione (ma avrei installato delle versioni piu' vecchie...)..
Voi che dite?
Grazie a tutti x l'attenzione
Morenz
mor...@libero.it

 ha scritto nel messaggio
news:b0ons8$s85$1...@serv1.iunet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Comando Verifica Tipo Variabile

Esiste un funzione che, passatogli come parametro un
variabile ritorna il tipo.
Grazie a Tutti
______________________________________________________________________
Do You Yahoo!?
Il tuo indirizzo gratis e per sempre @
yahoo.it
 su 
http://mail.yahoo.it
-- 
Posted from 
web12203.mail.yahoo.com
 [216.136.173.87] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Domanda banale: cosa te ne faresti? Anche se esistesse, questa funzione ti
ritornerebbe una variabile, contenente il tipo 'codificato', e dovresti
comunque identificarlo, magari con una SELECT CASE....
Non ti basta la IsNumeric() o la IsDate()?
Bye by Massimo 8-]

 Grazie a Tutti
Mo non ti funziona la lettera A della tastiera ?
Si scrive UNA funzione e UNA variabile.
Comunque la funzione che cerchi č VarType
Ciao
Sir Jo

 Grazie a Tutti
Ciao,
    è la funzione TypeName
Esempio:
Dato questo codice ------------------------
Public Sub EsempioTipiDati()
  Dim a As Byte
  Dim b As Boolean
  Dim c As Integer
  Dim d As Long
  Dim e As Single
  Dim f As Double
  Dim g As Currency
  Dim h As Date
  Dim i As String
  Dim j As Variant
  Dim k As Object
  Debug.Print
  Debug.Print "a = " & TypeName(a)
  Debug.Print "b = " & TypeName(b)
  Debug.Print "c = " & TypeName(c)
  Debug.Print "d = " & TypeName(d)
  Debug.Print "e = " & TypeName(e)
  Debug.Print "f = " & TypeName(f)
  Debug.Print "g = " & TypeName(g)
  Debug.Print "h = " & TypeName(h)
  Debug.Print "i = " & TypeName(i)
  Debug.Print
  Debug.Print "Variabili variant"
  Debug.Print "j = " & TypeName(j)
  j = 1000
  Debug.Print "j = " & TypeName(j)
  j = "1000"
  Debug.Print "j = " & TypeName(j)
  j = Null
  Debug.Print "j = " & TypeName(j)
  Debug.Print
  Debug.Print "Variabili oggetto"
  Debug.Print "k = " & TypeName(k)
End Sub
Se esegui la procedura "EsempioTipiDati" da debug ottieni questo
output ------------------------
a = Byte
b = Boolean
c = Integer
d = Long
e = Single
f = Double
g = Currency
h = Date
i = String
Variabili variant
j = Empty
j = Integer
j = String
j = Null
Variabili oggetto
k = Nothing
NOTA BENE:
    j  (variabile variant):  se testi una variabile variant che non è stata
ancora inizializzata viene riportato EMPTY per indicare che la variant è
vuota. Se invece gli assegni un valore riporta il tipo corrispondente al
valore
    k (variabile oggetto): se testi una variabile oggetto che non contiene
alcun oggetto viene riportato NOTHING altrimenti il tipo dell'oggetto
(TEXTBOX, SSTAB, eccetera)
Ciao, ciao.
Andrea Alberto "TwoAces" Martinoli
From Italy with a smile! :-)
andrea.m...@manpower.it

Grazie a Tutti
TypeName() o VarType().
Forse č meglio la seconda.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] free software in parlamento

In questo momento si sta discutendo del free software nel disegno della
finanziaria (in particolare di ibm-linux-microsoft) :P
Ciao

 finanziaria (in particolare di ibm-linux-microsoft) :P
Beh..ma di cosa stanno parlando precisamente?
Alex

sul free software?????!!! ah ah ah!
giudica tu!
http://www.repubblica.it/news/ired/ultimora/rep_nazionale_n_314345.html

 ha scritto

urge mandare un pinguino alla camera !

 urge mandare un pinguino alla camera !
Mi candido! Ci vado io, vestitemi come volete.
Io procurerò la torta (col mattoncino dentro).

Newsgroup: it.comp.lang.visual-basic
Titolo: Errore 482

Salve a tutti,
vorrei sottoporvi il seguente quesito, avete idea del perchè eseguendo
questo
statement  [varhDC = X.hDC], estratto dal codice sotto riportato, mi viene
ritornato
l'errore di run-time 482 ?
La stampante utilizzata è una HP DeskJet 690C e la versione del driver la
9.02.
Dim X As Printer
Dim blnOk As Boolean
Private varhDC As Long
For Each X In Printers
    On Error Resume Next
    varhDC = X.hDC
Next
Grazie Marco

 Next
Penso Xche' per avere un hDC valido, devi prima iniziare una stampa,
ossia fare una cosa tipo questa:
Printer.Print "";
Ma se fai cosi' (se non stampi null'altro) ti viene fuoi una bella pagina vuota!
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb


Probabilmente non ho spiegato il problema, in quanto l'errore 482 non lo
ottengo
per tutte le printer ma solo su alcune.
grazie comunque Ettore.
Marco


Ma quel'e' la riga che ti da errore?



la riga è la seguente:
varhDC = X.hDC
e l'errore è il 482, ma lo ottengo solo per alcune stampanti per esempio la
HP DeskJet 960C
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Avenue --> VB6

Esiste un programma che "converta" anche in parte Avenue in VB6?
Li dove poi il programma non riesce nella "conversione" si potrebbe anche
fare a mano...
O cmq un prog che "converte" da Avenue --> C e da C --> VB6?
Grazie!

 Esiste un programma che "converta" anche in parte Avenue in VB6?
e avenue che cos'č?
(si, lo so, potrei andare a cercare su google :-) )
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

> e avenue che cos'è?
E' un linguaggio di programmazione non ad oggetti. è datato ma alcuni
programmi sono scritti ancora così.

Newsgroup: it.comp.lang.visual-basic
Titolo: Help Internet Transfer

Qualcuno mi aiuti:
Questo maledetto controllo internet transfer con la get funziona
Inet1.URL = "
ftp://www.mioserver.it
"
Inet1.Execute Inet1.URL, "GET  /cartella/pippo.exe  C:\provo\pippo.exe"
Con la Put o Send non funziona
Inet1.URL = "
ftp://www.mioserver.it
"
Inet1.Execute Inet1.URL, "PUT C:\provo\pippo.exe  /cartella/pippo.exe"
Dove sbaglio........
Grazie a tutti
Piero

HELP HELP HELP

Newsgroup: it.comp.lang.visual-basic
Titolo: Btrieve

Salve a tutti.
E' possibile leggere/scrivere con Vb5/6 tabelle di database di tipo
BTrieve ?
Se sě, come si fa e dove posso trovare i driver ODBC per farlo ?
Grazie.

 Se sě, come si fa e dove posso trovare i driver ODBC per farlo ?
Potresti usare l'ISG Navigator, che rende disponibile un OLEDB Provider per
moltissimi DB su molte piattaforme differenti.
Guarda qui:
http://www.isg.com
Altro non saprei....
ALOHA !

 
http://www.isg.com
Ops! Ho sbagliato.
L'indirizzo giusto è:
http://www.isgsoft.com

Non sperare di farlo con Microsoft: che mi risulti l'ultimo driver ODBC di
MS era nel setup di VB3!
Comunque non dovrebbe essere un problema: guarda sulla macchina db
server.....Btrieve dovrebbe averti installato anche il suo driver odbc....
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: DAO con Access 2000

E' possibile aggiornare DAO in Vb5 affinché operi con gli archivi di Access
2000 ?

 2000 ?
sì, dovresti trovare sul sito ms la versione 3.6 (giusto? non mi ricordo
bene) che dovrebbe supportare access 2k
ciao, assa.
--
Sito Comune
http://www.it-lang-vb.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: Riferimento a mail

Ciao,
in un applicativo VB che si appoggia su SQL 2000 dovrei in fase di
inserimento ordinativi fare riferimento ad una e-mail del cliente che poi
verrà archiviata.
Qualcuno sa dirmi quale può essere il modo migliore per memorizzare nel mio
DB
il campo che nel mio record ordinativo faccia riferimento in modo esatto
alla mail ?
Grazie dell'attenzione
Piero
--------------------------------
Inviato via 
http://usenet.libero.it

 alla mail ?
Sarà una risposta idiota la mia, ma un VARCHAR non va bene?
In Oracle poi non mi pare che esistano tipi di campo orientati ai
link/ipertestuali.
Ciao
Ettore Maronese, il Mes
Newsgroup: it.comp.lang.visual-basic
Titolo: Ridimensionare un immagine

 wrote in message
1KR34.3185$Bg7....@typhoon.libero.it...

Ciao,
ecco un esempio rapido :
In un Modulo qualsiasi :
Option Explicit
Private Type PictDesc
   cbSizeofStruct As Long
   picType As Long
   hImage As Long
   xExt As Long
   yExt As Long
End Type
Private Type Guid
   Data1 As Long
   Data2 As Integer
   Data3 As Integer
   Data4(0 To 7) As Byte
End Type
Private Declare Function OleCreatePictureIndirect Lib "olepro32.dll" _
        (lpPictDesc As PictDesc, riid As Guid, _
        ByVal fPictureOwnsHandle As Long, ipic As IPicture) As Long
Public Function IconToPicture(ByVal hIcon As Long) As IPicture
   If hIcon = 0 Then Exit Function
   Dim oNewPic As Picture
   Dim tPicConv As PictDesc
   Dim IGuid As Guid
   With tPicConv
      .cbSizeofStruct = Len(tPicConv)
      .picType = vbPicTypeIcon
      .hImage = hIcon
   End With
   With IGuid
      .Data1 = &H7BF80980
      .Data2 = &HBF32
      .Data3 = &H101A
      .Data4(0) = &H8B
      .Data4(1) = &HBB
      .Data4(2) = &H0
      .Data4(3) = &HAA
      .Data4(4) = &H0
      .Data4(5) = &H30
      .Data4(6) = &HC
      .Data4(7) = &HAB
   End With
   OleCreatePictureIndirect tPicConv, IGuid, True, oNewPic
   Set IconToPicture = oNewPic
End Function
***************************
In un form :
Option Explicit
Private Declare Function LoadImage Lib "user32" Alias "LoadImageA" _
        (ByVal hInst As Long, ByVal lpsz As String, _
        ByVal iType As Long, ByVal cx As Long, ByVal cy As Long, _
        ByVal fOptions As Long) As Long
Private Const IMAGE_BITMAP = 0
Private Const IMAGE_ICON = 1
Private Const IMAGE_CURSOR = 2
Private Const LR_LOADMAP3DCOLORS = &H1000
Private Const LR_LOADFROMFILE = &H10
Private Const LR_LOADTRANSPARENT = &H20
Private Sub Command1_Click()
   Dim hIcon As Long
   hIcon = LoadImage(App.hInstance, App.Path & "\TEST.ICO", _
           IMAGE_ICON, 0, 0, LR_LOADFROMFILE Or LR_LOADMAP3DCOLORS)
   Set Picture1.Picture = IconToPicture(hIcon)
End Sub
Usando la Loadpicture non sei ristretto ai 32x32 , e puoi spaziare sulle
dimensioni che preferisci !!!
Ciao.
Jacote
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto creazione DB

Ciao,a tutti chi gentilmente può darmi una mano a spiegarmi come creare un
data base con VB6 partendo da zero?
--
-----------------------------------------------------
Click here for Free Video!!
http://www.gohip.com/free_video/

Prima di crearlo sai già come organizzarlo, concetti come chiave primaria e
secondaria ??? E le Query SQL ? Ok allora ti dico come fare con DAO 3.51
 ne esistono altre 2 -RDO e ADO- che non conosco a fondo... )
Dim db as Database  'dichiari le variabili oggetto  per
Dim rs as Recordset ' il database e per i recordset recuperati.
Set db = OpenDatabase ("C:\Documenti\miodatabase.mdb") ' percorso del
database
Set rs = db.OpenRecordset (" qui và inserita l'istruzione detta Query ")
' codice per gestire i dati del Database
Set db = Nothing ' rilasci i riferimenti agli oggetti
Set rs = Nothing  ' creati sopra.
Forse è un pò povero come concetto, ma è colpa dell'orario ( 2:30 ),
comunque non ti preoccupare che in questo ng c'è tanta brava gente disposta
ad aiutarti, magari col mio msg gli faccio risparmiare qualche riga di
codice dato che c'è tanto da dire sui Database.
Ciao Master_P 8)

 wrote

master_p, guarda che gli hai dato il codice per *usare* un mdb esistente,
non per *crearlo a partire da zero*... l'orario e' eloquente :)
marcello: i db, dopo averli concepiti in testa e sulla carta, spesso li si
*crea* con un dbms, tipo access, dbase ecc, poi da vb li si usa. non e' il
modo piu' elegante, ma in sostanza e' il piu' comodo. se hai office, studia
un po' la guida di access.
in alternativa (se non hai access) in vb ci dovrebbe essere visdata, con cui
se ricordo puoi impostare ugualmente struttura, indici ecc.
sono operazioni che puoi fare anche da codice, ma non sono proprio il
massimo per uno che comincia. cmq sul sito comune del ng
http://www.murialdo.it/it_lang_vb/
mi sembra ci sia un mdb2bas che a partire da un db access ti genera il
codice vb necessario a crearlo da zero. forse ti conviene scaricarlo,
provarlo, e dara un'occhiata al codice che genera.
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: VBA Excel: simulare uso tasto "End" o "Fine"

Devo "appendere" dei dati provenienti da un'altro file, trasferito con
una query da AS400, in coda a dei dati già esistenti sul mio foglio di
lavoro.
Nessun problema per selezionare solo il range contenente i dati nel file
sorgente. Con l'istruzione:
Selection.SpecialCells(xlCellTypeLastCell).Select
mi porto sull'ultima cella occupata del file, assegno il suo riferimento
ad una variabile e così posso costruire il range da copiare nel mio
file.
Se però uso la stessa funzione per cercare la fine dei dati sul mio
foglio, incontro dei problemi perchè la funzione posiziona la cella
corrente sull'ultima cella USATA del foglio, anche se non fa parte del
blocco CONTIGUO dei dati che mi interessano.....
Lavorando manualmente da tastiera, col tasto "End" o "Fine", invece, mi
sposto solo al termine della serie OMOGENEA di celle piene o vuote.
QUESTION:
C'è un modo di effettuare quest'operazione in VBA ???
Grazie in anticipo e saluti
___________________
Piero Fabbro, Udine
psm...@iol.it

Grazie in anticipo e saluti
Prego, ciao
--
Andrea :-{)
acm...@hotmail.com
================================================
Leggi 
http://beatles.cselt.it/news-it/FAQ.html
 e
http://beatles.cselt.it/news-it/gruppi-it.html
Potresti imparare qualcosa di piu' sui NG
================================================


Yes, prova a farlo mentre registri una macro e avrai di tutto e di piů
per vedere come si fa, poi riadatti alle tue routines.
Bye
Luca
Please remove _ABC from my address to reply
Cast your eyes on the ocean
Cast your soul to the sea
When the dark night seems endless
Please remember me
Loreena McKennit, Dante's prayer

 , invece funziona come desiderato.
Grazie comunque,
p.

Con <Selection.End(xlDown).Select>, suggerito da Andrea
E' esattamente quello che registra la macro :-))) Almeno da me
funziona (Xl 97 +sr1)

Newsgroup: it.comp.lang.visual-basic
Titolo: Posta elettronica

Salve a tutti,
ho un programma che deve inviare e ricevere dei messaggi di posta con
allegati. Come posso fare per farlo funzioniare con qualsiasi gestore di
posta sia installato sul client? ... pare che se uso i controlli MAPI mi
vincoli ad OutLook ...
Grazie in anticipo
Ste
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Grazie in anticipo
Per quel poco che ho potuto fare :-\
Antonio Mirarchi


L'invio non č che sia un grosso problema (posso anche usare Shellexecute -
MailTo...), č la ricezione che mi incasina in po' di piů :(
grazie cmq


Newsgroup: it.comp.lang.visual-basic
Titolo: DAO: creazione recordset e campi da codice

Eh gią, inossidabile dao...
Vorrei sapere dove posso reperire qualche esempio con del codice
su come creare un recordset access e inserire i relativi campi.
Ho letto un po via tasto F1 ma se trovo qualche esempio gią fatto
mi risulta piu facile.
p.e. se dovessi creare un recordset denominato AUTO con
i campi TARGA=testo, KM=long, ecc.ecc.
Grazie anticipate!

 su come creare un recordset access e inserire i relativi campi.
se il recordset deve essere comunque registrato sul database, potresti
provare con l'istruzione sql create table
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

 ha scritto nel messaggio
news:c6811801.04082...@posting.google.com...




Set Ws = DBEngine.Workspaces(0)
 Set Db = Ws.OpenDatabase(mydb, False)
 Dim myTabe As Tabledef
Dim myField As Field
Set myTabe = New TableDef
Set myField = myTabe.CreateField("TARGA", dbText, 20)
myTabe.Fields.Append myField
... (il resto dei campi te li fai tu)
Db.TableDefs.Append myTabe
Set Db = nothing
Set Ws = nothing
(se perņ crei la tabella con un unico comando SQL fai prima!, una sola
botta e via)
=======================================================================
Se mi vuoi scrivere togli le maiuscole
Sveltolampo 
cteniza...@hotmail.com
=======================================================================
Newsgroup: it.comp.lang.visual-basic
Titolo: [vocabili ?]

Esistono dei file dove si possono trovare tutte ( o quasi ) le parole delle
lingua italiana..... office ha il controlo ortografico, ma non riesco a
trovare e magari ad interpretare quei file.
Qualcuno può darmi suggerimenti???
Un grazie in anticipo        Ciao

Qualcuno può darmi suggerimenti???
Hai provato a guardare nei cd del Devoto Oli oppure dello Zingarelli
se si riescono a leggere le parole? Non ne ho idea, non ci ho mai
provato, ma era una possibilita'...
Saluti.
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD

 Saluti.
Quel tipo di base dati e' normalmente compressa secondo uno schema
proprietario, il che consente da un lato di risparmiare spazio e dall'altro
di mantenere la base dati inaccessibile all'utente medio.
Ciaotutti,
Alessandro

 ha scritto

in compenso l'utente c.d. evoluto rischia assai ad appropriarsene...


Ma quello sempre...
A meno che non si abbia il permesso scritto dell'editore e' illegale
utilizzare una base dati di cui si ha licenza d'uso per un programma
all'interno di un proprio software...
Ciaotutti,
Alessandro
Newsgroup: it.comp.lang.visual-basic
Titolo: Disegnare casella al muovere del mouse

Riciao,
nella applicazione che praticamente mi state scrivendo voi :-))) ho un bel
form dove vorrei che, visualmente, l'utente finale (che sono sempre io),
possa impostare delle stampe. Servirebbe quindi che l'utente clicchi in
una zona del form, tenga premuto il tasto sx, ed una "finestrella" gli
dica che sta disegnando qualche cosa; un po' come, ad esempio, in fase di
disegno del form si clicca sul controllo CommandButton e si va sul form
per disegnare il bottone.
Iniziamo:
Ho un command che se cliccato mi porta una variabile StoDisegnando a True
Nell'evento MouseDown controllo che la variabile StoDisegnando sia True,
se e' cosi' controllo che le coordinate X,Y siano nell'intervallo giusto
per poter disegnare e a questo punto assegno a due variabili DisegnoX e
DisegnoY le coordinate di inizio del disegno.
Nell'evento MouseMove controllo che ci siano le coordinate di inizio del
disegno DisegnoX e DisegnoY, poi comincio a disegnare un rettangolo con la
riga:
Me.Line (DisegnoX, DisegnoY) - (X,Y), VbRed, BF
Quindi mi appare una casella esattamente come la voglio io, un bel
rettangolo rosso.
Il problema e' che se provo a tornare indietro con il mouse, quindi ad
esempio voglio ridurre le dimensioni della casella, cio' che ormai e'
stato disegnato, resta la dove e'.
Come posso fare a cancellare il rettangolo appena disegnato?
Ah, chiaramente l'ecento MouseUp mi riporta la variabile StoDisegnando a
False
Ciao... Maurizio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ciao... Maurizio
Io userei uno shape di forma rettangolare e background trasparente,
magari con i bordi non continui ma puntinati. All'evento MouseDown lo
rendo visibile (se non lo e' gia'), ed al MouseMove lo ridimensiono. Al
MouseUp lo rendo invisibile, ed al suo posto diserno il mio rettangolo
con l'istruzione Line.
Bye by SixaM 8-]
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 rendo visibile (se non lo e' gia'), ed al MouseMove lo ridimensiono. 
...
Ottima idea, grazie.
Pero' ho una difficolta'.
Nell'evento MouseDown, setto le coordinate di inizio dello shape,
posiziono il vertice top , left alle coordinate, e rendo visibile lo shape.
All'evento MouseMove, ridimensiono il tutto facendo un:
Shape1.Height =  Y - DisegnoY 'DisegnoY e' la coordinata di partenza.
Se mi abbasso con il mouse, la coordinata Y aumenta rispetto alla
coordinata di partenza, e fin qui tutto ok.
Se mi alzo, la proprieta' Height di Shape1 diventa negativa, quindi,
malgrado sperassi che funzionasse, da errore.
L'unico modo per ovviare al problema e' fare un po' di operazioni con il
metodo move (spostando lo shape piu' in alto fino a raggiungere il
puntatore del mouse e calcolando l'altezza come 
Shape1.Height = DisegnoY - Y ?
Ciao e grazie... Maurizio


 Shape1.Height = DisegnoY - Y ?
Creati una funzione Min(a,b) che restituisce il minimo tra 2 valori ed
utilizzala cosě, nel MouseMove:
Shape1.Move Min(X,DisegnoX), Min(Y, DisegnoY), Abs(X-DisegnoX), Abs(Y-DisegnoY)
Bye
Raf
Newsgroup: it.comp.lang.visual-basic
Titolo: Metodo migliore per funzione mulitparametro che restituisce più valori


Direi che non ci sono molte possibilita'...
Di solito si passano dei parametri "di ritorno" (in C sono puntatori, in VB
sono parametri ByRef), esempio:
Dim in1 As Long
Dim in2 As String
Dim out1 As Boolean
Dim out2 As String
Sub Routine(ByVal in1 As Long, ByVal in2 As String, ByRef out1 As Boolean,
ByRef out2 As String)
All'uscita dalla sub si imposta out1 e out2 ai valori che si vuole ritornare
al chiamante.
--
Roal Zanazzi
z...@iol.it

La soluzione dovrebbe essere valida anche per VBA (se possibile).
  Non ho mai usato VBA, ma penso che sia la stessa cosa.
  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: Il carattere " ' " mi crea problemi...

Avrei bisogno di un consiglio circa un programma che sto realizzando un
programma in VB4.
Utilizzo il controllo DATA per interfacciarmi ad un Data Base Access
(creato con il Data Manager).
Nelle form ho creato dei TextBox per permettere all'utente di inserire
delle Query che poi "giro" al controllo Data per fare apparire il record
desiderato.
Il problema mi si pone quando creo la stringa per il Data:  se nel TextBox
inserisco un apostrofo mi sballa la stringa!
Esempio:
mycriteria = " SITE = " & " '" & Text1.Text & "' "
data1.Recordset.FindFirst mycriteria
La stringa corretta creata potrebbe essere:
SITE='albero'        (se Text1 contiene "albero")
Ma se invece Text1 contiene   "l'albero" la stringa diventa:
SITE='l'albero'
...ma così risulta errata!
...come posso fare?...
Ringrazio anticipatamente chi  vorrà darmi dei consigli in merito sperando
un giorno (con più esperienza) di poter contraccambiare.
Grazie a tutti!    Ciao :-)                 Alessandro.

 scritto nell'articolo
<01bc84be$9b593a20$LocalHost@alemnt>...


..ma cosě risulta errata!
mycriteria = " SITE = " & chr$(34) & Text1.Text & chr$(34)
ris... SITE = "l'albero"    OK!!!!!
Flavio
Newsgroup: it.comp.lang.visual-basic
Titolo: [vb6] controllo per scelta directory

Salve a tutti,
con il commondialog non ho la possibilit� di far scegliere comparire la 
finestra classica di windows per la scelta di una directory... come posso 
utilizzarla? Api?
grazie 1000
A. 

se può essere utile, io, per sfoglia cartelle, utilizzo:
in un modulo
'Tipo, costante e dichiarazioni per visualizzare la finestra di
dialogo "Sfoglia per cartelle".
Private Type BROWSEINFO
    hOwner As Long
    pidlRoot As Long
    pszDisplayName As String
    lpszTitle As String
    ulFlags As Long
    lpfn As Long
    lParam As Long
    iImage As Long
End Type
Private Const BIF_RETURNONLYFSDIRS As Long = &H1
Private Declare Function SHGetPathFromIDList Lib "Shell32.dll" Alias
"SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String)
As Long
Private Declare Function SHBrowseForFolder Lib "Shell32.dll" Alias
"SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long
Public Function BrowseForFolder(ByVal hwnd As Long, ByVal
szDialogTitle As String) As String
    'Visualizza la finestra di dialogo "Sfoglia per cartelle".
    Dim BI As BROWSEINFO
    Dim dwIList As Long, RetVal As Long
    Dim szPath As String
    With BI
        .hOwner = hwnd
        .lpszTitle = szDialogTitle
        .ulFlags = BIF_RETURNONLYFSDIRS
    End With
    szPath = Space$(1024)
    dwIList = SHBrowseForFolder(BI)
    RetVal = SHGetPathFromIDList(ByVal dwIList, ByVal szPath)
    If RetVal Then
        BrowseForFolder = Left$(szPath, InStr(szPath, Chr(0)) - 1)
    Else
        BrowseForFolder = ""
    End If
End Function
poi, sulla forma, nel Bottone 'Ricerca Cartella':
Private Sub cmdCercaFolder_Click()
Dim Temp As String
    'Visualizza la finestra "Sfoglia per cartelle".
    Temp = BrowseForFolder(Me.hwnd, "Seleziona cartella:")
    If Temp <> "" Then txtFOLDER = Temp
End Sub

 ha scritto nel messaggio 
news:16c963c5-c4e7-4a23...@c4g2000yqa.googlegroups.com...
se pu� essere utile, io, per sfoglia cartelle, utilizzo:
[CUT]
grazie 1000 � proprio quello che cercavo!!!
A. 



Si, browseforfolder
http://www.maurorossi.net/codice/AdvancedBrowseForFolder.zip
--
ciao
  Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Spostamento tra textbox

Avrei la necessità di gestire gli spostamenti tra alcune textbox di un form
tramite le frecce cursore ma non so neanche da che parte cominciare... visto
che non vorrei perdere ore per scoprire poi l'acqua calda, non è che per
caso qualcuno ha già trovata la soluzione?
Grazie a tutti!


routine KeyDown (o KeyUp) delle TextBox, confronta il KeyCode con le
costanti vbKeyLeft, vbKeyDown, vbKeyUp e vbKeyRight
Ciao
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: Rinomina file automatico ad orario raggiunto

Ciao,
come posso rinominare un file allo scadere periodico di un evento?
p.e. ho un file di log in continuo aggiornamento, p.e. un TXT.
alle 24,00 di ogni gg voglio che lo rinomini in data.zip.
Come faccio?
Grazie, Paolo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

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

Grazie, Paolo
Ciauz
Aran Banjo
-
C'č da chiedere cosa togliere nell'indirizzo ;)
Replay to: *[[banjo]]spamdim..@**
abilene.it
**

Ciao,
quando ho avuto bisogno della stessa cosa ho risolto così:
    nomefile = Format(Now, "MMDD") & ".log"
poi per zippare, archiviare, spedire ecc. ecc. ti fai un programmetto a
parte
che parte tramite crontab ... perdono .....Operazioni Pianificate.
Ciao a presto
Stephen


 alle 24,00 di ogni gg voglio che lo rinomini in data.zip.
e' la situazione ottimale, la tecnica e' questa :
Log.dat e' il file di log a cui APPENDI le linee, allo scattare delle 24 il
log.dat lo zippi e diventa per esempio :
Data_2003_12_15.zip e riapri in scrittura un file nuovo chiamato sempre
Log.dat !
-- 
<Gigio2K>
--- 
www.g2kweb.it
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiornamento TextBox

Ciao a tutti.
Premetto che sto parlando di un'applicazione scritta in C#. Purtroppo non
ho trovato un ng specifico, spero di poter avere lo stesso qualche
risposta.
Ho questo problema:
ho una callback associata ad un bottone, che esegue un algoritmo della
durata di qualche ora prima di terminare; nel frattempo la callback
modifica sporadicamente il contenuto di qualche textBox.
Se non iconizzo mai la finestra e non apro altre applicazioni, tutto OK;
altrimenti se iconizzo la finestra e la riapro oppure se attivo altre
applicazioni (e quindi apro altre finestre), nelle textBox continua a
vedersi un valore vecchio, cioè apparentemente non vengono visualizzati
aggiornamenti. Ho provato ad invocare il metodo Refresh sulle singole
textBox e sulla finestra ma non sono riuscito a risolvere il problema.
Avete suggerimenti, consigli?
Grazie, Ciao.
Null
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 risposta.
microsoft.public.it.dotnet.csharp
Ciao, Vincenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Ho installato il Visual Basic 5 (Enterpraise Edition) su Win98 e nell'usare degli ActiveX

Ho installato il Visual Basic 5 (Enterpraise Edition) su Win98 e nell'usare
degli ActiveX (Microsoft Common Dialog 6.0) mi ha dato l'errore di "non
avere un'appropriata licenza" per usarlo. Ciò dipende dal fatto che ho degli
ActiveX non aggiornati per Win98?
Se non è per questo motivo, perchè mi dà questo errore?
Ringrazio chi mi risponde

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Vorrei imparare a programmare in vb5

Ho già qualche esperienza in c e asmx86 ma non penso serva a molto chi di
voi mi saprebbe consigliare testi corsi o altro ????
grazie
filippo

>voi mi saprebbe consigliare testi corsi o altro ????
dai uno sguardo a Guido Carta, VB5 Corso di istruzione o qc del
genere, della Jackson, 65 sacchi.
======================================================
my opinions do not necessarily have to be true.
======================================================
per rispondermi rimuovere NOSPAM. dall'indirizzo email
to answer me remove NOSPAM. from email address
======================================================

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] textbox + datasource adodc

ma impostando datafield con un nome campo tabella access
e associandovi un datasource adodc1 il text non dovrebbe essere caricato
automaticamente con il valore di tabella?
perchè non funziona?
Grazie


Assicurati che le proprietŕ "DatabaseName", "RecordsetType" e
"Recordsource", dell'oggetto data, siano settate correttamente!

 Assicurati che le proprietà "DatabaseName", "RecordsetType" e


Newsgroup: it.comp.lang.visual-basic
Titolo: stringa in comando keybd_event

come posso eseguire la riga qui sotto sostituendo vbKeyRight con una 
stringa ?
keybd_event vbKeyRight, 0, KEYEVENTF_EXTENDEDKEY, 0 
Se per esempio faccio così:
dim CMDKEYBD as string 
CMDKEYBD="vbKeyRight"
keybd_event CMDKEYBD, 0, KEYEVENTF_EXTENDEDKEY, 0
mi dà errore !!
Grazie, Alverman

 ha scritto nel messaggio
news:200710162...@mynewsgate.net...


> Non puoi farlo, perchè vbKeyRight è una costante numerica!
Che pirla che sono :)
Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: conversione C++ VBasic

come posso dichiarare questa funzione in VB ?
'
****************************************************************************
**
'   Definizioni per la DLL FC_GetImage
'
'   signed short mode,      //  Tabella modi
'   char error[40],         //  Breve spiegazione dell' errore
'   char fmess[20],         //  Nome del file con i messaggi debug
'   unsigned char *pimage,  //  Immagine ricostruita
'   unsigned short ximage,  //  Dimensioni X di pimage
'   unsigned short yimage,  //  Dimensioni Y di pimage
'   char *pslice,           //  Slices
'   long lslice,            //  Dimensioni della memoria 'Slices'
'   char *inipar,           //  Parametri di inizializzazione
'   short ignoreini,        //  Ignora il file FC_GetImage.ini se vero
'   FC_outpar FCout         //  Valori di ritorno DLL
Grazie
 
mar...@meb-system.it

 wrote in message
10rdct6$sc1$1...@fe2.cs.interbusiness.it...
