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

Salve a tutti.
Vorrei sapere  come mettere in una variabile il contenuto di una pagina web
visualizzata tramite il controllo inet.
Grazie

 wrote in message
F58A8.38516$8D3.1...@news1.tin.it...

Ho risolto da solo con il metodo openurl. Mi confondevo, usando l'oggetto
webbrowser che non lo permette.
Grazie e scusate per il disturbo.

Per pura curiosità, prima di risponderti ho aperto MSDN, ho digitato "inet
variable page" (che grossomodo è inerente alla tua domanda), e ho premuto il
tastino 'cerca'.
Mi sono uscite solo 4 risposte, di cui una è la Q171824, che riporta
esattamente, riga per riga, tutto il codice e la procedura per fare quello
che vuoi tu (comincia proprio con 'aprire un progetto di VB'....).
Tu sei sicuro di avere cercato su MSDN prima di chiedere al NG?
Alberto

scusate se approfitto ma volevo fare una domanda proprio riguardo questo
controllo
(se non è gradito questo modo di fare con 'intrusione' non lo faccio piu)
sto facendo un programma (secondo me molto utile) per me stesso, che usa un
controllo inet
se chiudo il form mentre l'inet sta scaricando (in form_unload c'è
inet1.cancel) facendo alt+control+canc vedo che in realta il programma è ancora
aperto anche se il form è sparito.
è un bug o è normale?
cosa potrei fare per evitare questo?
esistono altri controlli magari netscape o opera?
grazie Valerio

 esistono altri controlli magari netscape o opera?
Controlli 3rd party ce ne sono di sicuro, ma dipende dall'uso
che ne devi fare, ed è difficile siano free. Magari il WebBrowser
o addirittura il Winsock, potrebbero andarti bene...
ma la mia sfera di cristallo è ancora in riparazione :-))))
Bye, G.
--
Le risposte alle tue domande sono sul Sito Comune
di questo NewsGroup: 
http://it-lang-vb.net/
... e nell'help in linea !

 Nel caso, il link è nella firma. :-P
che vuol dire?
[CUT]
grazie per le risposte.
Valerio  (o MandarX ?)

 che vuol dire?
Che il link per il Sito Comune era nella mia firma, niente di particolare :-)
Indirizzo Sito Comune: 
http://it-lang-vb.net/
Link diretto al Manifesto: 
http://it-lang-vb.net/docs/Manifesto.txt
Bye, G.


ah avevo frainteso tutto.
comunque hai visto che ho aperto un tread come mi hai consigliato?
purtroppo come dico nel post piu in giu  execute "close" genera un errore
ciao e grazie di tutto.
Valerio
Newsgroup: it.comp.lang.visual-basic
Titolo: classe e evento

salve a tutti.
in vb 6 ho fatto una classe con un evento.
dichiarando, un'istanza della calsse, con WithEvents tutto funziona.
Il problema è che se dichiaro un array di istanze, non funziona.
dim WithEvents LaVariabile() as LaMiaClasse
non va proprio.
C'è un altro modo per farlo funzionare?
saluti
Valerio Mandarino

 Valerio Mandarino
Ciao
g.c.

 Infatti non si può dichiarare una array di classi in questo modo.
dim LaVariabile() as LaMiaClasse
funziona benissimo, è con il WithEvents che non va

 ha scritto nel messaggio
news:oOric.19977$Qc.7...@twister1.libero.it...

ho detto infatti "in questo modo" che significa  "così come hai scritto"
riferendomi al fatto che c'è Withevents.
Comunque, per quello che vuoi fare tu, devi :
    implementare una interfaccia
        oppure
    Racchiudere la classe in uno UserControl (pessima scelta ma che consente
di gestire gli eventi in una array tramite il parametro index implementato
automaticamente  da VB per le array di controlli)
Ti consiglio la prima.
Saluti
GC
Io consiglio sempre

Newsgroup: it.comp.lang.visual-basic
Titolo: Quanti conoscono i WEBCAST Microsoft

Giusto per farmi un'idea e magari per far sapere a qualcuno che
esistono questi strumenti gratuiti a mio parere molto utili come
approccio iniziale...
Ciao
Alex

 approccio inizia
Trovo molto utili quelli che puoi scaricare e seguire dal proprio pc.
Hai la possibilitą di tornare indietro, fermare, eseguire in parallelo
l'esercitazione.
Alcuni non sono scaricabili,
quindi,
- se entra in funzione il salva schermo, ricominci da capo,
- non puoi tornare indietro,
- se si interrompe, ricominci da capo,
- č presente uno, non scaricabile, che si ode la voce, ma le immagini sono
ferme.
Ave
giuseppeD
---
CCR

 giuseppeD
-- 
.A
UGIdotNET - User Group Italiano .NET
http://www.ugidotnet.org
Read my blog at: 
http://www.ugidotnet.org/4.blog

 segnalarlo alla persona che in MS si occupa dei webcast.
ASP.NET
: Autenticazione e Sicurezza basata sui ruoli
di Davide Vernole
Ave
giuseppeD
Newsgroup: it.comp.lang.visual-basic
Titolo: Come inserire animazioni.

Come posso inserire icone / immagine animate in una form di vb5.
Rispondetemi anche al mio indirizzo e-mail.
Grazie in anticipo.
--
Mauro Rossi.
mauro...@fastnet.it

...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB4 testo non riscrivibile.

Qualcuno sa dirmi come risolvere il problema:
devo in VB4 fare in modo che il testo sia bloccato dall'editazione
dell'utente in lettura in pratica come proteggere una text box da
scrittura.
GRAZIE 1000000000000000!!!!

...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] aprire una form da un modulo di startup ??

ciao a tutti, ho la seguente necessità: ho creato un modulo di startup nel
progetto che oltre ad eseguirmi varie cosette mi va ad aprire anche la Form
principale (non modale). Il problema è che la Form al termine
dell'esecuzione del flusso contenuto nello StartUp mi viene chiusa e
scaricata.
In VB 6.0 questo non accadeve nel senso che la form veniva aperta e
mantenuta aperta fino a quando non veniva chiusa esplicitamente
indipendentamente dal flusso del modulo di startup.
Non conosco molto bene ancora .Net e quindi non capisco quale sia il giro da
effettuare .....
Consigli ....
grazie.
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 viene chiusa e scaricata.
ma pensa te.
nel tuo newsreader, riesci a leggere il thread "Chiusura e apertura windows
form", cominciato ieri?
hal ha postato un link che potrebbe esserti utile.
certe volte, la vita...
-- 
Salutoni
Sergio
per rispondere... togli il group dall'indirizzo

Prova con
Application.run(new Form1)
HTH
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog
Newsgroup: it.comp.lang.visual-basic
Titolo: Pacchetto di installazione Express

