Perhaps you forgot the underscores in Kiesdist[\[Lambda]_, \[Alpha]_]. However, your function has divergent integral:
With[{\[Lambda] = 1, \[Alpha] = 1},
Integrate[(\[Alpha] \[Lambda])/(x - 1)^2 (x/(x - 1))^(\[Alpha] -
1) Exp[-\[Lambda] (x/(x - 1))^\[Alpha]], {x, 0, 1}]]
it cannot be a probability distribution.