Arkadaşlar Başlıktata Belirttiğim gibi Connector yapıyorum ama başlat'a sitelerde bulduğum kodu koydum. Ama Onda Ultima Online 2D Yazarsam Ultima 2Dye Sahip olanlar girebilir . Mesela Sizinki Ultima online Mondac'y ise Giremezsiniz . Ben Bunu Bütün Her Ultimanın Girmesini istiyorum Nasıl yapabilirim bi Yardımcı Olurmusunuz ?

Hangi dili kullanıyorsun belki araştırmada yardımcı olabilirim?

Mesaj olarak Yolladm size. Visual Basic 6.0 ile Yapyrm her zamanda O işi çözemedm araştrmalar yptm ama bi türlü anlayamadm :S

Ultima Online klasörünü registry sayesinde bir labela yazdırıp label1.caption+'\client.exe' şeklinde açtırabilirsin.(VB kodunu tam bilmiyorum sana fikir olması için yazdım.)

Connectoru ultima online klasörü için kurucağın için ayrı bir path belirleneme gerek yok sadece kullandığın programlama dilinin SelfPath kodunu bulman yeterli.

Visual Basic 6.0' kullanıyorum . Herkezin Girmesi İçin Ne yapmam Gerekir Yazarmsn ?
Başka Sitede Başlata bu Kodu vermiş

code]Private Sub Command1_Click()

On Local Error GoTo hata

Dim K

K = Shell("C:\Program Files\EA Games\Ultima Online Mondain's Legacy\client.exe", 1)

Exit Sub

hata:

MsgBox ("Client Dosyası Bulunamadı")

end

End Sub

Ben Buna Ultima 2D , Ageshadow v.b lerinde girmesini ekleyebilmeyi istiyrm :S bi tek legacylerin girmesini sağlıyor bu :S

Burada bir fonksiyon var.

Aşağıda ki gibi kullanma şansın var ancak VB bilmediğim için birleştirme işleminde yanlışlık yapmış olabilir bazı diller + yerine & kullanabiliyor. Ona göre düzenlersin ayrıca fonksiyon için bir kütüphane istiyormu bilmiyorum ama google'da "Find your application path" yazarsan ve yanına birde VB koyarsan bulabilirsin.

Private Sub Command1_Click()

 On Local Error GoTo hata

 Dim K

 K = Shell(App.Path() & "\\client.exe, 1)

 Exit Sub

 hata:

 MsgBox ("Client Dosyası Bulunamadı")

 end

 End Sub