Ho capito che per installare un'applicazione Visual Basic 2008 Express su un 
altro PC è sufficiente, dopo avere installato l'opportuno Net Framework, 
copiarci dentro semplicemente la cartella BIN/RELEASE.
C'è qualche controindicazione o inconveniente, rispetto a creare un 
pacchetto di installazione classico ? Non è che facendo così si vanno a 
distribuire files che possono essere utili a chi volesse copiarti il 
programma ? (copiarti nel senso di ricostruire un sorgente su cui lavorarci 
su).
Marco 

marcick ha scritto:

L'exe prodotto da .net framework è già di suo un file utile a 
ricostruire il sorgente (cerca su google info sugli obfuscator per .NET).
La modalità di distribuzione non inficia la fscilità di risalire al 
sorgente.
Per alcuni progetti ho preferito il classico copia-incolla della 
cartella Release (magari includendo tutte le dll necessarie), in altri 
ho preferito il classico setup per una questione di famigliarità 
dell'utenza con i pacchetti d'installazione.
Nicola

 sorgente.
accipicchia ....
Per rendere difficile il lavoro ai disonesti che azioni suggerisci di 
intraprendere ?
Come ti proteggi ?
Marco

 Come ti proteggi ?
http://tinyurl.com/5sokt8
Nicola

 ha scritto nel messaggio 
news:487dc4f1$0$29973$5fc...@news.tiscali.it...

si, avevo letto e sono in parte d'accordo. In parte ...
Credo che un minimo di protezione valga la pena di adottarla.
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione Errori

Cia a tutti,
come faccio a gestire un errore in particolare?
Volevo gestire l'errore 7, "Out of Memory" ed ho provato con la seguente
sintassi:
On Error(7) GoTo error_7
Ma ovviamente è sbagiata. Come Faccio?   GRAZIE

 On Error(7) GoTo error_7
salve,
On error resume next
istruzione....
if err.number=xx then
    goto Error_7
elseif err.number=z then
    ...
end if
on error goto 0
exit sub/function
Error_7:
    msgbox Err.description, vbinformationor vbokonly, app.exename
    exit sub/function
end sub/function
saluti
Andrea Montanari
montanar...@virgilio.it
http://www.asql.biz/DbaMgr.shtm
DbaMgr2k ver 0.2.0  -  DbaMgr ver 0.48.0
(my vb6+sql-dmo little try to provide MS MSDE 1.0 and MSDE 2000 a visual
interface)
--------- remove DMO to reply

