mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: approssimazione numero reale

Ho il bisogno di approssimare un numero reale alla seconda cifra decimale in
base alla terza come è possibile?

 decimale in base alla terza come č possibile?
Nuovo_Numero=Round(Vecchio_Numero,2)
oppure
Nuovo_Numero=(Fix(CLng(Vecchio_Numero)*100.0)/100.0)
Se invece era solo un problema di visualizzazione, e non di approssimazione
fra numeri, bastava usare il format$.
Alberto

 base alla terza come č possibile?
Function Arrotonda(Numero As Double, CifraDec As Integer) As Double
          Arrotonda = Int(Numero * (10 ^ CifraDec) + 0.5) _
                             / (10 ^ CifraDec)
End Function
Credo possa andare bene...

 Nuovo_Numero=(Fix(CLng(Vecchio_Numero)*100.0)/100.0)
Emh...
Scusate:
Nuovo_Numero=(Fix(CDbl(Vecchio_Numero)*100.0)/100.0)
Ciao
Alberto

 decimale in base alla terza come è possibile?
Una curiosità: quel numero rappresenta per caso una quantità di denaro?
--
Ale
La RFD originale per it.comp.dotnet su
http://www.sen.it/stoa/articles.asp?id=10
Se vuoi discuterne, vai su it.news.gruppi


funzione round
--
bye BlackMagic
ICQ# 85485468

Newsgroup: it.comp.lang.visual-basic
Titolo: sequenza sonora a tempo

salve a tutti,
mi sto esercitando con 
vb.net
 e sto realizzando una piccola versione di 
"simon".
sono riuscito a trovare la classe per far "suonare" un file wav, ma 
secondo voi per ottenere una sequenza di suoni più o meno veloce a che 
cosa mi potrei affidare? ho fatto la prova inserendo una pausa tra un 
suono e un altro (system.thread.thred.sleep) ma non mi sembra una 
soluzione molto pulita...
avete qualche suggerimento?
ignazioC

 cosa mi potrei affidare?
Per fare che?
Ciao
--
Reporting tool: 
http://www.neodatatype.net

 "simon".
Se ben ricordo, simon generava semplici toni puri, per cui, potresti
affidarti semplicemente all'API beep lasciando perdere i wav, con essa puoi
decidere la durata e la frequenza di un suono, non ti serve altro.


il fatto è che i suoni, via via che passa il tempo vengono riprodotti 
sempre più velocemente.
se volessimo fare un paragone musicale, all'inizio del gioco il tempo è 
un 60 battute al secondo, dopo un minuto sono 110.
è chiaro che è solo un esercizio...

 sempre più velocemente.
Ti basta ridurne progressivamente la durata e avrai quello che cerchi.

  [......]
si ...... ma non funziona sui win9x
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con DB access97 e WinMe

Ciao a tutti e  ben tornati dalle vacanze....
Arrivo al sodo, mi è successo questo:
ho un database creato in Access97, con una tabella "Tab_Anagrafica" avente
un campo contatore che si chiama "An_Codice". Questo DB viene     Aggironato
e/o modificato tutto da Codice VB6, tutto in ambiente Windows ME. Mi è
capitata una cosa stranissima, vado per aprire la tabella     e mi accorgo
che nel campo contatore ci sono una ventina di Codici Uguali!!!!!!! Ma come
è possibile se il campo essendo contatore ha come     proprietà "Duplicati
non Ammessi"!!!!!!!!
Avete voi una Spiegazione e un eventuale rimedio?

 wrote in message
9m37o7$ujs$1...@nreadb.inwind.it...


 wrote in message 9m3a52$ve7$1...@nreadb.inwind.it...


 ha scritto nel messaggio
news:9m37o7$ujs$1...@nreadb.inwind.it...

Sì, butta via i campi contatore.
ciao
ugo


Uhm, max ma sei tedesco?
A parte questo, la proprieta' duplicati non ammessi l'hai messa tu? Il campo
e' primary key o solo un indice?
Ciaotutti,
*

 wrote in message
9m2ulr$1i55$1...@ID-68324.news.dfncis.de...



Meglio per cosa?
Se deve essere l'identificatore univoco e il principale criterio d'ordine,
e' meglio primary key, se il principale criterio d'ordine e' a sua volta un
identificatore univoco e' meglio usare quello come primary key, se il
principale criterio d'ordine non e' univoco e' meglio creare un
identificatore univoco e farne la PK.
Cmq con la PK sei sicuro che non ci sono duplicati, soprattutto perche' sei
certo di quanti siano i campi che compongono l'indice.
Ciaotutti,
*

 Sì, butta via i campi contatore.
Figurati, i campi contatore in condizioni normali funzionano benissimo.
Quando si verificano problemi di sistema (sbalzi, alimentazione, etc.) o il
PC funziona male, comunque tu abbia costruito la chiave primaria avrai
problemi.
Ciao, Simone

Newsgroup: it.comp.lang.visual-basic
Titolo: Info su [mdac_typ.exe]

Chi sa dirmi cosa installa questo eseguibile? O meglio mi installa anche le
DAO?

Installa tutte le librerie di Accesso ai Dati che servono, cioč ADO, DAO e
altra roba che eprň non so cosa sia(io ho sempre solo usato questi due).
Installarlo evita tantissimi problemi di installazione.
SIMO
--
__________________
www.sasim.net
* Server IRC : 
irc.azzurranet.org
 --> Canale: #it_lang_vb
* Sito Comune Ng: 
http://www.it-lang-vb.net
* Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt
* I vecchi messaggi su: 
http://groups.google.com/


 altra roba che eprò non so cosa sia(io ho sempre solo usato questi due).


 > > DAO?

 > > altra roba che eprň non so cosa sia(io ho sempre solo usato questi

Newsgroup: it.comp.lang.visual-basic
Titolo: Immagini & matrici

Gestisco una camera CCD per foto digitali tramite il VB. Per la
visualizzazione sullo schermo uso il comando PSET, ma vorrei invece poter
generare una matrice di valori che meglio rappresenta il frame e quindi
convertirla in file grafico (anche BMP va bene) per poi visualizzarlo.
Questo perche' prevedo di fare delle eventuali pre-elaborazioni in
automatico (sottrazione di rumore, ecc...).
Come posso creare una matrice con tale funzione?
Grazie
Salvo


 non e' un buon sistema quello che usi.
 Come prima cosa il vb e' troppo lento per le elaborazioni delle immagini a
questo livello.. cmq se non ti interessa il tempo reale al limite te la cavi
lo stesso.. pero' come primo passo bisogna convertire l'immagine con
appostie trasformate.. Fourier e Z sono le privilegiate ma ce ne sono altre
specifiche piu' efficaci.. e poi fare le varie elaborazioni numeriche di
filtraggio sulle trasformate cosi' ottenute (e quindi su un numero
decisamente ridotto di punti) per poi riapplicare le antitrasformate per la
visualizzazione finale.
Non e' proprio un lavoro banale .. ti consiglio di leggerti "elaborazione
numerica delle immagini" di Vito Cappellini ..edizioni Borighieri.
Legermente ostico da capire ma ricco di esempi pratici.
Se ti serve qualche aiuto a questo riguardo puoi scrivermi direttamente.
Master 
csf...@polaris.it

