Validating identity on windows xp Free local sex chat on mobile
I needed to convert to so here is my code if anybody needs a conversion in a hurry: Public Function parse Id No(By Val id No As String) As Boolean Try Dim a As Integer = 0 For i As Integer = 0 To 5 a = CInt(id No.
Substring(i * 2, 1)) Next Dim b As Integer = 0 For i As Integer = 0 To 5 b = b * 10 CInt(id No.
We found out that she shares her identity number (7602210298085) with a certain Mr Paul Nkosi.
The following links are available: According to the provisions of the Identification Amendment Act, 2000 (Act No.
28 of 2000, which was promulgated on 13 October 2000) all forms of identity documents other than the green bar-coded identity document are invalid.
Regards, Willem Hi Guys, I tried to find a SQL Implementation of this function but Google failed me but I still know one exists. Let me know what you think:-- =============================================-- Author: Craig Peacock-- Create date: 08/10/2007-- Description: This will validate a SA ID Number-- =============================================ALTER PROCEDURE [dbo].[VAL_S01_Validate SAIDNumber] @IDNumber VARCHAR (13)ASBEGIN /* This function was created from the function posted at: DECLARE @A INT -- ~Holds Negative Index numbers DECLARE @B INT -- ~Holds Positive Index numbers DECLARE @C INT DECLARE @D INT -- ~The check digit DECLARE @I INT -- ~Counter Variable SET @D = -1 SET @A = 0 SET @B = 0 BEGIN TRY PRINT 'Getting Negative Numbers____________________' SET @I = 0 WHILE (@I 0) BEGIN SET @C = @C @B % 10 SET @B = @B / 10 END --WHILE SET @C = @C @A SET @D = 10 - (@C % 10) IF (@D = 10) SET @D = 0 IF (CAST(SUBSTRING(@IDNumber, 13, 1) AS INT) = @D) RETURN 1 ELSE RETURN 0 END TRY BEGIN CATCH RETURN 0 END CATCH RETURN 0END Willem and Craig, I tried the SQL previously on the blog and it worked (old and new numbers).
Craig's one doesn't seem to work though (unless it is a SQL version problem). It would appear that the tried and trusted rules don't work for ID numbers of people born after 1/1/2000.
Substring(2 * i 1, 1)) Next b *= 2 Dim c As Integer = 0 Do c = b Mod 10 b = Int(b / 10) Loop Until b Does anybody know of a readily accessible portal at which a ID number can be checked against a known identity (without having to subscribe to ITC).