come faccio a gestire un errore in particolare?
On Error Goto ErrorHandler
(...)
ErrorHandler:
	If Err.Number = <numero_che_mi_interessa> Then
		(... fa qualcosa ...)
	Else
		(... fa qualcos'altro ...)
	End If
Oppure:
On Error Resume Next
(... istruzione che potrebbe generare l'errore ...)
If (Err.Number = <numero_che_mi_interessa> Then
End If
-- 
hth, hal

Grazie a tutti e due e buone feste
Newsgroup: it.comp.lang.visual-basic
Titolo: VBA: Select con condizione LIKE sul valore di una textbox

Salve a tutti.
Allora ho cercato quale fosse la sintassi per una select con il
parametro Like per VBA in Access, e ho trovato questo:
RS.Open "SELECT * FROM Rubrica WHERE Nome LIKE 'M%';", DB
ma se io devo fare la like sul valore della textbox nella maschera di
access??? come diventa?
la sintassi che ho usato fino ad ora non richiedeva la like e mi
funziona, è questa:
rs.Open "Select * From Fattura Where NumeroFattura = '" &
Me.txtNFattura & "'",.....
Qulcuno mi puà aiutare?
grazie.

Usa semplicemente
rs.Open "Select * From Fattura Where NumeroFattura LIKE  '" &
Me.txtNFattura & "%'",



RS.Open "SELECT * FROM Rubrica WHERE Nome LIKE " & chr(34) forms!tuaform!tuocontrollo & chr(34) & "*"
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

La sintassi più corretta è questa:
Dim strSQL As String
strSQL = "SELECT * FROM tuatabella WHERE campo='" & Replace$
(txtTesto.Text, "'", "\'") & "'"

Anzi scusa:
Dim strSQL As String
strSQL = "SELECT * FROM tuatabella WHERE campo LIKE '" & Replace$
(txtTesto.Text, "'", "\'") & "%'"

 wrote:

Se il DB è JET e non SQL_Server il carattere Jolly è * e  non % quindi
io modificherei così:
RS.Open "SELECT * FROM Rubrica WHERE Nome LIKE '" & _
               Replace(Me!NomeTextBox.Value,"'","''") & "%';", DB
@Alex


Ciao Ale, ma l'asterisco dov'è??


Newsgroup: it.comp.lang.visual-basic
Titolo: CHIAVE SOFTWARE

Intendo qualche esempio di codice VB5/6 per proteggere un mio applicativo
grazie
--
ELETTRONIC SYSTEM
VIA FRATTE 55
35010 SANTA GIUSTINA IN COLLE
PADOVA
SISTEMI DI SICUREZZA
WEB: 
www.elettronicsystem.com
email: 
in...@elettronicsystem.com

 wrote in message
news:JF5c5.19932$KD3.1...@news.infostrada.it...


 wrote in message
3856b...@news.megasys.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Fare backup da rete...

Ciao, è da molto che non programmo più in vb ma un mio amico mi ha chiesto
di scrivergli una utility che gli permetta con un semplice clic su un'icona
di spostare intere dir da un hd locale ad un hd remoto, visto come locale.
In pratica siano A e B due pc se da C:\ su A voglio copiare intere dir sul
C:\ di B e quest'ultimo viene visto come D:\ da A come devo fare? Devo usare
dei controlli DirListBox, FileListBox o posso fare tutto con il
FileSystemObject?
Grazie mille a tutti.

da me c'è il prg pronto, con i sorgenti...
MyBackup v2
-> GbC
http://www.gbcweb.com

 ha scritto nel messaggio
news:ngKd8.10513$fa5.3...@twister2.libero.it...

Wow, grazie mille!!!!! ^_^ ^_^
Newsgroup: it.comp.lang.visual-basic
Titolo: excel + vba

avevo bisogno di determinare la prima riga vuota in un foglio di lavoro, e
poterci trasferire dei dati.
Ho provato con un IF range("a"&i).value="" then ecc
dove a è la colonna e i è un indice che varia
ma non funziona, chi mi sa aiutare?!
garzie

 ha scritto nel messaggio
news:XRZ67.19833$NZ6.6...@news.infostrada.it...


 ha scritto nel messaggio
news:hn_67.7345$hO3....@news2.tin.it...
grazie della risposta, l'ho leggeremente modificato per le mie esigenze,
perchè l'indice delle righe deve partire da 8, ma mi dà un errore di indici
non incluso nell'intervallo.
grazie comunque
Dim WS As Worksheet
i = 8
Set WS = Worksheets("miofoglio")
Do While WS.Cells("a" & i).Value <> ""
i = i + 1
Loop
Range("a" & i).Value = "pippo"

 ha scritto nel messaggio
news:Yg%67.20724$NZ6.7...@news.infostrada.it...


La funzione Cells vole Indici di Riga e Colonna, non il nome della cella
(come Range)
Dim WS As Worksheet
i = 8
Set WS = Worksheets("miofoglio")
Do While not WS.Cells(i,1).Value = ""
    i = i + 1
    'Io ci metterei anche questo, non si sa mai
    if i=65535 then
        msgbox "Spazio Esaurito",vbExclamation
        exit sub
    end if


 Loop
grazie ho sistemato tutto, c'era un piccolo errore nel tuo codice che va
corretto nella seguente maniera:
anzichč WS.cells("A" & I).Value<>""
bisogna mettere WS.cells(i,"A").value <> ""
quindi prima l'indice della riga e poi separato da virgola l'etichetta della
colonna.
Grazie ancora
Newsgroup: it.comp.lang.visual-basic
Titolo: HTML Object Library

Ciao a tutti.. ho la necessità di acquisire il sorgente HTML di una
pagine di un frame set, visualizzato in un controllo INTERNET da VB6.
Prima di tutto ho referenziato al mio proggetto la HTML Library.
In seconda battuta, ho creato e settato un oggetto HTMLDocument:
Dim HTMLDoc As HTMLDocument
Set HTMLDoc = WebBrowser1.Document
Quando l'oggetto WEBBRowser punta ad una pagina HTML standard, con il
comnado Miohtml = HTMLDoc.body.innerHTML, ottengo il sorgente HTML
della pagina.
Nel caso di un frameset, riesco ad ottenere, ovviamente, il solo
sorgente del frameset stesso.
Vi prego di aiutarmi, ho la necessità di ottenere il sorgente di uno
dei due frame del frameset.
Come posso fare cio'?
Grazie a tutti
ALessandro

 wrote in message
news:25748f23.0209...@posting.google.com...

Devi estrarre ricorsivamente le windows dalla collection frames di ciascun
documento, verificarne il nome e,  se è quella che cerchi, ottenere il
sorgente come doc.frames(n).document.body.innerHTML.
--
rumplestiltskin

 sorgente come doc.frames(n).document.body.innerHTML.
Prima di tutto , grazie per avere risposto... hem :-) mi potresti dare
qualche "indicazione" piů precisa? circa il ciclare tutti frames?
Graize
Alessandro

 Alessandro
Ci mancherebbe!
(A memoria e senza aver testato niente)
Sub WebBrowser1_DocumentComplete(...)
    dim dc as HTMLDocument
    set dc=GetDocument(WebBrowser1.Document, "PIPPO")
    if not dc is nothing then
        debug.print dc.body.innerhtml
    end if
End Sub
Function GetDocument(doc as HTMLDocument, Name as string) as HTMLDocument
    On Error Goto ErrHndl
    dim i as long, c as long
    dim dc as HTMLDocument
    c=doc.frames.length - 1
    for i=0 to c
        if strcomp(Name, doc.frames(i).name,vbtextcompare) = 0 then
            set GetDocument=doc.frames(i).document
            exit function
        end if
        set dc = GetDocument(doc.frames(i).document, Name)
        if not dc is nothing then
            set GetDocument=dc
            exit function
        end if
    next i
ErrHndl:
    set GetDocument = nothing
End Function
Immagino che si possa semplificare, ma ora è quanto di meglio mi venga
fuori. Se non funziona, fammelo sapere (ma credo che tu sia in grado di
capire quello che volevo fare).
PS: ovviamente devi sapere come si chiama la frame che intendi leggere
(probabilmente non "PIPPO").
--
rumplestiltskin

 ha scritto nel messaggio
[cut]
Vedi, tu credi di rispondere a una persona sola, e invece, come minimo,
questa volta ne hai accontentate due...
Mille grazie
Salutoni
Sergio

 wrote in message
news:_VEi9.118833$ub2.2...@news1.tin.it...

Mi fa piacere (davvero). Comunque questo dovrebbe essere uno degli scopi dei
newsgroup!-)
--
rumplestiltskin
Newsgroup: it.comp.lang.visual-basic
Titolo: S.O.S. prima esperienza!

Devo iniziare a fare manutenzione software per una ditta e non so che
tariffe chiedere!?
Io avevo pensato a questo genere di contratto:
-------------
30.000 al mese per ogni terminale (sono 4, quindi 120.000).
50.000 per intervento urgente.
------------
Compreso nel prezzo una intervento di manutenzione mensile.
Se qualcuno di voi ha avuto esperienze di questo genere, gradirei un
consiglio su che tariffe chiedere.


Non ho esperienza diretta, ma le tariffe che ho sentito sono _molto_ piu'
alte, anche fino a 120.000 l'ora (per interventi presso il cliente).
--
Roal Zanazzi
z...@iol.it




Newsgroup: it.comp.lang.visual-basic
Titolo: come trovo le dimensioni di una immagine?

All'inizio mi scuso se qualcuno ha già risposto a questa domanda che ho
fatto qualche tempo fa, ma come dicevo, non potevo leggere le news molto
spesso.  Da ora SI !
allora: ho SOLO la necessità di calcolare le dimensioni di una BMP, o GIF,
(basterebbe  anche solo per un formato, al massimo converto...), ed
eventualmente di visualizzarla il che non è un problema...
come si fa?  bisogna passare attraverso un ocx, magari pesante, solo per
questa funzione? o si può leggere dentro il file le dimensioni, se ci sono?
e come fare questo? 
grazie dei suggerimenti.	
					roberto 

.....
Io usa questa procedura scritta da me. Vale solo per le BitMap.
Sub DimensioniBitMap(flBitMap As String)
 
    Open flBitMap For Binary As 1
       Get #1, 18, BMPWidth
       Get #1, 22, BMPheight
    Close 1
' per i valori in pixel
    BMPWidth = BMPWidth / 256 * 15.2
    BMPheight = BMPheight / 256 * 15.2
End Sub
Spere che ti sia utile.
ciao   
Elvio

Newsgroup: it.comp.lang.visual-basic
Titolo: VB 2005 Express: Domanda su grafici e script

Ciao a tutti,
stavo valutando la possibilità di usare VB 2005 Express
per avvicinarmi al mondo .NET
Per realizzare il programma che ho in mente avrei bisogno
di un componente per realizzare dei grafici semplici e di embeddare
un linguaggio di scripting.
Qualcuuno sa dirmi se esistono delle librerie open source
che permettano di fare questo?
Grazie
Ale. 

 un linguaggio di scripting.
Grafici in che senso?
Per lo script che io sappia (lo sto cercando anch'io e sto valutando la 
possibilità di scrivermelo) non esiste niente in senso stretto, però il Fw 
offre un buon supporto per la compilazione al volo di codice .Net.
Se cerchi in rete qualcosa riguardo a CSharpCodeProvider e VBCodeProvider 
troverai parecchi esempi.
Altrimenti puoi appoggiarti a qualcosa di già fatto come questo: 
http://www.codeproject.com/csharp/cs-script_for_cp.asp
Ciao 

 ha scritto nel messaggio 
news:45f7f7cb$0$810$4faf...@reader5.news.tin.it...


 prodotto, però vorrei trovarne altri per dfare un confronto.
Io avevo trovato ZedGraph che sembra decisamente buono, free e nativo .Net.
Mai usato in modo serio, l'ho provato giusto per curiosità.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: OCX per creazione codici a barre

Tempo qualcuno ha chiesto gli OCX per i
codici a barre, ebbene gli uni, gli altri e
qualcos'altro troverete su
         ioProgrammo
tutto in codice sorgente.
EAN 8, 13, 99, ISBN
+ rimando a prg già fatti
(nr.4)
Ciao a questo NG pieno d'idee.

...

Scusa l'ignoranza ma cos'è ioProgrammo?????? :-(((
-----------------------------------
Paolo Spellani
TecnoGraphica s.r.l.
FOLIGNO (Pg) - ITALY
-----------------------------------


wrote:
É una rivista di informatica: semplice, con tutti gli
esempi delle problematiche affrontate, seria,
su diversi linguaggi e piattaforme, etc...
di invio l'indirizzo http
http://gol.diemme.it/ioprogrammo/


codici a barre, 
Sono uno tra quelli.... grazie e a buon rendere !
Marco Grignoli   
sinfosofNO...@tin.it
   >togliere NOSPAZZATURA<

Newsgroup: it.comp.lang.visual-basic
Titolo: [Oggetto Data] Recuperare i FIELDS

Ciao a tutti,
dovrei recuperare i campi contenuti nel RecordSource di un oggetto
DataControl, come posso fare?
Saluti,

Se in un progetto inseriscio data1:
data1.recordset.fields ("nome campo")
Cmq se dopo data1 scrivi . vb fa' vedere tutte le proprieta' dell'oggetto, e
usando l'help arrivi facilmente alla soluzione.
Salve
                Dbg
CKTC ha scritto nel messaggio


ARGH! Ci provo ma mi da errore 13, Tipo non corrispondente. In pratica ho
bisogno di listare i campi contenuti in un oggetto data ed utilizzo questa
procedura che rivece l'oggetto Combo di destinazione e dovrebbe riempirlo
con il nome dei campi:
Private Sub FieldToCombo(ByRef lstBox As ComboBox)
    Dim fldSrc  As Field
    For Each fldSrc In dcOrigine.Recordset.Fields
        lstBox.AddItem fldSrc.Name
    Next fldSrc
    If (lstBox.ListCount <> 0) Then
        lstBox.ListIndex = 0
    End If
End Sub
Dove sbaglio? Grazie!
Newsgroup: it.comp.lang.visual-basic
Titolo: Posso creare un' array con due dimensioni per fare un sort di date?

Ho una cartella dove effettuo i backup uno full e sei differenziali ogni
settimana, vorrei con un'operazione schedulata provvedere all'eliminazione
periodica dei file + vecchi.
Ora quello che non riesco a fare con Wsh quindi VbScript č, una volta
ottenuti i nomi e le date dei files poterli mettere in ordine di data in una
variabile.
Come faccio a creare un' array o qualcosaltro dove memorizzare
Data1    NomeFile1
Data2    NomeFile2
Data3    NomeFile3
Data4   NomeFile4
....
DataN    NomeFileN
con la possibilitą di poter fare un ordinamento per data e quindi poi
prendere gli ultimi sette nomi file?
Spero di essermi spiegato in modo comprensivo, grazie 1000 alle risposte!!!

 variabile.
[SNIP]
Puoi farlo in maniera del tutto analoga a quanto fai in VB; per esempio:
Const F_NAME = 0
Const F_DATE = 1
Dim arFiles(1, 6) 'due "colonne" e sette "righe"
arFiles(F_NAME,0) = "Pippo.txt"
arFiles(F_DATE,0) = "01/01/2002"
arFiles(F_NAME,1) = "Pluto.txt"
arFiles(F_DATE,1) = "01/03/2002"
'eccetera
a questo punto puoi applicare la tua funzione di ordinamento, ne trovi
parecchie sul Sito Comune, facilmente adattabili anche per VBScript; dato
che parliamo di un array di dimensioni contenute va benissimo il caro,
vecchio BubbleSort
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] DataReport & DataEnvironment....

Ciao a tutti
Ho un problemino con il DataReport di Vb6 pro
Cerca che ti ricerca nell'help sul CD (?) non c'ho trovato soluzione....
Semplicemente: ho un MDB legato al DataEnvironment e di conseguenza al
DataReport.
Mi faccio la mia bella stampa.
Ora, se aggiungo ad esempio un record all'mdb, come e' possibile
"rinfrescare" il tutto ????
Ovvero, richiedendo la nuova stampa, mi viene riproposta sempre ed
esclusivamente quella precedente.
Spero di aver spiegato chiaramente la questione.
C'e' qualche buon'anima che ha gia' affrontato il problema ed ha gia' la
soluzione ?
1000 grazie anticipate
Stefano
StefanoAlbo...@iname.com

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Re. Help dimensione form principale

Approfitto della V.sa disponibilità  per estendere un quesito, già posto in
varie forme.
Per la mia applicazione in Win 3.11 il form principale occupava tutto lo
schermo tramite:
    PRINCIPALE.Width = Screen.Width
    PRINCIPALE.Height = Screen.Height
    PRINCIPALE.Left=0
    PRINCIPALE.Right = 0
ma adesso questa strada non è perseguibile perchè parte dello schermo si
nasconde nella taskbar.
Ho seguito i Vari consigli, ma con la chiamata di GETSYSTEMMETRICS tramite
le variabili SM_CXFULLSCREEN e SM_CYFULLSCREEN, prima ottengo i risultati
non in pixel, secondo non ho la possibilità di conoscere il valore LEFT e
RIGHT (in caso di taskbar in posizione laterale sballa tutto).
L'help mi dice di utilizzare la chiamata di SYSTEMPARAMETERSINFO con la
variabile SPI_GETWORKAREA, ma a differenza di GETSYSTEMMETRICS che rimanda
una sola variabile (facile per gli inesperti), SYSTEMPARAMETERSINFO utilizza
4 variabili che non riesco ad utilizzare. Come fare?
Queste sono le dichiarazioni della chiamata delle due librerie interessate:
Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As
Long
Global Const SM_CXfullSCREEN = 16
Global Const SM_CyfullSCREEN = 17
Declare Function SystemParametersInfo Lib "user32" Alias
"SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal
lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_GETWORKAREA = 48
Grazie anticipatamente per la risposta al quesito.
Sebastiano Floridia
Siracusa








Newsgroup: it.comp.lang.visual-basic
Titolo: ADO - Installazione programma

Ciao a tutti,
ho realizzato un programma, ho creato i pacchetti di installazione ed ho provato ad installare il mio programma su un altro pc.
Qui ho avuto la sorpresa, perchè mi da un errore: "ADO could not find the specified provider".
Come faccio a risolvere il problema?
Grazie a tutti
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
mail-6.tiscalinet.it
 [195.130.225.152] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie a tutti
Se stai usando ADO con provider Jet.3.51, devi guardare un mio post
di qualche settimana fa...............
Ciao
Sir Jo

 di qualche settimana fa...............
sir jo, perche' non ne fai un esempietto ordinato o qc di simile per il sito
comune ? sarebbe piu' facile da rintracciare, e mi sembrava piuttosto utile.

 Grazie a tutti
Se stai usando ADO con provider Jet.3.51, devi guardare un mio post
di qualche settimana fa...............
Ciao
Sir Jo
Non riesco a trovare il tuo post, saresti cosě gentile da rispondermi ugualmente? 
Grazie Matteo
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
mail-4.tiscalinet.it
 [195.130.225.150] 


A proposito....
Grazie "Sir Jo", quando ho visto il tuo messaggio l'ho stampato e messo
via...
dopo solo una settimana mi č proprio servito!  :)
Ciao
Basty

Te lo mando io perchč me l'ho messo subito da parte.
Eccolo in versione integrale perchč merita:
"UDITE UDITE !!!!!!
Sono finalmente riuscito a capire perchč non funziona MAI sto ca**o di
provider OLE DB Jet 3.51 quando si distribuiscono le applicazioni.
Quando si installa MDAC (2.1 o 2.5) non viene installato il driver OLE DB
Jet 3.51
Per risolvere il problema si debbono aggiungere due DLL nel programma
di "Creazione Guidata Pacchetti di Installazione" (CGPI)
Quando il programma CGPI mostra la lista delle DLL da distribuire, scegliete
AGGIUNGI
e aggiungete queste due DLL:
C:\WINDOWS\SYSTEM\MSJT4JLT.DLL
C:\PROGRAMMI\FILE COMUNI\SYSTEM\OLE DB\MSJTOR35.DLL
Proseguite con il programma CGPI e quando vi mostra la lista di dove
verranno installate
le vostre DLL, ponete il cursore sulla voce MSJTOR35.DLL e modificate la
directory
denominata "Posizione installazione" in:
$(CommonFilesSys)\ole db
Spero di aver fatto cosa gradita a piů di una persona
Ciao
Sir Jo
P.S. Questo messaggio ne vale almeno 4 di Pal e 4 di Hal
"        by Sir Jo
Aggiungo solo che su NT i percorsi sono:
C:\WINNT\system32\MSJT4JLT.DLL
C:\Program Files\Common Files\System\OLE DB\MSJTOR35.DLL
Ciao
Basty

Non riesco a rintracciare il post, puoi rispondere ugualmente?...oppure mandarmi la risposta in un e-mail? 
Grazie Matteo
--
TiscaliNet, libero accesso ad Internet.
http://www.tiscalinet.it
-- 
Posted from 
mail-5.tiscalinet.it
 [195.130.225.151] 


 ha scritto nel messaggio
news:3A51E96C...@mail.tiscalinet.it...


Grazie a tutti,
siete stati gentilissimi.
Ciao Matteo 
-- 
Posted from IDENT:root@[195.31.193.3] 

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema di licenza

Se io ditta compro vb6 profess e creo un programma posso distribuirlo e
installarlo nei miei computer?

installarlo nei miei computer?
Altro che !
ciao, hal

hal1961 wrote:

Se invece io privato voglio realizzare un programma da vendere (o, nel caso
piu' semplice, qualcuno mi ha chiesto di realizzargli un programma, ad
esempio il classico gestionale), come vanno le cose? Mi basta avere le
licenze del SO, del linguaggio usato (in questo caso VB6 Ent.), del gestore
di database (Office 2000) e degli eventuali componenti che uso (Sheridan,
Apex, ecc.), e con cio' posso fare un programma vendibile, o c'e' qualcosa
che mi sfugge?
Bye by Massimo 8-]

 che mi sfugge?
si. la finanza  :)
Faber

 si. la finanza  :)
