Özgün Konu-Kendi code generator,index makerinizi yapın...
1.Yeni bir proje/standart exe açılır.
2.Şimdilik 2 adet check box eklenir.(siz arttırın)
3.2 adet buton ve 1 adette textbox ekleyin.
4.Burdan gerisi kodlarım;
check boxların captionuna html kodu yazılacak;
Buton 1 click e;
------------------------------------------
Private Sub Command1_Click()
html = Check1.Caption
html1 = Check2.Caption
Text1.Text = " <html>" & html & html1 & " </html> "
Open "index.html" For Output As #1
Write #1, Text1.Text
Close #1
End Sub
-------------------------------------------
check1 e;
-------------------------------------
Private Sub Check1_Click()
Check1.Caption = " <title>kes-mezar</title>"
End Sub
-------------------------------------------
check2 ye;
-------------------------------------------
Private Sub Check2_Click()
Check2.Caption = " BU SAYFA Kes-Mezar'a AITTIR..."
End Sub
-------------------------------------------
buton2 click e;
-------------------------------------------
Private Sub Command2_Click()
Text1.Text = ""
End Sub
-------------------------------------------
Form load a;
-------------------------------------------
Private Sub Form_Load()
On Error Resume Next
Open "" For Binary As #1
Close #1
Open "bunuSilmeyinHatavermesin.htm" For Input As #1
If LOF(1) = 0 Then GoTo 10
Input #1, a
10:
Close #1
Text1.Text = a
End Sub
-------------------------------------------
S.A Arkadaşlar
Size kendi çalışmamı sunuyorum.Paylaşımlarıma bir kaç kendini bilmez yüzünden ara vermiştim.
Size kendi çalışmamı sunuyorum.Paylaşımlarıma bir kaç kendini bilmez yüzünden ara vermiştim.
Ancak "bilgisini paylaşmayan alim kadar cahil yoktur" prensibim gereği paylaşımlarım sürecektir.
Ancak o kendini bilmez,saygısızlara Allah paylaşımlarımdan faydalanmayı nasip etmesin
Neyse bu gece size VB6 ile nasıl html,asp,php vs. için
Code generator (kod üreteci) yapılır? bunu öğreteceğim.
Code generator (kod üreteci) yapılır? bunu öğreteceğim.
Bu programla kendi index makerinizi yapabilirsiniz.
Ben html için sunuyorum.
Çok gerekli olmadıkça program paylaşmam ve burda da size source kodları vereceğim.Kendiniz alın geliştirin.Bu konu ile nasıl dosya kaydedilir,okutulur bunları da öğrettim
1.Yeni bir proje/standart exe açılır.
2.Şimdilik 2 adet check box eklenir.(siz arttırın)
3.2 adet buton ve 1 adette textbox ekleyin.
4.Burdan gerisi kodlarım;
check boxların captionuna html kodu yazılacak;
Buton 1 click e;
------------------------------------------
Private Sub Command1_Click()
html = Check1.Caption
html1 = Check2.Caption
Text1.Text = " <html>" & html & html1 & " </html> "
Open "index.html" For Output As #1
Write #1, Text1.Text
Close #1
End Sub
-------------------------------------------
check1 e;
-------------------------------------
Private Sub Check1_Click()
Check1.Caption = " <title>kes-mezar</title>"
End Sub
-------------------------------------------
check2 ye;
-------------------------------------------
Private Sub Check2_Click()
Check2.Caption = " BU SAYFA Kes-Mezar'a AITTIR..."
End Sub
-------------------------------------------
buton2 click e;
-------------------------------------------
Private Sub Command2_Click()
Text1.Text = ""
End Sub
-------------------------------------------
Form load a;
-------------------------------------------
Private Sub Form_Load()
On Error Resume Next
Open "" For Binary As #1
Close #1
Open "bunuSilmeyinHatavermesin.htm" For Input As #1
If LOF(1) = 0 Then GoTo 10
Input #1, a
10:
Close #1
Text1.Text = a
End Sub
-------------------------------------------
EVET Şimdi derleyip masaüstüne .exe olrak kaydedin.Bakın bakalım oldu mu?
Umarım işinize yarar saygılarımla....
Umarım işinize yarar saygılarımla....
Son düzenleme:
