Hướng dẫn vb net to php converter online - công cụ chuyển đổi vb net sang php trực tuyến

Chào buổi sáng kỹ sư

Mã vb.net này chịu trách nhiệm mã hóa mật khẩu

 Public Function Encrypt[ByVal clave As String] As String
        ' Defino variables
        Dim indice As Integer = 1
        Dim largo As Integer = 0
        Dim final As String = ""
        largo = Len[Trim[clave]]
        Dim caracteres[largo] As String
        For indice = 1 To largo
            caracteres[indice] = Mid[clave, indice, 1]
            caracteres[indice] = Chr[Asc[caracteres[indice]] + indice]
            final = final & caracteres[indice]
        Next indice
     
        Return final
    End Function

Và đây sẽ là mã trong PHP mà tôi đã làm nhưng tôi đã thất bại ở đâu đó vì tôi không nhận được kết quả mong muốn

 public static function encryption[$clave]{
            $indice = 0;
            $largo = 0;
            $final = '';

            $largo = strlen[trim[$clave]];
            $caracteres = array[];
            for [$indice; $indice < $largo; $indice++] { 
                $caracteres[$indice] = substr[$clave, $indice, 1];
                $caracteres[$indice] = chr[ord[$caracteres[$indice]] + $indice];
                $final = $final.$caracteres[$indice];
            }
            return $final;
        }

Một ví dụ sẽ là trong vb.net, khóa 12345 được mã hóa vào năm 2468: và trong Php, khóa tương tự được mã hóa vào năm 13579

Tôi sẽ biết ơn tất cả những người có thể giúp tôi tìm ra nơi tôi đang thất bại và làm thế nào tôi có thể sửa nó

Cảm ơn

Bản quyền © 2022, Tập đoàn phần mềm tiến bộ và/hoặc các công ty con hoặc chi nhánh của nó. Đã đăng ký Bản quyền.

Tiến trình, Telerik và một số tên sản phẩm được sử dụng ở đây là nhãn hiệu hoặc nhãn hiệu đã đăng ký của Tập đoàn phần mềm tiến độ và/hoặc một trong các công ty con hoặc chi nhánh của nó ở Hoa Kỳ và/hoặc các quốc gia khác.Xem nhãn hiệu để biết các dấu hiệu thích hợp.

    Mục lục
  • Chuyển đổi vb.net thành PHP
  • Gửi dữ liệu từ vb.net đến PHP và ngược lại

Chuyển đổi vb.net thành PHP

 Public Function Encrypt[ByVal clave As String] As String
        ' Defino variables
        Dim indice As Integer = 1
        Dim largo As Integer = 0
        Dim final As String = ""
        largo = Len[Trim[clave]]
        Dim caracteres[largo] As String
        For indice = 1 To largo
            caracteres[indice] = Mid[clave, indice, 1]
            caracteres[indice] = Chr[Asc[caracteres[indice]] + indice]
            final = final & caracteres[indice]
        Next indice
     
        Return final
    End Function
 public static function encryption[$clave]{
            $indice = 0;
            $largo = 0;
            $final = '';

            $largo = strlen[trim[$clave]];
            $caracteres = array[];
            for [$indice; $indice < $largo; $indice++] { 
                $caracteres[$indice] = substr[$clave, $indice, 1];
                $caracteres[$indice] = chr[ord[$caracteres[$indice]] + $indice];
                $final = $final.$caracteres[$indice];
            }
            return $final;
        }
#{example}

Gửi dữ liệu từ vb.net đến PHP và ngược lại

Bài Viết Liên Quan

Chủ Đề