mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Sorting an array of user defined type in VB6

I'm currently trying to sort an array of user defined type
Public Type TransRec
    Record_Type As String
    Account_Year_Ref As String
    Operator_ID As String
    Code As String
    Amount As String
    Date As String
    Time As String
    Srce As String
    Effective_Date As String
    Period_End_Date As String
    Cheque_Ind As String
    Sequence_No As String
End Type
on Account_Year_Ref and Sequence_No.
I would be grateful if any pointers on how to accomplish this as
although I know how to sort arrays I'm not sure how to accomplish this
with arrays of data types like above. The array will contain aprox.
20000 items.
Many thanks,
Jonathan.

> I'm currently trying to sort an array of user defined type
This is it.comp.lang.visual-basic
"it." mean ITALY, NOT "Information Tecnology" ;-)
Bye
ps: I'm not able to answer your question

 [sort] on Account_Year_Ref and Sequence_No
Since all datas are in string form, to compare different position try
something like this:
if aArray(Pos1).Account_Year_Ref & aArray(Pos1).Sequence_No _
  =  aArray(Pos2).Account_Year_Ref & aArray(Pos2).Sequence_No then
Bye
*Bob*


azz... hai tradotto anche la firma ;-)
ciao, hal

 azz... hai tradotto anche la firma ;-)
Hehehe.
Però noto che 'sti inglesi non danno soddisfazione perché non rispondono
mai. ;-)
Ciao
*Roby*
Newsgroup: it.comp.lang.visual-basic
Titolo: Unire array di stringhe

Ciao,
------------------------------------
- S.O.: Win XP
- Visual Studio 2008
------------------------------------
ho un file csv al quale devo aggiungere delle parti o sostituirne
alcune al suo interno.
Attualmente leggo con StreamReader il file, analizzo la stringa (creo
un array di stringhe splittate per punto e virgola) e la riscrivo su
un file nuovo con StreamWriter.
Il problema e' sulla creazione della stringa finale da scrivere; una
soluzione sarebbe usare un ciclo For concatenando gli elementi
dell'array con il simbolo di punto e virgola ma questo porterebbe a
creare una valanga di stringhe in memoria (corretto?).
Un'altra soluzione potrebbe essere quella di utilizzare un ciclo For
ma usare StringBuilder invece che il concatenamento.
Ci sono altre possibili soluzioni? Tenete presente che l'array
contiene almeno 60 elementi e le righe sono almeno 700.
Grazie mille
Ciao BlackSun

Scusate... l'oggetto era fuorviante


Ciao,
ho trovato un terzo metodo String.Join ma mi rimane il problema delle
quantita' di stringhe che rimangono in memoria visto che dovrei fare:
Dim stringaFinale as String = String.Join(";"c, mioArray)
Confermate?
Grazie mille
Ciao BlackSun


 Confermate?
Join internamente usa uno StringBuilder.
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 Join internamente usa uno StringBuilder.
Perfetto... non lo sapevo.
Ora estendo la mia domanda... se io scrivo questo codice:
For i As Integer = 0 to 1000
      Dim stringaFinale as String = String.Join(";"c, mioArray)
Next
la variabile stringaFinale sara' sempre la stessa (cambiando solamente
valore) o ne verrebbe creata una nuova con puntatore divers?
Grazie mille
Ciao BlackSun

 valore) o ne verrebbe creata una nuova con puntatore divers?
una nuova per ogni iterazione, le stringhe sono immutabili.


 una nuova per ogni iterazione, le stringhe sono immutabili.
Grazie per la conferma di quanto ricordavo... quindi poi si lascia al
GC la pulizia di tali variabili.
Ma, in un caso come questo, dove ho 700 righe da analizzare e
riscrivere quale sarebbe il procedimento migliore per evitare la
creazione di tutte quelle stringhe?
Utilizzare un DataTable di appoggio? Oppure qualcos'altro?
Grazie mille
Ciao BlackSun

 wrote in news:4d4b0a8d-2e6e-44a6-9cc2-
11b1c0...@w30g2000yqw.googlegroups.com
:

uno stringbuilder pare brutto?
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] modificare/aggiungere un record con ADO

Salve, qualche gg fa ho chiesto come aprire un file .MDB con ADO. Ora sto
facendo delle prove solo che non riesco a modificare un record, perchč mi da
un errore '3251' "l'operazione richiesta dall'applicazione non č supportata
dal provider".
Io l'ho gestita cosě:
    Dim miaConnessione As ADODB.Connection
    Dim mioRecordset As ADODB.Recordset
    Set miaConnessione = New ADODB.Connection
    miaConnessione.ConnectionString =
"Provider=Microsoft.Jet.OLEDB.3.51;Data
Source=D:\Arosoft\CalzatALB\Archivi2\Anagrafiche.mdb;"
    miaConnessione.Open
    Set mioRecordset = New ADODB.Recordset
    mioRecordset.ActiveConnection = miaConnessione
    mioRecordset.Source = "Articoli"
    mioRecordset.CursorType = adOpenForwardOnly
    mioRecordset.Open
    mioRecordset.MoveFirst
    Text1.Text = mioRecordset!codice
    mioRecordset!codice = "pippo2"         ------->  Quando esegue questa
riga mi da errore!!!!
    mioRecordset.Update
Dove ho sbagliato??
Ho provato anche in questo modo...
    Dim miaConnessione As ADODB.Connection
    Dim Connessione As ADODB.Connection
    Dim mioRecordset As ADODB.Recordset
    Set miaConnessione = New ADODB.Connection
    miaConnessione.ConnectionString =
"Provider=Microsoft.Jet.OLEDB.3.51;Data
Source=D:\Arosoft\CalzatALB\Archivi2\Anagrafiche.mdb;"
    miaConnessione.Open
    Set mioRecordset = New ADODB.Recordset
    mioRecordset.ActiveConnection = miaConnessione
    mioRecordset.Source = "Articoli"
    mioRecordset.CursorType = adOpenForwardOnly
    mioRecordset.Open
    mioRecordset.MoveFirst
    Text1.Text = mioRecordset!codice
    Dim mioComando As ADODB.Command
    Set Connessione = New ADODB.Connection
    Connessione.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=D:\Arosoft\CalzatALB\Archivi2\Anagrafiche.mdb;"
    Connessione.Open
    Set mioComando = New ADODB.Command
    mioComando.ActiveConnection = miaConnessione
    mioComando.CommandText = "UPDATE SET codice = 'pippo2' where descr =
