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

posso ricavare la dir di default dei programmi, tipo getwindir ?
tia, pal

 posso ricavare la dir di default dei programmi, tipo getwindir ?
Cosa intendi con "dir di default"? La cartella in cui risiede il file
eseguibile? La cartella impostata di default per il salvataggio dei file
creati col programma? O che altro?
--
Ciao.
Maurizio
P.S.: "pal", sei proprio tu? Qualc1 (ho capito che ti piacciono le abbr) si
e' impossessato del tuo account? Stai facendo un esperimento?

 e' impossessato del tuo account? Stai facendo un esperimento?
pal sono io. unico, indiscutibile pal del ng. cfr firma.
o cfr anche lo 
zelig.it
 del reply.
altri pal, conosco il cibo per cani, ma non sono io. non ancora, spero.
ce n'e' altri ? come osano ?
posso reclamare un copyr legale ?
a chi mi devo rivolgere ?
nic ?
ciao, a.
--
andrea dot palazzi at tin dot it
free vb/sw: 
http://www.comune.modena.it/cittadini/apal/html/

è scritta da qualche parte nel registry...
la leggi facile...
se non te la cavi posta un msg che te lo risolvo...
--[GbC]--

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion
\ProgramFilesDir
\ProgramFilesPath
--[GbC]--

aci,
a.
GbC <mac...@ti.importa> wrote


 nic ?
Gli e' che, scusami, non t'offendere, e' le me parevano un tantinello giu'
di tono, coteste domanduzze, a petto d'altre cui t'ho veduto di
rispondere...
--
Ciao.
Maurizio

 rispondere...
[scuse anticipate per l'ot e l'autobiografismo]
non m'offendo di certo. sono io, sono io.
come spesso, dipende 1. dal percorso personale e 2. dalla sua impostazione:
1. a parte che di formazione sono un letterato, non sono un programmatore
professionista. smacchino e scurioso ogni volta che posso, ma buona parte
del mio lavoro e' fatta di pallosissime p.r., riunioni, programmi nel senso
di planning. il telefono e' il medium che apprezzo meno in assoluto, ma
ognuno ha il suo purgatorio... entro breve mi becchero' anche l'inferno
delle videoconferenze...
2. in qualche modo mi occupo di computer dal '77. dalle schede perforate
agli athlon... forse dovrei upgradarmi... un xpal... cmq, se uno puo' avere
delle predilezioni, io ce l'ho per i db. la tradizione procedurale e niente
affatto OO fa' si' che tuttora non abbia la minima idea di come costruire,
anzi concepire, un controllo. e che mi perda *totalmente* nelle classi,
negli udt ecc. -- in compenso l'esperienza (un po' di cobol e 10 anni di
clipper servono, e parecchio) fa' si' che su alcune cose abbia idee
abbastanza chiare, e magari -- spesso grazie alla preparazione eterodossa --
diciamo diversamente articolate rispetto agli informatici medi che
frequento. tipo: se nella progettazione di un dbms, raddoppiando tabelle
spreco 2gb ma risparmio 2 mesi di tempo-uomo e semplifico consultazione e
manutenibilita', vada per la soluzione wintel. sob. ( non "son of [a] bitch
:) -- ( o si' ? :)
il punto 2. ha riflessi sul punto 1. --> nel mio ufficio la macchina piu'
vecchia e' un p75, e ti assicuro che non e' la norma per luoghi
informatizzati da 12 anni. il mio 386 del 91 aveva 8m di ram, ed erano
tanti, e 1024*768 (su un acer 14", in ufficio avevo un 486 mca scsi con un
12" dai magnifici colori ma dai pixel PICCOLISSIMI). altro riflesso: alcuni
colleghi usano tuttora una cosa mia in clipper del 91 che (non la ritocco
dal 95) e' y2k-compliant. invece appena tornato in ufficio dopo la befana mi
sono trovato un telnet su un prg unix fatto da professionisti con un msgbox
"cant store the date 08/01/2000 in format 99.99.99". qui di professionale
ammetterai che c'e' solo il testadicazzismo di qno che vuole mangiare a
pranzo col sw e a cena coll'upg...
reciproco, da 2. a 1. --> io AMO vb, e mi sembra un linguaggio estremamente
potente, se solo ci si sgaggia da un pdv meramente tecnico e si tengono in
considerazione efficienza, efficacia, costo di progettazione e produzione e
altre variabili esterne -- ma ti assicuro che ho *dovuto* assistere alla
scelta di powerbuilder per l'interfacciamento a un grosso dbms, nonostante
su pb abbia letto cose abbastanza orribili sui ng usa. conosco gente passata
da clipper a vb, a vdb, a vo -- a pb nessuno. che dire ? ci sono ancora
altri parametri che *evidentemente* non *vedo* <g>.
concludendo: mi restano un casino di buchi, alcuni dei quali banalissimi, e
oltre al pochissimo tempo, mi accorgo che a volte e' proprio l'elasticita'
mentale che comincia a canticchiare la musica del titanic. de rita la
chiamerebbe preparazione a macchie di leopardo <g>. in ogni modo sul ng vedo
molti, magari giovanissimi, che ne sanno infinitamente piu' di me. quindi,
umilmente, chiedo :)



Caro PAL,
La soluzione l'hai gia' sul tuo HD! Guarda nella tua copia del SC e cerca
CartelleStd.zip
^___^
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

 CartelleStd.zip
giornata no oggi, mi beccano in fallo tutti :)
grazie, a.

 [scuse anticipate per l'ot e l'autobiografismo]
