mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Andare a capo nelle stringhe

Ciao a tutti e ancora una volta Buon Anno.
Come si fa ad andare a capo in una stringa?
Sto facendo un giochino simile al milionario, e utilizzo un  file .ini per
memorizzare il record.
Nella prima riga c'è il nome del giocatore, nella seconda il punteggio.
Questa viene caricata in una textbox multiline invisibile dalla quale
estraggo i valori.
Ma non so per scriverli, come faccio ad andate a capo.
Ad esempio Dovrei scriviere:
Giocatore 1
16,000 €
GRAZIE

 Come si fa ad andare a capo in una stringa?
vbNewLine o vbCrLf
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

Grazie

 Ad esempio Dovrei scriviere:
Scusa ma il tuo sistema è pessimo!
Perchè usare una textbox nascosta? Per complicarti la vita cercado gli
acapo?
Leggi il file (tanto già lo fai) in un array di stringhe, o meglio ancora in
un array di type del tipo
Type Giocatore
    Nome        as string
    Punteggio   as long
End Type
Ciao

 acapo?
Non li cerco gli acapo, ho una procedura che dandole il numero della riga ne
estrae il contenuto.
CIAO

 estrae il contenuto.
E' comunque un approccio decisamente scorretto e indice di pessima
progettazione/sviluppo.
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"

 progettazione/sviluppo.
Che ci posso fare? Sto imparando da solo... Non ci so fare ancora.
Ciao

 Che ci posso fare? Sto imparando da solo... Non ci so fare ancora.
Ok, ma questa non è una scusa per non imparare metodi e migliori o seguire
consigli :)
Ciao

 ha scritto nel messaggio
news:rPfS9.64819$Q%4.20...@news1.tin.it...

Passavo di qui x caso e non ho potuto fare a meno di sentire :)
X non mollare e segui i consigli buoni come quello di Zanna, cosě ci
metterai di meno a postare anche tu 'Zannate'
Buon anno,
Octopus

Newsgroup: it.comp.lang.visual-basic
Titolo: icone o bitmap e popup

Vorrei gentilemente chiedere se qualcuno conosce il modo
per poter inserire, accanto al testo di un menu popup, una icona o una
bitmap
non in fase di sviluppo.
grazie anticipatamente.

 non in fase di sviluppo.
cerca un thread su questo argometo di venerdi o sabato scorso
ciao stefano

 non in fase di sviluppo.
In fase di sviluppo è impossibile :-(
Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire un file e scriverci dentro

 Scusate ma io ho un problema,
devo aprire un file, trovare una stringa all'interno di questo file presente
nella variabile (Dim Parola As String), e sostituirla con una digitata da un
utente e chiudere il file.
 Con l'istruzione seguente non ci riesco perchč?
Qualcuno mi puo' aiutare, facendo il possibile per farsi capire? Magari
dandomi la soluzione?
Grazie
Option Explicit
Dim NumFile As Integer
Private Sub CmdReplace_Click()
Dim Parola As String
NumFile = FreeFile
    Open Dir("prototipo.dat") For Append As NumFile
    Do Until EOF(NumFile)
        Line Input #NumFile, Parola
            If Parola > 0 Then
            x = MsgBox("trovata")
            Print #NumFile, Parola
            Exit Do
            End If
    Loop
    Close #NumFile
End Sub
grazie 1000 a tutti, siete tutti fantastici, grazie di esistere.
TOGLIERE...@mbox.queen.it

 
Ciao, allora puoi provare con un acceso binario al file (ma non sono
sicuro), con un accesso sequenziale non riesci a modificarlo.
Oppure ti costruisci in un file di supporto il tuo file con la modifica,
cioè salvi nel file di supporto non la stringa che ricavi dal file di
origine ma quella con la modifica che ti serve. 
E poi lo sostituisci.
Scusa se non sono più prolisso ma ho poco tempo.
Ciao 
:-) Hd (-:

Newsgroup: it.comp.lang.visual-basic
Titolo: PER ZANNA!!!

La soluzione l'ho trovata! e da solo!...........................ma tu rimani
un ignorante!!!
Complimenti!

 ha scritto nel messaggio
news:adgh1d$25gb$1...@newsreader1.mclink.it...

Ra, non sono Zanna, te lo giuro, però vaffanculo lo stesso!

 > Complimenti!
Sinceramente non so quale informazione tu abbia chiesto a Zanna. Posso dirti
che sicuramente Zanna non č propriamente uno dei piů cortesi o disponibili
al mondo, ma solitamente non offende le persone.
E poi lasciatelo dire... digli che č scortese, che se la mena, o
quant'altro... ma non puoi proprio dire che č un ingnorante. Ne sa a pacchi
di cose!!!
Ciao!

INGNORANTE SEI TU
se invece di volere tutto e subito ascoltavi il mio consiglio e guardavi il
post di JOE del 30/05/2002 "TEXT BOX SELETTIVA" trovavi tutto senza
problemi.
qui nessuno è pagato per dare risposte, se qualcuno te le da devi solo
ringraziare!


sono d'accordo ....e poi non si dovrebbe usare certi termini...
però se si evitassero battute inutili (non mi riferisco a zanna e un
discorso generico) e magari si tenesse un certo rispetto epr chi espone il
problema certi flame si eviterebbero sicuramente.

Il ruggito del coniglio Ra

 Complimenti!
Grazie :)
Non si puň dire altrettanto di te :)
' -------------------------
    Call Zanna.EodOfThread
' -------------------------

 Complimenti!
a te, genio!
ciao
ugo

 Bravo, sei capace di risolverti i problemi da solo?
piu' che altro mi sembra capace di crearsene...
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Disabilita il tasto premuto

Dunque presupponendo che conosco il numero del tasto premuto tramite
keypress... come faccio a dire al comp che se viene premuto quel determinato
tasto nella textbox non ce lo deve scrivere???
esempio...
Private Sub txtNuovoVocabolario_KeyPress(KeyAscii As Integer)
If KeyAscii = 46 Or KeyAscii = 44 Or KeyAscii = 47 Or KeyAscii = 48 Or
KeyAscii = 59 Or KeyAscii = 92 Then
   ..........
    .........
    .........
End If
end sub
che ci scrivo al posto dei puntini???
grazie!!!


keyascii=0

Newsgroup: it.comp.lang.visual-basic
Titolo: Spegnere il pc

