VB6 to PHP convert short function

This project was awarded to zeke for $30 USD.

Get free quotes for a project like this
Employer working
Awarded to:
Skills Required
Project Budget
$30 - $250 USD
Total Bids
Project Description

Hello I need to convert this VB6 function into a php function. When I input "loffkkcgjnaeokqdqgmj" into the function it should output "[url removed, login to view]:17478". Thanks

'//////////////CODE START

Public Function LW2IP(sLWKey As String) As String

On Error GoTo err

Dim key As String

Dim Ip As String

Dim ippointer As Long

Dim keypointer As Long

Dim LWKey As String

LWKey = sLWKey


ippointer = 12

keypointer = 1

Ip = ""

Do Until ippointer = Len(LWKey) - 13

Ip = Ip & Chr$(Asc(Mid$(LWKey, ippointer, 1)) - Asc(Mid$(key, keypointer, 1)) + 32)

ippointer = ippointer + 1

keypointer = keypointer + 1


LW2IP = Replace(Ip, " ", vbNullString)

Exit Function


LW2IP = "invalid ip"

End Function

'/////////////////CODE STOP

Looking to make some money?

  • Set your budget and the timeframe
  • Outline your proposal
  • Get paid for your work

Hire Freelancers who also bid on this project

    • Forbes
    • The New York Times
    • Time
    • Wall Street Journal
    • Times Online