[...]
Diciamo che il tuo, come anche il mio, e' un percorso classico, che in
questo caso va inteso al contrario, nei tempi in cui, per ragioni
anagrafiche, o si era fra quei pochi che, per caso, nascevano gia'
informatici o, un bel giorno, si vedeva la Luce e... buonanotte: eccoci qui.
--
Ciao.
Maurizio

 Giovanni e Giacomo..."
a non farcela piu' sarai tu. io finche' esisto ci provo. e' te che si vede
poco qui, se non per rimproverare e saccentare. la tecnica c'e', manca
l'anima. ciao ciccio. a montecatini, sempre che fra le 1430 e le 2030 non
telefoni dicendo che non sai se puoi.

 CartelleStd.zip
l'ho fatto, e mi restituisce
c:\windows\menu avvio\programmi
il che, posso assicurarti, non e'.
anzi, ritoccando velocemente la routine in questo modo
(l'indentazione e' per cercare di evitare casini nel post):
Private Sub CercaDirAP()
Dim lngIndex As Long
Dim clsTemp As Dir_Win95
Dim j
For j = 0 To List1.ListCount - 1
    List1.ListIndex = j
        lngIndex = List1.ListIndex
        If lngIndex <> -1 Then
            Select Case List1.List(lngIndex)
                Case "Vuoto"
                    Debug.Print "* " & j & ": " & _
    List1.List(lngIndex) & " - Valore vuoto"
                Case Else
                    Set clsTemp = New Dir_Win95
                    Debug.Print "* " & j & ": " & List1.List(lngIndex) _
    & " - " & clsTemp.GetPathDirectory(lngIndex)
            End Select
        Else
            Debug.Print "* " & j & ": " & List1.List(lngIndex) & _
                " - Valore non definito"
        End If
    Next
End Sub
il risultato e':
* 0: DESKTOP  - C:\windows\desktop
* 1: Vuoto - Valore vuoto
* 2: PROGRAMS  - C:\windows\menu avvio\programmi
* 3: CONTROLS  -
* 4: PRINTERS  -
* 5: PERSONAL  - C:\documenti
* 6: FAVORITES  - C:\windows\preferiti
* 7: STARTUP  - C:\windows\menu avvio\programmi\esecuzione automatica
* 8: RECENT  - C:\windows\recent
* 9: SENDTO  - C:\windows\sendto
* 10: BITBUCKET  -
* 11: STARTMENU  - C:\windows\menu avvio
* 12: Vuoto - Valore vuoto
* 13: Vuoto - Valore vuoto
* 14: Vuoto - Valore vuoto
* 15: Vuoto - Valore vuoto
* 16: DESKTOPDIRECTORY  - C:\windows\desktop
* 17: DRIVES  -
* 18: NETWORK  -
* 19: NETHOOD  - C:\windows\risorse di rete
* 20: FONTS  - C:\windows\fonts
* 21: TEMPLATES  - C:\windows\shellnew
* 22: COMMON_STARTMENU  -
* 23: COMMON_PROGRAMS  -
* 24: COMMON_STARTUP  -
* 25: COMMON_DESKTOPDIRECTORY  -
* 26: APPDATA  - C:\windows\application data
* 27: PRINTHOOD  - C:\windows\printhood
cioe', non trova almeno printers.
sbaglio o il codice e' impostato per nt (tutti quei "common")? io ho 98.
tempo fa ne avevo avuta da domenico una di martinez che, su 95, mi sembrava
un po' piu' messa a punto -- spero di ritrovarla.
ciao, a.

Non per fare il saccente... ma la cartella Programmi, nel sistema operativo in
inglese, viene detta (e si chiama) Program Files, quando in un Windows in
inglese parli di Programs, in realtą ti stai riferendo al sotto-menu Programmi,
nel Menu Avvio. Se ci pensi ha senso.
