AW: [ASP] Login bringe ich nicht fertig!!

Thu, 2 Dec 2004 23:22:20 +0100

This is a multi-part message in MIME format.

------_=_NextPart_001_01C4D8BD.63CC1A1B
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

hallo 

Danke für den Tip

Nun ist es so, dass egal was ich für ein Benutzer oder Passwort =
ausprobiere (richtiges od. falsches). Ich werde nachher auf default.asp =
redirected.

Habe zum testen mal beide varianten getesten mit LoginOK. 
Das heisst, mit falschem Login sollte es den Call LoginMaske() =
ausführen. Sollte Login richtig sein, dann default.asp ausführen. =
Hier teste ich eigentlich nur, ob if then else richtig funzt mit dem =
rest. Das geht!!

Problem liegt also nun weiter oben.....

Kann das Problem ein Datentyp-Fehler sein??

in der SQL Datenbank habe ich in der Tabelle bei Feld Kd_nr Datentyp =
"Zahl" 
Feld Benutzername hat Datentyp "Text"

was meint ihr???

DANKE

________________________________

Von: activeserverpages-admin@glengamoi.com im Auftrag von Herbert Hahn
Gesendet: Do 02.12.2004 22:22
An: activeserverpages@glengamoi.com
Betreff: AW: [ASP] Login bringe ich nicht fertig!!

Probiers mal so:

 Private Sub Schritt2()
   Dim rs, Conn, strSQL, LoginOK

  Set Conn = CreateObject("ADODB.Connection")
  Conn.open = "Provider=SQLOLEDB.1; " &_
  "Data Source=Tritis; Initial Catalog=Hof_Design; User
 id=800000; Password=gaga"
  set rs = Server.CreateObject("ADODB.Recordset")

   strSQL = "Select * from Benutzer Where Kd_Nr='" & user_id &_
       "' AND password='" & password & "'"

   rs.Open strSQL, Conn, 0, 1

If rs.EOF then
        LoginOK = False
Else
        LoginOK = True
end if

  ' LoginOK = rs.EOF 'Wenn EOF dann Benutzer nicht vorhanden
   rs.Close
   set rs = nothing

     Response.write(loginok) 'Zeige mir boolean wert NUR ZUR KONTROLLE!
   If LoginOK Then
     Fehler = true
     Call LoginMaske()
   Else
     Session("Login") = "OK"
     If NOT len(Seite) > 0 Then
       Seite = "Default.asp"
     End if
     Response.Redirect(Seite)
   end if
 End Sub
%>

Mit freundlichen Grüßen

HH

_______________________________________________
ActiveServerPages Mailingliste, Postings senden an:
ActiveServerPages@glengamoi.com
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/activeserverpages

------_=_NextPart_001_01C4D8BD.63CC1A1B
Content-Type: application/ms-tnef;
	name="winmail.dat"
Content-Transfer-Encoding: base64

