εντολη σε vb6.0

[jimtsoul]

παιδια καλημερα!! θα ηθελα σας παρακαλω να μου πειτε πως μπορω, κανοντας κλικ σε ενα button, καποια στοιχεια που δίνω σε textbox να τα αποθηκευσω σε καποιο αρχειο.

ευχαριστω πολλυ!!

[firewalker]

Για δες το παρακάτω παράδειγμα.

 

http://vbnet.mvps.org/index.html?code/faq/filesavetext.htm

[jimtsoul]

Για δες το παρακάτω παράδειγμα.

 

http://vbnet.mvps.org/index.html?code/faq/filesavetext.htm

 

firewalker ευχαριστω για το ενδιαφερον αλλα κατι γινεται με το link που μου εδωσες.

εφτασα σε καποιο σημειο αλλα μετα δεν ανοιγει!!!

[firewalker]

Δες το παρακάτω.

 

>Option Explicit

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Copyright ©1996-2009 VBnet, Randy Birch, All Rights Reserved.
' Some pages may also contain other copyrights by the author.
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Distribution: You can freely use this code in your own
'               applications, but you may not reproduce 
'               or publish this code on any web site,
'               online service, or distribute as source 
'               on any media without express permission.
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Private Sub Command1_Click

  Dim hFile as Long
  Dim sFilename as String

  sFilename = "c:\demo.txt"
  
 'obtain the next free file handle from the 
 'system and and save the text box contents
  hFile = FreeFile  
  Open sFilename For Output As #hFile
     Print #hFile, Text1.Text
  Close #hFile
  
End Sub

 

 

Δεν είναι κάτι δύσκολο. Νομίζω ότι και το Help της Vb6 τα λέει αναλυτικά.