Newsgroup: it.comp.lang.visual-basic
Titolo: giorni della settimana in italiano

Sto cercando di imparare il VB.net, ma mi sono già impantanato  usando il 
DateTimePicker.
Perchè questo comando, impostando la proprietà format del DateTimePicker in 
Long, mi da il giorno della settimana in italiano?
    MsgBox("giorno " & DateTimePicker1.Text)
Mentre quest'altro me la da in inglese?
    MsgBox("giorno della settimana " & 
DateTimePicker1.Value.DayOfWeek.ToString())
Come posso ottenere la risposta in italiano?

Pasquino ha scritto:

Prova a giocherellare con CultureInfo e poi ne riparliamo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] - ADO password

Ciao,
Come completo la seguente istruzione includendo pero' una password al db
(Access)
Db2002.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data
Source=..\db2002.mdb;")
Grazie.

 ha scritto nel messaggio
news:bk9hhl$arv$1...@newsreader.mailgate.org...

Problema Risolto : Grazie
Ciao
_______________________________________
{30 - Visual Studio.NET and VC++ development }
_______________________________________
Newsgroup: it.comp.lang.visual-basic
Titolo: regserver.exe: dove scaricarlo ?

Ho provato sulla sezione download di msdn ma non ho trovato nulla. Mi
occorre per togliere alcuni documenti activeX di prova. Grazie a tutti.
Stefano
sme...@tin.it
--------------------------------
Inviato via 
http://usenet.iol.it

I documenti ActiveX si tolgono da Explorer, in Impostazioni - Visualizza
Oggetti.
Se invece vuoi togliere degli OCX o delle DLL, puoi usare regsvr32,
incorporato nel S.O.
Ciao
Alberto

 occorre per togliere alcuni documenti activeX di prova. Grazie a tutti.
se cerchi *regserver* è un po' difficile...
magari se cerchi *regsvr32* lo trovi ;)
ce lo dovresti avere nientemeno che nella dir di sistema, se non te lo trovi
scaricatelo da qui
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q267279
--
Ciao, Silv:o)

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

Ciao, Silv:o)
--------------------------------
Inviato via 
http://usenet.iol.it
 

 regsvr32...
Mi sfugge qualcosa...
A me i documenti ActiveX non vanno nei riferimenti, in quanto vengono
registrati nel container e non dal sistema operativo direttamente.
Non è che stai confondendo Documenti ActiveX con Exe ActiveX?
Oppure c'è una modalità di utilizzo dei Documenti ActiveX che richiede la
registrazione, e che io non conosco????
Comunque Regserver non l'ho mai usato, e sinceramente non saprei dove
trovarlo.
Ciao
Alberto

 ma propriamente "regserver" per gli exe com.
non è che ti confondi con l'opzione /RegServer che aggiunta come argomento
sulla linea di comando di un com server exe permette l'autoregistrazione del
componente?
vedi
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/com/comext_
5wa6.asp
--
Ciao, Silv:o)

Ciao, Silv:o)
--------------------------------
Inviato via 
http://usenet.iol.it
 

 non mi dà neanche messaggi d'errore..!
Per pulire il registro da riferimenti "orfani" (che a volte causano
"incertezze" a windows stesso! incredibile!) puoi usare M$ RegClean 4.1
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Access e Excel

* Ho Visual Basic 6.0 versione Enterprise, come faccio ad aggiornarlo per
poter aprire Access 2000?
* Come faccio a posizionarmi sull'ultima riga di un foglio excel senza
doverlo scorrere tutto, e per riposizionarmi sul primo. Per intenderci
quelle istruzioni che su access sono movefirst e movelast.
Sto usando questo tipo di accesso per xls:
 'Dimension variable x as object type
Dim x As Object
  'Set x equal to Microsoft Excel Application object
   Set x = GetObject("", "Excel.Application")
  'Open workbook BOOK1.XLS
   x.Workbooks.Open Form1.Text2.TextDim x As Object
Grazie in anticipo.
Ciao.
Luca.

    x.Workbooks.Open Form1.Text2.TextDim x As Object
La scrittura del codice verrebbe molto semplificata se invece di usare il
"Late Binding" usassi aggiungere ai riferimenti del progetto la "libreria"
di Excel, usufruendo cosi` anche dell'aiuto dell'intellisense. Ottenendo
anche un codice piu` veloce in esecuzione.
Potresti cosi` scrivere:
    Dim xlApp As Excel.Application
    Dim xlWbk As Excel.Workbook
    Dim xlWks As Excel.Worksheet
    Set xlApp = New Excel.Application
    Set xlWbk = xlApp.Workbooks.Open("c:\documenti\cartel1.xls")
    Set xlWks = xlWbk.Worksheets.Item("Foglio1")
    <...>
    Set xlWks = Nothing
    xlWbk.Close
    Set xlWbk = Nothing
    xlApp.Quit
    Set xlApp = Nothing
Per quel che riguarda gli spostamenti... non servono. Non occorre spostare
nulla perche' e` gia` tutto in memoria. E` semplicemente una matrice di
righe e colonne quindi l'accesso e` diretto, basta conoscere le coordinate.
O relativo, partendo da una cella ottieni un'altra cella in base ad uno
scostamento (offset).
Per esempio, se vuoi conoscere il valore contenuto nell'ultima cella piena a
partire da una cella di coordinate 5, 3 (riga 5, colonna 3), non devi far
altro che usare una di queste notazioni equivalenti:
    With xlWks
      Debug.Print _
        .Range(.Cells(5, 3), .Cells(5, 3)) _
            .End(xlDown).Value
      Debug.Print _
        .Range("C5") _
            .End(xlDown).Value
      Debug.Print _
        .Range("A1").Offset(4, 2).Resize(1, 1) _
            .End(xlDown).Value
      Debug.Print _
        .Cells(5, 3) _
            .End(xlDown).Value
    End With
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

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

Come faccio a inserire un testo in una MsgBox o InputBox a più righe ?
Si usa Chr ?!? Come ?
Grazie 1000

Grazie 1000
Ci butti tra una riga e l'altra il classico vbCrLf
Call MsgBox("Riga1" & vbCrLf & "Riga2", "", vbOkOnly)
Ciao.


Oppure
Ci butti tra una riga e l'altra l'altro classico chr(13)
MsgBox "Riga1" & Chr(13) & "Riga2" & vbOKOnly
Ciao.

basta vbLf
-- 
;) G. Chiappori (ICQ 30904878)
webm...@chiappori.net
http://www.chiappori.net

 wrote in message
7h1hqb$mkl$1...@fe2.cs.interbusiness.it...



E' vero sotto Win32 basta l'Lf ma così siamo più tranquilli, tanto non costa
niente :)
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: impossibile trovare ISAM installabile

' ho un file archivio.mdb con dentro una tabella attuali, la apro con questa
'procedura:
 ' Visual Basic 6 SP4
 ' in Progetto / Riferimenti ho attivato:  Microsoft AcriveX Data Objects
2.5
 Library
 Dim rs As New ADODB.Recordset
 Private Sub ApriRS()
   rs.CursorLocation = adUseServer
   rs.Open "SELECT * FROM attuali;", _
                "Provider=Microsoft.Jet.OLEDB.4.0;Data
 Source=c:\archivio.mdb" , _
                 adOpenKeyset, adLockOptimistic
 End Sub
 Private Sub Form_Load()
   Call ApriRs
 End Sub
 Private Sub Form_Unload(Cancel As Integer)
   rs.Close
 End Sub
 ' perchè quando provo a mettere una password=prova all'archivio e cambio
 procedura per
 ' aprirlo mi da sempre errore: Impossibile trovare ISAM installabile.
 ' qualcuno sa dirmi il motivo?? Grazie. Ciao......
 Private Sub ApriRSPassw()
   rs.CursorLocation = adUseServer
   rs.Open "SELECT * FROM attuali;", _
                "Provider=Microsoft.Jet.OLEDB.4.0;Data
 Source=c:\vb\archivio.mdb;pwd=prova", _
                 adOpenKeyset, adLockOptimistic
 End Sub

 wrote in message FLfw6.33434$lT1.5...@news2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Cancellazione tabella

Salve a tutti,
vi chiedo un aiuto,come posso cancellare una tabella (non solo i record,ma
tutta la tabella fisicamente) in un database tramite codice di VB6?
Grazie dell'aiuto!!
Ubo

Grazie dell'aiuto!!
Puoi lanciare un comando SQL, precisamente questo
DROP TABELLA. Ma considera che questo tronca tutto, e se hai sbagliato
tabella....pazienza :))
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
 

 wrote in message
985f1t$id5$1...@fe1.cs.interbusiness.it...


 ha scritto nel messaggio
news:157Z29Z81Z46Y...@usenet.iol.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Riduzione a icona

E' possibile far tornare un programma alle dimensioni normali dopo che è
stato ridotto ad icona?
Devo usare qualche funzione API?
Grazie a chi risolve questo piccolo problema.
--
Maximiliano Bonsi
maxb...@inwind.it

stato ridotto ad icona?
nome_del_tuo_form.WindowState = vbNormal
-- 
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: SHFormatDrive liberiamogli il drive.

In un form ho collocato i 3 oggetti
Drive1 , Dir1 e File1 che si aggiornano con Drive1.change e Dir1.change
Nel Load del form ho messo : Drive1.Drive="A"
per partire subito da qui.
Dopo aver cancellato qualche file quà e la per ecuperare dello spazio sul
floppy,
posso decidere invece di formattare il tutto con :
Private Sub cmdFormattaButton_Click()
SHFormatDrive Me.hwnd, 0, SHFD_CAPACITY_DEFAULT, SHFD_FORMAT_FULL
End Sub
Ma la finestra di messaggio che mi compare è quella ben nota che dice che l'
unità A è già utilizzata per cui si richiede,per poter formattare,la
chiusura di applicazioni o finestre che "puntino" ad A.
Allora ho pensato di aggiungere Drive1.Drive = "C" come primo comando, ma la
finestra persiste.
Ho pensato che Me.hwnd possa essere il problema dal momento che il comando
parte da un form di VB e, forse, vado a spanne, dovrei recuperare l'hwnd
della finestra di Win per la formattazione... ma come si fa ?
Oppure le soluzioni sono altre?
Grazie.
--
Gulp ! Forse mi sono perso qualcosa !
Per rispondere via E-mail togli la x da 
xd...@cyberjunkie.com

 posso decidere invece di formattare il tutto con :
Dunque, ho fatto la stessa cosa con un paio di variazioni:
1)non sono andato in giro a cancellare file
2)ho chiamato l'api in questo modo    
SHFormatDrive Me.hwnd, 0, SHFD_CAPACITY_DEFAULT, SHFD_FORMAT_QUICK
(poi però ho avviato una formattazione completa)
3)al load ho impostato il drive in questo modo:
Drive1.Drive = "a:"
Secondo me, l'unica cosa che fa la differenza (ammesso che anche tu
abbia win2k sp3
e vb6 sp5) è quell'andare in giro a cancellare file all'inizio...
Come l'hai fatto? 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Come l'hai fatto?
Se accedo anche solo in lettura con l'oggetto File1, accedo ad A, se
cancello qualcosa sempre selezionando in File1 grazie ad una Sub, accedo a
drive A...me se alla fine decido che lo spazio recuperato non mi basta e mi
servono 1399 Kb... decido di formattare: Niet !
Vuoi che non sia possibile fare in modo che un'applicazione (in questo caso
Form1 o suoi componenti e routine) possa accedere al drive A e poi lo possa
finalmente lasciare libero?
Ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: La funzione SE in Excell

Salve a tutti
avrei bisogno di una dritta che non riesco a risolvere.
Avendo due cartelle di lavoro in excell, in cui in una ho zone  e date
di prelievo materiale e nell'altro solo le date volevo fare in modo
che alla compilazione delle date, nella prima cartella, in automatico
mi si compilasse anche quella relativa al riassuntivo delle date.
Ho provato con la formula "se", ma non ottengo un gran che, anzi mi
ritornano degli errori.
Volevo sapere se c'è una possibilità di automatizzare quanto sopra
descritto.
Grazie
Pino

A parte che sei ot. Hai pensato di dare un occhio alla guida
di excel e vedere se trovi la risposta?
Comunque prova a farti delle macro o addirittura delle routine
vba.
Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere i file di testo scritti da VB con Excel. Possibile ?

Salve, è possibile scrivere dei file di testo con VB6 e poi aprirli da
Excel, sempre come file di testo ?
Vb6 li scrive con la virgola, ma Excel non riesce a leggerli bene.
C'è un altro modo per far dialogare Vb6 ed Excel attraverso i file di testo
?
In alternativa, c'è un controllo a griglia editabile simile ad Excel da
usare in VB, ma gratuito ?
Il FlexGrid sarebbe perfetto, ma non è editabile.
E' quasi un mese che cerco di risolvere questo odioso problema !
Grazie a tutti

 ?
Prova a scrivere il file con un separatore diverso,poi da Excell lo importi
e specifichi che separatore hai usato...
Ciao
    Ale

 ha scritto nel messaggio
news:ald80h$4c5$1...@lacerta.tiscalinet.it...


Ho provato col <tab> ma succede che Excel quando salva il file in txt tronca
ogni colonna a 10 caratteri. C'è un modo per aumentare tale limite ?
Grazie


Ho provato tutti i separatori, ma non riesco a far salvare ad Excel un file
di testo leggibile anche da VB o viceversa.
"Axel" <ale...@RIMUOVIMIadamello.it> ha scritto nel messaggio
news:alf7us$r72$1...@monty.lombardiacom.it...


 testo ?
    Excel:
        Dati > Carica dati esterni > Importa file di testo...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.lang.visual-basic
Titolo: Ho creato una dll ma..... :((

Ciao a tutti
sto provando a crearmi una DLL con le mie funzioni, ma prima ho
provato a farne una di prova, purtroppo ho già incontrato un
problema....
vi posto il codice della DLL
Progetto: Project1
Modulo:   Class1
Public Function TrovaFile() as String
    TrovaFile=Dir$(App.Path & "/prova.txt")
End Function
e il codice del prg
Progetto: Test
Form:     Form1
Bottone:  Command1
Label:    Label1
Private Sub Command1_Click()
    Dim Test As Project1.Class1    
    Label1.Caption = Test.TrovaFile
End Sub
Faccio per far partire il PC (ho già messo nei riferimenti la DLL)
clicco sul bottone e mi viene il seguente errore:
RUN-TIME ERROR '91'
Object variable or With block variable not set
Cosa ho sbagliato????
Grazie
Ciauz
Fabio

 Cosa ho sbagliato????
Errore tipico degli oggetti non inizializzati.
-----
'Crei il riferimento
Dim Test As Project1.Class1
'Allochi in memoria un nuovo oggetto di quella classe
' ed imposti Test come riferimento a tale oggetto
Set Test = New Project1.Class1
'...
'Fai quello che vuoi con Test
'...
'Deallochi l'oggetto quando non ti serve piu'
Set Test = Nothing
-----
Happy Coding =)
Lokar

 Cosa ho sbagliato????
La descrizione dell'errore non è chiara?
Non hai settato la variabile, l'hai solo dichiarata.
Manca un "As New" nella Dim o ancora meglio un "Set Test = New
Project1.Class"
Càpita ;)
Silv:o)

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con Crystal Report

Salve,
premesso che sono nuovo del newsgroup, vorrei chiedere il vosto aiuto.
Ho realizzato una semplice applicazione in Visual basic 5 (in italiano) che
sfrutta il Crystal Report.
Il programma funziona benissimo sul computer in cui č stato realizzato, ma
se provo ad installarlo su un'altra macchina durante la procedura di
aggiornamento del sistema compare il seguente messaggio d'errore:
Errore durante la registrazione del file 'c:\windows\system\cc245it.dll'
Qulacuno saprebbe aiutarmi a risolvere il problema ?
Grazie in anticipo a tutti
                Gianni

 
Il programma funziona benissimo sul computer in cui è stato realizzato, 
ma

Newsgroup: it.comp.lang.visual-basic
Titolo: Msflexgrid e colorare righe

ho un recordset che popola una msflexgrid
In che modo posso cololare una riga in base ad un valore in un field
del recordset?
Es.: 	Campo1		Campo2
	000001		Vero
	000002		Falso
	000003		Vero
la riga 2 che ha nel campo2 falso voglio colorarla di un colore
diverso.
Si tenga presente che popolo la msflexgrid con additem fino ad Eof del
recordset.
grazie

 del recordset?
con la proprietą CellBackColor
e controllando il valore del campo durante l'inserimento ad esempio!
Mik


il suggerimento č corretto. Aggiungo solamente che la CellBackColor cambia
colore solo alla cella attiva (impostata tramite .Row e .Col), quindi se
vuoi cambiare colore *a tutta la riga* devi farti passare tutte le colonne e
modificare il colore colonna per colonna.
lento e scomodo.....
good coding!!!
-- 
Damiani Liborio Igor
http://www.igordamiani.it
Nella finestra Debug di VB:
Nome="igor":? Nome & Chr$(64) & Nome & "damiani" & Chr$(46) & "it"
Che tu sia maledetto, SWEN...

 lento e scomodo.....
If rigaGiusta Then i = grd.Cols - 1: Do While i: grd.CellBackColor(nRow, i)
= coloreGiusto: i = i - 1
puņ andare?
MIk

Newsgroup: it.comp.lang.visual-basic
Titolo: Operazioni con le date [Vb6]

Ciao A tutti.
Spero qualcuno possa aiutarmi a risolvere un problema che mi fa scervellare 
da un pò
In Vb6 ho creato un'applicazione che dovrebbe fare un controllo delle date 
corrispondenti ad un determinato giorno della settimana.
Ho creato una combo con i 12 mesi dell'anno e sette pannelli con i relativi 
giorno della settimana.
A questo punto, selezionando il mese dalla combo e cliccando su uno dei 
pannelli, dovrei fare in modo
di caricare in una lista a discesa le date relative al giorno cliccato sia 
per l'anno in corso che per l'anno successivo.
In parole piu o meno povere se seleziono AGOSTO 2007 e clicco su Lunedì,
dovrei impostare la funzione che carichi nella listbox le date 
corrispondenti ai lunedi
di agosto 2007 e agosto 2008. In definitiva:
6-08-07
13-08-07
20-08-07
27-08-07
04-08-08
11-08-08
18-08-08
25-08-08
Provo da un pò con dateadd, datediff...ma non riesco a venirne a capo.
Grazie anticipatamente

La butto li:
con la funzione Weekday ti trovi che giorno e' il primo del mese.
Da li, basta che ti trovi il primo giorno che ti interessa, e poi bata 
aggiungere 7.. e cosi' via
ciao... Maurizio 

 Provo da un pò con dateadd, datediff...ma non riesco a venirne a capo.
Dato che i record da scorrere sono minimi io non starei a rompermi le
scatole.
Parti dal primo del mese:
  Weekday (DateSerial(Anno, Mese, 1))
All'ultimo del mese:
  Weekday (DateSerial(Anno, Mese + 1 , 0))
Scansioni tutti i giorni e verifichi la WeekDay se è a posto la aggiungi.
Alla peggio sono 2 for da 31 iterazioni...

"Andrea [Work]" <nos...@invalid.invalid> ha scritto nel messaggio 
news:1plhc5gasldln$.y3tckwwe6ev1.dlg@40tude.net...

Infatti...Grazie a tutti.
Johnny
Newsgroup: it.comp.lang.visual-basic
Titolo: Colorare msgbox e tabStrip

come in oggetto, e' possibile cambiare il colore dello sfondo grigio
delle msgbox e delle tabstrip??
Grazie
Andrea

delle msgbox e delle tabstrip??
I loro colori sono determinati dalle impostazioni di sistema, liberamente
modificabili dall' utente tramite il pannello di controllo.
Se li vuoi di un colore deciso da te, te li devi fare.
ciao, hal

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic 6 / Access

Set dbsCC = OpenDatabase(Path & "\CC.mdb")
Set Clients  = dbsCC.OpenRecordset("Clients")
At any time how can I tell how many records are in Clients?
I have read about .EOF and .BOF and .RecordCount but if 2 user are connected
to the database and one erase all records from clients then the other user
will not have a correct reading from these variables. That is why I ask how
can I tell how many records are in Clients at any time?


Ideally you would want to restrict access to users to do a "mass erase
of all records".
Example:
Customer table
If I have a user click Edit on a record, I have a field in the Customer
table that is a yes/no and I set it to yes if it is already equal to
no. If the field is already set to yes I display a polite message box
that says:
"This record is currently being edited."
Now, dynamically, you could also save a network logon and date to the
table and display the message like this:
"This record is currently being edited by BOB as of 03/16/2005."
Then, if the user is hard-pressed to add notes to the record, they can
call Bob and ask how long they are going to be in the record.
Otherwise, you fall back on the who saves last wins rule.
Does this help?
Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] multiseriali: oltre COM9 è possibile ?

Scusate la replica dopo poco tempo ma.... (scuse varie ... omesse)
Uso una multiseriale a 8 porte e, con le 2 porte standard arrivo alla
COM10.
Tutto bene fino alla COM9: la COM10, quando cerco di aprirla mi dice
"già aperta", se provo a chiuderla mi dice "già chiusa"..... 
E' un problema solo mio (e quindi colpa della driver della
multiseriale) o MSCOMM  toppa ?
Rigrazie
Marco Grignoli

Non so che tipo di multiseriale usi, ma io ho avuto dei problemi causa
occupazione di IRQ della multiseriale, nel senso che quella provata da me
utilizzava un irq x due seriali (tipo COM1 e COM3, COM2 e COM4) dandomi dei
problemi (dovuti a Win9x) nell'accesso a periferiche che stavano su seriali
diverse, ma setsso IRQ !!!
--
Ciaps
Stracca
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------

 Tutto bene fino alla COM9: la COM10, quando cerco di aprirla mi dice
Ciao, io uso senza problemi schede multiseriali da 4 ed 8 porte la mia
limitazione (se si puo' intendere tale) e' che, avendo le prime 4 (e non 2)
seriali di default disponibili sui PC, la mia prima porta della scheda
multiseriale e' la COM5 e non la COM3 come penso sia la tua situazione, se
possibile ti consiglierei di configurare le tue seriali da COM5 a COM12
(come capita a me).
Il problema potrebbe anche essere dovuto agli interrupt, la multiseriale che
uso io utilizza un solo interrupt per tutte le porte (e quindi mi pone
problemi di risorse.
Newsgroup: it.comp.lang.visual-basic
Titolo: Algoritmo

Ciao a tutti.
Spero che qualcuno mi possa aiutare. Devo scrivere un programma 
per creare i calendari di un campionato. Mi potete mica dare 
qualche dritta per un algoritmo che creai gli accoppiamenti di 
un girone all'italiana (andata e ritorno).
Ringrazio anticipatamente
Kenshirov
-- 
Inviato da Virgilio 
http://newsgroup.virgilio.it
Filtra gli antipatici, segnala le risposte, segue i thread, e lo fa da web

 un girone all'italiana (andata e ritorno).
Ho l'impressione di argomento discusso.
Puoi iniziare da
http://groups.google.it/groups?hl=it&lr=&group=it.comp.lang.visual-basic
e formulare le domande.
Ave
giuseppeD
---
CCR
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

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

Ciao a tutti,
sto guardando un po la gestione delle stampe (anteprima ecc.) e vorrei
sapere come gestire la cosa.
Cioè:
- vorrei poter creare un "configuratore_stampe" in modo che, prendendo le
coord di un oggetto, riesca a calcolare dove inserirlo nella stampa.
Mi spiego meglio (esempio):
- ho una Label che posso spostare nel mio Form.
- salvo le X;Y della Label e poi in anteprima calcolo la posizione sul
foglio A4.
In pratica vorrei sapere:
- le unità di misura che si utilizzano (pixel, cm, mm, twip o altre che non
conosco)
- che relazione esiste tra loro
- quando si usa una o l'altra (quale è meglio)
Grazie a tutti.
Paolo.

 - quando si usa una o l'altra (quale è meglio)
Dipende da cosa ci devi fare.
Nel tuo caso specifico, per stampare su carta
preferirei usare i millimetri perche' cosi' mi basterebbe
il primo righello che trovo per leggere le posizioni sul foglio.
-- 
ciao, hal
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ed il metodo Scale.
Thanks a lot!!!
Paolo.
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB5] + Client x lo stesso dB

Volevo semplicemente sapere se dopo aver realizzato un'applicazione in VB5 che
sfrutta di dB di Access posso mettere il dB sul server e impostare come path
dell'archivio dell'applicazione il percorso di rete. Può essere una buona
soluzione per avere un'unico dB e tanti client oppure e molto probabile che si
pianti tutto?
--
***
byZ,
doGmaI
ICQ#170836495


Puo' andar bene se:
- i client non sono troppi (in genere 5-10)
- fai attenzione a non far eseguire istruzioni del tipo compactdatabase 
a piu' client contemporaneamente
- gestisci l'accesso a tabelle quando vengono salvati dati (se A sta 
salvando dati su una tabella e B tenta di salvare a sua volta rischi un 
bel blocco o la perdita dei dati che di A o di B). Questo vale in 
generale per qualsiasi db ...
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 > dell'archivio dell'applicazione il percorso di rete. Puņ essere una buona


 
Leggiti, ad es., questo thread:
http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&threadm=im5E9.16370%243l.462169%40twister1.libero.it&rnum=1&prev=/groups%3Fq%3Dlock%2Blupo%2Bgroup:it.comp.lang.visual-basic%26hl%3Den%26lr%3D%26ie%3DUTF-8%26sa%3DG%26scoring%3Dd
ciao
	maxx
