# Convertir Código visual a PHP

La funcion original esta en Fox, La misma fue convertida a Visual , y Ahora se necesita converir la misma a PHP

Public Function digverif(ByVal cadena As String) As String

' muni zapala codigo original que mando esta hecho en FOX retorna 2 digitos

' LPARAMETERS [url removed, login to view]

' [url removed, login to view] = 0

' secuencia = 3

' [url removed, login to view] = SUBSTR([url removed, login to view], 1, 1)

' [url removed, login to view] = Val([url removed, login to view]) * 1

' [url removed, login to view] = [url removed, login to view] + ([url removed, login to view])

' For [url removed, login to view] = 2 To Len([url removed, login to view]) Step 1

' [url removed, login to view] = SUBSTR([url removed, login to view], [url removed, login to view], 1)

' [url removed, login to view] = Val([url removed, login to view]) * secuencia

' [url removed, login to view] = [url removed, login to view] + ([url removed, login to view])

' secuencia = secuencia + 2

' if secuencia=11

' secuencia = 3

' End If

' Next [url removed, login to view]

' [url removed, login to view] = MOD(int([url removed, login to view]), 10)

' [url removed, login to view] = mod(int((m.suma+([url removed, login to view]*secuencia))/2),10)

' [url removed, login to view] = [url removed, login to view] + alltrim(Str([url removed, login to view])) + alltrim(Str([url removed, login to view]))

' [url removed, login to view] = [url removed, login to view]

' RETURN [url removed, login to view]

' CODIGO CONVERTIDO A VISUAL BASIC

suma = 0

secuencia = 3

valorreal = Val(letra) * 1

suma = suma + (valorreal)

For co = 2 To Len(cadena) Step 1

valorreal = Val(letra) * secuencia

suma = suma + (valorreal)

secuencia = secuencia + 2

If secuencia = 11 Then

secuencia = 3

End If

Next co

checksum = Int(suma / 2) Mod 10

checksum2 = Int((suma + (checksum * secuencia)) / 2) Mod 10

digverif = Trim(Str(checksum)) + Trim(Str(checksum2))

End Function

Skills: MySQL, PHP, Software Architecture

( 7 reviews ) Charata, Argentina

Project ID: #13457130

## Awarded to:

ddonari

Hola, mi nombre es David, mañana a la mañana charlamos y la hacemos en el día, saludos!

\$44 USD in 1 day
(10 Reviews)
6.0

## 9 freelancers are bidding on average \$216 for this job

extreamcode

HI, I can assist you with this Project. Here is a sampling of the few of my work contained at my portfolio: https://www.freelancer.com/u/extreamcode.html This is a placehoolder bid, I would be able to quote final p More

\$155 USD in 3 days
(56 Reviews)
7.3
concettolabs

“Web development Experts” Hello, we are a leading website app development company, we specialize in WordPress including theme and plugin customization. we are experienced in woo commerce too. We have studied your More

\$494 USD in 20 days
(52 Reviews)
6.0
websolutions008

Hi, This is angel from [url removed, login to view] We could build a website as mentioned in the project description Mockup could be provided on your approval, before awarding the project. We are a company located in India. Give More

\$266 USD in 10 days
(72 Reviews)
6.2
\$155 USD in 10 days
(30 Reviews)
5.5
rajneeshsaini

I have a few questions about your project. Please send me a message so that we can discuss more. Hello, I have 7+ years experince in PHP, Wordpress, Magento, Shopify , BigCommerce , Opencart, Woocommerce, Joomla More

\$238 USD in 3 days
(11 Reviews)
4.2
kkokko555

Dear Hiring Manager! I have got your job posting on “Public Function digverif (ByVal String As String) As String” and I am very much interested to work in your project. I am a pro web Developer with more than 8 year More

\$166 USD in 3 days
(17 Reviews)
4.4
developerroger

experienced php developer , about 10 years. please let me try without compromise.. i believe its a really easy task

\$222 USD in 10 days
(6 Reviews)
2.9
\$155 USD in 3 days
(16 Reviews)
1.8
technologicsols

Dear Prospect Hiring Manager. Thank you for giving me a chance to bid on your project. i am a serious bidder here and i have already worked on a similar project before and can deliver as u have mentioned I have More

\$200 USD in 6 days
(2 Reviews)
1.8
megasoft3

Dear Client, Thanks for providing us opportunity to place bid over the project and communicate with [url removed, login to view] mainly deal in web development, SEO, Android App, software testing and graphic design. Our vision is to b More

\$205 USD in 6 days
(0 Reviews)
0.0