:)
lui a lei, vuoi dire ?

 lui a lei, vuoi dire ?
non sarebbe male eheh
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] la mia povera Uno...

Dopo anni di onorato servizio la mia povera Uno 900cc 13 cavalli se ne va in
pensione...
Se tutto va bene il 10 marzo al meeting ci vengo con una bella 206 nuova di
stecca...
Speriamo...
CiaoZ
P.S. Scusate l'OT, ma era da tanto che non ne facevo, e poi la malinconia...
:(

 pensione...
ha ha ha ... la mia va ancora ... ha ha ha

 ha scritto nel
messaggio news:9612ar$2r7u$1...@stargate1.inet.it...


stecca...
e io con chi divido le spese di benza e olio? La mia povera Ibiza consuma come un GTI e trasuda olio
da paura... mmm.... ma ci arriverņ a BO il 10 Marzo??? ;-PPPP
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

Voi andate ancora bene.. io me la faccio tutti i giorni con il mio Booster NG con le carene rigate
(piccoli incidenti di percorso)... ma intanto mi porta in giro... ;-)
L'anno prossimo arriva la macchina... spero!!! :-P
Ciao a tutti
    +ALE+


da paura... mmm.... ma ci arriverň a BO il 10 Marzo??? ;-PPPP
Io chiedo ancora se č possibile avere una piantina (tipo quelle di guerra
con le bandierine) con tutti i luoghi di partenza e possibili percorsi, in
modo da ottimizzare spese e viaggi in solitudine.
Ciao

 ha scritto nel