Ciao a tutti
Tempo fa ho letto da qualche parte, (non ricordo dove) che è possibile far
spegnere ad una determinata ora il pc siccome la cosa adesso mi interessa,
non so da dove cercarla ho fatto anche una ricerca ma non ho trovato niente,
dovrei far spegnere un pc con os win'95, ma è ovvio che se la cosa è
estensibile la potrei utilizzare anche con win'98 e NT Server 4.0?
Grazie a tutti coloro che vogliano aiutarmi, e scusandomi se sono OT.
Saluti
--
Demiurgoprimo
bkf...@tin.it
http://web.interpuntonet.it/giuseppefusco/
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
L'amore è come la luna: se non cresce, cala.  (Proverbio cinese)
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°

 ha scritto nel messaggio
news:0xmb6.22115$dD2.2...@twister2.tin.it...


 ha scritto nel messaggio
news:wMmb6.5470$ew1.3...@news.infostrada.it...


aiutare?
Ti conviene andare su 
http://edisons.tucows.it
 e poi scaricare uno dei
30 programmini freeware che lo fanno :)
Saluti.
-- 
      Gianni "bugbarbeq" Rondinini, 25, RA, 242, 152
  VBR - Vero Birro RomagnoloŽ, diffidate dalle imitazioni!
 Opel/ECC Calibrezio EVO-IV --- Kawasaki "Gas Gas" ZZ-R 1100
 ICQ# 36893168 - IRCNet: bugbarbeq, @ on #linux-it & #NetBSD

   VBR - Vero Birro Romagnolo®, diffidate dalle imitazioni!


aiutare?
Allora dai un'occhiata al Sito Comune...
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
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:OAub6.7349$ew1.7...@news.infostrada.it...


 >Il problema è che non ho molta dimestichezza con visual basic, mi puoi


 ha scritto nel messaggio
news:sj7t6t0hoess47pd3...@4ax.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: oggetto printer

scusate dove posso trovare l'oggetto
printer?
come si chiama...non lo trovo
grazie
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

 come si chiama...non lo trovo
Si chiama printer.
Va digitato premendo, in sequenza, le lettere p, r, i, n, t, e, r.
Ciao
Alberto
PS: a parte gli scherzi, controlla la differenza fra 'oggetto' e
'controllo'. Printer è un oggetto, TextBox è un controllo, Recordset è un
oggetto, Label è un controllo, ecc...

>Va digitato premendo, in sequenza, le lettere p, r, i, n, t, e, r.
Precisiamo per favore:
p r i n t e r (senza le virgole e senza gli soazi!).  :-)
Andrea.

>>Va digitato premendo, in sequenza, le lettere p, r, i, n, t, e, r.
Precisiamo per favore:
p r i n t e r (senza le virgole e senza gli spazi!).  :-)
Andrea.

 wrote in message
3e3ff036...@62.94.0.8...



 vedo che siete molto simpatici........
No, ti prego...
Tutti questi ringraziamenti, mi fanno arrossire...
Alberto

 vedo che siete molto simpatici........
Beh, dai... te la sei un po' cercata :)
Ciao

 3e3ff036...@62.94.0.8...
sei stato nominato ad entrare nel bestiario....stay tuned!
--
%%============================%%
Il Wodkino Nazionale è a : 
www.martek.it
Forum: 
http://www.martek.it/go.asp?PortamiA=1
Bestiario: 
http://www.martek.it/go.asp?PortamiA=2
 (link bestiario del
ng)

Newsgroup: it.comp.lang.visual-basic
Titolo: Common Dialogs: come setto + tipi di files?

Ciao a tutti!
Mi chiedevo.... come posso settare + tipi di files diversi nelle common
dialogs?
Intendo: vorrei che la finestra (ad esempio un "apri") mi faccia vedere +
tipologie di files... o almeno mi consenta di scegliere tra diverse
alternative.
Grazie.
Ciao,
Alfonso.

oggetto.Filter [= descrizione1 |filtro1 |descrizione2 |filtro2...]
Un filtro specifica il tipo di file visualizzati nella casella di riepilogo
dei file della finestra di dialogo. Se ad esempio si seleziona il filtro
*.txt verranno visualizzati tutti i file di testo.
Utilizzare questa proprietà per fornire all'utente un elenco dei filtri
selezionabili nella finestra di dialogo.
Per separare i valori di descrizione e filtro, utilizzare il simbolo pipe
( | ) (ASCII 124). Non includere spazi prima o dopo il simbolo, in quanto
tali spazi verrebbero visualizzati insieme ai valori di descrizione e
filtro.
Questo codice di esempio mostra un filtro che consente di selezionare file
di testo oppure file grafici di tipo bitmap o icona:
File di testo (*.txt)|*.txt|Immagini (*.bmp;*.ico)|*.bmp;*.ico
Quando si specificano più filtri per una finestra di dialogo, utilizzare la
proprietà FilterIndex per specificare il filtro predefinito.
dalla guida in linea
--
gino

 Alfonso.
Ciao
Andrea
Newsgroup: it.comp.lang.visual-basic
Titolo: [NET] Libri

Ciao a tutti,
chi mi potrebbe consigliare un buon libro su 
VB.NET
 a livello professional
(no principianti/intermedio)?
Anche in inglese, no problem
Magari anche su 
ADO.NET
 ?
Grazie

 Magari anche su 
ADO.NET
 ?
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=ado.net+libri&meta=
group%3Dit.comp.lang.visual-basic
giuseppeD

 (no principianti/intermedio)?
http://groups.google.it/groups?dq=&hl=it&lr=&ie=UTF-8&threadm=h176gvciscsedd
2p4hksp2ceq55dnngr1b%
404ax.com
&prev=/groups%3Fdq%3D%26num%3D25%26hl%3Dit%26l
r%3D%26ie%3DUTF-8%26group%3Dit.comp.lang.visual-basic%26start%3D50
:-)
ciao
yatsura

Newsgroup: it.comp.lang.visual-basic
Titolo: Datatree e toolbar

Salve. Vorrei sapere secondo voi quali sono i migliori controlli VB per un
DataTree e una Toolbar.
Grazie

 per un DataTree e una Toolbar.
TreeView+ListView e Picture+Picture/Image.

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Shell

salve a tutti,
il problema è il seguente
shell "c:\prova\prova1.exe"
shell "c:\prova\prova2.exe"
in questo modo mi vengono aperti uno dopo l'altro, come posso fare in modo
che Shell attenda la chiusura del primo programma per eseguire il secondo?!
grazie,
    Giulio

 il secondo?!
un occhiatina a questo link?
http://groups.google.it/groups?hl=it&lr=&ie=ISO-8859-1&q=attendere+eseguibile&bt
nG=Cerca+con+Google&meta=group%3Dit.comp.lang.visual-basic
Se su più righe, (e lo sarà) ricostruiscilo.
Buona lettura :-)
--
Salutoni
Sergio