'pluto'"
    mioComando.Execute
    miaConnessione.BeginTrans
    If MsgBox("Confermi?", vbYesNo) = vbYes Then
        miaConnessione.CommitTrans
    Else
        miaConnessione.RollbackTrans
    End If
ma al comando     mioComando.Execute    mi dice che la sintassi dell'UPDATE
č sbagliata, E L'HLP NON E' DISPONIBILE!!!!
Perfavore Aiuto!!   :-((
Grazie.
Paolo


UPDATE <nome_tabella>
SET <nome_campo> = <valore>
WHERE <lista_condizioni>
Ciao
Aldo

 è sbagliata, E L'HLP NON E' DISPONIBILE!!!!


 rs.Open SQL, cn, , ,adCmdText
!!ERRATA CORRIGE!!
!!ERRATA CORRIGE!!
------------->>>>>>>>>>>>>>>>>> rs.Open SQL, cn, adOpenKeyset,
adLockOptmistic, adCmdText
!!ERRATA CORRIGE!!
!!ERRATA CORRIGE!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto VB5 MSflexGrid

Ho installato VB5 proffesional sui miei due computer
Per un progetto necessito del component MSflexGrid
Mentre su un computer funziona normalmente sull altro mi da questo errore:
Non sono disponibili informazioni sui diritti di licenza per questo
componente.Non sono disponibili i diritti necessari per utilizzare questa
funzione in ambiente di progettazione(Errore 429)
qualcuno mi spiega che significa?

 ha scritto

www.comune.modena.it/cittadini/apal/tmp/vb5ctrlfix.zip
www.comune.modena.it/cittadini/apal/tmp/vbc6.zip
anche su
http://members.xoom.it/vbup
sono zip piccoli di ms.
dovrebbero risolvere un po' di problemi relativi alla
licenza di determinati controlli.
ovviamente non mi assumo alcuna responsabilita'.

Newsgroup: it.comp.lang.visual-basic
Titolo: resize dei controlli di un form

Ciao a tutti.
Avevo mandato la settimana scorsa una mail
per chiedere come fare il resize dei controlli contenuti in form.
Intanto ringrazio chi mi ha risposto.
Mi è stato consigliato di usare degli ocx che ho
provato e che funzionano.
Solo volevo adesso scrivermelo da me!!
Come posso coordinare gli eventi Paint e Resize della Form???
                  Grazie a tutti
        Gianfri

 wrote in message
10kj7tm$sji$1...@fe2.cs.interbusiness.it...

io uso questo codice
                ciao ;-)) Davide
RESIZE ALL CONTROLS ON A FORM
Source Code:
Note:This code is formatted to be pasted directly into VB.
Pasting it into other editors may or may not work.
'***************************************************************
' Description:This code resizes all controls on a form. It is int
'     ended for resizing the form and its controls according to the cur
'     rent screen resolution.
'***************************************************************
Private Sub Form_Click()
    'This code will resize the form and all its controls from a 800x6
    '     00 screen resolution
    'to 640x480 resolution
    'To be able to see the code working on your screen, change the "<
    '     " below to ">"
    On Error Resume Next'This is only needed if there is a control that does
not have one or more of the below properties
    If Screen.Width < 9800 Then 'if screen width is approx 640 pixels
        ResizeX = 640 / 800 'Set X resizing ration
        ResizeY = 480 / 600 'Set Y resizing ration
        Me.Width = Me.Width * ResizeX
        Me.Height = Me.Height * ResizeY
        For I = 0 To Me.Controls.Count - 1
            Me.Controls(I).Left = Me.Controls(I).Left * ResizeX
            Me.Controls(I).Top = Me.Controls(I).Top * ResizeY
            Me.Controls(I).Height = Me.Controls(I).Height * ResizeY
            Me.Controls(I).Width = Me.Controls(I).Width * ResizeX
            Print Controls(I).Name
        Next I
    End If
End Sub
Newsgroup: it.comp.lang.visual-basic
Titolo: Progress Bar

Salve a Tutti, non sono esperto in Controlli ActiveX....
ho sritto una piccolissima applicazione che copia un file a fronte
dell'evento:
Private Sub Esegui_Click()
FileCopy "e:\posta\in.pst", "e:\posta\archivio_in.pst"
End Sub
Poichè il file è di notevoli dimensioni volevo inserire una Progress Bar per
non avere il form inattivo durante la copia.
Come faccio??
grazie
--------------------------------
Inviato via 
http://usenet.libero.it


[cut]
Soluzione 1: usi la funzione CopyFile - aggiungere una reference a 
Microsoft Scripting RunTime - usare una sintassi del tipo
    dim fso as new Scripting.FileSystemObject
    fso.CopyFile <fileorig>, <filedest>
Soluzione 2: implementa un ciclo del genere
- apri il file origine con OPEN <> FOR INPUT BINARY as <>
- apri il file destinazione con OPEN <> FOR OUTPUT BINARY as <>
DIM S as string * 256
DO UNTIL EOF(origine)
GET #origine, s
PUT #dest, s
Loop
-- 
Bye by SixaM 8-]
Sito comune: 
www.it-lang-vb.net
'La tua prima fonte di aiuto e' tra le orecchie'
'...credi che la forfora sappia qualcosa?'




 Come faccio??
Se il problema e' solo la copia di un file, la soluzione di SixaM mi 
sembra la migliore.
Nel caso piu' generale di operazioni di lunga durata ed atomiche io ho 
cominciato ad usare il controllo animation. In partica avvii prima la 
visualizzazione di un file avi e poi lanci la tua operazione "lunga". Al 
termine dell'operazione fermi il file avi.
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!


l'evento funziona, il problema č che volevo inserire la PB per visualizzare
lo stato di avanzamento della copia dei file.
il filmato... mi sembra piů da intrattenimento...
grazie per il consiglio
Silvius


usa la API SHFileOperation, che visualizza il dialog standard di
windows (animazione compresa) mentre copi... e fa anche un sacco di
altre cose...
-> GbC|
www.gbcweb.com
PS: GiGio? Ci sei?

 il filmato... mi sembra piů da intrattenimento...