messaggio news:9612ar$2r7u$1...@stargate1.inet.it...


da paura... mmm.... ma ci arriverň a BO il 10 Marzo??? ;-PPPP
Io ho risolto con un paio di nike :)
Ciao
Aldo

 Io ho risolto con un paio di nike :)
vieni in nike a bo ?
pero'...
non trasudano piu' olio ?

non trasudano piu' olio ?
piu' che altro consumano un po' di battistrada ...
Ciao
Aldo

modo da ottimizzare spese e viaggi in solitudine.
Autoroute Express: è bello perché praticamente considera le distanze quasi in linea d'aria: una
volta mi ha consigliato un pecorso per andare in montagna che era una bomba!: peccato che non ha
considerato che sotto quella bella linea retta c'erano 2 passi montani tante di quelle curve e che
quindi la velocità di 80Km/h di media non era fattibile... ;-))
Però per arrivare a BO non ci sono troppi passi da scalare... ;-))))


 Lorenzo
CiaoZ
SebaMix
[...]
Newsgroup: it.comp.lang.visual-basic
Titolo: Codici a barre e VB

Salve a tutti, c'č qualcuno che ha affrontato la problematica della stampa
di codici a
barre con VB6 su stampanti ad aghi?
Io ho provato diversi sorgenti e font che funzionano
(piů o meno bene) con stampanti laser e a getto. Ma gli stessi, con
stampanti ad aghi installate correttamente, producono codici a barre
illeggibili.
C'č qualcosa che non so (e dovrei sapere)?
Grazie in anticipo
Lino