grazie 1000 per la pronta risposta....

Newsgroup: it.comp.lang.visual-basic
Titolo: [.NET] com impostare la stampante predefinita

Help me,
non riesco a impostare la stampante predefinata in 
vb.net
!!!
Grazie 1k
xandre


PrintDocument.PrinterSettings.PrinterName
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

> PrintDocument.PrinterSettings.PrinterName
Grazie,
mi sono espresso male :( intendevo come impostare una stampante 
come stampante predefinita del sistema operativo, 
in modo che componenti COM e applicazioni esterne possano 
stamapare su di essa.
Grazie 1k
xandre


http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/prntspol_027m.asp
credo si possa fare anche usando WMI


Newsgroup: it.comp.lang.visual-basic
Titolo: Metodo seek!

Se con il metodo seek vado a cercare un record in un recordset che non
esiste Access mi dà un errore, ma posso eventualmente gestire la mancanza
del record con un ciclo If...Then??
Dato che se il record non esiste in una tabella dovrei verificare che esista
in un'altra.....
grazie in anticipo
 Thomas!

 del record con un ciclo If...Then??
If RS01.NoMatch = False then
....
Else
....
End If
Bye,
Enrico.
------------------------------------------------
Dim VbEnry As Enrico
e-mail : 
vbe...@supereva.it
ICQ: 93357350
------------------------------------------------

 ha scritto nel messaggio
news:yNh37.30629$rh.6...@news6.giganews.com...


 ha scritto nel messaggio
news:84i37.62427$cd.3...@news1.tin.it...



Perchè non esiste in ADO ... devi verificare l'EOF ...
Saluti
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con gli ADO control, chi mi aiuta?

Salve a tutti.
Situazione:
Ho un ADO control collegato a dei Texts Box.
CursorLocation sono lato client.
Tipo di recordset impostato AdOpenKayset.
Il problema č questo:
Quando effettuo una modifica in una casella di testo collegata e mi sposto
con l'ADO control tra i record, la modifica rimane. Se poi chiudo la form e
la ri-apro, la modifica non c'č piů.
Ipotesi:
Quando effettuo la modifica e mi sposto tra i record la modifica mi viene
solo bufferizzata, ma non realmente salvata. Ma perché?
Chi mi spiega la soluzione?
Vi ringrazio anticipatamente tutti.
Ciao Luciano.

 wrote in message
93h69p$ebm$1...@fe2.cs.interbusiness.it...


 ha scritto nel messaggio
news:93h69p$ebm$1...@fe2.cs.interbusiness.it...


No, non uso le transazioni.
Io apro un recordset utilizzando i cursori lato client, aprendolo in lettura
e scrittura. Imposto il recordset come AdOpenKayset e AdLockBatchOptimistic
e successivamente lo associo al datacontrol con un Set (Set Data1.Recordset
= Rs.Recordset).
Qualche suggerimento?
Grazie mille.
Ciao Luciano.

 wrote in message
news:93i1uv$bp1$1...@fe1.cs.interbusiness.it...

Direi che vada bene quello che ti ha detto Gennaro. Con un cursore batch le
modifiche rimangono nel buffer e vengono scaricate sul server in un colpo
solo con UpdateBatch.
Tra l' altro, questa e' una feature interessante perche' ti permette di
disconnettere il recordset, fare tutti gli affaracci tuoi, quindi
riconnetterti al database per la scrittura delle modifiche.
Ciao
Aldo
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO & Password.

Devo aprire un db protetto da password con ADO.
Per aprirlo normalmente uso la seguente istruzione, e la password dove la
specifico?
 dbcon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &
"\db_clinso.mdb;Persist Security Info=False"
Grazie x l'aiuto.
Fabio

 ha scritto

http://www.google.it/search?sourceid=navclient&hl=it&q=Persist+Securit
y+Info%3DFalse+pswd
eventualmente prova altre ricerche simili.
ciao

 ha scritto nel messaggio
news:b178t2$10c9hf$1...@ID-51318.news.dfncis.de...

Provo a darti un aiuto...
1)se usi ado e lo setti con personalize quando gli dai il provider vai nella
sezione "tutte le proprietà" e
setto la proprietà "jet oledc:database Password" con la tua password..
2)Con il tuo codice
dbcon.Open "Provider=Microsoft.Jet.OLEDB.4.0;jet oledb:Database password=
latuapass;Data Source=" & App.Path & "\db_clinso.mdb;User Id=Admin;Persist
Security Info=False"
3)se non usi l'Ado la tua connessione avrà la proprietà "properties" e puoi
modificare lì il valore
jet oledb:database password
Spero di esserti stato d'aiuto
ciao


c'č un sito di riferimento...dove spiega e mostra tutto ...era un po che non
davo il link
RIECCOLO
http://www.able-consulting.com/ADO_Conn.htm
qui c'č tutto quello che ti serve!
Buono studio!
--
%%============================%%
Il Wodkino Nazionale č raggiungibile anche a :
www.martek.it
Ed ha pure il forum...
http://www.martek.it/go.asp?PortamiA=1

...

Segue un pezzo di documento recuperato da internet:
OLE DB Provider for Microsoft Jet 
For standard security
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\myDb.mdb;" & _ 
           "User Id=admin;" & _
           "Password="
 
If using a Workgroup (System Database)
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\mydb.mdb;" & _ 
           "Jet OLEDB:System Database=MySystem.mdw", _
           "myUsername", "myPassword" 
Note, remember to convert both the MDB and the MDW to the 4.0
database format when using the 4.0 OLE DB Provider.
 
If MDB has a database password
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\mydb.mdb;" & _ 
           "Jet OLEDB:Database Password=MyDbPassword", _
           "myUsername", "myPassword"
 
If want to open up the MDB exclusively
oConn.Mode = adModeShareExclusive
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\myDb.mdb;" & _
           "User Id=admin;" & _
           "Password=" 
 
Spero ti sia stato utile...
Ciao,
          *Roby*


il link che ho dato ti ricorda qualcosa????
--
%%============================%%
Il Wodkino Nazionale è raggiungibile anche a :


 il link che ho dato ti ricorda qualcosa????
Certo, è lo stesso; comunque ho postato prima di te nonostante sia
apparso il mio messaggio successivo al tuo.
Sai, uso 
google.com
 per leggere/scrivere post e i suoi ritardi 
nella pubblicazione/visualizzazione dei post sono alquanto
preoccupanti...
Comunque penso che il problema avuto dal nostro amico sia stato
ampiamente risolto...
Bye,
       *Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Winsocks API

