Visual Basic - Ajutor la OpenFile Dialog

#1
kuerten

Posted 18 August 2002 - 21:42

Junior Member

Grup: Members
Posts: 74
Înscris: 17.08.2002

Va rog foarte mult am si eu o problema!!!!
vreau sa imi apara o fereastra de Open (normala) apasand pe butonul "browse", dar la codul urmator imi a eroarea Sub or function not defined si imi selecteaza cuvantul openFile
Ce se petrece??? :help:

Private Sub browse_Click()
On Error GoTo errhandler
CommonDialog1.Filter = "All Files (*.*)|*.*"
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
OpenFile (CommonDialog1.FileName)
Exit Sub
errhandler:
Exit Sub
End Sub

Back to top

#2
Sammy

Posted 18 August 2002 - 22:15

Active Member

Grup: Members
Posts: 1,403
Înscris: 26.11.2001

de ce filterindex=2?
si openfile(commondialog1.filename) ce ar trebui sa faca?
nu am mai folosit vb de muuuuult :)

Back to top

#3
kuerten

Posted 19 August 2002 - 22:48

Junior Member

Grup: Members
Posts: 74
Înscris: 17.08.2002

este cineva care ar dori sa corespondeze cu mine pe tema acestui limbaj??? Daca da sa-mi scrie pe mail la
[email protected]

Back to top

#4
Luc

Posted 26 August 2002 - 17:08

Junior Member

Grup: Members
Posts: 29
Înscris: 02.02.2002

A cam trecut ceva timp de cand ai pus intrebarea... daca te mai intereseaza inca, atunci ia in considerare urmatoarele:
In VB nu exista o functie OpenFile(...) De aceea primesti mesajul de eroare.
Daca vrei sa 'deschizi' acel fisier, trebuie intai sa precizezi ce intelegi prin asta:
1) aplicatia ta deschide propriu zis fisierul pentru a citi si/sau scrie in el; sau
2) fisierul este de un tip cunoscut si doresti sa fie deschis de aplicatia sa proprie, de ex. fisiere *.doc - Word, *.txt - Notepad, etc.

Daca vrei sa deschizi de ex un fisier text, poti scrie asa:

Private Sub Command1_Click()
Dim RetVal As Integer
RetVal = Shell("notepad.exe c:NumeFisier.txt", 1)
End Sub

Poate ca o sa iti fie util sa arunci o privire in Help la VBA.FileSystem si Shell(pathname[,windowstyle])
Succes.

Back to top

#5
AndiOliver

Posted 27 February 2003 - 15:16

Junior Member

Grup: Members
Posts: 219
Înscris: 27.02.2003

Daca folosesti un common dialog (sa presupunem ca l-ai denumit comdlg), atunci comanda de invocare a ferestrei ar fi:
comdlg.showopen

Acum mai mult ca sigur ca stii, dar dupa cum ii spune si numele, Common Dialog are forme diferite de deschidere:
1) ShowOpen - Deschide o fereastra de browsing in functie de filtrul dat
2) ShowPrinter - Deschide panoul de printare.
3) ShowSave - Fereasta de salvare a unui fisier din aplicatia ta.
4) ShowColor - Pentru culoare
5) Show Font

Sper sa fie de folos aceste rinduri.

Back to top

Anunturi

Bun venit pe Forumul Softpedia!

Visual Basic - Ajutor la OpenFile Dialog

#1 kuerten Posted 18 August 2002 - 21:42

#2 Sammy Posted 18 August 2002 - 22:15

#3 kuerten Posted 19 August 2002 - 22:48

#4 Luc Posted 26 August 2002 - 17:08

#5 AndiOliver Posted 27 February 2003 - 15:16

Anunturi

▶ 0 user(s) are reading this topic

Sign In

#1
kuerten

Posted 18 August 2002 - 21:42

#2
Sammy

Posted 18 August 2002 - 22:15

#3
kuerten

Posted 19 August 2002 - 22:48

#4
Luc

Posted 26 August 2002 - 17:08

#5
AndiOliver

Posted 27 February 2003 - 15:16