Si... che con le stampanti ad aghi non si stampano i codici a barre.
Altrimenti le varie macchinette stampa etichette non avrebbero senso di
esistere.
Ciao, Vincenzo

 esistere.
Noi lo facciamo da anni su delle epson senza alcun problema :) perň 
stampiamo direttamente sull'LPT senza passare dal pooler di stampa, 
anche se non credo possa centrare molto.
Ciao
-- 
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

[Lino = 
circa_be...@datek.it
 in ca3pm2$9bc$
1...@fata.cs.interbusiness.it
]
ha scritto:

Che una stampante ad aghi, per stampare decentemente un codice a barre, di
aghi ne deve avere tanti e tutti bene allineati, all'andata e al ritorno...


Scusa Zanna, ma per stampare 300 etichette quanto ci mettete?
Noi usiamo prevalentemente stampanti ad impatto o a trasferimento termico
che oltre ad enormi vantaggi in termini di velocità e leggibilità, riescono
a garantire anche maggiore durata nel tempo e a diverse condizioni
ambientali.
Ciao, Vincenzo

 ambientali.
Noi abbiamo il problema di stampare etichette che resistano a lavorazioni
come lavaggio, cosa impossibile per etichette di carta.
Infatti stampiamo su un rotolo di tessuto "cerato" particolare che per ovvie
ragioni non può essere inserito in una stampante laser :)
La leggibilità è comunque ottima, anche se alcuni lettori laser fanno fatica
a causa del supporto.
Ciao
--
NeoDataType : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 C'č qualcosa che non so (e dovrei sapere)?
Purtroppo le stampanti ad aghi sono poco precise e l'inchiostro tende a
spandersi sul foglio. Le stampanti agetto di inchiostro (quelle di ultima
produzione) possono migliorare la resa, ma il top č sempre la stampante
laser.
Se perň la utilizzi dei codici a barre molto grandi (esempio quelli che si
mettono sui colli di spedizione) allora una stampante ad aghi di nuova
generazione puň andar bene.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it
Newsgroup: it.comp.lang.visual-basic
Titolo: creare shortcut

Salve.
Ho il problema di scrivere un programma che crea uno shortcut in una
cartella dell'HD, ad esempio sul desktop, noto il percorso da linkare.
So che esiste una API che fa una cosa del genere. Qualcuno sa dirmi qual'e'?
dove trovarla? come usarla?
Grazie per ogni suggerimento
Pietro

Declare Function fCreateShellLink Lib "STKIT432.DLL"  (ByVal lpstrFolderName
as String ByVal lpstrLinkName as String _
ByVal lpstrLinkPath as String  ByVal lpstrLinkArgs as String )  As Long
iLong = fCreateShellLink("PercorsoDoveCreareIlLink",  "TestoLink",
"C:\percorso\file.exe","")

ho letto il messaggio sul ng di vb ma ho il seguente problema:
ho dichiarato l'api che usavo:
Public Declare Function fCreateShellLink Lib "STKIT416.DLL" (ByVal
lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As
String, ByVal lpstrLinkArgs As String) As Long
e ho messo questo nell'evento click di un pulsante
ilong = fCreateShellLink("C:\WINDOWS\Menu Avvio\Programmi\Esecuzione
automatica", "TestoLink", "C:\ttt.txt", "")
MsgBox ilong
il prolema è che mi dice che non trova il file STKIT416.DLL. ho provato col file
VB5STKIT.DLL e in questo caso il file veniva trovato ma non veniva creato il
collegamento... non so cosa ci sia di errato anche perchè se provo a fare un
link col desktop questo viene creato.
se sai qualcosa ti prego, rispondimi: sono disperato!!!
grazie cmq
Gian Luca Dei ha scritto:

--
By matteo(olè)
Mail to: 
ori...@libero.it
 
vuoiunscinquant...@yahoo.it

Prova così:
Public Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal
lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal
lpstrLinkPath As
String, ByVal lpstrLinkArgs As String) As Long
 ho solo messo il 32 al posto del 16 (infatti nemmeno io ho il file
stkit416.dll, ma il file stkit432.dll si)
Non so se funzionerà.
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: AiutO!! Creazione file .exe

Ciao a tutti...
ho bisogno del vostro Prezioso Aiuto!!
ho realizzato un progetto VB6 per poi compilarlo in .exe
la compilazione ha avuto esito positivo, ma poi quando cerco di far eseguire il
fil su  un altro PC (che non ha Visual Studio installato) mi vengono segnalati
diversi errori di dll mancanti
Che devo Fare???
nel progetto ho usato alcune OLE contenute nel VB6.. niente di particolarmrnte
sofisticato...MSchart ..MsCommon
MI AIUTATE?????
Vi Ringrazio di Cuore!!!
Grazie a tutti!!
-- 
Posted from 
ppp-10-244.27-151.libero.it
 [151.27.244.10] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
Tra gli strumenti di vb cerca "Creazione guidata pacchetti di installazione"
Questo programma ti genera una serie di file che procedono ad installare 
il tuo eseguibile e tutti i files necessari perche' possa essere 
eseguito su un pc privo di VB.
Di solito le impostazioni predefinite sono sufficienti per la maggior 
parte dei programmi.
La versione educational di vb non permette di creare pacchetti!!!
ciao
		maxx
Newsgroup: it.comp.lang.visual-basic
Titolo: VB.NET - cast array/matrici

