Dear All,

Can anyone let me know the source code for e-Sword Application ( http://www.e-sword.net/ )

I'm planning to create a program for PalTalk using e-Sword bibles, commentaries, dictionaries, etc which should be a great application for PalTalk users.

So...any suggestions.

Michael.

Why don't you ask them?

I have tried from two months ago to ask Rick the original programs of e-Sword but he did not replay to me.

being that e-sword does not give you an api, you will need to use windows api's to interact with e-sword just like you do with paltalk.

He probably hasn't replied because he doesn't want to give you the source code. Most people don't just give our their source code after working so many hours to perfect it. By doing that they would risk it being stolen by someone who would then make a similar program based off it and claim that they are the coder of it.

But if you manage to make this program please post it here as I would find it very, very useful as a believer and one who hates to copy and paste verses into a room constantly. Please include a verse posting function. I have wanted this for a long time.

Sincerly,

Michael

I downloaded esword and the Word2003macro addon. in the macro, is a dll file that allows you to easily do certain tasks programaticly with the esword software. I have attached the dll here so you can place it in your esword installation folder and then add it to your vb projects.

Once the dll is in the esword instalation folder, you will need to register it by using regsvr32.

Add a reference to the dll in VB 2008 by going to Project - Add Reference. Then go to the Browse tab and browse to the eSword installation folder to select the dll.

Once that is done, to the form, add 1 textbox, 1 richtextbox, and 4 buttons (i also added a label)

Then in the for code, I have the following:

Code: Select all

Public Class Form1

    Dim MyMac As New eSwordMacros.Macros

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = "Gen 1:1"
        RichTextBox1.Rtf = MyMac.GetScriptureText(TextBox1.Text)
    End Sub

    Private Sub btnLookUp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLookUp.Click
        RichTextBox1.Rtf = MyMac.GetScriptureText(TextBox1.Text)
    End Sub

    Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click
        MyMac.ShowSearch()
    End Sub

    Private Sub btnCopy_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCopy.Click
        MyMac.ShowCopy()
    End Sub

    Private Sub btnTranslation_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTranslation.Click
        MyMac.ShowTranslation()
    End Sub
End Class

This does not fully answer your questions, but it should give you a place to start.

this should be very helpful. now all i gotta do i buy a pc get VB learn to cod and im set. maybe michael madgy can do this...

How about trying my BibleBot? Let me post my latest version that should work with Pal8 and Pal9 thanks to some of the other awesome dudes here like departure and autopilot and locohackr. My only problem (which I know how to fix, but just dont have time yet to fix) is you need to have an administrator level account on the computer your running the program on to use some of the other features like saving a favorite verse list.

Try this link since the setup installer is too big to post on this board.

http://palapps.leinc.net/BibleBotsetup.exe