IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Visual Basic (https://www.ircforumlari.net/visual-basic/)
-   -   Türk Yapımı Web Brovser ;) [Powered By Skills] (https://www.ircforumlari.net/visual-basic/246811-turk-yapimi-web-brovser-powered-skills.html)

Skills 23 Ağustos 2009 03:59

Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Merhaba Arkadaşlar..

2 gün uğraş verdiğim visual basic ile hazırladığım web brovseri Paylaşıma sunma gereği duydum. Kimse kullanmaz lakin denemenizde sakınca yoktur ;)

indir->
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Ekran görüntüleri;

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

indir->
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

grineX 24 Ağustos 2009 15:48

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
emeğine sagLık.

Cemalizim 27 Ağustos 2009 17:03

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Daha Önce Bir Program'da Vardı Kod felan Sanırım veriyordu o Programı Kurarkende bu hatayı aldım , bu Programdada. Bence Exe'lemende sorun oluşuyor Yada Başka birşey.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Skills 27 Ağustos 2009 17:11

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
yok cemalizim, senin kayıt defterin devre dışı kalmış.

Kayıt defterin devre dışı ise çalışmaz. yapacak bişey yok.

SuNSeT 27 Ağustos 2009 18:01

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Kayıt defterinin devre dışı kalmasıyla ya/da kalmamasıyla alakalı birşey değil sanırım bu problem.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cemalizim 27 Ağustos 2009 18:23

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sen öyle diyorsunda bu sorun tek bende değilki , Neden Başka Program'larda Hata Almıyorum Sadece Senin Yaptığın programlarda Hata Alıyorum , Bence Senden Kaynaklanıyor.

Skills 27 Ağustos 2009 20:32

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Cemalizim, benden kaynaklanıyor olabilir doğrudur, haklısın.

Visual basic'ten anliyorsun sanırım sen.
Sorun exe 'de olabilir.
Kodları sana vereyim, Birde sen exe yapıver bakalım sonuç ne olacak?
Bu Bölümde bayağı bir paylaşımında var, Anliyorsundur bu işten.
PHP- Kodu:

Imports System.IO
Imports System
.Net
Imports System
.Text
Imports System
.Windows.Forms
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
Me
.FormBorderStyle Windows.Forms.FormBorderStyle.FixedToolWindow
Me
.buttonBack = New System.Windows.Forms.Button
Me
.buttonForward = New System.Windows.Forms.Button
Me
.buttonStop = New System.Windows.Forms.Button
Me
.buttonHome = New System.Windows.Forms.Button
Me
.buttonRefresh = New System.Windows.Forms.Button
Me
.TextBox1 = New System.Windows.Forms.TextBox
Me
.buttonSubmit = New System.Windows.Forms.Button
Me
.WebBrowser1 = New System.Windows.Forms.WebBrowser
Me
.SuspendLayout()
'
'
buttonBack
'
Me.buttonBack.Location = New System.Drawing.Point(12, 12)
Me.buttonBack.Name = "buttonBack"
Me.buttonBack.Size = New System.Drawing.Size(75, 23)
Me.buttonBack.TabIndex = 0
Me.buttonBack.Text = "Geri"
Me.buttonBack.UseVisualStyleBackColor = True
'
'buttonForward
'
Me.buttonForward.Location = New System.Drawing.Point(9312)
Me.buttonForward.Name "buttonForward"
Me.buttonForward.Size = New System.Drawing.Size(7523)
Me.buttonForward.TabIndex 1
Me
.buttonForward.Text "˜leri"
Me.buttonForward.UseVisualStyleBackColor True
'
'
buttonStop
'
Me.buttonStop.Location = New System.Drawing.Point(174, 12)
Me.buttonStop.Name = "buttonStop"
Me.buttonStop.Size = New System.Drawing.Size(75, 23)
Me.buttonStop.TabIndex = 2
Me.buttonStop.Text = "Durdur"
Me.buttonStop.UseVisualStyleBackColor = True
'
'buttonHome
'
Me.buttonHome.Location = New System.Drawing.Point(25512)
Me.buttonHome.Name "buttonHome"
Me.buttonHome.Size = New System.Drawing.Size(7523)
Me.buttonHome.TabIndex 3
Me
.buttonHome.Text "GiriŸ"
Me.buttonHome.UseVisualStyleBackColor True
'
'
buttonRefresh
'
Me.buttonRefresh.Location = New System.Drawing.Point(336, 12)
Me.buttonRefresh.Name = "buttonRefresh"
Me.buttonRefresh.Size = New System.Drawing.Size(75, 23)
Me.buttonRefresh.TabIndex = 4
Me.buttonRefresh.Text = "Yenile"
Me.buttonRefresh.UseVisualStyleBackColor = True
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(1241)
Me.TextBox1.Name "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(39920)
Me.TextBox1.TabIndex 5
Me
.TextBox1.Text "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">Me
.buttonSubmit.Location = New System.Drawing.Point(41712)
Me.buttonSubmit.Name "buttonSubmit"
Me.buttonSubmit.Size = New System.Drawing.Size(7549)
Me.buttonSubmit.TabIndex 6
Me
.buttonSubmit.Text "&Git"
Me.buttonSubmit.UseVisualStyleBackColor True
'
'
WebBrowser1
'
Me.WebBrowser1.Location = New System.Drawing.Point(12, 67)
Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
Me.WebBrowser1.Name = "WebBrowser1"
Me.WebBrowser1.Size = New System.Drawing.Size(655, 427)
Me.WebBrowser1.TabIndex = 7
'
'Form1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode System.Windows.Forms.AutoScaleMode.Font
Me
.ClientSize = New System.Drawing.Size(679506)
Me.Controls.Add(Me.WebBrowser1)
Me.Controls.Add(Me.buttonSubmit)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.buttonRefresh)
Me.Controls.Add(Me.buttonHome)
Me.Controls.Add(Me.buttonStop)
Me.Controls.Add(Me.buttonForward)
Me.Controls.Add(Me.buttonBack)
Me.Name "Form1"
Me.Text "Powered By SkiLLs"
Me.ResumeLayout(False)
Me.PerformLayout()
buttonBack.Enabled False
buttonForward
.Enabled False
buttonStop
.Enabled False
End Sub
Private Sub buttonBack_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonBack.Click
WebBrowser1
.GoBack()
TextBox1.Text WebBrowser1.Url.ToString()
End Sub
Private Sub buttonForward_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonForward.Click
WebBrowser1
.GoForward()
TextBox1.Text WebBrowser1.Url.ToString()
End Sub
Private Sub buttonStop_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonStop.Click
WebBrowser1
.Stop()
End Sub
Private Sub buttonRefresh_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonRefresh.Click
WebBrowser1
.Refresh()
End Sub
Private Sub buttonHome_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonHome.Click
WebBrowser1
.GoHome()
TextBox1.Text WebBrowser1.Url.ToString()
End Sub
Private Sub buttonSubmit_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles buttonSubmit.Click
WebBrowser1
.Navigate(TextBox1.Text)
End Sub
Private Sub WebBrowser1_CanGoBackChanged(ByVal sender As ObjectByVal e As System.EventArgsHandles WebBrowser1.CanGoBackChanged
If WebBrowser1.CanGoBack True Then
buttonBack
.Enabled True
Else
buttonBack.Enabled False
End 
If
End Sub
Private Sub WebBrowser1_CanGoForwardChanged(ByVal sender As ObjectByVal e As System.EventArgsHandles WebBrowser1.CanGoForwardChanged
If WebBrowser1.CanGoForward True Then
buttonForward
.Enabled True
Else
buttonForward.Enabled False
End 
If
End Sub
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As ObjectByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgsHandles WebBrowser1.DocumentCompleted
buttonStop
.Enabled False
End Sub
Private Sub WebBrowser1_Navigated(ByVal sender As ObjectByVal e As System.Windows.Forms.WebBrowserNavigatedEventArgsHandles WebBrowser1.Navigated
TextBox1
.Text WebBrowser1.Url.ToString()
Me.Text WebBrowser1.DocumentTitle.ToString()
End Sub
Private Sub WebBrowser1_Navigating(ByVal sender As ObjectByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgsHandles WebBrowser1.Navigating
buttonStop
.Enabled True
End Sub
Friend WithEvents buttonBack 
As System.Windows.Forms.Button
Friend WithEvents buttonForward 
As System.Windows.Forms.Button
Friend WithEvents buttonStop 
As System.Windows.Forms.Button
Friend WithEvents buttonHome 
As System.Windows.Forms.Button
Friend WithEvents buttonRefresh 
As System.Windows.Forms.Button
Friend WithEvents TextBox1 
As System.Windows.Forms.TextBox
Friend WithEvents buttonSubmit 
As System.Windows.Forms.Button
Friend WithEvents WebBrowser1 
As System.Windows.Forms.WebBrowser
End 
Class 

Formumdan Aynen Alıp Verdim, herhangi bir hata yok kodlamada.

xLine 14 Eylül 2009 04:16

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Browser bende çalıştı. Sizde çalışmamasının sebebi .net framework'ün ya 2.0 yada üst sürümlerinin yüklenmediğinizdendir. Yükleyip tekrardan deneyin.

mevtoo 29 Eylül 2009 21:50

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Arkadaşlar bende de sorunsuz çalıştı emeğine sağlık diyorum umarım daha da geliştirirsin bunun daha iyi veersiyonlarını yaparsın yanlız bir önerim olacak ismini türkçe kullansan daha iyi olurdu örnek bir başka türk tarayıcısı deneyin görün arkadaşlar benzer bir özellikte. ''Gezgin''
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Skills 30 Eylül 2009 13:07

Cevap: Türk Yapımı Web Brovser ;) [Powered By Skills]
 
Güzel tasarlamişsin. Emeğine Sağlık.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:41.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net