La dichiarazione (con l'opzione: Option Strict On)
Dim c() As Byte = Array.CreateInstance(Type.GetType("System.Byte"), 
b.Length - nSkip)
mi da il seguente messaggio d'errore:
Option Strict On non consente conversioni implicite da "System.Array" a 
"Matrice a 1 dimensioni di Byte."
Il problema č che non riesco (o meglio non so, con gli array vado in loop) 
ad effettuare il cast ....
Se tolgo "Option Strict On" funziona tutto correttamente (ossia il cast al 
volo funziona), ma preferirei rendere il tutto esplicito .
Qualche suggerimento?
Grazie
Andrea


Dim c(b.Length - nSkip) As Byte
Ciao

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

Vai che posto anche io una richiesta....
Antefatto... Sw in vb6 che genera gallerie fotografiche e le pubblica
su un sito web....
Le anteprime delle dir contenenti le foto come le ho fatte?
Mi son fatto un controllo...che carico a runtime per ogni foto...
Nel controllo c'ho schiaffato 1 picture....dentro un altra picture...e
una label(che eliminerò avendo imparato as usare DrawText)
Poi...per la prima volta mi son messo a studiare un po di GDI+.....cmq
Alla fine....con la GdipLoadImageFromFile carica l'immagine...la
ridimensiona....con altra roba trova se ci sono le info EXIF...
insomma alla fine fa quello che mi pare a me (a prezzo di un bel mal di
testa)
Adesso ho una info da stampare sotto l'immagine del tipo
PincoPallino.Jpg
Ris. 1024x768
L'ho messa nella label....non mi piace....
mi son rimesso a studiare....
ho usato
DrawText Picture1.hdc, ret, Len(ret), MyRect, DT_VCENTER Or
DT_WORDBREAK Or DT_CENTER
 e son soddisfatto!
al 99%
Adesso devo arrivare al 100%
e chiedo (ho finito l'aspirina)!....
Essendo il controllo a dim fissa... 120 pixel...il testo deve essere
stringato e visibile...ho usato Terminal come font
Il dato da stampare ha la struttura
nomefilefoto +  vbcrl f+ risoluzione
BENE....l'interlinea è troppo bassa (ad es. La "g" tocca l'1 della
riga sotto)...vorrei staccarla di 1 (UNO)pixel in più....come cavolo
la cambio l'interlinea???
A quale altra api devo rivolgermi???

 A quale altra api devo rivolgermi???
Ciao Wodka40,
Non credo che tramite la drawtext ti permetta di modificare l'external 
leading.
Quel valore, infatti, č gestito a livello di metrica di sistema.
Comunque, se vuoi aumentare il tuo mal di testa, parti da qui:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/fontext_56yb.asp
Il mio consiglio, invece, č banale: dato che scrivi sempre su due righe, 
usa due DrawText separate, impostando a tuo piacere l'angolo superiore di 
partenza della seconda riga.
Non č pulitissimo, ma semplice ed efficace..
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca
 

 Ciao
Ciao e grazie delle info!

Newsgroup: it.comp.lang.visual-basic
Titolo: [?} Repliche

Ho un adtabase Access da condividere tra 2 postazioni lontane (Roma e
Milano), collegate tra loro via modem.
La sincronizzazione puo' avvenire una - due volte al giorno.
Conviene utilizzare le repliche?
Se si', meglio utilizzare la sincronizzazione (e sottodomanda: ogni
volta viene copiato tutto il database o solo le variazioni?)?
Ci sono problemi nell'uso di questi comandi (a parte quelli di gestione
dei conflitti)?
grazie
		maxx



 wrote in message
39F45D7A...@laserinforma.com...

Personalmente ho evitato di usare le repliche perchè Access97 non permetteva
di replicare un database protetto da Password.
Ciao =)

 ha scritto nel messaggio
news:8t3jqs$1tv$1...@lacerta.tiscalinet.it...


Per utilizzare le repliche sono passato ad Access 2000, che contiene un
diversi wizard che semplificano la vita.
Nella replica sei tu a specificare cosa e quanto replicare. Nel mio caso
ho replicato tutto il DB e la dimensione del db replica è praticamente
uguale all'originale.
Per utilizzare le repliche ho dovuto modificare i contatori dal formato
Integer al
formato "Id Replica".
Ultima informazione, il Db in Access 97 era 700 K, aggiungendo la
protezione a livello utente e la replica è diventato di 1600 k. 
	Lore.



Prima o dopo la compattazione?
Ciao,
Alessandro

 Prima o dopo la compattazione?
Dopo.
	Lore.
Newsgroup: it.comp.lang.visual-basic
Titolo: [Meeting+java]

Sono ormai 3 anni che ci si becca sul NG e non ti sei degnato di venire a
nessun Meeting :-PPPP ergo non ci siam mai dati una sana stretta di mano
Non mi pare di averti visto nella lista degli iscritti.
Pretendo che tu domani ti iscriva...!!!!! :-)
Simpaticamente...
David
-- 
"Le persone non sono il proprio comportamento: devi sempre andare oltre,
essere flessibile, capire il punto di vista degli altri, interpretarne i
comportamenti ed intuirne le esigenze."
Per rispondere in privato elimina dall'indirizzo "togliquesto"
MasterDavidex - David Ruscelli

 David
+ Gigio
-- 
-Gigio@Work(?)-

 + Gigio
Lupo non ci prova più...
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare con i moduli in continuo ... :(

Ciao a tutti,
volevo sapere se è possibile ricavare/modificare informazioni "particolari"
sulla stampante ad aghi collegate al computer (es: tipo di pagina settata,
salto pagina, perforazione ecc.).
Devo stampare su moduli in continuo di diverse dimensioni, perforazione e
quindi cambia il salto pagina, posso modificare queste opzioni 'on fly',
ovvero posso programmare la stampante a basso livello (per indenderci, posso
settare per esempio di ignorare il salto pagina, i font, le dimensioni della
pagina ) ??
Ho provato con i classici comandi printer, ma non mi soddisfano perchè ogni
tot di pagine devo aggiungere o togliere una riga, ottenendo una stampa
molto sommaria, mentre ho bisogno di una stampa super precisa ...
Grazie
ThK  ;)
CyberShadow
PS (Uso VB5 SP3)



Ho provato con i classici comandi printer, ma non mi soddisfano perchč ogni


Ed è anche molto più veloce.

 rete), come posso, aprendo sempre LPT1, stampare su di essa?


Grazie
Ciao,
penso che molte cose le puoi settare inviando direttamente alla stampante
delle sequenze di ESCAPE nella forma chr$(27)+chr$(...)+chr$(...)
Es:
dim intFile as Integer
intFile=FreeFile
open "LPT1;" for output as intFile
print #intFile, chr$(27)+chr$(...)+chr$(...)
print #intFile, ' riga vuota
print #intFile, "Prova di stampa"
close #intFile
Le sequenze di ESCAPE le ricavi dal manuale della stampante,
teddy...@hotmail.com
ICQ 7044062
Como - Italy

Newsgroup: it.comp.lang.visual-basic
Titolo: Report dinamici in VB