Il filmato puo' essere lo stesso che vedi quando copi un file in 
explorer, non "La corazzata Potemkin". :-)
Qui ne trovi qualcuno:
http://www.vbaccelerator.com/home/Resources/Graphics_Library/AVI/index.asp
ed anche sul cd di VB ce ne sono ...
Se invece hai proprio bisogno della ProgressBar devi per forza usare un 
ActiveX in un thread separato. Vedi qui:
http://www.vbaccelerator.com/home/VB/Code/Libraries/Threading/Multi-threading_using_classes_in_ActiveX_EXEs/article.asp
o anche sul CD di VB o sulla guida di VB.



Perfetto Grazie


 PS: GiGio? Ci sei?
ECCHIME ! Volevo proprio consigliarlo io stavolta ! :-/

ghghgh...
e poi copia i files anche se sono aperti e/o in uso :))
-> GbC|
www.gbcweb.com
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] b. shlwapi.dll è una Win32 o IE, o cosa?

Hello,
per avere la certezza :-D della portabilità della classe di cui al post
a., dovrei sapere se la dll Shlwapi.dll è una dll standard di windows
oppure fa parte di IE o Win98. Se non ci fosse bisogno di distribuirla,
eviterei di scrivere a mano le funzioni di compattazione dei path...
preferirei distribuire solo il codice...
Grazie
Flavio Ronco
--
f.ronco@*NonMiServeNiente*
flashnet.it
http://www.metabrains.com
  [Under Construction]
-------------------------------------------------------------
"Che pubblico in gamba! Se ci dite dove lavorate,
domani mattina se abbiamo tempo vi veniamo a vedere"
[Paolo Rossi]

preferirei distribuire solo il codice...
Fa parte di IE4 ed è anche di sistema per win98, ma per esempio win95a/b/c
non ce l'ha o se ce l'ha non è compatibile con quella di IE4 (mancano delle
funzioni o mancano parametri).
Enjoy!

Newsgroup: it.comp.lang.visual-basic
Titolo: DHTML e firma digitale

Ho letto che per distribuire un programma DHTML devo comprare una firma
digitale..ma cosa vuol dire? dsa chi si compra e quanto costa???  :-((
--
!------------------------------------------------!
!ICQ     : 8281944
!E-Mail  : 
Dan...@levon.it
!
!"Accadono cose che sono come domande,
!passano ore,giorni a volte anni e poi
!la vita risponde !"
!
!
!HomePage : 
http://www.levon.it/daniele
!
!------------------------------------------------!

digitale..ma cosa vuol dire? dsa chi si compra e quanto costa???  :-
<<La domanda lo postata io, e in realtà so solo che è gratis e ti conviene
chiedere al tuo provider che te lo sà dire sicuramente.
Non sò ancora come far funzionare il dhtml però.
Rivolgo anche io la domanda al news

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB.NET] complicato o sono io?

ciao  a tutti
sto combattendo con 
vb.net
, cose che facevo in modo semplicissimo con vb 6
ora mi risultano articolate o incomprensive.
ad esempio se ho una casella di testo dentro un frame(ora chiamato in altro
modo) ed un'altra fuori, questa operazione non fuunziona:
testoinframe.text=testofuori.text
poi non c'è più l'evento lostfocus nelle caselle di testo, nella guida dice
di si, ma poi non funziona;
il databinding dei controlli dentro il frame non funziona, mentre fuori si,
allora per ovviare l'ho fatto fuori e poi con una serie di passaggi
articolati ho ricopiato nel frame gli stessi controlli con altro nome e dop
o tentativi vari sono riuscito a ricopiare i valori, solo che se ai
controlli fuori assegno false la proprietà visible non funziona più
niente.........
questo e molto altro
allora secondo me mi sfugge qualcosa, per fare una cosa che prima facevo in
un giorno ora ci sto impiegando una vita.........AIUTO
sandro

 un giorno ora ci sto impiegando una vita...
basta un pò di pazienza .. ;-)
CIAO

 ha scritto nel messaggio
news:Rj1H8.4739$se2.1...@twister1.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Scrivere su un file in unicode

Salve a tutti, sto cercando di scrivere in unicode su un file usando le
librerie di .NET
So di dovere anteporre FF ed FE all'inizio del file di testo.
Ho scritto questo codice:
Dim scriviunicode As UnicodeEncoding
Dim fs As FileStream
Dim doc As BinaryWriter
Dim byteuno As Byte
Dim bytedue As Byte
scriviunicode = New UnicodeEncoding()
fs = New FileStream("c:\ciao.txt", FileMode.OpenOrCreate)
doc = New BinaryWriter(fs, scriviunicode)
doc.Write(byteuno)
doc.Write(bytedue)
doc.Write("ciao")
doc.Write("ciao")
doc.Close()
Poi sono andato a guardare con un editor esadecimale che robacce aveva
scritto sul file
Problemi:
1. I primi due byte risultano essere impostati a 00 invece che ad FF ed
FE
2. Ogni volta che chiamo Write mi antepone alla stringa che voglio
scrivere un carattere 08 che non mi permette la corretta visualizzazione
in notepad.
Correggendo manualmente il file (imposto i primi due byte e tolgo il
terzo) il file risulta leggibile da Notepad.
Insomma da 00 00 08 e poi tutto il resto faccio diventare il tutto FF FE
08 e poi tutto il resto invariato.
Come risolvo?
Grazie

Ehm... mi ero dimenticato di settare il valore di byteuno e bytedue a
255 e 254.
Cmq mi rimane il problema del 08 che Write mi antepone all'inizio della
stringa da scrivere... chi mi da una mano?

Newsgroup: it.comp.lang.visual-basic
Titolo: Icona di chiusura form

ciao a tutti, volevo porvi un piccolo quesito.
come posso fare per disattivare da un form, l'icona in alto a DX, che
permette di chiudere il form??
grazie a tutti per l'aiuto
ciao Luca

 wrote


Newsgroup: it.comp.lang.visual-basic
Titolo: Verifica applicazione in esecuzione

U

U

B

C
Newsgroup: it.comp.lang.visual-basic
Titolo: Telefono