Salve a tutti,
 vorrei sviluppare un'applicazione che avviandola mi visualizzi una
lista degli ip e degli host collegati alla mia L.A.N.. Per fare questo
vorrei utilizzare le A.P.I. di Windows tramite la libreria che
contiene le funzioni per i socket.
Il problema è che nella libreria "wsock32" non sono presenti alcune
funzioni che vorrei richiamare come per esempio: "WSAEnumProtocol" e
"WSARecv".
Dopo essermi documentata ho visto che esiste una dll aggiornata
rispetto a "wsock32" chiamata "WinSock2.dll". C'è qualcuno che sa
dirmi dove posso scaricare questa dll? Grazie a tutti. Saluti.
Sharon

Ciao Cara,
se ti installi Visual c++ te la troverai sul tuo PC ...
Puoi utilizzare le funzioni Broadcast per ottenere la lista degli IP sulla
rete.
Per saperne di + consulta la sezione MSDN - Platform SDK e cerca dove
parla di Berkley Sokets.
Oppure se hai problemi fammi sapere io ho usato questa roba in Visual C++
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


eh eh eh!
win98? win2k non aggiornato?
winMe?
http://laika.nline.it/users/davide/aggiorn2.htm
controllato alcuni link a caso (compreso il winsock)
puntano ancora alle pagine giuste!
;-)
-- 
Il Wodkino Nazionale č a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 Quotefix e altro:
http://www.martek.it/go.asp?portamia=4
Usr: ICLVB Pw: amici

 Ciao
Grazie mille, appena ho tempo ci provo. Saluti

Newsgroup: it.comp.lang.visual-basic
Titolo: help with VB & hardware

Hi, There
Can anyone tell me about some API or control needed to obtain information
about the system itself?
i.e.
-video card, sound card (brand, desc.)
-ram
-cpu
-ethernet
-OS
-...

Jim Free wrote:

A more specific will be appreciated, but you coul'd look for
WMI (Windows Management Instrumentation) SDK .
-- 
bye, hal
p.s. this is an italian newsgroup so you should post in italian.

 information about the system itself?
Device Management API (SetupDi* functions), for Windows 98 and later 
and Windows 2000 and later
-- 
 < 
http://www.reactos.com/
 >  Open source clone of Windows NT. Current
     Don't stand, REACT!      version 0.0.19. C, C++ and ASM developers
                              and beta testers are welcome!
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Consiglio

Ho una tabella che contiene una data e un campo testo.
nel campo testo viene messo "MENSILE", "TRIMESTRALE", "SEMESTRALE",
"ANNUALE" in base al contratto di manutenzione che il cliente ha, mentre la
data fissa la data di inizio del contratto.
Ora io dovrei stampare delle bolle di assistenza automaticamente per ogni
cliente, partendo dalla data in cui chiedo la stampa, la data di inizio e la
cadenza del contratto.
--
VB6 Sp5
Grazie, Alcau

 ha scritto nel messaggio
news:d7Fq8.111531$%g7.36...@twister2.libero.it...

Forse:
Select Case TipoContratto
    Case "MENSILE"
        DataScadenzaContratto = DateAdd("m", 1, DataInizioContratto)
    Case "TRIMESTRALE"
        DataScadenzaContratto = DateAdd("m", 3, DataInizioContratto)
    Case "SEMESTRALE"
        DataScadenzaContratto = DateAdd("m", 6, DataInizioContratto)
    Case "ANNUALE"
        DataScadenzaContratto = DateAdd("m", 12, DataInizioContratto)
End Select
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)

Non mi sono spiegato:
Io dovrei creare una query che mi estragga tutti i clienti a cui in questo
mese devo stampare verificando la data di inizio del contratto e che il mese
in cui sono cade nel mese multiplo (1, 3 , 6, 12)
:)

 ha scritto nel messaggio
news:dIFq8.114416$1S3.3...@twister1.libero.it...

Ti eri spiegato benissimo, tant'è che la query consigliata è perfetta.
Devi solo spostare il campo dalla opzione Select alla opzione Where,
mettendo un MOD fra il datediff in mesi e il periodo in mesi.
Ciao
Alberto

 mettendo un MOD fra il datediff in mesi e il periodo in mesi.
Se č cosě grazie :))
Leggendo quello che mi hai appena scritto ho preso la balla :)) adesso la
leggo + lentamente e ci provo
Grazie
A.


wrote:

select * from tabella where (tipo="MENSILE" and (month(now)-month(datainizio))
mod 1 = 0 ) or  (tipo="TRIMESTRALE" and (month(now)-month(data)) mod 3 = 0 )  or
...
certo che se tipo fosse numerico e contenesse 1,3,6,12 sarebbe più semplice:
select * from tabella where  (month(now)-month(datainizio)) mod tipo = 0 
ciao
maurizio



Ho usato questa query per emettere fatture considerando la la prima o
la seconda quindicina di un mese.
In pratica se seleziono la prima quindicina di aprile, mi visualizza
tutti i clienti la cui scadenza capida in qusta quindicina.
Ovviamente "Pagamento" sta per 1 se il pag. e' annuale
2 se semestrale
3 se quadrimestrale
4 se trimestrale
6 se bimestrale
12 se mensile
SQL = "SELECT Clienti.Ditta, Contratti.Contratto_ID,
Contratti.Decorrenza, Contratti.Pagamento, Contratti.Canone FROM
Clienti INNER JOIN Contratti ON Clienti.Cliente_ID =
Contratti.Cliente_ID "
SQL = SQL & "WHERE (((Abs(" & bMese & "-Month(Contratti.Decorrenza))
Mod Contratti.Pagamento)=0)) AND "
If bDay = 1 Then
    SQL = SQL & "Day(Decorrenza)<16"
Else
    SQL = SQL & "Day(Decorrenza)>15"
End If
SQL = SQL & " ORDER BY Day(Decorrenza),Clienti.Ditta;"
Ciao

 tutti i clienti la cui scadenza capida in qusta quindicina.
Che meccanismo usi per non stampare ancora le stesse fatture se per caso
lanci la stampa anche il giorno dopo ?
Newsgroup: it.comp.lang.visual-basic
Titolo: [?][Quasi OT] FileSystemObject e ASP/HTML

