Haberler:

Foruma Resim Yükleme ve Boyut Sınırlaması ( ! )  https://bit.ly/2GMFb8H

Ana Menü

Vb de ini ve txt

Başlatan dalavi, 05 Nisan 2006, 18:19:43

dalavi

selam arkadaslar,
visual basicle bir ini veya txt dosyasi nasil yaratilir.
Tesekkürler

argeelektronik

Altında Çürümekten Kurtulamıyacağın Topraklar Üzerinde Böbürlenerek Yürüme, Üzerine Tükürmeye Bile Miğdenin kaldıramıyacağı Kurtçuklara Yem Olacak Bedeninle...

ground

Arge sanırım bunu sormuyor arkadaş..  ;)


Oluşturma ile ilgili bi örnek..
http://masamiki.com/project/writeproperties.txt

Ve buda var..

Sanırım oluşturduktan sonra bunla içine yazıyorsun..
Private Sub Command1_Click()
    Open App.Path & "\data.txt" For Output As #1 'open file for output
        Print #1, Text1.Text 'save text1's text
        Print #1, Text2.Text 'save text2's text
        Print #1, Text3.Text 'save text3's text
    Close #1 'close file
End Sub


Kullanmadım ama google sağolsun :)

Google için İhtiyacın olan kelimeler

"visualbasic" "create" "text file"

create yerine creating getirebilirsin "ing" türkçedeki -mek  -mak tır..
Not: Google ı kullanma klavuzu hazırlamamız gerekiyor gibi..
⌒╮'╭⌒╮⌒╮.
╱◥██◣                  
| 田︱田田|              
╬╬╬╬╬╬╬╬╬

Picproje - Sözde değil özde paylaşım..

argeelektronik

Ground hocam siz googleyi iyi kullanıyorsunuz :)
ben visual basic'de  usb kontrolü için coponet bulamadım  bu konuda bilginiz varmı veya bilen arkadaşlar varmı acaba?
Altında Çürümekten Kurtulamıyacağın Topraklar Üzerinde Böbürlenerek Yürüme, Üzerine Tükürmeye Bile Miğdenin kaldıramıyacağı Kurtçuklara Yem Olacak Bedeninle...

ground

http://www.alanmacek.com/usb/#Ref1

http://www.intel.com/intelpress/usb/examples/DUSBVB.htm

http://prism.mem.drexel.edu/kennedy/joystickTutorial/samp1.htm

http://www.vbfrance.com/gma/usb  (İYİ SİTE)

Ve benzeri

Google Kodu :D
http://www.google.com/search?num=100&hl=en&lr=lang_en&as_qdr=all&q=read+write+USB+VB&btnG=Search&lr=lang_en


Yardımcı kelimeleriniz

"read" "write" "USB" "VB"

VB yada "visualbasic"

iyi çalışmalar..
⌒╮'╭⌒╮⌒╮.
╱◥██◣                  
| 田︱田田|              
╬╬╬╬╬╬╬╬╬

Picproje - Sözde değil özde paylaşım..

OG

Alıntı Yapben visual basic'de usb kontrolü için coponet bulamadım bu konuda bilginiz varmı

Alıntı YapGenelde usb ile iletişimi driveri saglar..windows driver ile muhatab olur
sende windows ile.. nasil olur.. bir SDK si vardir onla..

Bahsettigine benzer işlerde benim simdiye kadar gorduklerim aslinda gerçek
bir USB değildi.. Evet cihazi pc ye usb olarak takiyorsun, ama aslinda cihaz
rs232 tasarlanmis ve yapilmis.. ve taktigim kablonun cihazin kutusuna
yerlestirilmis bir USB-rs232 donusturucunun uzatilmis kablosundan başkasi
değildi  ... Yazilimlari ise com portlardan driveri kendi driveri olani
secip kullaniyordu.

yok ben harbiden USB istiyorum diyorsan bildigim kadari ile bu tip isler
icin Custom USB kitler var.. bir driverde beraberinde geliyor bunlarin..
driver kurulumunu da sen şekillendirebiliyorsun inf sinden mesela takinca
"xxx bunker kontrol v1.0" diye cikiyor..ama onlarda sonucta paralel / seri
vs bi seye donusturuyordur gibi geliyor bana..

bu arada su linki bi incele bahsettigime benzer seyler var ben tam
inceleyemedim http://www.lvr.com/usb.htm

Burada Güzel Birşeyler var (PBP formatında) ~200KB
http://www.hemenpaylas.com/download/510194/FT232_16F877.zip.html

Yukarıdaki dosyanın tamamı ise burada (~5,5MB):
http://www.hemenpaylas.com/download/510244/Usb_Complete_-_Everything_You_Need_To_Develop_Custom_Usb_Peripherals__3._edition__by_Jan_Axelson__2005_.zip.html
FORUMU İLGİLENDİREN KONULARA ÖM İLE CEVAP VERİLMEZ.

transistor

aşağıdaki kod text1 içindeki bilgileri bi text dosyası olarak kaydeder.

[code]

Private Sub Command8_Click()
On Error GoTo saverr2
Dim amcammm
dlgCommonDialog1.DialogTitle = "Kaydet"
dlgCommonDialog1.Filter = "text (*.txt) |*.txt"
dlgCommonDialog1.DefaultExt = "txt"
dlgCommonDialog1.CancelError = True
dlgCommonDialog1.Flags = 2
dlgCommonDialog1.ShowSave
Open dlgCommonDialog1.FileName For Output As #1


amcammm = Text1                        
Print #1, amcammm
Close #1
saverr2:
End Sub
Herşey Vatan İçin.

transistor

aşağıdaki kodlarla ilk önce bi txt dosya açılır (sıralı erişim için) içine bilgiler yazılır ikinci kodlada bu bilgiler okunur.


                sıralı erişim için dosyaya yazma rutini

Open "c:\sirali.txt" For Append As #2
knumara = 2
kzaman = Date
ksaat = Time$
khava = dataciz1
kgidis = dataciz2
ksicak = dataciz
kcalismasicakligi = dataciz3
Write #2, knumara, kzaman, ksaat, khava, kgidis, ksicak, kcalismasicakligi
Close #2
sıralı erişim dosyasından okuma rutini

Open "c:\sirali.txt" For Input As #2

Input #2, knumara, kzaman, ksaat, khava, kgidis, ksicak, kcalismasicakligi

If EOF(2) = True Then GoTo mes Else GoTo ho
   
Close #2
End Sub
Herşey Vatan İçin.