C'è un modo per scoprire l'id chiamante dal modem?
Posto che dopo il primo squillo la rete telefonica lo invia, vorrei sapere
come intercettarlo...
Il problema è per win: con l'assembler dello Z80 (MSX) l'ho risolto, e mi
sarebbe utile che anche il PC, avesse questa caretteristica...

 ha scritto nel messaggio
news:01bfb39f$fe594b20$d8340a3e@default...


 wrote in message
8epjft$7e7$1...@nmaster.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Textbox per input orario

Salve,
avrei necessita' ti una textbox per l'immissione dell'orario compreso i
millimesimi di secondo nel formato minuti : secondi . millesimi (00:00.000)
la data-picker sarebbe ottima ma non sono riuscito a impostargli il formato
custom per i millesimi, penso che non sia possibile,
ho provato con l'evento keypressed, ma non credo sia la strada giusta,
sul web dopo una giornata intera non ho trovato un'ocx adatto,
dati i tempi stretti (e ammesso che ci riesca!) volevo evitare di farmene
una da me, dovrei partire quasi da zero :(
c'e qualcuno che puo' darmi una mano?
In ogni caso...grazie lo stesso per l'attenzione ;-)
Ciao

"Spike"  ha scritto nel messaggio
[CUT]
dimenticavo, meglio ma non necessariamente free ;-)
e VB6

 sul web dopo una giornata intera non ho trovato un'ocx adatto,
In una giornata, ne avresti potuti scrive 10 di questi "ocx".
Ti basta una textbox ed un po' di codice negli eventi keypress/keydown
Ciao
-- 
Gianluca Cannalire
Microsoft MVP/MCP - Visual Basic
http://www.visual-basic.it
http://community.visual-basic.it/gianluca

 Ciao
Ciao e grazie

 Ti basta una textbox ed un po' di codice negli eventi keypress/keydown
ero partito con una logica sbagliata completamente, ora invece sono riuscito 
a fare una cosa decente con i soli keypress e keydown, pero' non sono 
arrivato alla media di 10 al di', neanche la meta' ;-)
beh adesso posso dire che e' proprio una sciocchezza questa ocx, ma comunque 
se qualcuno non ha voglia di perdere neanche mezz'ora e gli fa' comodo basta 
lo dica, meglio ancora se qualcuno la vuole testare :-)
Ciao e grazie per la...*scrollata*

Newsgroup: it.comp.lang.visual-basic
Titolo: Creare Db Access con SQL

Ciao a tutti, volevo sapere se era possibile creare la struttura di un DB
access (magari tramite ADOX) leggendo la sequenza da un file di testo del
tipo:
******
CREATE TABLE "1"
(
  "ID1"  NUMERIC(10,0) NOT NULL,
  "COD1"  VARCHAR(2),
  "DESC1"  VARCHAR(30),
CONSTRAINT "PK_1_1" PRIMARY KEY ("ID1")
);
CREATE TABLE "2"
(
  "ID2"  VARCHAR(35),
  "SIGLA2"  VARCHAR(2),
  "COD2"  VARCHAR(6)
);
[ecc.]
******
Grazie a tutti :)

 ha scritto nel messaggio
news:AdDpd.52565$Es2.1...@twister2.libero.it...




Certamente che puoi, ma ... visto che hai già espresso tutto in sql
perchè non usare quello per generare la tua tabella di access.
(se devi creare il database hai proprio bisogno di adox).
=======================================================================
Se mi vuoi scrivere togli le maiuscole
cteniza...@hotmail.com
=======================================================================
Newsgroup: it.comp.lang.visual-basic
Titolo: mi parte quel maledetto installer

 da qualche giorno quando avvio VB mi parte quel maledetto installer che
frulla per cinque minuti, cerca dei floppy diverse volte, e poi se ne va
restituendomi i programmi.. cosa cavolo può essere? l'unica cosa che ho
installato in questi giorni è sql 2000, ma non credo c'entri..
e soprattutto... cosa posso farci??

 wrote in message
news:8vh7gp$2f...@news.edisons.net...

La stessa cosa mi e' successa su un disco con Win2K dove avevo fatto la
cazzata di installare Office 2K.
Gli ho dato in pasto due volte il cd di Office, fa fatto qualcosa (senza
dire che cosa), poi non me lo ha piu' chiesto.
Sto pensando che Star Office non e' poi male, inoltre ti danno i sorgenti
...
Ciao
Aldo

Hai controllato che non sia il findfast di office? In caso affermativo,
trovalo ed eliminalo.
Ciao
Alex


Ciao,
io ho avusto lo stesso problema con un antivirus che era settato per
'scannare' anche gli screen saver.Quando tentava di partire lo screen ....
frullava di bestia ..
Ciao
Franco L.

 wrote in message


 wrote in message
news:1M5T5.23286$FV2.7...@news.infostrada.it...

lo elimino sempre per principio non appena installato office... qui parte
solo con vb...

 e soprattutto... cosa posso farci??
prova a dare un'occhiata a
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run*
Ciao
Faber

 wrote in message
news:8vh8j5$jis$1...@nread1.inwind.it...

niente che possa riguardare...


non trovo niente che possa c'entrare... sotto che chiave potrebbero essere?
grazie

 solo con vb...
be', e' contagioso.
me l'ha appena fatto:
lanciato vb --> windows installer: "la caratteristica richiesta si trova sul
cd di frontpage 2000. inserire il cd di frontpage 2000".
a parte che il cd sono due, finche' non gli ho inserito l'1/2 e non ha
sbaracchinato per cinque minuti non e' stato contento.
adesso apparentemente parte normale.
chissa' che caratteristica (sara' la trad. it. di feature).

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

Utilizzando il winsock control 6.0 io controllo da un pc un altro pc via
rete, il problema è che non posso vedere i files dell'altro computer
(server) dal mio (client).
Se avete qualche risposta perfavore scrivetemi...
Grazie.
Timothy
La mia email è 
red...@cesano.com

 wrote in message
news:9638396...@vega.uli.it...


 wrote in message


Newsgroup: it.comp.lang.visual-basic
Titolo: Campo contatore in file MDB


Eh... niente da fare... prima o poi si deve cancellare definitamente, no?
MATRO
http://www.geocities.com/SiliconValley/8383
****** WARNING!! ******
To reply, remove the "*" from the email address.

Eh... niente da fare... prima o poi si deve cancellare definitamente, no?
 Pero' visto cge c'e' ancora,  LO VOGLIO !