Ciao a tutti
Scusate l'OT ma sul NG asp non sono stati in grado di rispondermi.
Dato che qui c'e qualcuno che si diletta col FSO forse mi si puo aiutare :P
Domanda: ma Windozz si segna da qualche parte che un dato file e ascii o
unicode?
Mi spiego:
Creo un file col FSO (ho provato sia in asp che in vb, e lo stesso)
Const ForReading = 1    'Apre un file in sola lettura (Default).
Const ForWriting = 2    'Apre un file in scrittura.
Const ForAppending = 8  'Apre un file e scrive alla fine del file.
Const Unicode = -1  'Apre il file in formato Unicode.
Const ASCII = 0     'Apre il file in formato ASCII.
Private Sub Command1_Click()
    Dim sPath
    Dim oFSO
    Dim oTS
    Set oFSO = CreateObject("Scripting.FileSystemObject")
    sPath = "c:\1.abc"
    Set oTS = oFSO.OpenTextFile(sPath, ForWriting, True, ASCII)
    Call oTS.Write("ciao")
    Call oTS.Close
    sPath = "c:\2.abc"
    Set oTS = oFSO.OpenTextFile(sPath, ForWriting, True, Unicode)
    Call oTS.Write("ciao")
    Call oTS.Close
    Set oTS = Nothing
    Set oFSO = Nothing
End Sub
Poi da una pagina html (o asp supponendo che il codice sia in una pag. asp)
faccio
 <A HREF="C:\1.abc">File ASCII</A>
 <A HREF="C:\2.abc">File Unicode</A>
Se clicco su File ascii IE mi mostra il contenuto nella finestra, il file
unicode invecie me lo scarica.
Questo indipendentemente dal contenuto del file (e lo stesso con caratteri
"binari") o dall'estensione se non e riconosciuta.
Mi servirebbe che il file sia un file ASCII scaricabile... ma e proprio
impossibile?
Ciao a tutti

 unicode invece me lo scarica.
IMVHO, IE analizza (probabilmente solo) i primi caratteri del file,
e decide di conseguenza. Non è la prima volta che lo noto, specie
scaricando file da Unix, a seconda del contenuto si comporta in
modo diverso; e parlo di file senza estensione.
Hope This Helps, G.

 modo diverso; e parlo di file senza estensione.
Ho appena risolto dopo solo 4 giorni di imprecazioni :)
E' il contrario di ciò che hai scritto: il file se in ASCII deve terminare
con un Chr$(26) & Chr$(0) (EOF + NULL) oppure con un numero di caratteri
pari di cui l'ultimo è un Chr$(0) (così crede che sia unicode, presumo...
che bestia!)
Spero che anche questo possa essere d'aiuto.
Ciao


:-)
ciao
ugo
Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report 7 e VB6