P.S. Il quoting!!!


 P.S. Il quoting!!!
??? intendi delle doppie > prima dei msg? Beh, non ho modificato le impostazioni
di OutLook: fa tutto lui. Soprattutto mette i messaggi a cui rispondo in coda al
mio. Bah.
(Scusa)

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Data Report....senza passare per Data Environment

Volevo sapere se c'è un modo per evitare di utilizzare il Data Environment
come fornitore di dati per il Data Report.
Se io mi creo un Recordset a run time, e poi lo volessi visualizzare in un
report, c'è il modo di passare il Recordset impostando le proprietà
DataMember e DataSource del Report ?
Grazie a chi mi risponde.

Risposta da profano..e anche io mi metto in attesa delle altre che verranno..
Secondo me' possibile settare da codice usando un Recordset..
ma D.R . preferirebbe ricevere dati da Data Env. e cio' sarebbe utile a te
perche' cosi' puoi fare Drag e Drop da Data Env. Sul Data Report..
Spero di non essere stato troppo profano..se qualcuno conferma o smentisce....
Ciao
Daniele
Maggi Contigo ha scritto:

--
!------------------------------------------------!
!ICQ     : 8281944
!E-Mail  : 
Dan...@levon.it
!
!"Il tempo passa e quando si ferma e'
! ormai troppo tardi "
!
!HomePage : 
http://www.levon.it/daniele
!
!------------------------------------------------!

Si, puoi fare esattamente come hai detto.
Dim mioreport As MioReportDefinito
Set mioreport.DataSource = miorecordset
io lo faccio con dei recordset ADO.Recordset e funziona.
Ciao.    Corrado.

 wrote in message
7tlb0f$3nj$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Stampare immagine molto, molto grande

Ho un'applicazione visual basic che gestisce immagini di disegni CAD e
può anche stamparle. Ultimamente gli utenti hanno iniziato ad
associare JPG di modelli 3D molto grosse e ora non si riescono più a
stampare. Dalle prove che ho fatto non sembra essere un problema
dell'applciazione, anche IrfanView fallisce nella stampa. La cosa
strana è che alla stampante arriva l'input di stampa (e' una laser e
parte il suo ciclo di inizializzazione) ma non stampa nulla.
Dall'applicazione qualcosa stampa perchè oltre all'immagine stampo un
cartiglio e del testo ma al posto dell'immagine esce bianco. La
stampante che uso di prova una Lexmark W820 stampa se utilizzo il
driver che ho installato da tempo (è del 2002) mentre se uso quello
nuovo disponibile in intranet (Lexmark Universal PS3) non stampa
nulla. Il problema si presenta se si cerca di stampare una JPG
maggiore di 2MB, quella di prova che ho è 4,5MB e ha una risoluzione
di 9600x7220 a 24bpp.
Qualche idea? Esiste un qualche limite nel S.O. (io uso 2000 server
mentre gli utenti usano XP e XP x64)?
Grazie, ciao
Fritz

 mentre gli utenti usano XP e XP x64)?
Problemi di memoria della stampante ?
E' il modello Postscript, giusto ?
Prova a usare un driver umano... Non ho mai capito
la passione di certi produttori per riempirti di schifezze
il computer. Se poi si parla di server, � una cosa totalmente
odiosa. Pedditte, ho un server che gestisce le stampe di tutta
la ditta da un centinaio di client, una dozzina di applicazioni
diverse sparse su mezza dozzina di sedi, e una decina
di stampanti diverse. Se per ognuna dovessi usare il driver
proprietario, con i propri sistemi di monitoring eccetera,
non solo uscirei scemo, ma mi servirebbe un HW il doppio
pi� potente. Invece co� i client si agganciano alla stampante
condivisa sul server e la usano, fine.
Primo passo: rintraccia il file PPD della stampante, il nome
probabilmente sar� tipo LMA[altri quattro caratteri].PPD,
lo dovresti trovare sui dischi dei driver.
Scarica dal sito Adobe il driver Postscript generico per windows,
Adobe Universal PostScript Windows Driver, dovrebbe essere qui:
http://www.adobe.com/support/downloads/detail.jsp?ftpID=1504
il file dovrebbe chiamarsi winstita.exe.
Installa quello e, quando ti chiede il modello di stampante,
fallo puntare al .ppd che hai trovato.
Fammi sapere come ti va :-).
Bye, G.

 fallo puntare al .ppd che hai trovato.
Questo dovrebbe sostituire in toto il vero driver? Interessante ...
Grazie, ciao
Fritz

 Problemi di memoria della stampante ?