eJ8+IhYWAQaQCAAEAAAAAAABAAEAAQeQBgAIAAAA5AQAAAAAAADoAAEIgAcAGAAAAElQTS5NaWNy
b3NvZnQgTWFpbC5Ob3RlADEIAQ2ABAACAAAAAgACAAEEgAEAKgAAAEFXOiBbQVNQXSBMb2dpbiBi
cmluZ2UgaWNoIG5pY2h0IGZlcnRpZyEhAKsNAQWAAwAOAAAA1AcMAAIAFwAWABQABAAuAQEggAMA
DgAAANQHDAACABcAFgAUAAQALgEBCYABACEAAAA2NTlBMDdFNDgzNjhCNzQ5ODQ1MDdENjQ4QkE3
RUU2RAAwBwEDkAYAaBkAADcAAAADADYAAAAAAEAAOQAbGsxjvdjEAR4APQABAAAABQAAAEFXOiAA
AAAAAgFHAAEAAAAuAAAAYz1DSDthPSA7cD1Db21jbGlmZjtsPVNJUklVUy0wNDEyMDIyMjIyMjBa
LTI1AAAAHgBJAAEAAAAqAAAAQVc6IFtBU1BdIExvZ2luIGJyaW5nZSBpY2ggbmljaHQgZmVydGln
ISEAAABAAE4AAE6OAbXYxAEeAFoAAQAAACYAAABhY3RpdmVzZXJ2ZXJwYWdlcy1hZG1pbkBnbGVu
Z2Ftb2kuY29tAAAAAgFbAAEAAABpAAAAAAAAAIErH6S+oxAZnW4A3QEPVAIAAAAAYWN0aXZlc2Vy
dmVycGFnZXMtYWRtaW5AZ2xlbmdhbW9pLmNvbQBTTVRQAGFjdGl2ZXNlcnZlcnBhZ2VzLWFkbWlu
QGdsZW5nYW1vaS5jb20AAAAAAgFcAAEAAAArAAAAU01UUDpBQ1RJVkVTRVJWRVJQQUdFUy1BRE1J
TkBHTEVOR0FNT0kuQ09NAAAeAF0AAQAAAA0AAABIZXJiZXJ0IEhhaG4AAAAAAgFeAAEAAABEAAAA
AAAAAIErH6S+oxAZnW4A3QEPVAIAAAAASGVyYmVydCBIYWhuAFNNVFAAaGVyYmVydC5oYWhuQHNv
ZnR3aW5nLmNvbQACAV8AAQAAAB8AAABTTVRQOkhFUkJFUlQuSEFITkBTT0ZUV0lORy5DT00AAB4A
ZgABAAAABQAAAFNNVFAAAAAAHgBnAAEAAAAmAAAAYWN0aXZlc2VydmVycGFnZXMtYWRtaW5AZ2xl
bmdhbW9pLmNvbQAAAB4AaAABAAAABQAAAFNNVFAAAAAAHgBpAAEAAAAaAAAAaGVyYmVydC5oYWhu
QHNvZnR3aW5nLmNvbQAAAB4AcAABAAAAJgAAAFtBU1BdIExvZ2luIGJyaW5nZSBpY2ggbmljaHQg
ZmVydGlnISEAAAACAXEAAQAAACAAAAABxNiv1+/J+wg3xVtHNqsrg14+hTW0AAEuaDAAAfZg0h4A
dAABAAAAIAAAAGFjdGl2ZXNlcnZlcnBhZ2VzQGdsZW5nYW1vaS5jb20AHgAaDAEAAAALAAAATWFy
Y28gVmVsbwAAHgAdDgEAAAAmAAAAW0FTUF0gTG9naW4gYnJpbmdlIGljaCBuaWNodCBmZXJ0aWch
IQAAAAIBCRABAAAANRIAADESAACeUgAATFpGde+r/NQDAAoAcmNwZzEyNYIyA0NodG1sMQMwPwED
AfcKgAKkA+MCAGNowQrAc2V0MCAHEwKA/xADAFAEVghVB7IR1Q5RAwHdENcyBgAGwxHVMwRGENlZ
Eu9mNBBvEXs1A8ZUfGFoA3ECgBHjCO8J9zt7HB8OMDUdPx0REeEMYGNnAFALCQFkMzYRYAulNLIg
EAIqXA6yAZBnFPAXCqMR4yJoNBTwPCFEAE9DVFlQRSBIAFRNTCBQVUJMAElDICItLy9XRDNDJgBE
VEQlFDOELjImAEVOIj4jbfMjDyhBMTgkcCUiJ48on40rEDMiACnwRUFEKk0vDvErby3vKXQ2DvA8
TShFVEEHsEEw4D0ipkcJ8ASQYXQFsCIXEGhPTlQnUFQxcAXhRaJ4GOFuZ2UGUnYTMQczwQCQAiAg
Ni41LnUBwDI0gDAnfi9PKYM3gjckcFRJVExFKk4CNA7wQVc6IFtBgFNQXSBMb2cLgJwgYgUQM1IN
4GggAwALGOAFQGYEkHRpZyHqISjuNSRwLzfPNf8qxV85ETzwLM8rH0DENRFgPHBCT0RZQD0hcUFf
Z0Q5NiRwRElWOqBkgj1FsE9XQVJlC1DAeVRleHQ4NOA00KAgZGlyPUDgckAw+0CjACEgAABHYQqx
SFIY4PxccQMhR8URYEMfRC9FNs9HL0g/SUpAeTY0TSpJf3UpdDQp0UYyUTtAANBlij0HEyAbkz0j
MFQz6iAAkHpTQDJNGxgwAzC+YxPwA7IB0ElZGPBsG7D1UZ01RUEvUsJNGU0nT2u/AcBNJwqiWdgK
gCj8MCyR/yZgRYBZL1FfSs9L30zvTf//Wg9QH18vUj9TRlSvVbRWbS9Xv1jPXv9AtTgiACZuGGJz
cAKAYtdcJ2H/AUBkn1sPXB9dL14/bj9gX/9hb2J/Y49w72Wvdg9nz2jfa2nvVotEAHBrM3BywCff
GNAFwAEAA6AHYHAo/DCQ3UKRUnmpemALgGUKgX2v/2xPdV+Gz38XCqN/r4C/at//hx+IL3uPcf9z
D3QfdS+OP/93T3hfeW96f5DffJ+V/36/54uvjL9Wi051A6AEAAVAUQeRc28smRBhBBFlumdTkXej
oDqjgxVlOhHLPtyXZUIJ8HV0oGAFwBcEciVgo6F3G8EgYXXbb8ADYGIIkTNwKAUQOxFXO5AHkQRw
LlMBbATwaNUHkCmpsEk6wXcEkAEA+zrgANBoqiAFwKVvl5KoIC+aIAEBqCBA4C6joHAg1x6hmTAF
kHQJgC6On4+v/5C/kc+S35PvlP+dr5cfmC//mT+aT5tfnG+df56Pn5+gr/+Nr67Pr9/CL28fcC+x
P7JP/7NftG/Eb7aPt5+4r7m/us9/u9+8781Pvw/AH8Ev1KZIwwGgM3B6dW0grmCi8L+DkQDAAyDZ
wEWwM3B2CsB/BzACMIORq6/OkjNg2jZp8wVAOeNPS6mwwr/Dz7DP/8jPyd/K78v/1K/OH88v0D//
0U/SX9Nv1H/Vj9af16+Bz/cEIKogBAF0o3DdwqnV2hD/OeSjUFdwrmCjEtvv55KDgjZDV2E51E2j
oILgKCmrqBKDE2geoG6psFP0pN855Kj18DClIaNybgOgrTr39T+stPgKSBMi2jM6o6Ug/zNgAjCF
8DrCCHCjcKhwOqDt6iB0qiADoGWp8DNw+Zb6ZqKwegVA3cIPINoQ+4//55IeoKLwqbDyojNgDrA7
sP/en9+v4L/hz+Lf4+/k/+2v/+cf6C/pP+pP61/sb+1/7o//UxjwrxNfik+LUfBPVbHB3/8XzwWr
Ez8EvwrvHe8e/yAP/yEfIi8jP8X/xw8G3wfvCP//Cg8lfwwvDT8OTw9fEG8Rf/8Sjy5fFK8VvxbP
No+LEBlfrxpvOf8cjzzoUKhhbPQB//8Ao+CoAanwV5D/UPqgqsD/3dCrfy+FqHD4gUOyI98k7/8t
/0RvRX9Gj0efBi8pnyqv/yu/LM9I3y7vL/8xDzIfMy//ND81Tz2fN284f1jPGD87X/88b1zfPo9Y
j0oPUD9jP2RP/2VfZm9nf2iPJx8oL0wvTT//Tk9PX2rPUX9Sj1OfVK9Vv/9Wz1ffc69Z/1sPXB97
3ztP71+ffy9hv3raS/qDpEFARg+lL6Y2A7DaYXR5cC2eRgQAQIBegYahPz9pL/9qP3NPif+LD4wf
jS9Lf27v/2//cQ9yH45vdD91T3Zfd2//eH95j3qfgu98v33Pnl9dj/+Ar4G/om+D354fj5+Vz6jP
/6nfqu+r/60Prh9sb21/kb//ks+T35TvsF+XD5gfmS+aP/+bT5xfnW+5P5+PoJ+hr8Fv/4CfpS/E
v6dPwGqGsQHAiRBYU1FM8pHboWLbgGu/8tDZsv8Shu+6ksslVNmxl/jg9ODa4SCIwGxkhYAYZF9u
iRCINiAiWvphiOAirq+vv7jP0Y/Sn//Tr9S/1c+0b7V/to+3n9X//7m/us+737zvvf+/D8ofyG//
wj/DT+XvxW/Gf8eP6k/Jr0vtNc+DQv7QdXTroHL4bmFt9ODMcEEA0DfND4Hf0iJUZXh0Itbf/9fv
3h/0b/V/9o/3n9iv2b//2s/b39zv+N/fD+Af4S/iP//jT+Rf5W/tv+eP6J8Iz6Mf/+t/7I8M3+6v
CI/6DwA/Ez//FE8VXxZvF38Yj7H/sw/8L//9P/5P/18azwF/Ao8DnwSv/wW/Bs8H3yOvCf8LDwwf
K9//Dj8PTy7fEW8qjxkvGj8jT/82TzdfOG85fzqPHA8dHx4v/x8/IE8hXyJvPd8kjyWfJq//J78o
zynfNT8vry0PLh9N35/rDzGfUS8zv0zfIHeF8Z/xUIaw8aDyX84TaHKJcP+JjzyPRZ9an1uvXL9d
z17f/0E/Qk9DX0RvXw9Gj0efSK//Sb9Kz0vfVu9VP08PUB9u//8v3zDvVA9zD1Yvbr9gP2FP/3lv
en97j3yffa9+vz6/P8//bP9jb2R/ZY+A/2evaL9pz/9q32vvhL9uD4nfcC9xP3JPf5IPdG91f5UP
d5+Qv8vAQfhOS0WI/4oBnH+dj49f34XPht+H757/ig4ylmKAhf+lX6Zvp3+ir6O/pM+Kv4vPT4zf
je+O+plsMTKrAEJ+UpPplvKswLGvrT+uTEhEUiC10GJJbstQeKg9LTGT7DGO0GOO0ChqXHXPoGKx
kH4g3l+6UroRsQDLIGWhk7R/P7WOj7+bH5lvkunOwGhv7G1hlz+UgjWxkJh/glwPs1CT67oBw6dW
b246W7aMszEvxUqfiSCTUHRwaXZlc/EQygCwwWchyhAtYWRtzlBAZwnPEG5n8UBvaS5jOcGQIGnM
AFiftkJBdSZmr7BZQCB2xvAgSK3xEGLxEPGgSNDgbrJNf4BRs2y64rt/xI/Fn9HiRzvKEbgBdMcf
yC/JN0Rv0CAwMi6zIC7DYKrh+DIyOtjgzy/QP9FP0l/702/b1EHHD9ZfySjMX7ZC/8nPyzzZP9pP
21/cb91/55Tj8LCvsGVmZt8P4B/JNwBBVzogW0FTUCBdIExvZ8sQIGJ3k6DLcPFgaY6w4a+2M24L
7zHOwGbOoWlnISH/5P/mD+cff5+Ar/Qv8j/zT/+f76D/og+qj/ZPvB+2L67H35rP/08AX73l/dBQ
s4+eXx8Cv7/vUv+YPwNgUHJvvGJpznBYEZPACkBv6xz/+E/5X/dvDn8Pj4Jfg28L2snJ8GF07xBT
dd4g738NBJJTjrCToHR0Mij+KRB/EY8SnxOvFL8bfxyPjx2f17TMIQzQLCBDxvCKbiIwc6+wU1FM
IjDnFx8Eku5jT0sZDxofGy//Hx8gLydvKH8pjyqfJc8m3zcqzyvfIPxT1TAiQyA9GyMvBIND6tAW
kU9iagJlydAoIkFET0SsQi4iUjYxacbwIhj/Py6/L88w3zHvyRkiUi5vlnDLYDQhIgxxdmm4ECOv
gCLhT0xFNrExO78+QDRPBI87Y+RwO+omOgh+XzevOL85zzrfO+/JKCLGRBaQwbBTb3WxMMFBeRiR
aXM/kLfwSrENEUMFSeFs7nA9SG9mX3ZEyhDxYG4/kD/fQOJV/8ohQ99E70X/Rw9IH1DXPqBcPTjY
oFSBP5BQWABzuHdvclRQy4DLgCJOb/9Pf1CPUZ9Sr8koyiDOwAzRvzQ/GAXKMzbQNb82wFI2MP9V
QVvBN49Wz1ffWO9Z/y0P/2NvZH9lj2afZ69ov2nPat//YE9hX23vbB9tL3E/ck9zX39cT0DTIrQ+
IjOgy1DJ0CAeKpMwDIDMAOqgbnV0MwpwlyBXaM5w7xBLZHRfTq+AJz+9Qf9DCiD6dcohXz6gd09A
33xvQv//br9vz3DfdM9134V/ho+Hn/+Ir4m/is+L34zvjf+PD5AfF5Evkj9Izyfe0E5EIP9/0FUV
e3+BD32al5Z+z3/f/5kffXyXIFXPg9+E75RflW//oi+jP6RPpV+gj6GfpY+mn5+nr6u/rM/JKFwA
Lk898usitiJUMCIwMaiPqZ+qr/ezL7Q/tUlJt8Cbn5yisVHgRU9GIHR6wM8ftv//tQ+uj6+fvY++
n7+vwL/Bz//C38PvxP/GD8cfyC/JP8pPf8tfzG/NfyDtJIVcL5x1Rt9LwONguy+8P71MRdRv1X//
1o/Pb9B/zq/bL9w/3U/eX//fb+B/4Y/in+Ov5L/lz+bff+fv6P/qD9FP0l+5nEqQdZ/Xz9jf2e0+
AJtwaWbxP//yT9n/9M/13/bv9//5D/ofP+yv7b+awpcw7wi6dSdX5z4AsbC6omRhNAF6J++vr5yi
SyAYcFvgdlVAaAJg/z6wux/7n/yv/b/+zwffCO/7Cf+w90NL0Ne/Bm8Hfwtvfwx/Cq8SLxM/W18D
TwRSb/u64CSwZw7PD98Q7xTfFe//HF8dbx5/H48avxvPH78gz/8h3yXvJv8oDykfKi8rPyxPn+4O
X1AvcDdgF5Aud0qhjGUoS9HvMG9rKRgfMZyTJ1plTIB68G1pMZywYm9veWACYCB3g3rQF7BOVVIg
WjWRYEtPTlRSPyA/MCH/Iq8jvyTPLn8vjzkfOi87P/+as7jx7wYyv/Czuv83jzif/zyPPZ87z0UP
Rh9HL0g/SU/HSl9Lb+4dRmVoeWADEP8YAHiw8R9Cr0O/TW9Of0yv/1R/VY9Wn1evWL9Zz1rf7iy6
Q9RQbEAfnJPvA02bEPprMgApUR9SL1M/XO9d//9kf2WPZp+as9efYt9j72ff/2jvZx9uX29vcH9x
j3Kfc69LdL/uDlMxQHNpsmAouiLvAyIykBgPnIQi71D/n79sH20vdt93737Pf9+A7z+B/4MPhB+F
L4Y/Pq5OT/xUIFBwegB5oDHhMp2dsvRndIlZPppZIo1A/3y//33Ph3+Ij4mfky+UP5VPll//l2+Y
f5mPmp+br5y/nc+e3x+f73jOMeF6r3u2RGVm1GF1ubAuYaBwfF+Rb/+Sf6Hvov+pv6rPq9+s763/
/68PsB+xL2oM9E+oH6kvst//s++yH7l/uo+7n7yvvb++z7+/37TfpT974jE3MTBkNID4ZWN0i5W2
T7dfuG/CH//DL8ofyy/MPw3z9D/IX8lvP81fzm/MnbXixN974lN17mLQ39Hv0vwl09+NL9Nvn9kf
2i/d397v3/8gTTHg9CBmxvB10IDgEASgi3CT1u+P00dyzKBmY8yg/GRmkE/iD+Af50/oX+lr/EhI
6j/rT+lf7Y/un++pfl/zX/Rv9TrwX/Fv73xBUccQaXZleaBy+YByvlD28DFA5R+P02GQae9Rimfv
UHMx8CwgUA6Q//lgGcAX4GrwBTL6X4/TNQDeOvZP91/4b/l8QPwQi3AAZ2Ftb2kuY28Obf8fAC8B
PW4tL0EgYm1lbGTkgGcgq+SBeZB15NBm5IBr+WDfMXD9j4/T5IAx8HL/DwUPU+9v0/w8QY+0aMbw
ZgQ9ItVQdHA6Ly/Kdw/wLgM7L237wREQDG4v/CIMsGZvL2Hf+VNq8PnCj9D6ISIL6QrA7GZpB3EK
wmYHgAyw/EAAe0hZUEVSTEk+TkAAD38QjxGfEqh9fRMT8QeAcnPcEFxjZvwxXKbQDIANFxXfFu8X
/z8SttzX1TfwMB8f8C45Mn8LoAcwC+AKrwu/DM8jGTX5I9EvRjYRJCkfr9Wge8JfKAglKI+zJS/b
1jciclCFIs4wDoEvRElWJ189K39nIDGP0y/fMO81OOEigUJPRFkizSJwMh+FNKE3IoFIVE1MJCAC
fTbQAAAAHgA1EAEAAAA6AAAAPDRGQUM5MDU0QzMwRTE2NEFCNjM4RjhDMTZFNzdCMTg1RjJERUBz
aXJpdXMuY29tY2xpZmYuY2g+AAAAHgBHEAEAAAAPAAAAbWVzc2FnZS9yZmM4MjIAAAsA8hABAAAA
HwDzEAEAAABgAAAAQQBXACUAMwBBACAAWwBBAFMAUABdACAATABvAGcAaQBuACAAYgByAGkAbgBn
AGUAIABpAGMAaAAgAG4AaQBjAGgAdAAgAGYAZQByAHQAaQBnACEAIQAuAEUATQBMAAAACwD2EAAA
AABAAAcwY50Oa7zYxAFAAAgw+2/eY73YxAEDAN4/r28AAAMA8T8HCAAAHgD4PwEAAAALAAAATWFy
Y28gVmVsbwAAAgH5PwEAAABeAAAAAAAAANynQMjAQhAatLkIACsv4YIBAAAAAAAAAC9PPUNPTUNM
SUZGL09VPUZJUlNUIEFETUlOSVNUUkFUSVZFIEdST1VQL0NOPVJFQ0lQSUVOVFMvQ049TS5WRUxP
AAAAHgD6PwEAAAAVAAAAU3lzdGVtIEFkbWluaXN0cmF0b3IAAAAAAgH7PwEAAAAeAAAAAAAAANyn
QMjAQhAatLkIACsv4YIBAAAAAAAAAC4AAAADAP0/5AQAAAMAGUAAAAAAAwAaQAAAAAADAB1AAAAA
AAMAHkAAAAAAHgAwQAEAAAAHAAAATS5WRUxPAAAeADFAAQAAAAcAAABNLlZFTE8AAB4AMkABAAAA
JgAAAGFjdGl2ZXNlcnZlcnBhZ2VzLWFkbWluQGdsZW5nYW1vaS5jb20AAAAeADNAAQAAABoAAABo
ZXJiZXJ0LmhhaG5Ac29mdHdpbmcuY29tAAAAHgA4QAEAAAAHAAAATS5WRUxPAAAeADlAAQAAAAIA
AAAuAAAAAwB2QP////8LACkAAAAAAAsAIwAAAAAAAwAGEGKnniUDAAcQAwYAAAMAEBAAAAAAAwAR
EAAAAAAeAAgQAQAAAGUAAABIQUxMT0RBTktFRvxSREVOVElQTlVOSVNURVNTTyxEQVNTRUdBTFdB
U0lDSEb8UkVJTkJFTlVUWkVST0RFUlBBU1NXT1JUQVVTUFJPQklFUkUoUklDSFRJR0VTT0RGQUxT
Q0hFAAAAAAIBfwABAAAAOgAAADw0RkFDOTA1NEMzMEUxNjRBQjYzOEY4QzE2RTc3QjE4NUYyREVA
c2lyaXVzLmNvbWNsaWZmLmNoPgAAAC83

------_=_NextPart_001_01C4D8BD.63CC1A1B--