mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Vorrei leggere i primi 3 caratteri di una stringa

...per poter fare delle ricerche e quindi delle selezioni.
CIAO e grazie

 CIAO e grazie
Funzioni:
Left$
Right$
Mid$
Instr$
ecc..
Per tutte...press F1 :)
SIMO
-- 
__________________
www.sasim.net
  ||  
http://sasim.dnsart.com
* Server IRC : 
irc.azzurranet.org
 --> Canale: #it_lang_vb
* Sito Comune Ng: 
http://www.it-lang-vb.net
* Manifesto del Ng: 
http://www.it-lang-vb.net/docs/Manifesto.txt
* I vecchi messaggi su: 
http://groups.google.com/

 ha scritto nel messaggio
news:3C698DA7...@libero.it...


 ha scritto nel messaggio
news:a4c43c$t3h$1...@pegasus.tiscalinet.it...


 nn riecso ad utilizzarle!!!
Forse ho capito il problema...
Non e' che scrivi lft per abbreviare? :P
Allora, Left [F1], poi Right [F1], poi Mid [F1] , poi [F1].
E se qualcosa non ti e' chiaro, [F1].
D'accordo trovare la pappa pronta, ma pretendere addirittura che sia
premasticata mi pare eccessivo, no?
Ciaotutti,
*

 bene, mentre la seconda NO.
Operatore Like. Stringa1 Like "068*" ti restituisce True
-- 
 < 
http://www.reactos.com/
 >  Open source clone of Windows NT. Current
     Don't stand, REACT!      version 0.0.18. C, C++ and ASM developers
                              and beta testers are welcome!

Newsgroup: it.comp.lang.visual-basic
Titolo: Codici a barre

Ciao.
    Sul SC ho trovato vari esempi di OCX, programmi compilati, codice
sorgente che permettono di stampare codici a barre. Vorrei porre un quesito:
mi servirebbe fare l'inverso, cioè recuperare il codice da un immagine presa
da uno scanner piano. Qualcuno mi può aiutare? Grazie anticipatamente.
                                Rosario

 wrote in message
7tqigk$dbn$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: selezione di un percorso

L'utente dovrebbe selezionare solo un path e non un file. E'possibile farlo
con un commondialog o serve qualche altro controllo?
Grazie.


 Cerca per SHBrowseForFolder и una funzione della shell32 ( dll ) di window
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it

 Cerca per SHBrowseForFolder è una funzione della shell32 ( dll ) di window
 Tutto sommato però potresti inserire il riferimento a
  "Microsoft Shell Control and Automation"
e scrivere
 
Private Const BIF_RETURNONLYFSDIRS = 1
Private Const BIF_DONTGOBELOWDOMAIN = 2
    Dim objShell As Shell32.Shell
    Dim objShellFolder As Shell32.Folder
 
    Set objShell = New Shell32.Shell
 
    Set objShellFolder = objShell.BrowseForFolder(hWnd, "", _
                                         BIF_DONTGOBELOWDOMAIN Or BIF_RETURNONLYFSDIRS)
    If Not objShellFolder is Nothing Then
        Print objShellFolder.Title '* Questo è il folder selezionato
    End If
 
    Set objShellFolder = Nothing
    Set objShell = Nothing
Attenzione che la prova l'ho fatta con VB5 eh!


 Print objShellFolder.Title '* Questo è il folder selezionato
 
   No correggo non è il folder selezionato o meglio non tutto il percorso, ma
ti saprò dire meglio domani mattina quando lo provo col VB6.


 Attenzione che la prova l'ho fatta con VB5 eh!
  Versione riveduta corretta e testata con VB6
Const BIF_RETURNONLYFSDIRS = 1
'* Ho qualche dubbio su questa non dovrebbe permettere la navigazione su
percorsi di
'* rete, ma su XP sembre non abbia effetto, vedi tu!
Const BIF_DONTGOBELOWDOMAIN = 2
    Dim oShell As Shell32.Shell
    Dim oShellFolder As Shell32.Folder
 
    Set oShell = New Shell32.Shell
 
    Set oShellFolder = oShell.BrowseForFolder(Me.hWnd, "", _
                                         BIF_DONTGOBELOWDOMAIN Or BIF_RETURNONLYFSDIRS)
    If Not oShellFolder Is Nothing Then
        Print oShellFolder.Self.Path '* Questa è la cartella selezionata
    End If
 
    Set oShellFolder = Nothing
    Set oShell = Nothing

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Accorcia link Gigesco :p

 Ragazzi nei momenti (oramai pochi) liberi ho creato un accorcia link, se vi
interessa provatelo pure, i link temporanei durano 2 mesi quelli permanenti
rimangono li per sempre
http://www.g2kweb.it/makeshort.asp
^_^
Ditemi che ne pensate !
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm

 Ditemi che ne pensate !
http://www.g2kweb.it/?59
ti basta?
rotfl
-- 
Il Wodkino Nazionale č a : 
www.martek.it
Pagina Vb/Bestiario/Lamer Experience :
http://www.martek.it/go.asp?portamia=2
 New Entry nel
bestiario! :-)
---
Messaggio scannerizzato e certificato "Virus free" da AVG free edition.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.770 / Virus Database: 517 - Release Date: 27/09/2004

 rotfl
E' un si immagino ? ;8)


 E' un si immagino ? ;8)
hmmm... 
www.culo.com
 e' piu' corto. gli altri controllano, e se il link che
gli passi e' corto tendenzialmente ti sfanculano :)
--
ciao, j.
http://tinyurl.com/2l7w

 link che gli passi e' corto tendenzialmente ti sfanculano :)
non sono razzista, accetto tutto e tutti (wodka compreso come vedi :p)


 non sono razzista, accetto tutto e tutti (wodka compreso come vedi :p)
ahi, abbassa le serrande, tirata wodkesca in arrivo :)
pero' non puoi accettare tutto
se ti passano 
www.hp.com
 che accorcialink e' ? :)

 se ti passano 
www.hp.com
 che accorcialink e' ? :)
umm un accorcia link spammoso ? ^____________^
tanto ce ne sono tanti in giro, mi e' piaciuto farlo per le immagini del mio
sito, poi visto che accetta anche link esterni ho deciso di spammarlo un po
in giro :pp

Newsgroup: it.comp.lang.visual-basic
Titolo: provider access