No, ho poi scoperto che era colpa del mio spazio su C, non ne avevo
abbastanza per fare lo spoller di 200MB, fatto lo spazio � tornato a
funzionare, ora ho spostato lo spooler su D dove ho 12GB, continuo a
non capire perch� con il driver vecchio funzionava anche se non aveva
spazio.
non se � quello che vuoi tu:
prova su windows / impostazioni o propriet� della stampante sulla scheda 
"avanzate" puoi evitare che crei prima lo spoller intero, selezionanado 
invia direttamente alla stampante oppure inizia a stampare immediatamente.
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Come si fa in VBA sapere il range delle caselle selezionate in Excel.

Ciao a tutti,
devo realizzare un programmino in VBA per Excel.
Il mio problema sta nel sapere quale riga è attualmente selezionata tenendo
conto che la riga verrà selezionata dall'utente con il mouse.
Ringrazio tutti in anticipo.
Ciao da Emiliano

 conto che la riga verrà selezionata dall'utente con il mouse.
Vedi -> ActiveWindow.RangeSelection
Ciao, Giorgio.

 ha scritto nel messaggio
news:eOEN9.23600$R45.1...@news2.tin.it...

Grazie Gio!
era proprio quello che mi serviva, un'ultima cosa però per completare alla
grande il tutto: come faccio durante l'esecuzione di una macro in VBA a far
richiedere all'utente la selezione di una specifica casella in Excel?
Ciao e grazie ancora!
Emiliano

 richiedere all'utente la selezione di una specifica casella in Excel?
Forse ti conviene spostare da te la selezione su una cella senza chiedere
troppi interventi all'utente.
Lo puoi fare usando:
Foglio1.Range("C1").Select
ovviamente cambiando i parametri della cella che ti servono (questo pezzo di
codice ti seleziona la cella C1 del foglio 1 eh? con Excel in italiano si
intende altrimenti al posto di foglio ci va Worksheet)
Ciao, Giorgio.


Ciao Giorgio,
ti ringrazio per la risposta, ma devo chiedere per forza all'utente di
selezionare una o più celle perchè devo realizzare una macro che consente di
esportare in un file di testo esterno solo una parte dell'intero foglio di
calcolo.
Questa parte deve essere selezionata dall'utente manualmente mentre il
codice VBA sta girando.
Grazie ancora.
Ciao da Emiliano.

 codice VBA sta girando.
mi intrufolo nel thread:
personalmente, consiglierei di fare in modo che l'utente selezioni la parte del foglio da
esportare prima di avviare il codice vba, per mantenere una certa coerenza con quanto
l'utente è abituato a fare: quando copi qualcosa, prima indichi la parte, poi dici che la
vuoi copiare...
hth
Salutoni
Sergio


Hai perfettamente ragione, ma durante l'esecuzione della macro nel foglio di
calcolo vengono modificate molte cose (cancellate colonne, righe ecc.)
pertanto mi trovo costretto a far selezionare le celle da esportare
solamente dopo aver eseguito una parte di codice.
Ciao e grazie
Emiliano
Newsgroup: it.comp.lang.visual-basic
Titolo: C'è da spostare un Report!!!

Salve,
utilizzo VB6 per il codice, CR8 per le stampe, Access 2000 come data store.
Il mio problema č che "disegno" delle stampe con CR8 pescando i dati da un 
db appositamente predisposto; tutto ok; poi sposto i files .rpt su un'altro 
pc e, quando stampo, mi esce l'errore di non riconoscimento percorso.
Io penso che il problema sia dovuto al fatto che quando ho creato il 
documento di stampa crystal report, ho scelto i dati da riportare enlla 
stampa da DATABASE/FILE DI DATABASE e scegliendo un file con lo sfoglia, 
determinando cosě un percorso di macchina fisico. Forse dovrei usare un 
altro tipo di riempimento DATABASE. Come faccio per far sě che il report 
funzioni anche spostando l'rpt su altre macchine?
Che scelgo al posto di FILE DI DATABASE quando lego l'rpt al mio mdb?
GRAZIE in anticipo.
SALUTI
-- 
Nico D'Andretta
web designer
Public Image 

 ha scritto nel messaggio news:436b6aee$0$22295$4faf...@reader1.news.tin.it...

dammi le chiavi, te la sposto io
:)))

Se non ricordo male nei menù:  Database >>> Imposta Posizione >>>
Uguale al report
Ciao
Roberto
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] - Listview e Tooltip

Oggi è il vostro giorno fortunato sorry..
ho bisogno di un consiglio.
Qualche giorno fa qualcuno aveva chiesto se è possibile ottenere dei
tooltips multiriga, e qualcun'altro ha prodotto un link con una classe molto
interessante, che vorrei utilizzare.
Il problema è questo:
vorrei associare un tooltip all'evento mousemove di una listview, in modo
che quando il mouse si muove di riga in riga, venga visualizzato un
"palloncino" con dei dettagli aggiuntivi circa la riga sulla uqale si trova
il puntatore.
Sono arrivato alla conclusione che l'unico modo per farlo, è quello di
giocare con la coordinata y e con l'altezza della riga. Qualcosa del tipo:
y=y_puntatore
riga_corrente= y/altezza_riga
 E così?
Si accettano anche insulti... o magari qualche link a qualche esempio e/o
post esplicativo.
Grazie e scusate ancora se vi danno!
Enrico

  E cosě?
No, e' piu' semplice: guarda il metodo HitTest sulla guida
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Ciao
Ciao e grazie mille!

 ha scritto nel messaggio
news:ZU7sb.6634$ZH3....@tornado.fastwebnet.it...

Se si esclude il fatto che il codice qui sopra va in errore, direi di si ;-)
Rileggi bene cosa dice la guida; nota in particolare cosa restituisce il
metodo HitTest e anche il fatto che non sempre restituisce qualcosa...


 metodo HitTest e anche il fatto che non sempre restituisce qualcosa...
Sono stato bravo a sufficienza?
P.S. mi hanno pure segato allo scritto di ieri :'(

 P.S. mi hanno pure segato allo scritto di ieri :'(
