Set rsSchwerpunkte=Server.CreateObject("ADODB.RecordSet")
qSchwerpunkte = "Select zE_ID,First(E_Internet) AS ES_Internet FROM" &_
" qryFSEMailversandGesamt" &_
" WHERE" &_
strQuery &_
" Group By zE_ID" &_
" Order By zE_ID"
response.write qSchwerpunkte
rsSchwerpunkte.Open qSchwerpunkte , conn, adOpenStatic
If rsSchwerpunkte.EOF or rsSchwerpunkte.BOF Then
Else
While Not rsSchwerpunkte.EOF
If strQueryInternet Then
response.write rsSchwerpunkte("zE_ID")
Else
End If
rsSchwerpunkte.MoveNext
Wend
End If
rsSchwerpunkte.Close
set rsSchwerpunkte=nothing
so sollte das aussehen ... nur wird vor dem ganzen eben das strQueryInternet definiert.
und zwar so
for each key in Request.Form
If Left(Request.Form(key),1)="E" Then
If Request.Form(key).Count=0 Then
Else
sSplit = Split(CStr(Request.Form(key)), ",", -1, 1)
strES_Internet = cstr(sSplit(1))
strQueryInternet = strQueryInternet & "
(rsSchwerpunkte(""ES_Internet"")=""" & ES_Internet & """)"
End If
End If
Next
strQueryInternet = Replace(strQueryInternet,") (",") OR (")
und da liegt das problem irgendwo
-----Ursprungliche Nachricht-----
Von: Roman Pittroff [mailto:[EMAIL PROTECTED]]
Gesendet: Freitag, 23. November 2001 14:54
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] RE: AW: RE: AW: RE: AW: RE: Problem - Variable
in einer If Then Anweisung
Nochmal
sWert1 = cstr(rsSchwerpunkte("E_Internet"))
response.write = sWert1 'was gibt er hier aus?
If (sWert1 = "http://www.xxx.de";) Or (sWert1 = "http://www.xxx.de";) Then
xxxx
Else
yyyy
End If
Gruss
Roman Pittroff
Consulting
Bangkok, Thailand
-----Original Message-----
From: Markus Sandke [mailto:[EMAIL PROTECTED]]
Sent: Friday, November 23, 2001 8:49 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] AW: RE: AW: RE: AW: RE: Problem - Variable in
einer If Then Anweisung
es mag einfach nicht ... ich verzweifel hier
--
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