In dbase c'e' , funziona un po come il cestino di windows tutto
sommato !!!!
Antonio Tanzillo  
a...@netgroup.it
Marigliano (NA)
Newsgroup: it.comp.lang.visual-basic
Titolo: Common control is right justified with Windows 2000

We have a visual basic 6 application that has been running fine on
Windows 95 and 98.  When we upgraded some of the computers to Windows
2000, the window part of the spin button is right justified and it
hides the incrementing/decrementing number from the user.  In windows
95 and 98, the number in the window part of the spin button is left
justified and is away from the spin button and is visible to the user.
 The version of comcl332.ocx we have is dated May 1999.  Is there an
update for comct332.ocx?  Is there a version of comct332.ocx for
Windows 2000?
 -------
|   |/\ |
| 2 |== |
|   |\/ |
 -------

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Form Trasparente

Si può rendere un form trasparente senza l'aiuto degli ocx (senza poter
cliccare attraverso il form)? Qualcuno può
inviarmi il codice?
Grazie

 inviarmi il codice?
Sito Comune, vedi in firma.
Se non erro c'è una risposta per tutt'e tre le tue domande.
Bye, G.
--
---------------------------------------------
    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 !
---------------------------------------------
Real E-address: gaetano_d(chioccioletta)
hotmail.com

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Disegnare su una picturebox e stampare

Ciao a tutti !!
Dunque questa é una domanda lunghina :
Siccome devo stampare su alcuni cartoncini formato cartolina, e oltre al
testo devo inserire linee e/o rettangoli , mi domando se c'e' la possibilità
di :
1- Disegnare su una picturebox , cambiando le dimensioni di una linea o
rettangolo usando il mouse. (come in Paint e in tutte le applicazioni
grafiche)
2- Inserire del testo ad una specifica posizione sulla picturebox. (magari
con un click di mouse, per la posizione. Questo dovrei saperlo, evento click
e coordinate X,Y giusto ?)
3- Fare una copia di tutto quello che c'e' sulla picturebox e stamparlo (su
Win32 Help mi sembra che parlassero di poter usare l' API BitBlt per copiare
la parte di immagine che si vuole stampare e poi mandarla alla stampante,
confermate ?)
4- Le misure sono espresse in Twips giusto ? come faccio a convertirli in
millimetri o centimetri, per la posizione del testo e delle immagini ?
C'e' qualcuno che sa se in giro su internet c'e' un esempio , o una sorgente
per un applicazione grafica, stile il Paint ? non mi servono i colori, ne' i
pennelli speciali. Devo solo disegnare linee, rettangoli vuoti , e testo
(con caratteri TrueType).
Grazie per aver letto la mia domandona e per le eventuali risposte. Anche la
risposta ad una sola domanda é ben accetta :-)
A buon rendere !!
DaVe
--
Leave [KILL SPAM] from adress.

...
---CUT---



Le risposte alla prima, seconda e quarta domanda le trovi nel capitolo 12
"Utilizzo di testo e grafica" del manuale del programmatore. Se non hai il
manuale in formato cartaceo, lo puoi trovare in formato doc nella directory
TOOL di VB5 oppure all'interno di di MSDN

 wrote in message
8lqQ3.43733$i06.4...@typhoon.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Corso pratico di programmazione VB6

Salve a tutti
c'è qualcuno che conosce questo corso edito da Prensatecnica?
Io mi ero abbonato per ricevere l'intero corso (50 fascicoli + altrettanti
CD), ma dopo il 18° non ne ho più ricevuti.
Chi fosse interssato può consultare il sito 
www.prensatecnica.com

 ha scritto nel messaggio

Ma tu hai ricevuto anche il numero 4?
Io non l'ho ricevuto e ho scritto che non pago piu' le dispense fino a
quando mi manderanno il numero 4.
Quando dopo la dispensa 18 non ho piu' ricevuto nulla ho pensato che fosse
perche' non avevo pagato gli ultimi due bolettini.
--
Ciao da Luci@noM.  (Bo)
icq 13556170
Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Come simulare l'evento FormCurrent di Access?

Salve,
premetto che non sono molto pratico di database programming con VB6,
ma non ho bisogno di fare cose trascendentali.
Comunque la domanda � quella del Subjet
La mia esigenza � quella di aggiornare una PictureBox con una immagine
diversa ad ogni cambio di record (quello che in Access faccio appunto
nell'evento FormCurrent), prelevando un campo la Path relativa al file
immagine, in pratica come sfogliare un album di foto.
Credo sia piuttosto facile ma non ci riesco.
Grazie
Ciao
Filippo

 Credo sia piuttosto facile ma non ci riesco.
Brutalmente non lo puoi mettere al change di una label che prender� il path
al cambio record? Con dovuta gestione errori?
Se non ci dici come gestisci questo cambio record � difficile capire. Usi
DataControl per caso? In caso se sei all'inizio ti direi di evitare...

 ha scritto nel messaggio 
news:1ntp159k4j16l2a4i...@4ax.com...




Grazie
Per ora con il tuo consiglio, e con quello di Tiscali che segue,
ho parzialmente risolto
All'evento Change della TextBox che 'raccoglie' il campo contenente la
Path do' questa istruzione Picture1.Picture = LoadPicture(Text1.Text)
e funziona (quasi, dico quasi perch� l'immagine la vorrei
ridimensionata e ancora non ci riesco, ma non mollo ;)
Sto provando ad usare adodc1
Ciao



Grazie dei consigli
Io per la verita, senza capirci molto, stavo usando adodc e non DAO
(per� che palle , quanto � complicata la cosa)
e avrei risolto cos�:
all'evento Change della TextBox che 'raccoglie' il campo contenente la
Path do' questa istruzione Picture1.Picture = LoadPicture(Text1.Text)
e funziona (quasi, dico quasi perch� l'immagine la vorrei
ridimensionata e ancora non ci riesco, ma non mollo ;)
Ciao

 Sto provando ad usare adodc1
Allora, se devi cominciare lascia perdere datacontrol e modalit� bound
(connessa).
Semplicemente se puoi ti carichi i dati (compreso il path) su una
griglia/listview e stacchi la connessione col DB.
Poi il caricamento dell'immagine lo gestisci con gli eventi es. della
listview, al cambiamento di riga.

 ridimensionata e ancora non ci riesco, ma non mollo ;)