"Il ragazzo e' intelligente ma non si applica" (TM professori d'italia)
Hai letto la pagina che ti indicavo? se si, avrai visto che il metodo
HitTest restituisce direttamente un oggetto ListItem, non un Integer come
nel tuo codice (che, se lo avessi provato, continuerebbe a dare lo stesso
errore 'Type Mismatch' del tuo primo esempio)
Il resto viene da se...


 Ciao
ciao e grazie per la disponibilità :D

 codice funziona?
Non so cosa dai da mangiare al tuo VB, ma sul mio, se provo a incollare il
tuo codice esatto in un evento MouseUp/MouseMove/MouseDown di un ListView,
ottengo, come prevedibile, un errore di type mismatch sull'istruzione
i = .HitTest(x, Y)
che cerca di assegnare ad un Integer un oggetto...
Ad ogni modo, gia' che siamo in tema di mangiare, ecco la pappa pronta
Private Sub ListView1_MouseMove(Button As Integer, Shift As Integer _
            , x As Single, y As Single)
Dim HitItem As ListItem
Dim sTemp As String
With ListView1
    Set HitItem = .HitTest(x, y)
    If Not HitItem Is Nothing Then
        sTemp = HitItem.ListSubItems(1).Text
    End If
End With
End Sub


 Ciao
Ciao
Grazie mille!!!
Newsgroup: it.comp.lang.visual-basic
Titolo: WPF e System.Windows.Media.MediaPlayer

Ciao a tutti,
sto facendo qualche prova per utilizzare l'oggetto di tipo 
System.Windows.Media.MediaPlayer per poter visualizzare una clip in una 
Window WPF.
Ho trovato un po' di codice di esempio, ma non riesco a visualizzare nulla, 
sento l'audio (quindi so che la clip e' in play) ma nessun video.
In particolare, vorrei capire come fare per visualizzare la clip in un 
controllo specifico della Window, se possibile.
Per spiegarmi meglio, nella Window ho un controllo (attualmente una 
GroupBox) e vorrei che la clip venisse visualizzata li dentro.
Fin'ora il codice che ho provato e':
 
 
mp.Open(New System.Uri(FileName))
Dim VDraw As New VideoDrawing
VDraw.Rect = New Rect(0, 0, m_DestinationRectangle.Width, 
m_DestinationRectangle.Height)
VDraw.Player = mp
 
Dove mp e' un oggetto di tipo System.Windows.Media.MediaPlayer visible in 
tutta la classe, m_DestinationRectangle e' la GroupBox, ma ho provato anche 
con un controllo Shape.Rectangle
 
Naturalmente FileName e' una stringa che contiene il percorso del file che 
voglio suonare.
Grazie a tutti
 

Ho parzialmente risolto usando un MediaElement...
non e' esattamente quello che volevo, ma *forse* e' anche di piu' :-)

Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere dati da pagine web

Carissimi professionisti,
ho un problemino, come faccio a leggere le pagine web, vorrei fare un prg
che legge i listini dei siti nel web e li scriva su un db access per fare
poi dei confronti!
Grazie per l'attenzione
--
Andrea Fabbrucci
anfa...@tin.it
--
Posted from 
mta14-acc.tin.it
 [212.216.176.45]
via Mailgate.ORG Server - 
http://www.mailgate.org

Via ADO con Jet 4;
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=FileName.HTML;Extended
Properties=HTML Import;"
Ciao.
Alfredo.
"Andrea Fabbrucci" ha scritto nel messaggio
<000901bf3055$fd375ac0$0500a8c0@Server>...

Newsgroup: it.comp.lang.visual-basic
Titolo: help Crystal Report

Ciao a tutti.
Sono un principiante VB. Ho necessità di sapere come si fa a passare uno o
più parametri di selezione per un filtro (esempio da codice articolo a
codice articolo) su un archivio molto grande (Access) ad un report generato
con CR. Ho provato in mille modi ma non riesco a passare al report i valori
contenuti nelle TextBox (text1 e text2) appositamente create (Da codice
A codice). Ringrazio anticipatamente chiunque mi aiuterà. Rispondere Via
E-mail  
mgri...@freemail.it
 oppure 
grima...@ekaf.it
 (togliere xxx)

...

Non so se si può fare, ma una cosa è certa, Crystal Report non funziona, o
meglio se oggi funziona domani non si sa 8D
Lascia perdere.

 5" as your selection formula, i.e.,  Report1.SelectionFormula =
"{file.QTY} > 5"
Remarks
   Make certain that you enclose your selection formula in double quotes.
   If your selection formula includes internal quotes, for example:
{file.STATE} = "CA"
change all of the internal double quotes to single quotes and then surround
the entire selection formula in double quotes like this:
"{file.STATE} = 'CA'"
   If you have created a selection formula in your report at design time,
any selection formula you enter here will be appended to that selection
formula. Thus, your records will be selected based on a combination of the
two selection formulas.
La cosa FUNZIONA, GARANTITO !! visto che la uso frequentemente  e fa'
esattamente cio' che tu chiedi.
Ciao
Ven.

>Ciao a tutti.Sono un principiante VB. Ho necessità di sapere come si fa a
passare uno opiù parametri di selezione per un filtro (esempio da codice
articolo acodice articolo) su un archivio molto grande (Access) ad un
report generatocon CR. Ho provato in mille modi ma non riesco a passare al
report i valoricontenuti nelle TextBox (text1 e text2) appositamente create
(Da codiceA codice). Ringrazio anticipatamente chiunque mi aiuterà.
Rispondere ViaE-mail 
mgri...@freemail.it
 oppure 
grima...@ekaf.it
(togliere xxx)
Prova così:
With CrystalReport1                      
    .UserName = "Amministratore"
    .Password = "MIAPASSWORD"
    .CopiesToPrinter = 1
    .DataFiles(0) = App.Path + "\ARCHIVI\MIODB.MDB"
    .ReportFileName = App.Path + "\REPORTS\ARTICOLI.RPT"
    .SelectionFormula = "{Archivio Articoli.Codice} = '" + Text1.Text + "'"
    .WindowTitle = Me.Caption + " - Anteprima di Stampa"
    .Destination = 0
    .Action = 1
End With       
----------------------------------------------
 Donatello Rizzo - Software Designer
 Via P. Nenni, 4 - 73040 Melissano (LE) ITALY
 Tel.: 0833/581370 - Mob.: 0347/3024131
 E-Mail: 
rav...@mail6.clio.it
------- KYOKUSHINKAI KARATE HOME PAGE --------
http://www.geocities.com/Colosseum/Arena/1919/
----------- THE RIZZO'S OBSOLETES ------------
 
http://www.geocities.com/Area51/Meteor/6686/
---------------------------------------------- 
--
Posted from [195.60.132.4]
via Mailgate.ORG Server - 
http://www.mailgate.org