ASP Email
Construct a draft without sending mail from the learning server.
How it works
Old sites may use CDO.Message or a Web Pages mail helper. Both require an operational mail service for delivery, credentials, TLS policy, failure handling and abuse controls. This example uses the actual CDO object only to create a MIME draft. It never calls Send and uses reserved example.invalid addresses.
Use the separate Windows lab
This is a legacy-maintenance course. Classic ASP uses IIS and VBScript; ASP.NET Web Pages uses .NET Framework and Razor. Neither runs in PHP, Apache or Bhylu’s browser playground. The reviewed baseline is 32-bit IIS Express 10.0.2001, .NET Framework 4.8, Web Pages / Razor 3.2.9 and the Windows VBScript engine. ADO database examples use the actual 32-bit Jet OLE DB 4.0 provider, not SQL Server or XAMPP MySQL.
Download download-lab.mjs into a separate empty learning folder. Run node download-lab.mjs to fetch hash-checked source files into a new bhylu-asp-lab folder, then cd bhylu-asp-lab and node run-lab.mjs --start. Before deployment, local preview uses node download-lab.mjs http://127.0.0.1:8000/examples/asp/. The source downloader refuses an existing destination. Review its source before running it.
The foreground launcher needs your own 32-bit IIS Express installation with Classic ASP, .NET Framework 4.8 and the VBScript engine available. It downloads the three pinned Web Pages packages from NuGet into its private cache, binds only localhost on port 8142 and stops when you press Ctrl+C. Keep its console open. Visit http://localhost:8142/email.asp. It does not install IIS, enable Windows features, change Apache/PHP/MySQL, or publish any files. See the bundled README.txt for manual setup and test boundaries.
Each complete Classic ASP source requires the supplied Global.asa acknowledgement; Web Pages uses _PageStart.cshtml. Database and file examples create owned temporary files only under this private lab’s blocked App_Data folder. Sources are public text downloads; do not upload them as executable teaching endpoints on Bhylu.
Example
<%@ Language="VBScript" CodePage="65001" %>
<% Option Explicit
Response.Buffer = True
Response.ContentType = "text/plain"
Response.Charset = "utf-8"
If Application("BhyluLab") <> "YES" Then
Response.Status = "403 Forbidden"
Response.Write "Use the separate Bhylu learning lab."
Response.End
End If
Dim message, stream, mime
Set message = Server.CreateObject("CDO.Message")
message.From = "workshop@example.invalid"
message.To = "learner@example.invalid"
message.Subject = "Mending workshop reminder"
message.TextBody = "Your draft requests one seat."
Set stream = message.GetStream
mime = stream.ReadText
Response.Write "Subject present: " & (InStr(mime, "Mending workshop reminder") > 0)
stream.Close
Set stream = Nothing
Set message = Nothing
%>
Focus on the lesson operations
This excerpt omits shared lab setup. Use the complete download and supporting files to run it.
Dim message, stream, mime
Set message = Server.CreateObject("CDO.Message")
message.From = "workshop@example.invalid"
message.To = "learner@example.invalid"
message.Subject = "Mending workshop reminder"
message.TextBody = "Your draft requests one seat."
Set stream = message.GetStream
mime = stream.ReadText
Response.Write "Subject present: " & (InStr(mime, "Mending workshop reminder") > 0)
stream.Close
Set stream = Nothing
Set message = Nothing
Expected result
Subject present: True
Creating a MIME representation proves object construction and draft fields, not SMTP connectivity or receipt. WebMail.Send in older Web Pages has the same external delivery boundary. Do not put a production password into a downloaded example.