Nella ListView avresti invece tutta la lista dei record da te selezionati,
e spostandoti da un record a un'altro avresti la PictureBox aggiornata 
automaticamente!
Per quanto riguarda il discorso del ridimensionamento dell'immagine, devi:
. Settare i Twips della PictureBox su Pixel
- Andare a vedere che dimensioni ha l'immagine che vuoi caricare
- Confrontare quindi l'area che dell'immagine che vuoi caricare,
    con l'area che intendi predisporre per la visualizzazione.
- Effetuare le dovute proporzioni e incollarla all'interno della PictureBox,
    o con PaintPicture o con una funzione API (Consigliata!).


 listview, al cambiamento di riga.
Esatto!

Newsgroup: it.comp.lang.visual-basic
Titolo: domanda su una query

salve, nel mio database ho 4  tabelle: scadenze , teste delle fatture 
(doctes) ,righe delle fatture (docrig), anagrafe(dati anagrafici del 
cliente\fornitore).
questa query mi serve per estrarre le scadenze (l'ho fatta cos� perch� 
voglio  estrarre anche altri dati presenti nella tabella anagrafe) :
(( Scadenze left outer join Anagrafe on Scadenze.CodCF = Anagrafe.codice ) 
left outer join doctes on Scadenze.id_doc = 
doctes.id
)left outer Join docrig 
on  
doctes.id
 = docrig.id_testa
Ogni fattura ha una sola scadenza, ma una fattura ha pi� righe.
Tale query funziona,per� mi esporta una scadenza per ogni riga che trova 
nella fattura, moltiplicandole quindi erroneamente...
Si pu� chiedere con qualche opzione che la query che mi estragga solo LA 
PRIMA riga della fattura?
Grazie e saluti 


In tutto questo dove compare codice visual basic? :)
Forse hai sbagliato newsgroup ;)

 PRIMA riga della fattura?
Select tuoi campi, (select first 1 campoRiga from righe where
idtesta=idtesta)
From tue tabelle (senza righe)

 Forse hai sbagliato newsgroup ;)
ma no lo sai che sql � universale?


usi la clausola where
(( Scadenze left outer join Anagrafe on Scadenze.CodCF = Anagrafe.codice )
left outer join doctes on Scadenze.id_doc = 
doctes.id
)left outer Join docrig
 on  
doctes.id
 = docrig.id_testa
where  docrig.campo = 1
"campo" sar� una colonna della tabella righe che numera le righe 
appartenenti alla medesima  fattura ( vale da 1 a N  per ogni fattura, a 
parit� di valore del campo docrig.id_testa )
ciao

 PRIMA riga della fattura?
Innanzitutto dovresti definire il concetto di "prima riga", visto che 
nei database le tabelle non hanno un ordine predefinito di estrazione.
Diciamo, per semplificare, che te ne basti una a caso, ad esempio 
quella con l'id minore.
Inoltre, tu ammetti che esistano scadenze senza testate o testate senza 
righe, ma magari questo va bene per la tua logica applicativa.
Potresti provare con
SELECT <COLONNE>
FROM
Scadenze
left outer join Anagrafe on Scadenze.CodCF = Anagrafe.codice
left outer join doctes on Scadenze.id_doc = 
doctes.id
left outer Join
  (select docrig.id_testa, min(
docrig.id
) as id
   from docrig
   group by docrig.id_testa) as primariga
on  
doctes.id
 = primariga.id_testa
left outer Join docrig
 on  
primariga.id
 = 
docrig.id
Alberto
Newsgroup: it.comp.lang.visual-basic
Titolo: ADO E SQL SERVER

Ciao volevo porvi una domanda su ADO e SQL2000.
Sto realizzando un parser: devo controllare una riga di testo,
prenderne certi campi e scriverli in una tabella di database SQL.
Nel caso in cui alla riga successiva trovi certi campi devo cancellare
la riga precedentemente scritta nella tabella.
PEr non stravolgere la precedente applicazione ho la necessita' dunque
di scrivere sull'ultima riga scritta su SQL: purtroppo non ho in tale
tabella un campo contatore che obbliga SQL a scrivere le righe
sequenzialmente.
Come si fa a sapere in SQL l'ultima riga su cui ho scritto?
non rispondetemi con move last perche' ho notato che SQL se l'aggiunge
dove vuole l'ultima riga a volte all'inizio !
Grazie anticipatamente.

 ha scritto nel messaggio
news:kGg78.13396$5M4.4...@twister2.libero.it...


 sequenzialmente.
Se non puoi proprio modificare la struttura della tabella puoi provare 
con una transazione:
quando aggiungi un record lo fai aprendo prima una transazione.
se devi sovrascrivere, annulli la transazione, la riapri e aggiungi.
quando il record e' "definitivo" chiudi la transazione!
ciao
		maxx

Newsgroup: it.comp.lang.visual-basic
Titolo: Implements non va +?????

Salve,
Ho scritto la mia bella interfaccia, ora la voglio implementare.
Vado a scrivere "Implements IMiaIntf" ma non mi dą l'interfaccia con i
metodi nelle due combobox.
Che succede?
Andrea


Trovato il problema.
Andrea

 Andrea
E due... come diceva qualcuno "La risposta e' dentro di te.... ma e'
SBAJATA" ;-)
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Visualizzare documento Word in Form?

Devo visualizzare un intero documento Microsoft Word in un form e
lasciare all'utente la possibilità di scorrere attraverso le varie
pagine del documento.
Se uso un oggetto OLE collegato ottengo solo l'immagine della prima
pagina e mi sembra che non ci sia modo di scorrere il documento se non
attivando Word in un'altra finestra.
Avrei bisogno di un controllo tipo Rich Text Box, che ha le scroll
bars. 
Qualcosa di ancora più semplice: non devo dare la possibilità di fare
editing, solo visualizzare.
Mi sembra strano che non esista nulla del genere, mi sembra strano che
Microsoft non fornisca nulla del genere.
qualche suggerimento?
Grazie, Lauro 

Lauro wrote:
La RTB va benissimo, ma le scrolbar devi abilitarle tu dopo aver posizionato
il controllo.
Puoi scegliere tra:
- verticale
- orizzontale
- tutti e due
- none
--
Greg
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT]Autorun su CD

