From 94d2fc1815a919734353c942f224db1de4b4fcb8 Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Mon, 7 Mar 2011 09:04:49 +0100
Subject: Django, org

  * Added nxhtml, mostly for django support.

  * Changed some org settings.
---
 emacs.d/nxhtml/tests/in/asp.asp | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 emacs.d/nxhtml/tests/in/asp.asp

(limited to 'emacs.d/nxhtml/tests/in/asp.asp')
diff --git a/emacs.d/nxhtml/tests/in/asp.asp b/emacs.d/nxhtml/tests/in/asp.asp
new file mode 100644
index 0000000..a557cb6
--- /dev/null
+++ b/emacs.d/nxhtml/tests/in/asp.asp
@@ -0,0 +1,40 @@
+
+<%@LANGUAGE="VBScript"%>
+
+<SCRIPT LANGUAGE="JavaScript" RUNAT="Server">
+function JSGreeting()
+	{
+	return "Greetings from a JavaScript Function";
+	}
+</SCRIPT>
+
+<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
+Function VBGreeting()
+	VBGreeting="Greetings from a VBScript Function"
+End Function
+
+Function toDollars(x)
+	toDollars=FormatCurrency(x)
+End Function
+</SCRIPT>
+
+<%
+var a = 2;
+var b = 2;
+var c = add(a,b)
+c += " (Two numbers are added by JavaScript, "
+c += "and then formatted into currency by VBScript.)"
+
+function add(x,y)
+	{
+	result = x + y;
+	result = toDollars(result);
+	return result;	
+	}
+
+Response.Write("<HTML>\r")
+Response.Write(JSGreeting() + "<BR>\r")
+Response.Write(VBGreeting() + "<BR>\r")
+Response.Write(c + " <BR>\r")
+Response.Write("</HTML>\r")
+%>
-- 
cgit v1.3-2-g0d8e