Perchè un installazione di un applicazione vb con l'installazione di
mdac_typ_it.exe si WinNt 4 sap4 non mi installa i provider di Access?
Lo sapete?



Penso dipenda da quale versione di mdac_typ.exe stai installando. Le
piu' recenti (2.6 se non erro) non installano i provider per access.
Mangiafuoco

Newsgroup: it.comp.lang.visual-basic
Titolo: Pacchetto installazione VB WinNT

Ci potreste aiutare per sapere quale file inserire nel pacchetto di
installazione da utilizzare su WinNt, visto che si presenta sistematicamente
il seguente errore:
Errore di run-time '429' can't create the activex objects
Grazie

 ha scritto nel messaggio
news:8qn2ba$9hd$1...@news.flashnet.it...


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

Ho un progetto che lancia in serie alcuni comandi DOS tramite CreateProcess,
visto che ogni comando deve essere lanciato con una sequenza ben precisa.
E' possibile fare in modo che quando lancio i comandi dos la finestra di
lancio dei programmi stessi sia minimizzata?
--------------------------------
Inviato via 
http://usenet.libero.it

lancio dei programmi stessi sia minimizzata?
Si', puoi anche nasconderla: vedi il campo wShowWindow della struttura
STARTUPINFO.
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: problema su stringa

Salve a tutti,
ho questo problema:
Nella seguente routine la variable sDestination la voglio rendere uguale
alla proprietą Text del controllo Text1 che ho inserito nel mio form.
Se scrivo:
sDestination = text1.text
la stringa che inserisco nel controllo text tipo c:\tmp\ sembra che non
viene riconosciuta poichč quando eseguo la mia applicazione per copiare
files da una cartella di origine a quella specificata nella variabile
sDestination mi esce il messaggio" impossibile trovare il percorso
specificato".
Ho provato anche a fare :
sdestination = inputbox("....") come ho scitto in mezzo alla routine che
segue ma anche inserendo la stringa da me specificata in questo modo
,l'errore "impossibile trovare il percorso di destinazione" mi esce sempre.
Se scrivo perņ
 sDestination = "c:\tmp\"
il programma funziona correttamente e non mi appare nessun errore.
A questo punto chiedo a voi quale puo' essere il problema?
Premetto che la stringa che inserisco nel controllo text si riferisce ad un
percorso di destinazione esistente come cartella di windows.
Devo per caso usare qualche funzione tipo: trim$(text1.text) per eliminare
degli spazi che lui forse considera e che non fanno assegnare bene il
percorso alla variabile sDestination?
Cosa posso fare?
Grazie a tutti in anticipo
Private Sub Command1_Click()
    Dim Fs As Object
    Set Fs = CreateObject("Scripting.FileSystemObject")
     Dim sSourcePath As String
   Dim sDestination As String
   Dim sFiles As String
   Dim numCopied As Long
   sSourcePath = "d:\tm\"
   sDestination = InputBox("Inserisci il percorso", "Domanda") che pero' non
funziona
   'anche se faccio sDestination = text1.text non funziona.
   'solo se faccio sDestination = c:\tmp ad esempio, funziona correttamente.
   sFiles = "*.*"
   Fs.CopyFolder "d:\tm\*", sDestination
End Sub

 Salve a tutti,
CHE ZACCHETTE!
dim Sdestination as string  '<- questa non c'è vero?
Sdestination=text1.text
Al limite perchè il tuo uTonto può inserire spazi all'inizio o alla fine
Sdestination=trim(text1.text)
bye man!
Newsgroup: it.comp.lang.visual-basic
Titolo: Usare i valore Null nei join