Devo realizzare un CD con un programma che parta automaticamente quando
si inserisce il CD.
Lo so, non si puo' usare VB (per questo c'e' OT :-)
Volevo chiedere al NG se utilizzando C++ Builder (che ho trovato su un
CD della rivista Inter.Net) ci sono problemi di licenza.
Io ho letto la licenza inclusa, ma sembra essere una licenza standard e
non fa alcun riferimento al fatto che il software e' stato distribuito
"quasi" gratuitamente (il costo della rivista).
Sapete qualcosa in piu'?
grazie
		maxx

 ha scritto





se non ci sono limitazioni, dovresti poterlo usare.
tempo fa, sono abbastanza sicuro di aver visto dei readme borland in cui si
diceva chiaramente che non si potevano distribuire i prg creati con le
versioni.
pero' anche nell'ultimo che ho guardato, il piu' recente (quello di delphi3,
un paio di mesi fa), avevano tolto questa clausola.
controlla bene tutti i readme e anche la presentazione sulle pp della
rivista, spesso i vincoli sono espressi li'.
ciao, a.

ATTENZIONE: sono sicuro di quello che sto per scrivere!!!
Mi pare di aver letto da qualche parte che per creare un CD autoavviante
basta porre nella radice del CD un file con il nome AUTORUN.INF, ed il testo
del file è
[autorun]
open=MiaApplicazione.Exe
icon=MiaIcona.ico
Ovviamente MiaApplicazione.Exe si trova nella radice del disco.
La riga
icon=MiaIcona.ico
credo che serva a visualizzare un icona diversa da quella standard per il
CD, nell'albero di Esplora Risorse.
Prova a fare un tentativo, se funziona non credo servano licenze :-).
Older

 CD, nell'albero di Esplora Risorse.
E' proprio cosě!
Ad esempio io uso
[AUTORUN]
icon=d:\Archivio.ico
insieme ad un file Archivio.ico, che raffigura appunto un archivio, per
modificare l'icona delle partizioni del mio disco fisso in cui tengo i dati.
Con l'istruzione
open=MiaApplicazione.Exe
avvii ciň che ti interessa.

 


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

Ho bisogno di un consiglio su come fotmattare una textbox per l'inserimento
di cifre espresse in euro......e haimč farne anche dei calcoli!
Grazie a chiunque mi possa aiutare.
Un esempio di inserimento formattato potrebbe essere : 1.124,36


Usa la funzione Format$.
Su MSDN trovi + informazioni.
Ciao
Bald0z

 di cifre espresse in euro......e haimè farne anche dei calcoli!

Newsgroup: it.comp.lang.visual-basic
Titolo: Aiuto...Datagrid

Ciao a tutti,
Vi spiego la mia situazione, ho una datagrid associata a un recordset ado,
sotto ho varie textbox associate ai vari campi del recordset, ora, cambiando
riga nella griglia vedo i vari dati nelle textbox, tutto bene, posso fare
anche delle modifiche sui campi o aggiungere record, il tutto al cambio riga
viene automaticamente salvato.
Problema, come posso intercettare il cambio riga in modo da validare i dati
inseriti e se non sono giusti non permettere il cambio?Non ho trovato un
evento che scatti quando sto cambiando riga ma non c'è ancora stato lo
spostamento fisico, come posso fare?
Vi prego di rispondermi, grazie a tutti.

 spostamento fisico, come posso fare?
Evento BeforeUpdate?


Pensavo a quello infatti, ma non mi funziona, io nell'evento RowColChange ho
messo l'update del recordset e provo a mettere un msgbox nell'evento
BeforeUpdate, ma cambiando riga non mi appare il msgbox, per cui non so come
fare.

 ha scritto nel messaggio
news:aqp1uk$d9u$1...@serv1.albacom.net...
cut
per sicurezza ho voluto provare....XPpro VB6 SP5.....
se modifichi qualcosa in una cella
Before_Update funziona....e bene!
prova !
mettici solo il msgbox .....se cambi solo riga è logico che non va.....ma se
cambi qualcosa (anche una virgola) in una cella....si scatena l'evento!
Quindi ai fini del DB sei a posto!

 cut
Grazie a tutti, mancava l'AllowUpdate sulla griglia, scusate.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Stampa diretta su LPT1

Ciao a tutti,
avrei una certa urgenza di sapere come poter ovviare ad un fastidioso
problema:
QWuando effettuo la stampa, di solo testo,  in windows trramite
l'oggetto Printer, tutto e estremamente lento se rapportato alla
stampa sotto DOS con l'istruzione LPRINT.
Il problema, probabilmente, sta nel fatto che lo spool di stampa di
windows trasforma tutti i caratteri in elemtenti grafici determinando
cosi' un forte rallentamento delle operazioni di stampa.
Il modo migliore per risolvere il problema sarebbe quello di inviare
direttamente i dati su LPT1, ma, ahime', la stampante non e
direttamente collegata al PC sul quale il programma gira, ma ad un
altro computer in rete, per cui mi vedo costretto ad abbandonare la
via della stampa diretta sulla porta.
C'e' qualcuno che mi puo' indicare una soluzione?
PePPeZ
P.S. Colgo l'occasione per ringraziare Ettore Maronese per i sorgenti
della procedura che gestisce le procedure di sospensione e di
eliminazione della stampa sotto windows (ottimo lavoro))

 wrote in message
37206e5...@news.tin.it...


via della stampa diretta sulla porta.
======================================================================
Saverio Tedeschi /  snail mail:Var.SS 115 n.23-97015 Modica (RG)-Italy
e-mail:te...@tin.it-STIC n.2748/STOFC n.250505       ( @^@ ) 
=================================================oOOO==(_)==OOOo======
Newsgroup: it.comp.lang.visual-basic
Titolo: RunTime?

Ciao a tutti
Ho finalmente realizzato il mio primo .exe con VB5 grazie sopratutto a tutti
i vostri consigli.
Mi rimane un dubbio:
Il mio .exe è nato con l'intento di essere eseguito in automatico su di un
drive cd-rom pertanto vorrei sapere se per poterlo avviare su di un
qualunque PC devo creare il wizard setup per poterlo installare su tale
macchina o semplicemente includere nella root del cd i file necessari al mio
.exe?
Grazie
--
-----------------------------
Giulio Giambalvo
giu...@tiscalinet.it

 wrote in message
