Variablen auf Eingabe prüfen

hey leute - da ich glaub ich zu doof bin (vermutlich auch zu doof die hilfe richtig zu benutzen) muss ich hier mal um hilfe fragen

hab 2 variablen, die ich überprüfen möchte.
die erste soll eine zahl sein und sie muss(!) vierstellig sein - aber von 0001 bis 9999
(und wenn sie weniger als 4 oder mehr als 4 stellen hat, will ich das wissen - mehr nicht)

die 2. variable ist ähnlich
es ist eine 15stellige nummer die allerdins einen Punkt am anfang hat. zB "0.1234567890123"
auch hier will ich nur die Ziffernanzahl prüfen.

hat jemand eine idee welche funktion ich verwenden könnten? mit "if int" klappts nicht

ach ja ps: die 2.Variable beginnt immer mit "0."

Zitat von Oscar

1. Zahl:

[autoit]

$sNumber = '0001'
If Not StringRegExp($sNumber, '\A\d{4}\Z') Then MsgBox(0, 'Test1', 'falsche Zahl')

[/autoit]

2. Zahl:

[autoit]

$sNumber = '0.1234567890123'
If Not StringRegExp($sNumber, '\A0\.\d{13}\Z') Then MsgBox(0, 'Test2', 'falsche Zahl')

[/autoit]

scheint zu funktionieren VIELEN DANK
supi