Как вставить php, java код в статическую страницу wordpress

Function CheckINN(sInn As String) As Boolean
 
' Функция проверки количества символов, и вывод соответствующей подфункции:
 
    sInn = Trim$(sInn)
 
    Select Case Len(sInn)
 
    Case 10: Check= CheckINN10(sInn)
    Case 12: Check= CheckINN12(sInn)
 
    End Select
    
    If Check = False Then Msgbox("Не корректный ИНН")
    
End Function
 
 
Function CheckINN10(sInn As String) As Boolean
 
' Функция проверки 10-тизначного ИНН
    
    Dim i As Integer, s As String, j As Integer
    Dim v(1 To 10) As Integer
    
    v(1) = 2
    v(2) = 4
    v(3) = 10
    v(4) = 3
    v(5) = 5
    v(6) = 9
    v(7) = 4
    v(8) = 6
    v(9) = 8
    v(10) = 0
    
    For i = 1 To 10
 
        s = Mid$(sInn, i, 1)
 
        If Not Isnumeric(s) Then Exit Function
 
        j = j + Cint(v(i)) * Cint(s)
 
    Next i
 
    j = j Mod 11
 
    If j > 9 Then j = j Mod 10
 
    CheckINN10 = (j = Cint(s))
 
End Function
 
 
Function CheckINN12(sInn As String) As Boolean
 
' Функция проверки 12-тизначного ИНН
    
    Dim i As Integer, s As String, j As Integer
    Dim v(1 To 12) As Integer
    
    v(1) = 3
    v(2) = 7
    v(3) = 2
    v(4) = 4
    v(5) = 10
    v(6) = 3
    v(7) = 5
    v(8) = 9
    v(9) = 4
    v(10) = 6
    v(11) = 8
    v(12) = 0   
    
    'j = 0
    
    For i = 1 To 12
        
        s = Mid$(sInn, i, 1)
 
        If Not Isnumeric(s) Then Exit Function
        
        j = j + Cint(v(i)) * Cint(s)
        
    Next i
    
    j = j Mod 11
    
    If j > 9 Then j = j Mod 10
    
    If j <> Cint(s) Then Exit Function
    
    j = 0
    
    For i = 1 To 11
        
        j = j + Cint(v(i)) * Cint(Mid$(sInn, i, 1))
        
    Next i
    
    j = j Mod 11
    
    If j > 9 Then j = j Mod 10
    
    CheckINN12 = (j = Cint(s))
    
End Function

     /*      developed by студия webous 
                http://dev.zp.ua/
                author: val petruchek
                e-mail: petruchek, собака, gmail.com
                date:   October 29, 2007                                */
 
function ParseUaID($id)
    {
    //$id must contain 10 digits
    if (!preg_match(‘/^\d{10}$/’,$id) || ($id==0)) 
        return false;
 
    $result = array();
 
    //sex
    $result[’sex’] = (substr($id,8,1) % 2) ? ‘M’ : ‘F’;
 
    //birthdate
    $days = substr($id,0,5);
    $year = 1900; $day = 01; $month = 01;
    while ($days > 0)
        {
        $daysInYear = (checkdate (02, 29, $year)) ? 366 : 365;
        if ($days > $daysInYear)
            {
            $days -= $daysInYear;
            $year ++;
            }
        else{
            for ($daysInMonth = 31; !checkdate($month, $daysInMonth, $year); $daysInMonth–) ;
            if ($days > $daysInMonth)
                {
                $days -= $daysInMonth;
                $month ++;
                }
            else{
                $day = $days;
                $days = 0;
                }
            }
        }
    $result[‘year’] = $year;
    $result[‘month’] = $month;
    $result[‘day’] = $day;
 
    return $result;
    }