Ho il seguente problema:
vorrei fare il join tra due tabelle aventi in comune il codice dell'articolo,
il quale però è composto da una serie e da un numero (quindi due campi). Il
campo numero può essere nullo per alcuni articoli.
Facendo una prova con Access ho scoperto che se cerco di fare il join per un
articolo con il valore Null nel campo "numero", questo non funziona, mi
ritorna solo gli articoli con serie e numero completi.
Nemmeno con i left e right join si risolve, perchè non è un problema di
mancanza di record in una delle tabelle, solo che non li aggancia, ovvero
Null<>Null !! :(:(
Qualche idea, prima che mi metta a stravolgere il programma per cambiare
struttura dati?
Grazie
-- 
      ,-"""-.     Fabio Gava
 66._/ \___/ \     
ma...@dss.uniud.it
  ICQ#: 10105989
(____)_/___\__\_)  
http://www.dss.uniud.it/math
    /_//   \\_\    "I will not spin the turtle" - Bart Simpson
--------------------------------------------------------------
Yamaha TDM850 Rossa - Gilda            Udine - Conegliano (TV)

 wrote in message
3756D08A...@dss.uniud.it...


Scusa ma non puoi impostare il valore di default del campo a stringa vuota?
Cosi' non avrai piu' i null.
Ciao.

valori null con dei varoli di default.
In effetti devo fare diversi join in diversi punti del programma, ed una
query di quel tipo, ripetuta n volte con lievi differenze ogni volta, mi
genererebbe un codice altamente illeggibile..:(:(
Alla fine, come anche suggerito da Vaira, ricorrerò ad un valore di default
(putroppo stringa vuota ha un senso  e quindi non posso usarlo..userò un
"-1" o qualcosa di simile).
Grazie lo stesso per l'aiuto.


Newsgroup: it.comp.lang.visual-basic
Titolo: VB6 - shell NomeProgramma Parametro1

Non mi ricordo più qual'è il comando
per conoscere il valore di parametro1
 
Grazie a chi volesse ricordrmelo.
 
Saluti a tutti
Sauro 
 
 

Grazie a chi volesse ricordrmelo.
 
Intendi  Command ?
 
-- 
ciao
  Stefano

  Stefano
 
Ecco!
Command non Environ
 
Ciao Stefano e grazie
Sauro

Newsgroup: it.comp.lang.visual-basic
Titolo: SALVARE E LEGGERE DA DISCO IL CONTENUTO DI UNA VARIABILE?

Solo da alcuni mesi programmo in Visual Basic, ma conosco altri
linguaggi.
Avrei bisogno di salvare e successivamente rileggere da disco alcune
variabili  (tipo utente)  create con "Type " .
C'è qualcuno che può mostrarmi un esempio?
Grazie
--
Paolo Mereu
email      : 
pamb...@tin.it
Fax        : 
++39 070 846632

...


 >
--
Paolo Mereu & Paolo Piga
email      : 
bye...@tin.it
Fax        : ++39 70 846632
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con ADO

Sto realizzando un programmino che crea dei Documenti di Trasporto
Il problema nasce quando in un form metto una griglia e un controller ADO.
Quando richiamo tale finestra e il Form load carica i dati nella griglia il 
1° campo del primo record mi viene cancellato dando origine ad un errore.
Provo a scriverbi il codice per vedere se sbaglio qualcosa
La variabile vG_anno
è una variabile globale per capire quale anno stò gestendo, che viene 
caricata quando viene lanciato il programma
Private Sub mnu_vis_DDT_Click()
    frm_visualizza_DDT.Show
End Sub
Private Sub Form_Load()
    frm_visualizza_DDT.Top = 0
    frm_visualizza_DDT.Left = 0
    frm_visualizza_DDT.Visible = True
    Adodc1.ConnectionString = "Provider=MSDASQL.1;" & "Persist Security 
Info=False;" _
    & "Extended Properties=DSN=Database di Microsoft 
Access;DBQ=[percorso]\DDT_" & vG_anno _
    & ".mdb;DefaultDir=[percorso]\;DriverId=25;FIL=MS 
Access;MaxBufferSize=2048;PageTimeout=5;UID=admin; order by ddt"
    Adodc1.RecordSource = "select * from testata order by ddt"
    Adodc1.Refresh
    Adodc1.Recordset.MoveLast
End Sub
Grazie Mille 

 Access;MaxBufferSize=2048;PageTimeout=5;UID=admin; order by ddt"
Premesso che non uso mai ADO Data Control, l'errore è presumibilmente generato
da un refuso nella stringa di connessione, precisamente l'ultimo pezzo " order
by ddt" non mi sembra far parte della sintassi delle connection string...
Bye
Raf

Newsgroup: it.comp.lang.visual-basic
Titolo: Numeri interi

Salve a Tutti !
Come posso sapere In Visual Basic 6 Se un determinato numero è un intero o
un decimale ???
GRAZIE IN ANTICIPO !
--
_______________________________________
   Molteplici saluti
       (rigorosamente in contemporanea :-)
             MultiTaskinG
My Motorcycle WebSite: 
http://drive.to/vantax
    ICQ _&_PGP disponibili su richiesta :-)
_______________________________________


If CLng(A)=A Then  Msgbox "E' intero"
Fabio



Newsgroup: it.comp.lang.visual-basic
Titolo: ok argomenti che vorrei sapere..sono un po' troppi.

be' intanto rigrazie per la dritta per i componenti com.
ora dovrei (in meno tempo posibile) sapere questi argomenti,
mi sapete dire quanto sono complicati..nel limite del possibile.
sqlserver e vb
-transazioni,multiutenza
-cursori
-raiseerrore
-triggers e tabelle inserted e deleted
-costruzione di query dinamiche all'interno di una stored procedure e
loro
-esecuzione con execute "tsql_string" with a variable
-tabelle temporanee locali e globali
-restituzione di recordset e valori da parte di stored procedure
-utilizzo di com da store procedure mediante sp_oacreate,sp_oamethod
-array di controlli
-isempty, isnull
-optional defaultvalue ismissing
-type..end type e loro passaggio a dll
-gestione errori con on error goto
-gestione array dinamici (redim e redim preserve)
-programmazione ad oggetti (dim as ner; set=new,nothing, reference
count, istancing property di classi, friend keyword..)
-pop-up menu
-withevents
-activex dll e activex exe
-ocx
-com binary compatibility
-implements statement
-utilizzo del vbcontrolextender objects per aggiungere dinamicamente e
runtime usercontrols
grazie per tutte le info.compresi consigli su libri.

Cos'è la lista della spesa?! :-))
Ciao, Vincenzo

 e runtime usercontrols
mai usato :)
,
<x:termoPilucco>

 "kappa"  ha scritto:
delle cose.
termoPilucco ha risposto praticamente ad ogni cosa.
Domanda: Chi dei due è più fuori? ;-)
Io voto decisamente per <x:termoPilucco>
Ci metto una faccina, ma non cambio di un micrometro il senso...

 mi sapete dire quanto sono complicati..nel limite del possibile.
Di corsa e più veloce della luce: Tu sei fuori.

 Io voto decisamente per <x:termoPilucco>
termoPilucco nè è fiero (di essere fuori, non di aver risposto).
<x:termoPilucco>, fuori.

 Io voto decisamente per <x:termoPilucco>
Una delle prime cose che ho capito "vivendo" questo ng è che termoPilucco è
decisamente il frequentatore più fuori di questo ng. Probabilmente anche di
altri. :-P
Guarda che è un complimento, eh!
Ciao, SK

 termoPilucco è decisamente il frequentatore più fuori di questo ng.
Solo perché non mi conosci bene :-P
Bye, G.

 Solo perché non mi conosci bene :-P
Beh, possiamo rimediare molto presto. Ieri con gigio2k si parlava di un
minimeeting pescarese... fatti sentire da lui magari.
A presto, SK

 un minimeeting pescarese... fatti sentire da lui magari.
OK :-).
Bye, G.

 Di corsa e più veloce della luce: Tu sei fuori.
^^
si??!?!?quindi sono piu' io fuori^^
be' si insomma era un po' veramente lista della spesa..e non e' che
non so nulla di 'sti argomenti.
pero' volevo sentire un po' opinioni..anche perche', in generale,
magari alcune cose le so fare..altre magari anche solo che non conosco
il termine tecnico preciso.
bom...
esto es todo.
hasta pronto

 -pop-up menu
Un po', quel che basta.
Non uso nulla del resto che hai elencato.

Newsgroup: it.comp.lang.visual-basic
Titolo: stiamo in chat

alfonso moscato e l'um.mo serv.r vso.
irc.azzurra.net
#it_lang_vb
22.09

Dai raga....entrate tutti nel canale Irc..così facciamo qualche discussione
live qualche volta!
Ciao SIMO

Newsgroup: it.comp.lang.visual-basic
Titolo: automatic build VB components

I need to build some Visual Basic components frequently.  There are
dependencies among these components. I need to decide the build
sequence according to the dependency, than build the components one by
one.  Is there a way to automate this process?  Any help will be very
much appreciated.
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 wrote in message news:8kec02$u87$1...@nnrp1.deja.com...


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

    Qualcuno sa indicarmi dove scaricare il Crystal Report ?
        non importa la versione (anche se preferirei 7 o 8)
            Mi accontento anche della 4.6 che usciva con VB5.
        Chi mi sa aiutare ?
                1000 grazie a chi lo sa fare.
        Ciao, Rocco

 ha scritto nel messaggio
news:98l1jk$gli$1...@fe1.cs.interbusiness.it...

Se hai VB6 c'č la stessa versione di VB5, ti direi anche dove, ma ho appena
scoperto che non vedo piů il CD e lo ZIP  8-((
Ciao VB

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

Devo fare un contatore che mi segna da quanto tempo è stata avviata
un'applicazione... partendo da 0 si incrementa di 1 come i secondi...
Come si fa???
io ho fatto cosi':
Dim i as Integer
Do While i < 720
        i = i + 1   ' Contatore di incremento
        txtOra.Text = i
        If i = 60 Then    ' Se la condizione è vera...
                MsgBox "Siamo arrivati a 1 minuto!!!", vbInformation,
Attenzione        ' ...imposta il valore del flag su False
        End If
        If i = 120 Then    ' Se la condizione è vera...
                MsgBox "Siamo arrivati a 2 minuti!!!", vbInformation,
Attenzione        ' ...imposta il valore del flag su False
        End If
        If i = 300 Then    ' Se la condizione è vera...
                MsgBox "Siamo arrivati a 5 minuti!!!", vbInformation,
Attenzione        ' ...imposta il valore del flag su False
        End If
        If i = 600 Then    ' Se la condizione è vera...
                MsgBox "Siamo arrivati a 10 minuti!!!", vbInformation,
Attenzione
                MsgBox "Vabbe ti lascio fare ancora x un pò", vbInformation,
Attenzione
        End If
    Loop
    MsgBox "Tempo scaduto!!!", vbInformation, Attenzione
    End
Il problema è che non va a tempo... parte si da 0 ma va subito a 60 e
visualizza il mex... e in poco tempo è arrivato a 720 e li chiude
tutto...Non aspetta i 12 min previsti!!!
--
The mistery of love is greater than the mistery of death.
Oscar Wilde

Come si fa???
Devi utilizzare il controllo TIMER
Per come utilizzarlo
consulta la guida in
linea.
Ciao
Marco
--------------------------------
Inviato via 
http://usenet.iol.it
 

 tutto...Non aspetta i 12 min previsti!!!
e dov'è che gli dici quanto aspettare tra un loop e l'altro?
Usa un controllo Timer settato a 60000 ms e una var integer che faccia da
contatore.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] OCX, Internet, Telnet e affini

voglio un OCX o quel cavolo che volete che mi permetta di creare una specie
di Telnet fatto in VB tutto da me !!!!
Help pls!
Ciao
--
|{33p3® - Keeper

...

e ti fa schifo il normalissimo mswinsck.ocx che c'è col VB?

 wrote in message
01befa2f$6bd54b20$6900000a@recidjvo...


Newsgroup: it.comp.lang.visual-basic
Titolo: AOD e SQL

Ciao a tutto il Ng.
Una domanda molto semplice.
Ho una form con un controllo ADO associato ad un DB Access, una DataGrid
associata al controllo e altri controlli di poca importanza.
Sulla proprietà recordSource del controllo ADO è inserita una stringa SQL
per selezionare i dati dal database.
Ho necessità di modificare e aggiornare un campo di tutti i record ad un
determianto valore.
Pensavo di farlo con una query.
Dopo tutta sta premessa, che a dire il vero centra propio poco, il problema
è semplicemente che non riesco  ad eseguire la query di aggiornamento.
Devo farla eseguire al controllo ADO, presumo. Se si, come?
Grazie a chiunque mi risponda.

 ha scritto nel messaggio
news:6Gds8.137471$%g7.43...@twister2.libero.it...

Puoi usare un ADO COMMAND  associandogli lo stesso oggetto CONNECTION del
controllo ADODC
Esegui il command e il gioco è fatto.
Ricordati di fresciare anche ADODC
Ciao

 Ciao
Provero' come dici. Poi se non vedi più niente vuol dire che è tutto OK.
Intanto ti ringrazio.
Ciao ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso Remoto

Salve,
ho la necessità di collegarmi con un portatile verso vari PC attraverso 
internet x assistenza.
Quale programma mi consigliate? (free o meno)
Grazie. 

TG ha scritto:

TeamViewer, esiste una versione free per uso non commerciale, così puoi 
provarla comodamente.
ciao
stefano


UltrAvNC
Newsgroup: it.comp.lang.visual-basic
Titolo: Esecuzione automatica...


ICQ# 15690048

Eccoti servito...
Hai bisogno della libreria STKIT432.DLL di VB4 (quella usata dal programma di Setup)
Public Declare Function SHGetSpecialFolderLocation Lib "shell32" (ByVal hwndOwner As Long, ByVal nFolder As Long, ByRef
ppidl As Long) As Long
Public Declare Function SHGetPathFromIDListA Lib "shell32" (ByVal pidl As Long, ByRef pszPath As Byte) As Long
Public Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As
String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long
Public GetPathDirectory As String
Function DirStartup()
 
    Dim lngPuntPIDL As Long
    Dim strPath(0 To 260) As Byte
    Dim strTemp As String
    Dim lngBoh As Long
    Dim lngTemp As Long
    lngTemp = SHGetSpecialFolderLocation(vbNull, 7, lngPuntPIDL)
    lngTemp = SHGetPathFromIDListA(lngPuntPIDL, strPath(0))
    If lngTemp <> 0 Then
        lngTemp = 0
        strTemp = ""
        While strPath(lngTemp) <> 0
            strTemp = strTemp & Chr(strPath(lngTemp))
            lngTemp = lngTemp + 1
        Wend
        GetPathDirectory = strTemp
    Else
        GetPathDirectory = ""
    End If
 
    aaa = ""
    bbb = ""
    i = Len(GetPathDirectory)
 
    Do
        aaa = Mid(GetPathDirectory, i, 1)
        If aaa = "\" Then Exit Do
        bbb = Mid(GetPathDirectory, i, Len(GetPathDirectory))
        i = i - 1
    Loop Until i = 1
 
    DirStartup = bbb
 
End Function
iLong = fCreateShellLink(DirStartup, "MioProgramma", App.Path & "\" & App.EXEName & ".exe", "")
Se vuoi, puoi sostituire alla libreria di VB4, quella di VB5: VB5STKIT.DLL, oppure quella di VB6, che però non so come
si chiama.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)

Newsgroup: it.comp.lang.visual-basic
Titolo: programma in background: come faccio?

come faccio a lanciare un programma in background e far comparire la
sua icona nella barra vicino all'orologio? ( se non erro si chiama sys
try)
grazie. roby

 grazie. roby
prego
ciaociao

 si chiama systray. fai una ricerca su google con questa parola
ma cosě uno che cerca su google 'systray' entra in loop... :))
da me (area esempi vb) o nel sito comune di questo ng
(
http://www.it-lang-vb.net/
)
-> GbC|
www.gbcweb.com

 ma cosě uno che cerca su google 'systray' entra in loop... :))
Quando dico su google intendo comunque nell'area di questo NG, ma forse č
meglio specificarlo sempre!
:)
ciaociao

 meglio specificarlo sempre!
Si, certo, anche io mi riferivo ai post archiviati di questo gruppo.
:)
Ma a forza di dire 'cerca su gugl' quando cerchiamo su gugl troviamo
999 messaggi che dicono 'cerca su gugl' ed uno con la soluzione che ci
interessa :|
Puon vichend
-> GbC|
www.gbcweb.com

 Puon vichend
Puon vichend anche a te!
ciaociao

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerco calcolatrice euro-lire in vb5

Salve mi chiamo vincenzo cerco una calcolatrice / convertitore
lire euro !!!! Grazie

 ha scritto nel messaggio
news:8aths9$96q$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Come si può impedire la copia di un programma in Access ?

Salve, oh sconosciuto benefattore,
sto sviluppando un programma in Access per una ditta.
Vorrei però bloccare il programma dai tentativi di copia.
Mi sono venute in mente un paio di idee, ma uno che abbia un minimo di
dimestichezza
con la programmazione mi fregherebbe.
Cosa posso fare ?
(Bella domanda ! Da zio Bill in giù, tutti vorrebbero sapere la risposta !)
Comunque non pretendo una fortezza inespugnabile ma almeno qualcosa che li
fermi un po' e che sia anche pratico.
Chiunque mi risponda, non sarà mai ricompensato !
Ciao
Giorgio

Anche se non sarò mai ricompensato ci provo lo stesso!
Potresti far leggere al programma il numero di hard disk, in caso fosse
quello giusto fai proseguire l'esecuzione altrimenti la interrompi.
Ovviamente trasformi il file in un ".mda" in modo da proteggere il codice.

 wrote in message
h8zG3.34121$1u4.1...@typhoon.libero.it...


Se puoi inserire una OCX puoi usare NmKit3.
E' da me o nel sito comune, ed è freeware.
Richiede la dll runtime di vb5...
--
GbC
http://www.chiappori.net
giov...@chiappori.net

                 saluti IvanS
Il codice necessario è questo:
Private Declare Function GetVolumeInformation Lib "kernel32" Alias
"GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal
lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long,
lpVolumeSerialNumber As Long, lpMaximumMaxCompLen As Long, lpFileSystemFlags
As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize
As Long) As Long
Private Function GetDiskSNo()
    Dim VolName As String * 255
    Dim FSType As String * 255
    Dim NumSer As Long
    Dim FSFlags As Long
    Dim MaxCompLen As Long
    Dim res As Long
        res = GetVolumeInformation("C:\", VolName, 255, NumSer, _
                MaxCompLen, FSFlags, FSType, 255)
        If res = 0 Then
            GetDiskSNo = 0
        Else
            GetDiskSNo = NumSer
        End If
End Function
--------------------
Ti invio privatamente un piccolo sorgente di esempio.
CIAO.

 wrote in message
qpLG3.35432$1u4.1...@typhoon.libero.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Win ME - W98 - problemi con MSComm ?

Avevo fatto un programma con l'oggetto MSComm usando sia per lo sviluppo che
per il funzionamento Win ME.
Ora il pc del cliente è saltato ed è stato caricato Win 98.
Il programma adesso non funziona più correttamente, nel senso che si sfasano
le stringhe ricevute.
Nel frattempo anche io ho cambiato sistema operativo e sono passato a Win
2000.
Secondo voi questo problema nel programma potrebbe essere dato dal S.O. o per
altri motivi?
Ciao Gab.
Newsgroup: it.comp.lang.visual-basic
Titolo: Multithread Come?

Siccome devo riempire un listview con moltissimi dati il prog ci
impiega una vita vorrei allora poter creare una dll o che so un
activex exe che mi riempia il listview in background mentre il
programma può fare altro (un po' come il 'trova' di win95).
Ho provato in tutti i modi ma le rutine delle dll activeX (multi tread
ecc.) non mi restituiscono il controllo al programma principale.
C'e' qualcuno he sa come si fa???
Grazie ciao.

...

-------------------
Prova ad utilizzare l'istruzione DoEvents (guarda nella Guida in linea per
ulteriori informazioni).
Ciao
Marco Minerva
http://www.geocities.com/SiliconValley/Foothills/7260
http://www.armaditaggia.com/marco

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

potreste postare qualche url a proposito di crittografia, magari con qualche
esempio o qualche ocx?

 esempio o qualche ocx?
Non ricordo dove ho trovato il seguente codice, che funziona bene direi.
Crittare Decrittare una Password:
'Entrambe le funzioni prendono in entrata due parametri: Number e un String
'Il primo sposta di n posizioni nella tabella ASCII ogni carattere della
'Password. Non usare cifre superiori a 10 per non uscire dal range
consentito
'dai codici ASCII.
Function EncryptPassword(Number As Byte, _
    DecryptedPassword As String) As String
    Dim Password As String, Counter As Byte
    Dim Temp As Integer
    Counter = 1
    Do Until Counter = Len(DecryptedPassword) + 1
        Temp = Asc(Mid(DecryptedPassword, Counter, 1))
 'se pari...
        If Counter Mod 2 = 0 Then
            Temp = Temp - Number
        Else
            Temp = Temp + Number
        End If
        Temp = Temp Xor (10 - Number)
        Password = Password & Chr$(Temp)
        Counter = Counter + 1
    Loop
    EncryptPassword = Password
End Function
Function DecryptPassword(Number As Byte, _
    EncryptedPassword As String) As String
    Dim Password As String, Counter As Byte
    Dim Temp As Integer
    Counter = 1
    Do Until Counter = Len(EncryptedPassword) + 1
        Temp = Asc(Mid(EncryptedPassword, _
            Counter, 1)) Xor (10 - Number)
 'se pari...
        If Counter Mod 2 = 0 Then
            Temp = Temp + Number
        Else
            Temp = Temp - Number
        End If
        Password = Password & Chr$(Temp)
        Counter = Counter + 1
    Loop
    DecryptPassword = Password
End Function

Newsgroup: it.comp.lang.visual-basic
Titolo: massimizzare un figlio di un mdi

scusate l'ignoranza, sarà sicuramente semplice: come si fa a massimizzare un
form che è figlio di un mdi? Vorrei che all'apertura di questo figlio
venisse espanso al massimo che può contenere l'mdi.
Grazie tantissimo....

 ha scritto nel messaggio
news:4_h58.1012$Gd1....@twister2.libero.it...

Dai un'occhiata sulla guida alla property WindowState
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

grazie!
"Luca Dormio" <lucaFaV...@tinFaVa.it> ha scritto nel messaggio
news:a36ecl$njd$1...@fe1.cs.interbusiness.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Sorgenti Controlli ActiveX

Ciao a tutti
Conoscete dei siti dove è possibile recuperare sorgenti di controlli ActiveX
sviluppati in VB ???
Tra l'altro, tra breve avrò bisogno di creare un semplice controllo che
consiste in una textbox con uno spinbutton a fianco (senza aggregare l'ocx
dello spin). Il tutto è semplice, ma non voglio reinventare la ruota per una
cosa così banale. Se avete dei sorgenti...
Grazie e auguri a tutti, io sto per partire per l'Irlanda e berrò litri di
Guinness pensando a voi.
Claudio

sviluppati in VB ???[...]
Prova a cercare tra i links sul mio sito dove ho specificato FREE CODE.
Ciao
--
-
MIX (VB5SP3)
110 links ai siti VB
http://www.tempolibero.com/user/mix/
 (consigliato)
http://space.tin.it/computer/gaais
  (alternativo)
( TEMPORANEAMENTE ACCESSIBILI SOLO CON IE )
-

Newsgroup: it.comp.lang.visual-basic
Titolo: Task manager

Ciao a tutti.
Ho la necessità di chiudere una applicazione attiva (acrord32.exe)
dall'elenco dei task da un progetto VB.
Come posso fare?
Esiste già qualche esempio di codice?
Grazie a tutti
Vittorio Cicognani

 wrote in message
%rXM5.17735$fx4.6...@news.infostrada.it...


 Esiste già qualche esempio di codice?
nei siti dedicati a VB ne trovi diversi
Ciao
Faber

 Esiste già qualche esempio di codice?


Newsgroup: it.comp.lang.visual-basic
Titolo: AZIENDA CERCA TECNICO INFORMATICO

Importante azienda cerca urgentemente per assunzione a tempo indeterminato
tecnico informatico con conoscenze di:
- gestione database contenente grandi quantità di record (linguaggio sql e
management di database)
- reti di pc in tcp/ip
- assistenza agli utenti di AS/400
- programmazione in visual basic
sede di lavoro Verona, ottimo stipendio.
Inviare curriculum all'indirizzo:
rmanto-T...@libero.it

 wrote in message
9q8g96$ae9$1...@fe2.cs.interbusiness.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Video con Visual Basic

Salve al ng
Ho comperato da poco un dispositivo che si chiama PV.master box
ed catura immagini e video tramite postra usb,
volevo sapere se esiste un modo ho un ocx o dll  possibilmente free
che possa farmi un programmino, potete darmi una mano?
ho Visual Basic 6 con win98 posso fare qualche cosa?
grazie
ciao
--
Carlo0000

 che possa farmi un programmino, potete darmi una mano?
Io non so, ma se trovi una dll che ti fa un programmino facci sapere
subito!!

 subito!!
Appunto potremmo sostituire un bel po' di programmatori qui... con una dll
che scrive programmi (pensiamo solo all'aumento di produttività grazie al
lavoro h24 della stessa)! ;-)


A parte gli scherzi, non ho capito bene che programma vuoi fare, cattura
immagini? editing video? vocabolario dell'accademia della crusca?

 Bond, James Bond"
:D

scusate, mi spiego meglio, vorrei farmi IO un programmino
che mi facesse vedere sul monitor quello che la telecamera inquadra
ok?
 quindi un ocx o una dll da inserirla sul mio programma
ciao e grazie.

 quindi un ocx o una dll da inserirla sul mio programma
Video for Windows
sul cd di vb, o, alla peggio, in rete, ci dovrebbe essere un esempio
che si chiama vbCap
-- 
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi Access VB6

non mi funziona il collegameto tra access 2000 e il data di VB6.Come posso
fare?
con la versione Access 97 va tutto bene . Grazie
--------------------------------
Inviato via 
http://usenet.libero.it

 con la versione Access 97 va tutto bene . Grazie
prova a visitare questo link (se riportato su più righe è il caso di
riappiccicarle)
http://groups.google.it/groups?as_q=2000%2097%20access&ie=ISO-8859-1&as_ugro
up=it.comp.lang.visual-basic&lr=&as_scoring=d&hl=it
scoprirai che qualcuno (pochini pochini) hanno già dibattuto a fondo il
tema...
solo 900 (e rotti) post sull'argomento
Salutoni
Sergio

 grazie


 Sergio
Ma non gli avevi appena detto di andare in un altro NG?
:-))
Alberto


dici che č ancora lui?
se cosě č, mi pento anche del poco di informazione che gli ho dato....>:-(
Salutoni.
Sergio
Newsgroup: it.comp.lang.visual-basic
Titolo: [forse OT] consiglio su progettazione applicativo

forse questo mio messaggio e' OT, in questo caso mi scuso con tutti!
Devo sviluppare un sw che sostanzialmente consiste in:
- immissione dati in un db
- visualizzazione degli stessi
- funzionalita' di ricerca
- stampa di report
I dati riguardano un elenco di fornitori di materiali edili
(estr. identificativi, strutture, staff, situaz. banc., ecc.)
Ho progettato il DB e non penso (mai dire mai ;)) ) che
sia da modificare... quello che vorrei e' un consiglio
sul modo di implementare il software. Ho molti dubbi,
non essendo un 'veterano' e non riusciro' a spegarmi
come dovrei quindi vi chiedo pazienza, se ne avete...
Vi illustro le mie idee (pronto ad essere deriso a vita):
Utilizzo un form MDI che al caricamento apre tutti i recordset
statici che non hanno bisogno di modifiche come per esempio 
la tabella dei comuni. (in totale ho circa 5 tabelle con al max
10 record ognuna e poi la tabella comuni che e' bella grossa...)
Inoltre apro un recordset (anchesso statico) con un elenco del
fornitori in archivio (saranno al max 150) con pochi campi
solo per visualizzarlo in una griglia e permettere la selezione
di uno di essi.
Un form child e' sempre attivo (al massimo nascosto) e contiene tale
elenco.
Poi ho pensato ad un altro child che si apre in seguito ad un doppio
click sulla selezione del fornitore, nel quale sara' possibile
visualizzare le varie 'sezioni' (anagrafica, ecc.) passando
da una scheda all'altra con un apposito controllo.
Qui il primo dubbio: mi carico tutti i recordset che mi servono
all'apertura del form? ovviamente non saranno readonly!
oppure li carico/scarico passando da una scheda ad un'altra?
Tenete presente che ogni scheda contiene un recordset primario
con un solo record e 3/4 recordset secondari con piu' rec.
Potrei aprire e subito chiudere i rec secondari e poi aggiornarli
con una UPDATE.
Avevo pensato di permettere che venissero aperte piu' form
di questo tipo in modo da permettere la visualizzazione di
piu' fornitori contemporaneamente ma con quale calo di prestazioni ?
Il DB lo vogliono in access e vista la mole di dati non ci
dovrebbero essere problemi, giusto ?
Nell'ottica di un db posto su un server remoto e di
client sparsi per l'italia, che si occuperanno soprattuto
di query e non di inserimento dati, access va ancora bene ?
E la gestione dei recordset ?
Se poi mi date anche un parere sul prezzo (compreso di test
contro eventuali bug ma senza un manualeo una guida) vi
innalzo un monumento.
Grazie per la pazienza dimostrata (se siete arrivati fin qua ...)
Pasquale

 
Problema:
se usi la 'condivisione file e stampanti' per accedere al db  e quindi
path del tipo \\nomemacchina\dircondivisa\nomedb.mdb hai bisogno di una
struttura di rete che supporti tale possbilita', la rete microsoft pura
di per se non ama passare attraverso i router ( netbios over TCP/IP e'
la soluzione ? )
una soluzione alternativa potrebbe essere l'interrogazione del DB via
WEB ( leggi CGI o ASP a te la scelta )
Newsgroup: it.comp.lang.visual-basic
Titolo: Encode/Decode source sample (esempio di codice)

I'm looking for an example of Encoding/decoding source code.
If someone know information about it plase reply
Thanx
Gianluca
----------------------------------------------------------------------------
----------------------
Cerco un esempio di codice per Encoding/Decoding
Se quancuno ha informazioni circa questo argomento mi faccia sapere
Grazie
Gianluca

...


Newsgroup: it.comp.lang.visual-basic
Titolo: OT: Help per Microsoft Interdev

Scusate l'OT...
Qualcuno di voi sà come é possibile realizzare con m$ Interdev tabelle di
link?
Mi spiego meglio:
il mio sito (fato con interdev) si collega ad un database( diciamo alla
tabella articoli) e mi spara fuori l'elenco degli articoli
IL PROBLEMA é che vorrei che questo elenco fosse di link che usati, portano
alla descrizione estesa dell'articolo in questione!
Solo che non trovo nulla in giro...non voglio né script né frontpage...
se qualcuno di voi sà qualcosa in merito ( anche solo quale newsgroup
guardare=) ) mi Risponda
Forrza ragazzi... ricordatevi...
"Più siamo più vinciamo"
Grazie un casino a tutti
Marco
mde...@stardust.it

 wrote in message
93626437...@plutone.pianeta.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] R: Header XING VBR

 E' la definizione di quello header che sto cercando.
ops! mi cogli del tutto impreparato...
giuro che non mi sono mai imbattuto in nulla del genere... mi piacerebbe
saperne di più
morale: non è mai troppo tardi per imparare
ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: [DBGRID32.OCX]Licenze per il caricamento?

Salve ^_^,
ho un problemino con VB 6.
Ho sviluppato un programma in VB5 che contiene il controllo
DBGRID32.ocx.
Ho consegnato il programma ed ho fatto l'installazione su un PC diverso
dal mio...tutto ok. Ora ho necessita' di sviluppare su questo PC, ho
installato il VB6 (prima non c'era nessun VB installato) ma quando
carico il progetto (i sorgenti) mi dice che non puo' caricare il
DBGRID32.ocx perche' non ho le licenze...ma non dovrebbe essere di
default l'installazione del dbgrid32 dal cd di VB6? Come posso fare?
Vi ringrazio in anticipo
slauti
Lothlan
Sent via Deja.com 
http://www.deja.com/
Before you buy.

 Vi ringrazio in anticipo > slauti > Lothlan
e' un problema che salta fuori anche solo con vb5.
ci sono 2 patch ms, una per il 5 (vb5ctrlfix) e una per il 6 (vbc6) che
*dovrebbero* risolvere il problema. quella per il 5 l'ho provata e va,
quella per il 6 mi dicono di si'. nel tuo caso non so quale serva...
se ti servono te le mando.
non fare reply, scrivi a:
andrea....@tin.it
ciao, a.
Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con file xls e mdb

Come posso importare un file xls in una tabella di un file mdb sfruttando
ADO e non DAO?
Ho provato con la funzione datbasecreate di DAO ma poi ho dei problemi con
la gestione e si verificano degli errori.
Qualcuno sa consigliarmi del materiale utile per risolvere il mio problema?
grazie

ciao
la mia risposta non sarą esaustiva:
comunque apri la connessione con ado e poi apri il file xls come un
normale recordset
mi dispiace ora non ho esempi a disposizione
Se una persona e' padrona dei principi fondamentali del proprio settore 
e ha imparato a pensare e a lavorare indipendentemente troverą sicuramente 
la propria strada e inoltre sara' in grado di adattarsi al progresso e al 
mutamento piu' di una persona la cui istruzione consiste principalmente 
nell'acquisizione di una conoscenza particolareggiata.
					 A. Einstein.

 ha scritto nel messaggio
news:mPjd9.147140$lu5.3...@twister1.libero.it...

http://www.able-consulting.com/ADO_Conn.htm#OLEDBProviderForExcel
Ciauz!

Newsgroup: it.comp.lang.visual-basic
Titolo: dbcombo no copia-incolla





quando provo a copiare ed incollare una dbcombo, quella 
incollata non non funziona piu', o meglio la parte della rowsource e relativa 
listfield. Anche cancellarla e rimetterla non serve a niente. Capita anche a 
voi? qualcuno sa perchè? ciao Paolo



quando provo a copiare ed incollare una dbcombo, quella incollata non non funziona piu', o meglio la parte della rowsource e relativa listfield. Anche cancellarla e rimetterla non serve a niente. Capita anche a voi? qualcuno sa perchè? ciao Paolo
2 cose:
- per favore non postare in html
- tanti di questi problemini sono risolti col Service Pack 4: l'hai
gia' scaricato ed applicato? Si prende da
http://download.microsoft.com
 selezionando Visual Basic 6 in lingua
italiana.
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
Newsgroup: it.comp.lang.visual-basic
Titolo: [?]: Stampare una MSHflexgrid mantenendo i truetype

Salve, il problema è semplice
io ho una MSHflexgrid con dentro tanti bei caratteri Courier New di 5 (che
sono true type).
voglio stampare la grid ma se uso il metodo printform del form contenente la
griglia, VB fà un bitmap e addo carattere true type (e
leggibilità...diventano scritte in cuineiforme a puntini standard).
Come posso fare per stampare bene sti benedetti true type giusti?
Grazie
--
L'Inossidabile Kevlar

manda il programma in esecuzione e premi il tasto "stamp" della tastiera poi
apri "paint" e inserisci incolla (se ti chiede di espandere l'area di lavoro
perchè l'immagine è più grande, rispondi SI). Hai ottenuto l'immagine tale e
quale del tuo desktop che potrai tagliare come vuoi con paint.
Kevlar <NonCred...@NOSPAM.it> wrote in message
8l3p00$fkn$1...@fe2.cs.interbusiness.it...


 wrote in message 8l4314
<snip>
..mi sono dimenticato di dire che voglio che questa cosa la faccia il
programma in automatico, non io ( o l'utente) volta per volta
Grazie comunque.
--
L'Inossidabile Kevlar
Proud to be a IHGGer 975

Newsgroup: it.comp.lang.visual-basic
Titolo: Dbgrid e ridimensionamento campi

Spesso mi capita di collegare un database composto da decine di campi ad un
DataGrid , e il VB mi riserva uno spazio di lunghezza standard per ogni
campo , indipendentemente se la lunghezza massima del campo  è 2 o 500
caratteri.
Come posso impostare la lunghezza del campo uguale alla proprietà Maxlenght
del campo ?
--
Ciao
Flex

...


 Flex ha scritto


> 2) Colegarla al DBGrid
 Set colPippo = DBGridPippo.Columns(0)
colPippo.Width = 123456
Ciao
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: programmi per voi

realizzazione qualsiasi programma su win96/98
prezzi bassissimi
pica...@labnet.it

...


realizzazione programmi su win95/98
prezzi bassissimi
offerte per tutti!!!

Qualunque richiesta, rivolgersi a 
pica...@labnet.it
creazioni programmi , cataloghi multimediali e pagine web

...


...


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

Salve a tutti,
Avrei una piccola cosa da chiedere.
Ho fatto un programma di gestione di una rete locale, questo programma
permette di avere una chat locale.
Per poter avviare la chat il programma deve essere attivo su entrambi i
computer, e per effettuare il collegamento il sistema che fa da host deve
conoscere l'indirizzo IP del client.
Come faccio a conoscere quali computer sono connessi in rete e che hanno
attivo il mio programma.
PS.: il programma viene caricato nella tray-bar.
Grazie a tutti

 wrote in message
_o0m4.54483$C3.5...@news.infostrada.it...


 wrote


 wrote

Newsgroup: it.comp.lang.visual-basic
Titolo: Contabilità e VB

Salve.
Sto programmando un piccolo tool per fare i conti su un archivio-magazzino
access.
Più precisamente mi interesserebbe sapere se esiste un sito internet dove
poter trovare esempi di algoritmi per i calcoli di contabilità (anche in
metalinguaggio).
Preciso che ho già scritto il codice per gli algoritmi LIFO e FIFO continui
e "costo medio ponderato"
per il calcolo del valore delle rimanenze.
Grazie.
Giuliano.

> Giuliano Cocco:

Siti non so. Ti segnalo:
Giuseppe Polizzi
_Sistema amministrativo & informatica_
Mondadori Informatica, Milano, 1989.
Non so se e` proprio quello che cerchi e non so neppure se sia
ancora edito e se, nel caso lo sia, gli abbiano dato una
rinfrescatina, vista l'eta`.
A me, poco meno di dieci anni fa, e` stato utile; anche
perche' era uno dei pochi libri in commercio sull'argomento,
esclusi i testi universitari.
Dalla quarta di copertina: "tratta esclusivamente gli aspetti
dell'informatica che hanno un'effettiva rilevanza nel campo
dell'amministrazione d'azienda".
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
Newsgroup: it.comp.lang.visual-basic
Titolo: scrive DXF

Qualcuno sà indicarmi dove posso trovare un OCX oppure una routine che
scrive file in formato DXF ?
Grazie
ps ovviamente gratuita.
Maurizio

Se non erro i dxf è roba di autocad.
C'è un esempio sul sito comune credo o
su 
www.visual-basic.it
ciao
andrea

 wrote in message
aqah43$7utfr$1...@ID-61006.news.dfncis.de...


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

E' Possibile inserire/aggiungere immagini al controllo imagelist
attraverso codice?
Cioe' evitando l'interfaccia Pagine Proprietŕ?
Grazie.

Grazie.
si, attraverso la collection ListImages, analoga a ListItems e Nodes di altri
Common Control
ad esempio:
ImageList1.ListImages.Add ,,Picture1.Picture
oppure
ImageList1.ListImages.Add ,,LoadPicture("c:\test.bmp")
Cerca sulla guida il metodo Add applicato all'insieme ListImages per i dettagli.
Ciao
--
Luca Dormio
l...@sig-la.com
ldo...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: comando Shell

Qualcuno mi può per favore mostrare come aprire un file word esistente con
l'applicativo word
trammite il comando Shell(
Grazie

 wrote in message
news:HdQi6.11441$LM4.1...@twister1.tin.it...
