View Menu

Technical Support Forums

Free, outstanding support from WebAssist and your colleagues

Multiple filter options - ASP

Thread began 11/21/2009 5:41 pm by webmaster364567 | Last modified 11/25/2009 7:46 pm by webmaster364567 | 1770 views | 3 replies



Dim WADWCchlaas_medklindb_jegkanelev__MMColElevID
WADWCchlaas_medklindb_jegkanelev__MMColElevID = "157"
If (Request.QueryString("elevid_form") <> "") Then
WADWCchlaas_medklindb_jegkanelev__MMColElevID = Request.QueryString("elevid_form")
End If
Dim WADWCchlaas_medklindb_jegkanelev__MMColFagID
WADWCchlaas_medklindb_jegkanelev__MMColFagID = "1"
If (Request.QueryString("jegkanfag_id") <> "") Then
WADWCchlaas_medklindb_jegkanelev__MMColFagID = Request.QueryString("jegkanfag_id")
End If
Dim WADWCchlaas_medklindb_jegkanelev__MMColTrinnID
WADWCchlaas_medklindb_jegkanelev__MMColTrinnID = "1"
If (Request.QueryString("jegkantrinnid") <> "") Then
WADWCchlaas_medklindb_jegkanelev__MMColTrinnID = Request.QueryString("jegkantrinnid")
End If
Dim WADWCchlaas_medklindb_jegkanelev
Dim WADWCchlaas_medklindb_jegkanelev_cmd
Dim WADWCchlaas_medklindb_jegkanelev_numRows

Set WADWCchlaas_medklindb_jegkanelev_cmd = Server.CreateObject ("ADODB.Command")
WADWCchlaas_medklindb_jegkanelev_cmd.ActiveConnection = *connectionstring*
WADWCchlaas_medklindb_jegkanelev_cmd.CommandText = "SELECT jegkannr AS XLABEL, fk_vurdering_id AS YVALUE, fk_jegkan_id, fk_elev_id, jegkanelev_id, dato_vurdert, jegkan_id, jegkanfag, jegkantrinn, jegkantekst FROM chlaas_medklin.db_jegkanelev INNER JOIN chlaas_medklin.db_jegkan ON fk_jegkan_id = jegkan_id WHERE fk_elev_id = ? AND jegkanfag = ? AND jegkantrinn = ?"
WADWCchlaas_medklindb_jegkanelev_cmd.Prepared = true
WADWCchlaas_medklindb_jegkanelev_cmd.Parameters.Append WADWCchlaas_medklindb_jegkanelev_cmd.CreateParameter("param1", 5, 1, -1, WADWCchlaas_medklindb_jegkanelev__MMColElevID) ' adDouble
WADWCchlaas_medklindb_jegkanelev_cmd.Parameters.Append WADWCchlaas_medklindb_jegkanelev_cmd.CreateParameter("param2", 5, 1, -1, WADWCchlaas_medklindb_jegkanelev__MMColFagID) ' adDouble
WADWCchlaas_medklindb_jegkanelev_cmd.Parameters.Append WADWCchlaas_medklindb_jegkanelev_cmd.CreateParameter("param3", 5, 1, -1, WADWCchlaas_medklindb_jegkanelev__MMColTrinnID) ' adDouble

Set WADWCchlaas_medklindb_jegkanelev = WADWCchlaas_medklindb_jegkanelev_cmd.Execute
WADWCchlaas_medklindb_jegkanelev_numRows = 0

Build websites with a little help from your friends

Your friends over here at WebAssist! These Dreamweaver extensions will assist you in building unlimited, custom websites.

Build websites from already-built web applications

These out-of-the-box solutions provide you proven, tested applications that can be up and running now.  Build a store, a gallery, or a web-based email solution.

Want your website pre-built and hosted?

Close Windowclose

Rate your experience or provide feedback on this page

Account or customer service questions?
Please user our contact form.

Need technical support?
Please visit support to ask a question





Ease of use


security code refresh image

We do not respond to comments submitted from this page directly, but we do read and analyze any feedback and will use it to help make your experience better in the future.

Close Windowclose

We were unable to retrieve the attached file

Close Windowclose

Attach and remove files

add attachmentAdd attachment
Close Windowclose

Enter the URL you would like to link to in your post

Close Windowclose

This is how you use right click RTF editing

Enable right click RTF editing option allows you to add html markup into your tutorial such as images, bulleted lists, files and more...

-- click to close --

Uploading file...