Ho creato un report con cristal report. Poi ho inserito nel mio progetto il
controllo Cristal Report OCX, adesso posso lanciare il report e passare
alcuni dati tramite le selection formula.
Visto che sto usando un db Access 2000 come base dati, ho impostato il
database in cristal report tramite ADO (indicandogli la stringa di
connessione (gli alti metodi non funzionavano).
Il mio problema è questo. Come posso fare a cambiare il percorso dove
risiede il database a Runtime?
Visto che compilerò il mio progetto cion una procedura di installazione non
voglio mettere il percorso di ricerca del database fisso sotto
"c:\programmi\miaapp",. ke poi l'utente come al solito me lo installa sottp
"c:\programm files\miaapp" ...


app.path
Alberto

 >
Il problema è che nel mio caso il DB è access 2000, cristal report 7 sembra
non supportarlo diretamente (almeno non sono riuscito) e devo aprirlo
tramite ADO e OLEDB, quindi gli do la stringa di connessione
(provider=microsoft jet 4.0...Source=k:\miaapp\...), adessco che sviluppo il
db, il file di report e il programma sono come vedi su di un disco di rete
chiamato K: ma una volta installato si può trovare ovunque, inoltre
l'applicazione VB può personalizzare percorso e nome del file di database.
Ho letto che tramite l'OCX di cristal Report si può o personalizzare il
database di ogni fonte dati del report, ho passare un recordset da VB e dire
al report di usare quella al posto di quella registrata in creazione, Ma non
ho ancora capitop come....
gRazie.
Newsgroup: it.comp.lang.visual-basic
Titolo: Convertire una stringa.

Salve ragazzi.
Ho la necessità, con VB 2005, di convertire il contenuto di una TextBox in 
un valore in byte da inviare alla porta seriale.
Ad esempio se scrivo nella textbox il valore "11" (quindi una stringa) mi 
occorre convertirla in un byte decimale dello stesso valore da mandare alla 
seriale.
Grazie a tutti. 

 ha scritto nel messaggio 
news:45b7b0ad$0$16405

Potrebbe bastarti la classe Convert.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Re: VBSCRIPT e comandi DOS

 Grazie
Supponiamo che la lista di nomi sia in un file di testo.
Per leggerlo puoi usare l'oggetto TextStream.
Per creare una cartella usi il metodo CreateFolder dell'oggetto 
FileSystemObject.
Per invocare un comando "DOS" da VBScript invece puoi usare il metodo Run 
dell'oggetto WScript.Shell.
Questo č un veloce esempio di come puň risultare lo script (BasePath deve 
contenere il percorso reale della cartella entro cui devi creare le 
sottocartelle):
Dim fso, ts
    BasePath = "c:\........"
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set ts = fso.OpenTextFile("listanomi.txt", 1)
    Do While Not ts.AtEndOfStream
        SubFolder = ts.ReadLine
        FolderPath = BasePath & "\" & SubFolder
        If Not fso.FolderExists(FolderPath) Then
            fso.CreateFolder(FolderPath)
        End If
        Call SetPermissions(FolderPath)
    Loop
Sub SetPermissions(FolderPath)
Dim sh
    Set sh = CreateObject("WScript.Shell")
    cmd = "cacls " & FolderPath & " /T /C /G Guest:F"    ' <- i parametri 
sono solo un esempio
    sh.Run cmd,1,True
End Sub
Bye
Raf 

 mi dice che è impossibile trovare il percorso perchè?
Prima osservazione: BasePath ha un \ di troppo alla fine.
Seconda: vedo che per settare le permissions vorresti lanciare 3 comandi in 
sequenza, ma Run viene invocato una volta sola, sull'ultimo...
cmd = "cacls " & FolderPath & " /E /G m.lattuca:F"
    sh.Run cmd,1,True
    cmd = "cacls " & FolderPath & " /E /G administrator:F"
    sh.Run cmd,1,True
'parte nuova
    cmd = "subinacl /file " & FolderPath &" /setowner=unicampus\"& 
FolderPath &""
    sh.Run cmd,1,True
Così dovrebbe andare meglio, se non fosse per quell' "unicampus\" anteposto 
a FolderPath, che lo trasforma in una stringa tipo 
"unicampus\c:\marisa\nomefolder" che non penso che sia esattamente quello 
che volevi...
Probabilmente allora occorre passare un altro parametro alla sub 
SetPermissions (sarebbe l'Username letto nella lista, giusto?) e usarlo in 
quel punto al posto di FolderPath
    cmd = "subinacl /file " & FolderPath &" /setowner=unicampus\" & Username
    sh.Run cmd,1,True
Bye
Raf 

 - Mostra testo tra virgolette -
scusami se ti rompo ancora potresti cancellare questo messaggio grazie
mille per tutto

 mille per tutto
Se fosse possibile, volentieri, ma ahimé non sono in grado...
Forse qualcuno piů esperto di me in materia di NG sa come fare.
Sorry!
Raf 

 Raf
te lo dico io
in pratica quando apri il messaggio c'è scritto in alto altre opzioni
se lo ampli c'è scritto elimina

 se lo ampli c'č scritto elimina
Ehm... come newsreader uso Outlook Express e non mi pare di vedere nulla del 
genere. :-/

mille per tutto
Da google e difficile , se mi dai il tuo permesso ESPLICITO
te lo cancello io , ma oramai servirebbe a poco visto che
si e' abbondantemente propagato
--
Fosco


si ti do il pemesso.. grazie

 si ti do il pemesso.. grazie
Ok z fatto
--
Fosco
Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzatore Palette .IMG

Mi servirebbe un programmino per visualizzare i file IMG "vecchio stampo" e
la loro palette a 256 colori per convertirli in altro formato grafico da VB.
Sapreste darmi qualche indirizzo?
Grazie.


Se per .IMG intendi il formato GEM Paint, allora Paint Shop Pro lo supporta.
Paint Shop Pro (l'ultima versione e' la 5.01, mi pare) lo puoi trovare su
vari siti/archivi in internet.
Tieni conto che e' tutt'altro che "un programmino"...
Non so se esistono altri programmi piu' "leggeri" che leggano IMG
(probabilmente si, ma non ne conosco).
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [ot?] c#

qualche pagina su pc professionale ultimo.

> qualche pagina su pc professionale ultimo.
:-?
puoi parlare con la versione precedente? non capisco.   ^_^
scherzo...  ;-)
a proposito, dove trovare documentazione e compilatore/ide/reference?
qualche url più preciso di 
www.microsoft.com
 o 
msdn.microsoft.com
--
ciao
- Xaero -
(sostituisci nospam.x con 
inwind.it
 per rispondere)
"Un'idea che non sia pericolosa non
merita affatto di essere chiamata idea"
                Oscar Wilde

qualche url piů preciso di 
www.microsoft.com
 o 
msdn.microsoft.com
mah, la reference la trovi subitissimo, scrivi "C#" nel mini-form di
ricerca di MSDN e ti porta lě
L'ide non so, uno dei beta tester qualche mese fa diceva di usare
ancora solo Notepad

 qualche url piů preciso di 
www.microsoft.com
 o 
msdn.microsoft.com


 C'è un libro ("Presenting C#") in inglese publicato on-line a puntate su


Non ho ancora trovato niente sulla programmazione Win32 con C#. E non so
neanche cosa
aspettarmi esattamente da VS7, perché se tanto mi dà tanto, un linguaggio
nuovo,
 sviluppato da M$, sarà pieno più di bug...hi che di istruzioni.
Ciao
Emanuele
Xaero <xaero@nospam.x> wrote in message 8pvc23$n89$1...@nread1.inwind.it...


  sviluppato da M$, sarà pieno più di bug...hi che di istruzioni.
be', i buchi, o meglio features, *sono* istruzioni ( o conseguenze di :)
Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTOOOOOOOOOOOO

Come faccio a creare 1 controllo data (data1 ad es.) non con l'interfaccia
grafica ma con delel righe di codice ?
aiutioooo
--
------------------------------------------------------
Gianluca Busiello
SIS/EI - CS TIN
Saritel S.p.A.
SS Pontina Km 29.100 - Pomezia
Tel. +39 06.91197.930
------------------------------------------------------

Cerca Load sull'help (load dei controlli non del form).
Salve
            Dbg
Gianluca Busiello ha scritto nel messaggio ...


 wrote in message
news:fT3l6.7988$k55.3...@news.infostrada.it...


Ci sono un sacco di post precedenti.
Inserisci su un form un controllo data con indice uguale a 0 (controllo 0 di
una matrice di controlli).
Poi da codice Load data(1)
Salve
                Dbg
Gianluca Busiello ha scritto nel messaggio ...


grafica ma con delel righe di codice ?
Premi EFFEUNOOOOOOOOOOO
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
---------------------------------------------------------------------------


attenzione: se scrivi cosě va a finire che scrive "EFFEUNOOOOOOOOOOO" e non
succede niente (oppure cerca il tasto con scritto "EFFEUNOOOOOOOOOOO" e non
lo trova: "press any key"...) :)
Non ascoltare moreno: devi premere il tasto "F1" (quello in alto a sinistra
vicino all'"ESC")
Ciao :)



hai ragione, scusa, mi sono fatto prendere dall'euforia....

Newsgroup: it.comp.lang.visual-basic
Titolo: Punto o virgola???

Il mio programma (VB5) deve leggere dei file di dati prodotti da
un'applicazione Fortran. Putroppo VB riconosce la virgola come separatore
decimale e il punto come separatore delle migliaia mentre il programma
Fortran fa esattamente l'opposto. Il risultato è che 5.450 viene letto come
5450 !!!!
Qualcuno sa aiutarmi?
Ciao
--
Sabina Terenzi
ku5be...@tellnet.pesaro.ps.it

Ciao
Ciao,
Probabilmente leggi il file prodotto dall'applicativo fortran con sistemi di
lettura "standard" che chiaramente controllano e riconoscono i formati.
Hai provato ad aprire e leggere il file in "binario"?
In questo modo puoi leggere i singoli bytes del file, a prescindere dal
formato.
Ti lascio un esempio banale:
Dim NumeroFile as integer
Dim B as string
NumeroFile=Freefile
OPEN "nomefile.est" for BINARY as #NumeroFile
do while not(eof(NumeroFile))
    B=Space$(1)
    Get #NumeroFile,,B
    '------------------------------
    '
    '  Inserisci qui le tue routines
    '
    '------------------------------