Salve a tutti del N.G.
Avendo la necessità di costruire, di volta in volta, vari report con
dimensione e contenuti diversi, ho cercato di usare sia l'oggetto Printer
che i comandi per access del tipo:
Dim rpt as Report
Set rpt = Createreport
ecc.
Il risultato è quasi scadente in entrambi, nel senso che, con l'oggetto
printer non si ha il controllo sulla pagina come in access mentre in access
alcune proprietà come scalemode e impostazioni di stampa non le riesco a
settare.
Qualcuno mi puo' dire se esiste un'altro modo per generare le stampe, sempre
in tempo reale?
Grazie per aver letto.
Klaus Dobermann
doberm...@tin.it

in tempo reale?
Printer, printer, printer, fortemente printer ;-)
-- 
ciao, hal

 ha scritto nel messaggio
news:ac7t1n$namce$1...@ID-56381.news.dfncis.de...

Mi permetto di aggiungere: Printer.Print, Printer.Print, Printer.EndDoc
;-)))

 wrote in message
ac7t1n$namce$1...@ID-56381.news.dfncis.de...


 stampa.
Crei un PictureBox, gli assegni, da codice, le dimensioni e l'unità di
misura della Printer che hai selezionato e la tratti come se fosse il tuo
foglio di stampa. Invece di Printer.Print, farai Mia_Picture.Print.
Newsgroup: it.comp.lang.visual-basic
Titolo: Limite nel numero di controlli per ogni FORM

Qualcuno di voi e' a conoscenza di un limite nel numero di controlli
utilizzabili in ogni. Devo realizzare un programma con piu' di 250 controlli
(circa 300) di cui molti sono in forma di array di controlli. Utilizzando VB4
spesso e volentieri Visual Basic si blocca inspiegabilmente durante la LOAD
della FORM, sia utilizzando l'eseguibile sia lanciandolo dall'ambiente Visual
Basic.
Qualunque consiglio sara' ben gradito.
Devo decidere a breve se acquistare una versione di Visual Basic piu' recente
sperando che il problema non sussista piu' o splittare la form in 3 form da
100 controlli l'una, allontanando dalle specifice che avevo di base.
Vi ringrazio in anticipo
Salvatore Labonia
slab...@yahoo.com
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

(circa 300) di cui molti sono in forma di array di controlli.
Non puoi usare una dbgrid?
Un'altra soluzione - certamente piu` "sporca" - sarebbe quella di
visualizzare
sullo schermo piu` form come se fossero uno solo.
Ciao!
Luca Anselma

100 controlli l'una, allontanando dalle specifice che avevo di base.
Il problema non e' tanto di VB, e' della tua applicazione.
L'unico consiglio che ti posso dare e' di riorganizzare l'interfaccia utente
ed utilizzare molti meno controlli (io non andrei MAI sopra i 100!).
--
Roal Zanazzi
z...@iol.it

Ho letto da qualche parte che il limite in sicurezza è di 255 (forse)
Ma che programma è che usa 300 controlli?
ciao
Marco Camplese
WEB: 
http://space.tin.it/computer/macample
per la posta privata eliminate NONROMPERE

...

Aggiungo altre considerazioni...
Nella maggior parte dei casi una piu' oculata scelta dei controlli da usare
aiuta nella diminuzione del numero dei controlli presenti su una form:
-) selezione di una opzioni su N (con N > 5~6)
e' molto piu' "economico" utilizzare una listbox (o combobox, che occupa
meno spazio), piuttosto che un frame con N OptionButtons.
-) nella visualizzazione di molti record da un database e' meglio usare una
Grid (DBGrid o simili), piuttosto che "simularla" con una marea di
textboxes.
-) usare quando possibile controlli "leggeri" (label e image), che, non
avendo un hWnd associato (non sono finestre di Windows), utilizzano meno
risorse.
Es. per dati in sola lettura usare una Label invece di un TextBox con Locked
= True.
Queste sono solo alcune linee guida da seguire nella creazione di una
interfaccia utente, ti serviranno per darti un'idea di come procedere per
snellire la tua form.
300 controlli.... ancora non ci credo!!! :-)
--
Roal Zanazzi
z...@iol.it
Newsgroup: it.comp.lang.visual-basic
Titolo: stampa di una stringa centrata nel foglio

hem.. ho un piccolo problemino...
devo stampare una stringa (che viene immessa dall'utente e quindi ha un
numero caratteri variabile) con orientamento centrato nel foglio...
con printer.currentx e currenty questo non è possibile, o almeno risulta
molto complicato e poco preciso (mi calcolo in qualche modo il numero di
spazi che devo inserire prima per far apparire la stringa alquanto centrata
nel foglio..)
qualcuno sa suggerirmi qualcosa di meglio? :
grazie 1000

 ha scritto nel messaggio
news:bFeTa.21017$sj6.4...@tornado.fastwebnet.it...


 grazie 1000
prova ....
printer.currentx=(printer.scalewidth-printer.textwidth(tuaStringa))/2+printe
r.scaleleft
ovviamente sostituisci tuaStringa con quello che devi stampare :)
--
_,,=~같~=,,_,,=~같~=,,_
byZ, doGmaI
ICQ#170836495
_,,=~같~=,,_,,=~같~=,,_

Newsgroup: it.comp.lang.visual-basic
Titolo: RichTextBox su windows98

a qualcuno è capitato di avere problemi con un richtextbox su win98?
il problema consiste nel fatto che le righe di testo vengono mostrate
consecutivamente ignorando cioe' i ritorni a capo, cosa che invece non
accade se il programma viene eseguito su win 2000 o xp o altri.
se qualcuno ha una soluzione al mio problema e potesse comunicarmela
gli sarei immensamente grato visto che ho una scadenza molto
ravvicinata per la consegna!
giuseppe

Io ho lavorato sotto win98 con la RTB ma non ho mai avuto problemi di questo
tipo. Se vuoi un esempio lo puoi scaricare da qui:
http://www.it-lang-vb.net/archivio.asp?subMenu=Tutte&FullText=on&TypeRic=AND&keyword=texteditor
è un mio progetto messo sul Sito Comune.
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it



Non ho avuto problemi direttamente, pero' una possibile causa (sottolineo
possibile) e' che su Windows 98 sia in uso la dll del rich text box 1.0, su
Windows 2000 e XP la 2.0 o superiore.
Una differenza sostanziale tra le due versioni e' che la 1.0 per il ritorno
a capo vuole la coppia CR + LF, dalla 2.0 in poi solo CR.
Non so se ti e' d'aiuto....
Stefano "HappyMan" (Lake Maggiore - Italy)
-- 
The Personal Framework for Object Oriented Windows Development (Win32)
http://www.sgr.info
Email happyman69 (at) 
despammed.com