Vb.net Response.write for.ics文件不允许运行代码

我正在编写一个应用程序，它通过获取用户输入的数据动态构建一个.ICS文件。我试图做的是将数据保存到数据库中，然后提供.ICS文件供用户下载，以便他们可以将其添加到日历中。我想这一切都发生在一个按钮点击。我遇到的问题是，当单击按钮时，它正在写入文件，以便用户能够下载它，但它没有将数据存储到数据库中。它停留在页面上，不会显示回发

Public Sub AddToCalendar（ByVal Src作为对象，ByVal e作为事件参数）
尝试
Dim Subject As String=setDBText（txtSubject.text）
标注注释为字符串=setDBText（txtcoment.text）
Dim StartDate As String=setDBDate（txtStartDate.value，txtStartTime.text）
Dim EndDate As String=setDBDate（txtEndDate.value，txtEndTime.text）
sqlStr=“插入到tblActivity（主题、注释、开始日期、结束日期）”和_
“值（”&Subject&“、”&Comment&“、”&StartDate&“、”&EndDate&“）
dc.CommandText=sqlStr
dc.ExecuteNonQuery（）
lblTest.Text=“已成功添加新事件”
'************
“**创建代码以生成ICS文件
'************
作为StringBuilder=新StringBuilder（）的Dim SBICS文件
Dim dtNow As DateTime=DateTime.Now
追加行（“开始：VCALENDAR”）
sbICSFile.AppendLine（“版本：2.0”）
AppendLine（“PRODID:-//AkonaDev/CalendarAppointment”）
sbICSFile.AppendLine（“CALSCALE:GREGORIAN”）
sbICSFile.AppendLine（“开始：VEVENT”）
“定义时区。
“美国/东部
sbICSFile.AppendLine（“开始：VTIMEZONE”）
sbICSFile.AppendLine（“TZID:US/Eastern”）
sbICSFile.AppendLine（“开始：标准”）
sbICSFile.AppendLine（“DTSTART:20071104T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=1SU；BYMONTH=11”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0400”）
sbICSFile.AppendLine（“Tzoffetto:-0500”）
sbICSFile.AppendLine（“TZNAME:EST”）
sbICSFile.AppendLine（“结束：标准”）
sbICSFile.AppendLine（“开始：日光”）
sbICSFile.AppendLine（“DTSTART:20070311T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=2SU；BYMONTH=3”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0500”）
sbICSFile.AppendLine（“Tzoffetto:-0400”）
sbICSFile.AppendLine（“TZNAME:EDT”）
sbICSFile.AppendLine（“结束：日光”）
sbICSFile.AppendLine（“END:VTIMEZONE”）
"美国/中环
sbICSFile.AppendLine（“开始：VTIMEZONE”）
sbICSFile.AppendLine（“TZID:US/Central”）
sbICSFile.AppendLine（“开始：标准”）
sbICSFile.AppendLine（“DTSTART:20071104T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=1SU；BYMONTH=11”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0500”）
sbICSFile.AppendLine（“tzoffetto:-0600”）
sbICSFile.AppendLine（“TZNAME:CST”）
sbICSFile.AppendLine（“结束：标准”）
sbICSFile.AppendLine（“开始：日光”）
sbICSFile.AppendLine（“DTSTART:20070311T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=2SU；BYMONTH=3”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0600”）
sbICSFile.AppendLine（“Tzoffetto:-0500”）
sbICSFile.AppendLine（“TZNAME:CDT”）
sbICSFile.AppendLine（“结束：日光”）
sbICSFile.AppendLine（“END:VTIMEZONE”）
“美国/山区
sbICSFile.AppendLine（“开始：VTIMEZONE”）
sbICSFile.AppendLine（“TZID:US/Mountain”）
sbICSFile.AppendLine（“开始：标准”）
sbICSFile.AppendLine（“DTSTART:20071104T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=1SU；BYMONTH=11”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0600”）
sbICSFile.AppendLine（“Tzoffetto:-0700”）
sbICSFile.AppendLine（“TZNAME:MST”）
sbICSFile.AppendLine（“结束：标准”）
sbICSFile.AppendLine（“开始：日光”）
sbICSFile.AppendLine（“DTSTART:20070311T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=2SU；BYMONTH=3”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0700”）
sbICSFile.AppendLine（“tzoffetto:-0600”）
sbICSFile.AppendLine（“TZNAME:MDT”）
sbICSFile.AppendLine（“结束：日光”）
sbICSFile.AppendLine（“END:VTIMEZONE”）
“美国/太平洋
sbICSFile.AppendLine（“开始：VTIMEZONE”）
sbICSFile.AppendLine（“TZID:US/Pacific”）
sbICSFile.AppendLine（“开始：标准”）
sbICSFile.AppendLine（“DTSTART:20071104T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=1SU；BYMONTH=11”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0700”）
sbICSFile.AppendLine（“Tzoffetto:-0800”）
sbICSFile.AppendLine（“TZNAME:PST”）
sbICSFile.AppendLine（“结束：标准”）
sbICSFile.AppendLine（“开始：日光”）
sbICSFile.AppendLine（“DTSTART:20070311T020000”）
sbICSFile.AppendLine（“RRULE:FREQ=YEARLY；BYDAY=2SU；BYMONTH=3”）
sbICSFile.AppendLine（“TZOFFSETFROM:-0800”）
sbICSFile.AppendLine（“Tzoffetto:-0700”）
sbICSFile.AppendLine（“TZNAME:PDT”）
sbICSFile.AppendLine（“结束：日光”）
sbICSFile.AppendLine（“END:VTIMEZONE”）
'定义事件
sbICSFile.Append（“DTSTART；TZID=“+ddlStartTZ.Text+”：”）
sbICSFile.Append（CDATE（txtStartDate.value）.Year.ToString（））
sbICSFile.Append（_
FormatDateTimeValue（CDATE（txtStartDate.value）.Month））
sbICSFile.Append（_
FormatDateTimeValue（CDATE（txtStartDate.value）.Day）+“T”）
sbICSFile.AppendLine（ddlStartTime.SelectedValue）
sbICSFile.Append（“DTEND；TZID=“+ddlEndTZ.Text+”：”）
sbICSFile.Append（CDATE（txtStartDate.value）.Year）
sbICSFile.Append（_
FormatDateTimeValue（CDATE（txtStartDate.value）.Month））
sbICSFile.Append（_
FormatDateTimeValue（CDATE（txtStartDate.value）.Day）+“T”）
sbICSFile.AppendLine（ddlEndTime.SelectedValue）
sbICSFile.AppendLine（“摘要：“+TxtEventsObject.Text”）
sbICSFile.AppendLine（“说明：”+txtEventDescription.Text）
sbICSFile.AppendLine（“UID:1”）
sbICSFile.AppendLine（“序列：0”）
sbICSFile.Append（“DTSTAMP:+dtNow.Year.ToString（））
追加（FormatDateTimeValue（dtNow.Month））
sbICSFile.Append（FormatDateTimeV
sqlStr = "INSERT INTO tblActivity(Subject,Comment,StartDate,EndDate) " & _
         "VALUES('" & Subject & "','" & Comment & "','" & StartDate & "','" & EndDate &"')"

<script type="text/javascript" language="javascript">
 function DownloadICS() {
    popUp("ics_download.aspx", 300, 300);
}

function popUp(url, width, height) {
    if (window.featWin && !window.featWin.closed) {
        window.featWin.close();
        featWin = window.open(url, "win", 'toolbar=0,location=1,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,width=' + width + ',height=' + height);
        selfWin = self;
        featWin.focus();
    }
    else {
        featWin = window.open(url, "win", 'toolbar=0,location=1,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,width=' + width + ',height=' + height);
        selfWin = self;
        featWin.focus();
    }
}
function closeWin() {
    if (window.featWin && !window.featWin.closed) {
        window.featWin.close();
    }
}