Re: Question with ASP

Article View: microsoft.public.activex.authoring.html

Article #2

Back to microsoft.public.activex.authoring.html Previous Next

From: David Helsley
Date: Mon, 10 Aug 1998 00:00

42 lines
2132 bytes

Here you go, a page of code.

<!--#include VIRTUAL="inc/ADOVBS.inc"-->
<!--#include VIRTUAL="inc/IASUtil.inc"-->
<%

  lTaskId  = request("TaskId")
  lActivity = request("ActvText")
  lActivity  = Replace ( lActivity, "~", " " )
  FldList = ""
  ValList = ""

  no_go = 0

  FldList = FldList & "Task_Id"
  ValList = ValList & lTaskId

  FldList = FldList & ",Entered_By"
  ValList = ValList & ", '" & Session("asaUserLogon") & "'"

  lActivity  = Replace ( lActivity, "'", "`" )
  FldList = FldList & " ,Detail"
  ValList = ValList & " ,'" & lActivity & "'"

  If no_go Then
  Else
    SQ = "INSERT INTO lsi..Task_Activity ( " & FldList & ")"
    SQ = SQ & " VALUES ( " & ValList & ")"

' response.write SQ

    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "LocalServer"
    Set RS = Conn.Execute(SQ)

    IF CheckADOError ( 0, Conn, SQ ) Then
      Conn.close
    Else
      Response.Redirect "Task_Email.asp?TaskId=" & lTaskId
&"&Link=/Tasks/TaskDetail.asp?TaskId=" & lTaskId
   End If
 End If

Technical Details

Message-ID: <6qnnku$eoh$1@supernews.com>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <35BCDAB0.8BE9394D@gamebrain.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10640d,c85d0d6ded5d57e3
X-Google-Attributes: gid10640d,public
X-Google-Thread: ff74b,c85d0d6ded5d57e3
X-Google-Attributes: gidff74b,public
X-Google-Thread: 10ce47,c85d0d6ded5d57e3
X-Google-Attributes: gid10ce47,public
X-Google-Thread: fdea5,c85d0d6ded5d57e3
X-Google-Attributes: gidfdea5,public
X-Google-Thread: 1000b3,c85d0d6ded5d57e3
X-Google-Attributes: gid1000b3,public
From: "David Helsley" <nomail@dump.com>
Subject: Re: Question with ASP
Date: 1998/08/10
Message-ID: <6qnnku$eoh$1@supernews.com>
X-Deja-AN: 379831833
References: <35BCDAB0.8BE9394D@gamebrain.com>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Complaints-To: newsabuse@supernews.com
X-Trace: 902783454 TWNY2XU9GBE04269DC usenet52.supernews.com
Organization: http://www.supernews.com, The World's Usenet: Discussions Start Here
Newsgroups: microsoft.public.activex.authoring.html,cz.comp.microsoft.asp,microsoft.public.inetserver.iis.activeserverpages,microsoft.public.iis4.beta.activeserverpgs,alt.html.writers

Reply to Parent Message