Re: [Coffeehouse] Frage zu Memo Insert Null !

[J�rg Schwalenberg]

Sorry, im zweieten script ist das end if nat�rlich falsch :-(

 <%
 If Request("Update")<>vbNullString Then
 
 For i = 0 To etools.Fields.count-1
strcolname = etools.Fields(i).Name
If Request(strcolname)<>"ID" and Request(strcolname)<>"kid" and 
Request(strcolname)<>"userid" and Request(strcolname)<>"datum" and 
Request(strcolname)<>"toolid" then
 
If Len(Request(strcolname))>0 then
etools(strcolname) = Request(strcolname)
else
etools(strcolname) = "..."
End if
etools.Update()

End if
Next
 
 End if
 %>


MfG
J. Schwalenberg
______________________
www.udex.de
www.ultradevextensions.de
[EMAIL PROTECTED]
______________________
Think big - UDEX Software !
Software & Extensions for Dreamweaver Ultradev & MX
----- Original Message ----- 
From: "J�rg Schwalenberg" <[EMAIL PROTECTED]>
To: "ASP Coffeehouse" <[EMAIL PROTECTED]>
Sent: Tuesday, February 04, 2003 3:43 PM
Subject: [Coffeehouse] Frage zu Memo Insert Null !


> Hi Gemeinde,
> 
> mich plagt ein Problem. Mit dem script f�ge ich dynamisch Daten in Memo Felder der 
>DB ein. 
> 
> <%
> If Request("Update")<>vbNullString Then
> 
> For i = 0 To etools.Fields.count-1
> strcolname = etools.Fields(i).Name
> If Request(strcolname)<>"ID" and Request(strcolname)<>"kid" and 
>Request(strcolname)<>"userid" and Request(strcolname)<>"datum" and 
>Request(strcolname)<>"toolid" then
> 
> If Len(Request(strcolname))>0 then
> etools(strcolname) = Request(strcolname)
> etools.Update()
> End if
> 
> End if
> Next
> 
> End if
> %>
> 
> Das funzt auch gut, aber sobald ich eine Else Bedingung einf�ge, die sagt das das 
>Feld im leeren Submit mit z.B. "..." eingetragen wird, erhalte ich einen 
>Typenkonflikt !
> 
> <%
> If Request("Update")<>vbNullString Then
> 
> For i = 0 To etools.Fields.count-1
> strcolname = etools.Fields(i).Name
> If Request(strcolname)<>"ID" and Request(strcolname)<>"kid" and 
>Request(strcolname)<>"userid" and Request(strcolname)<>"datum" and 
>Request(strcolname)<>"toolid" then
> 
> If Len(Request(strcolname))>0 then
> etools(strcolname) = Request(strcolname)
> else
> etools(strcolname) = "..."
> etools.Update()
> End if
> 
> End if
> Next
> 
> End if
> %>
> 
> Warum funzt der untere Code nicht ?? 
> 
> 
> MfG
> J. Schwalenberg
> ______________________
> www.udex.de
> www.ultradevextensions.de
> [EMAIL PROTECTED]
> ______________________
> Think big - UDEX Software !
> Software & Extensions for Dreamweaver Ultradev & MX
> 
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~
> Kaffeepause im United Planet Communityserver ...
> http://www.intrexx.com/communityserver                         
> _______________________________________________
> Coffeehouse mailing list
> [EMAIL PROTECTED]
> http://www.glengamoi.com/mailman/listinfo/coffeehouse
> 

~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~
Kaffeepause im United Planet Communityserver ...
http://www.intrexx.com/communityserver                         
_______________________________________________
Coffeehouse mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/coffeehouse