loop
close #NumeroFile
Tieni conto che la riga B=Space$(1) è quella che dimensiona la quantità di
Bytes letti in un solo passaggio (get).
Infatti per leggere da un file in modo binario, devi prima dimensionare una
stringa che poi verrà riempita di dati presenti nel file, in dipendentenza
della "dimensione" della stringa stessa.
Inoltre il comando GET accetta, come secondo parametro, la posizione
"fisica" all'interno di un file, infatti "Get #NumeroFile,1000,B" inserisce
nella stringa B i dati presenti a partire dal 1000mo byte del file.
Se non indichi un valore, all'apertura del file il "puntatore" sarà al byte
1 e verrà incementato automaticamentedel numero di bytes letti
(nell'esempio, di un byte alla volta).
Se indichi un valore ("Get #NumeroFile,1000,B") in pratica blocchi il
puntatore alla posizione indicata. Se vuoi leggere altri dati di altre
posizioni devi variare il valore del puntatore o utilizzare il comando SEEK
#NumeroFile,ValorePuntatore.
Spero di esserti stato utile.
Aldus
ald...@usa.net

Qualcuno sa aiutarmi?
Puoi usare la funzione Format() oppure cambiare le impostazioni
internazionali nel pannello di controllo di win95
ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto

Salve, come posso fare a visualizzare il recordset selezionato con ado su
più form?
Esempio: Quando inserisco i dati di una persona su + form, tipo:
Form1: Nome, Cognome, Tel
Form2: Età, Indirizzo, Cellulare.
e chiudo il programma, si memorizza tutto in un DB access gestito da ado.
Quando apro il prog e seleziono tra i record inseriti quello che mi
interessa, nella form 1 viengono visualizzati i primi
dati(Nome,Cognome,Tel), quando clicco su un command, questo deve aprire la
form2 con gli altri dati di quel determinato record(Età, Indirizzo,
Cellulare).Potete spiegarmi come posso fare?
GRAZIE

 
beh... spero ti basti l'idea
supponiamo che tu sei su form1
carichi i dati che vanno su tale form mediante i soliti e blasonati
metodi.
Invece se vuoi farlo su altri form, per esempio form2,
la fai visualizzare con l'istruzione
form2.show
e poi per caricare i dati in essa accedi ai controlli secondo questa
sintassi
form2.controllo.proprieta=valore
per esempio per impostare la caption della label2 sul form2 basta
scrivere
form2.label2.caption="ciao mamma guarda come mi diverto"
ciao

Vi spiego il mio problema:
avrei bisogno di scrivere dei dati su un file e poi tramite un'istruzione
sql trovare, cercando per record tittu gli altri dati.
Questo è quello che faccio:
apro il file con l'istruzione open, e poi scrivo(numeri o stringhe) tramite
write(write # 1, variabile1,variabile2, etc..)
Fin quì non penso che commetto errori.
Come devo impostare il mio programmino per dare la possibilità all'utente di
cercare i dati che ha inserito ?.
Mi sta bene pure sapere dove posso trovare esempi di programmi già
scritti(libri o siti)
Grazie infinite per il vostro aiuto

Newsgroup: it.comp.lang.visual-basic
Titolo: convertire da visual basic 3 a 5

come si possono compilare i programmi in visual basic 3 con vb5 ???
---------------------------------------------------------------------
remove z by my address to contact me

>come si possono compilare i programmi in visual basic 3 con vb5 ???
devi prima aprirli (e salvarli) con VB4-16
Newsgroup: it.comp.lang.visual-basic
Titolo: Sfondo trasparente per icone

Come posso impostare il colore di sfondo trasparente per le icone in modo
che quando le visualizzo in un CommandButton venga utilizzato il grigio di
default invece che il colore di sfondo dell'immagine?
Grazie.
Skysurfer

 wrote in message
news:9eaqt6$kba$1...@serv1.iunet.it...


 ha scritto nel messaggio
news:9eaqt6$kba$1...@serv1.iunet.it...

....usare come sfondo dell'icona lo stesso grigio del CommandButton ?
.....lo so, lo so, non è elegante .....
.....però si fa presto.
Ciao
Stef

 .....però si fa presto.
sconsiglio. quando passi da un monitor 64k a uno 16m, i grigi cambiano.
con tipico effetto pugno nell'occhio :)
e poi, un mio amico tiene menu e pulsanti violetti, con le scritte in
nero. secondo me impartisce i clic in modo assolutamente aleatorio, ma
sono fatti suoi. cmq sia, le icone girgie sarebbero bruttine.
microangelo ha l'apposito "transparent".
ciao, a.

 Ciao Diego.
Un programma simile credo ci sia sul CD di installazione di Windows con il nome
di Imagedit.exe
Ciao!
Esteban
Hosted by 
www.seber.it

Ho usato Microangelo e sono riuscito senza problemi.
Sapete se esiste una funzione simile anche in Paint Shop Pro?
Ciao.

 ha scritto nel messaggio
news:9ed0j9$hg5$1...@serv1.iunet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: FlexGrid colore celle singole

Forse la domanda č stupida ma come si fa a colorare una singola cella in
una Flexgrid  senza passare
attraverso  l'evento Click  ?
Mi sembra che che la  proprietą CellBackColor funzioni solo con l'evento
Click mentre a me
serve colorare una singola cella (del colore che voglio) a priori  e
indipendentemente dall'evento Click.
Grazie dell'aiuto.
Massimo

 l'evento Click
In che senso funziona solo con l'evento click?
Non mi sembra...
basta che imposti row e col
e poi setti la proprietą!
MIk
Newsgroup: it.comp.lang.visual-basic
Titolo: Individuare i ritorni a capo in una stringa

Devo trovare i ritorni a capo e i line feed in una stringa copiata dalla
Clipboard e sostituirli con uno spazio. Come faccio per individuarli?.
Ho pensato questa procedura ma il vbcrlf non è riconosciuto.
For a = 1 To Len(string)
    If Mid(string, a, 1) = vbCrLf Then
        temp = temp & Chr(32)
    Else
        temp = temp & Mid(string, a, 1)
    End If
Next a
Qualcuno sa quale a char(?) corrisponde il ritorno a capo o comunque come si
individua?
Grazie
Edika

individua?
allora: VbCr = Chr$(13) mentre VbLf = Chr$(10)
vbCrLf = Chr$(13) & Chr$(10)
ciao....
-- 
Sidewinder  
---------------------------------------------------------------------
"... all the modern inconveniences ..."
		-- Mark Twain
---------------------------------------------------------------------

 Next a
prova con vbCr o con vbLf, non ricordo quale è...
--
ciao
- Xaero -
"Quando ero piccolo i miei genitori mi
 volevano così bene che nella culla mi
 misero un orsacchiotto vero"

 Qualcuno sa quale a char(?) corrisponde il ritorno a capo o
comunque come si individua?
vbCrLf = vbCr & vbLf = Chr$(13) & Chr$(10)
Quindi, come vedi, e` composto da due caratteri quindi
    If Mid(string, a, 1) = vbCrLf Then
andrebbe sostituito con
    If Mid$(string, a, 2) = vbCrLf Then
Potresti pero` abbreviare i tempi di esecuzione della
procedura con l'uso di InStr.
Se poi usi VB6 esiste la funzione Replace.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X

individua?
Al resto ti hanno già risposto.
Guarda Asc(): ritorna il codice ascii del _PRIMO_ carattere di una stringa,
quindi Asc(vbCrLf) = 13, ma se non funziona significa che il problema è un
altro: Len(vbCrLf) = 2.
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: Stampa di sferette (tipo option)...printer o datareport

Ciao ragazzi,
premetto che ho sempre usato il datareport per le mie stampe, e fin quando
si è trattato di stampare dati "strippa o strappa" ci sono sempre riuscito,
anche se a volte con qualke accorgimento non troppo carino...il datareport
non è molto flessibile a mio avviso.
Ora devo stampare su un modulo precompilato dei campi testo provenienti da
un form (e fin qui nessun problema) e dei pallini (devo riempire in pratica
dei cerchietti presenti sul modulo) (tipo "scelta 1,scelta2" o "maschio,
femmina" etc.).
Con datareport non ho idea di come fare...avevo pensato magari di usare
l'oggetto printer...
Tipo "se il valore è uno stampami un cerchietto in quellla posizione"...
Se non trovo la soluzione adatta, ho anche pensato di ovviare al problema
stampando delle x sul cerchietto utilizzando il datareport...(in questo caso
è molto + facile :-) )
Voi che ne dite?
Esperienze, particolari attenzioni che devo prestare?
P.s: il modello è anche orientato in orizzontale, con datareport ho
orientation (mi sembra sia questa la proprietà) e con il printer?

 l'oggetto printer...
Printer.Circle
-- 
ciao, hal


ops...il lunedě mattina mi tornano le reminescenze adolescenziali!!!

 "scelta 1,scelta2" o "maschio, femmina" etc.).
Con il datareport puoi utilizzare le Shape, realizzando i pallini neri 
all'interno dei cerchietti 'solo-bordo'. A seconda che un determinato campo 
sia vero o falso, rendi la shape visible o meno.
A questo punto bisogna vedere come realizzi il datareport.
Se lo colleghi ai dati, temo che l'unica soluzione sia inserire una 
RptTextBox che sia posizionata, come 'piano', sopra al cerchietto pieno ma 
sotto al cerchietto vuoto. Estraendo, nella query, una batteria di caratteri 
non visibili (c'č un char, credo il 130 o giů di lě, che non viene wrappato 
dal datareport ma non č visibile) come False e una stringa vuota come True, 
ottieni che l'RptTextBox si autodimensioni a coprire il cerchietto, o meno. 
Questa č sicuramente la cosa piů semplice, ma se hai mille cerchietti 
diventa un po' noiosa come operazione.
Se invece i dati della Section1 li inserisci dinamicamente da codice (cosa 
che a volte č l'unico modo per ottenere determinati effetti, e che 
sicuramente per report con molte righe da stampare per ciascun record č 
vantaggioso), allora devi semplicemente mettere .Visibile=True o False del 
cerchietto pieno di cui sopra.
Ciao
Alberto
-- 
E tutto mi sembrava andasse bene...
Newsgroup: it.comp.lang.visual-basic
Titolo: Finestra trasparente

Sto cercando di realizzare un finestra simile a qualla dell'assistente di
office 2000.
Sono riuscito con le regioni ad ottenere un effetto quasi perfetto ma ora mi
trovo a dover cambiare la forma della finestra durante l'esecuzione del
programma e ricreare la regione che mi tagli la finestra in run.time con la
mia molto poco veloce routine non se ne parla nemmeno.
Sono convinto che debba esistere un modo per:
- rendere trasparente un colore di una finestra
- creare una regione data una bitmap (monocromatica ad esempio) (č quello
che fa la mia routine ma č troppo lenta).
Scusate se non mi sono spiegato bene ma ringrazio anticipatamente chiunque
riesca ad aiutarmi.
Cepe.

che fa la mia routine ma è troppo lenta).
Mmmm, non conosco niente del genere però prossimamente potrei aggiungere
questa feature nel mio OCX per la gestione delle regioni (presente sul sito
comune)...
Ma ci vorrà comunque un po' di tempo :(
Ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Outlook Express