80kigt$642$1...@draco.tiscalinet.it...


 wrote in message
382f...@news.info-net.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: modificare dei valori nelle tabelle access con visual basic

ciao raga,
qualcuno mi sà dire come posso fare a cambiare dei valori di campi in
tabelle access usando codice visual basic ( cioè io voglio usare l'ambiente
visual basic all'interno di access XP)
grazie !!!

 ha scritto nel messaggio
news:aa8imh$8o7v5$1...@ID-86999.news.dfncis.de...


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

Salve a tutti (i pochi rimasti :-)),
potreste darmi/indicarmi un esempio di come deve essere utilizzata un
MDIForm (in linee generali)!!
MSDN non č molto esauriente (o non sono bravo a cercare le cose!!!)
Grazie a tutti.
Ciao.
Paolo.


Beh, un MDIForm in linea generale č un contenitore di altri forms,
insomma se io mi creo un MDIForm e lo setto come primario, dopo posso
aggiungere altri Forms normali settando la proprietą MDIChild = True
e quando richiamerņ i form "figli" noterai che potrai spostare i Forms, ma
non all'esterno del MDIForm. Per farti un 'esempio e come la videata di
CorelPhoto-Paint, Photoshop che contiene immaggini dentro al programma,
insomma nuove finestre che sono figlie di quel programma!
Ciao
Fabio


 Paolo.
Propongo per la seconda ipotesi. MSDN documenta benissimo i form MDI. Prova
ankora a cercare. Ad esempio per riagganciarti al capitolo sugli MDI cerca
(per titoli) la seguente stringa "Applicazioni con interfaccia a documenti
multipli o MDI".
Ciao
BelthaZor
Newsgroup: it.comp.lang.visual-basic
Titolo: Pocker PC

Salve a tutti...
non ho capito bene una cosa di visual studio 2003: quando creo un nuovo
progetto per dispositivi mobili, quali sono, poi, i file che devo
mettere nel pocket pc?? grazie!

ops scusate per il titolo hehe :)))

 ops scusate per il titolo hehe :)))
Con VS2005 il deployment provvede ad installare il CF se non presente ed ad
installare l'eseguibile e le dll necessarie in modo automatico, credo che
anche VS2003 faccia lo stesso.
Ciao
-- 
Stefano "HappyMan"
http://www.thepoint.info

Stefano 'HappyMan' ha scritto:

non so però come fare... nella cartella di output mi crea solo una dll
e un file pdb, per esempio:
Applicazione.dll
Applicazione.pdb
non so come fare il deployment
ciao

 ciao
Ciao,
ho creato un progetto vuoto Pocket PC con VS2003, dal menu Build c'è
l'opzione Deploy Solution che serve al deployment. 
Prima chiaramente devi aver installato ActiveSync e collegato il device
tramite USB (modo più semplice).


Stefano 'HappyMan' ha scritto:

Ho fatto come hai detto, ma nel menu non vedo quella voce. Io ho la
versione italiana di VB2003, quindi il menu Build dovrebbe
corrispondere a Genera.
Dentro al menu Genera, quindi, ho solo queste voci:
Genera soluzione
Rigenera soluzione
---------------------------
Genera tuaapp
Rigenera tuaapp
---------------------------
Gestione configurazione...
ho solo questo.
ciao!

 ciao!
Ciao,
purtroppo avendo una configurazione diversa non riesco a darti maggiori
informazioni, ignoro il motivo per cui a te non compare la voce di menu per
il deployment.
Negli altri menu hai qualche voce relativa ai device come Pocket PC,
Windows CE, etc (se non erro c'è una voce per la connessione ai device, in
pratica fa partire l'emulatore) ?  


 
http://www.thepoint.info
purtroppo non c'è niente... comunque non esiste nessun programma
esterno che fa questo?
Perchè se c'è solamente da creare un cab con la dll allora si
potrebbe fare anche senza vs...
Cerco un po' un rete..

Newsgroup: it.comp.lang.visual-basic
Titolo: Meglio VB6 o Access 2000 ?

Vorrei aggiornare il mio software (il buon vecchio Access 2.0 + dev.toolkit)
con il quale ho realizzato qualche prg,
ovviamente per dei clienti, con un nuovo pacchetto.
Buona parte dei prg che realizzo usano i db, per caso qualcuno ha idea se
con il VB6 si riesce ad avere
una semplice grestione dei db o conviene comprare tutto quell'ambaradan
dell'Office 2000 ?
Grazie e ciao.
--
Posted from 
mta13-acc.tin.it
 [212.216.176.44] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Function LPAD di Oracle in SQLs

Qualcuno sa come utilizzare la function LPAD del sql di oracle
con l'sql di SqlServer??
LPAD funziona così..
LPAD("pippo",10,"1") = "pippo11111"
Cioè completa la stringa con il carattere specificato nel  terzo parametro,
fino al raggiungimento della dimensione indicata nel secondo parametro.
Grazie...
MIk

 LPAD("pippo",10,"1") = "pippo11111"
Una funzione con 3 parametri non esiste (aspetto smentite :)),
ma puoi usare la REPLICATE:
'pippo' + REPLICATE('1' , 10) = 'pippo1111111111'
ciaociao

 'pippo' + REPLICATE('1' , 10) = 'pippo1111111111'
Questa mi è utile....grazie!
Resto comunque in attesa di smentite... :)
MIk

Newsgroup: it.comp.lang.visual-basic
Titolo: Countdown Label display Double Integer

Hi,
I have used the Timer control to count down from 60 - 0 and display
it
in a label on my form. I would like 0-9 to be double integers so 01,
02, 03 etc but cant figure out how to do it.
Any help greatly appreciated!
Steve

Tray this in VB5/6:
Dim T as Single
Dim K as Integer
T = Timer
Do Until Timer - T <= 60            '0, 1, 2,..., 60
K = Cint(60 - (Timer - T))            '60, 59, 58, ..., 0
Label1.Caption = Format(K, "00")
'another way is:   Label1.Caption = Rigth("0" & K, 2)
Label1.Caption.Refresh        'about five cycle per second (1/18 sec)
Loop
-- 
Ettore Massimo Albani 


Label.Caprion=Format$(Value,"00")
See help(it's your best friend)
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------