Probabilmente avrete notato che a volte *sembra* (giuro) che io posti 65535
repliche dello stesso post, nella realtà io posto una volta, OE si comporta
in due modi:
1) Sembra metterci una vita a postare il msg...mentre invece mi accorgo poi
che lo ha inviato un sacco di volte!
2) Mi dice che non riesce ad effettuare l'invio...ed invece come sopra  ecco
una valanga di messaggi!
Io utilizzo OE 5 su Win98 e da alcuni giorni ho installato la 5.5,
(scaricata da M$ credendo che ponesse fine a tutto cio'), ma invece sono
sempre nella stessa situazione.
Come Server di posta uso MDaemon su di un server NT ed il firewall è una
macchina Linux.
Capitano anche a Voi questi casini?
Avete qualche idea in proposito?
...ora premo il tasto send e spero di non vedere una valanga di questi msg
sul ng...
Ciao, Adriano

 wrote in message
news:8l6q2c$8r3$1...@fe2.cs.interbusiness.it...


 Alessandro
Come già suggerito da Pal...(a proposito dov'è finito?...non si legge
più!...sarà mica in ferie?...), ho alzato il timing del server *a palla* ma
niente....la connessione la effettuo da Interbusiness a 2Mbps su
new.interbusiness.it
 però i risultati sono quelli citati in precedenza...da
casa con Tiscali non ho ancora avuto il problema...mahh...chissà...
Ciao, Adriano


---
Vorrei vedere le piramidi di Cheope,
ma sono miope, ma sono miope.
---


A questo punto non saprei, magari prova a piadinare OE... E magari piazza un
bel Forte' Agent sulla tua macchina, sara' piu' difficile da usare ma se
dice sent e' sent, ed e' inviato una volta sola.
Ciao,
Alessandro

 Scaricati FreeAgent.
...Fatto ! .. speriamo bene..
Ciao, Adriano



Io lo uso da un mese e mi trovo bene: non ha l'estetica di OE, ma
neanche i problemi.
