我可以对将经典的asp网站转换为asp.net有一些一般的建议吗?我以前从未使用过经典的asp,过去6个月左右只使用过asp.net 2.0,所以这对我来说是全新的.
我注意到这个网站我正在使用一些"包含"文件.我知道我应该从包含文件中获取代码并将它们复制到自己的类文件中.我注意到文件后面没有代码,每个页面都写在自己的文件中(标记和代码).而且,这有点让我失望,没有事件处理程序.你可以提到经典和.NET之间还有其他有用的细微差别吗?
还有一个问题:我在项目的每个文件中都注意到有一些代码写在标记之上,还有一些代码在标记之下.为了组织/可读性目的,似乎所有代码都写在标记的上方或下方会更好.除非,这是有原因的.???
谢谢.
我有一个数据库问题,如果我的SQL是这样的:
Dim Username
Username = request.form(trim("username"))
Username = Replace(username,"'","''")
Dim email
email = request.form(trim("email"))
email = Replace(email,"'","''")
Dim question
question = request.form(trim("question"))
question = Replace(question,"'","''")
Dim answer
answer = request.form(trim("answer"))
answer = Replace(answer,"'","''")
Dim date_answered
dag = Day(Now())
maand = Month(Now())
jaar = Year(Now())
uur = Hour(Time)
minuten = Minute(Time)
seconden = Second(Time)
datum= jaar & "-" & maand & "-" & dag
tijd = uur & ":" & minuten& ":" & seconden
date_answered = (datum & " " & …Run Code Online (Sandbox Code Playgroud) 如何用经典ASP回答"204 No Content"http响应?
当我只使用以下代码发送空响应时:
Response.Clear
Response.End
Run Code Online (Sandbox Code Playgroud)
我的风格在客户端获得答案.IE9打开一个带有空(但是有效)的html文件的窗口.
我只需要知道如何从ASP页面正确返回204.
首先,请原谅我,如果这是一个奇怪的问题,但很明显不适合我.
我试着这样做:
sql="SELECT Alerts.id, Alerts.id_person, Alerts.type, Alerts.date,
People.id, People.name, FROM Alerts, People
WHERE People.name='"& name &"' AND People.id=Alerts.id_person"
set RS=oADO.Execute(sql)
Run Code Online (Sandbox Code Playgroud)
但是,由于Alerts和People都有一个名为id的字段,因此我在引用它们时遇到问题.我不被允许做,
RS.Fields("Alerts.id")或者RS.Fields("People.id")只是RS.Fields("id")
这不让我选择我想要使用的领域(实际上我需要同时使用它们).
我无法改变DDBB的结构(它还没有由我制作).
我能做什么的暗示?非常感谢你.
我忘了说这会选择很多条目,我会和他们一起玩
While not RS.EOF
Lorep Ipsum
Wend
Run Code Online (Sandbox Code Playgroud) 使用常量值时,我有一个令人不安的问题.我有一个名为"test.asp"的简单页面,它将变量设置为常量,然后设置为查询字符串值(如果存在).然后一个选择案例检查变量是否与常量匹配并输出"匹配"消息.问题是asp无法识别查询字符串值何时与常量相同.我已经运行了2次尝试,"test.asp"和"test.asp?SortField = 1".第一次尝试按预期运行,但第二次尝试报告1与1不同.此页面的代码如下所示.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<head></head>
<body>
<%
const cSortFielda = 1
dim vSortField
vSortField = cSortFielda
if not isempty(Request("SortField")) then
vSortField = Request("SortField")
end if
select case vSortField
case cSortFielda
response.write "matched</br>"
case else
response.write "failed</br>"
response.write "vSortField = " & vSortField & "(" & asc(vSortField) & ") </br>"
response.write "cSortFielda = " & cSortFielda & "(" & asc(cSortFielda) & ") </br>"
response.write "vSortField = cSortFielda is " & (vSortField = cSortFielda) & "</br>"
end select
%>
</body>
</html> …Run Code Online (Sandbox Code Playgroud) 我有asp经典页面,我需要在页面上显示一些值的链接.
这是链接,我需要附加strEmpcode与地址.
strEmpcode = session("empcode")
<td><li>
<a href="http://192.1.1.1:85/reports.aspx?empcode= & strEmpcode"> Report</a>
<td><li>
Run Code Online (Sandbox Code Playgroud)
所以点击它应该以这种形式传递地址:
http://192.1.1.1:85/reports.aspx?empcode=123
Run Code Online (Sandbox Code Playgroud)
我需要在设计时(内联页面)上显示它而不是在运行时.
我该如何解决?
我正在将从电子邮件解析的HTML内容加载到框架中.如果电子邮件包含href链接,它会尝试打开其框架中的链接,但我想在新标签中打开它.
通常,我会通过在href中将目标设置为_blank来实现这一点,但是直接从EML文件中读取href标签,所以除非有更好的方法,否则我能做到这一点的唯一方法就是解析正在读取的HTML标记,找到所有href链接并将目标添加到其中.如果可能的话,我想避免使用这个选项,因为解析html会给性能带来很多不利影响.
如果有人知道实现这一目标的优雅方式,请告诉我.
我是VB的新手,遇到了我认为必须是新手的常见错误.我正在尝试使用此代码段将字符串拆分为数组:
Dim myString, myArray
myString = "split-this"
myArray = myString.Split("-")
Run Code Online (Sandbox Code Playgroud)
这给了我错误:
Microsoft VBScript runtime error '800a01a8'
Object required: 'split-this'
Run Code Online (Sandbox Code Playgroud)
有人可以告诉我我错过了什么吗?
从用户获取2个日期,它的工作原理除外:如果两个日期都在2017年,则显然不应显示错误消息.
我手动将2016年改为2017年,看看它是否有所作为,但没有(使用Replace).
这是验证码:
todays_date = Date()
todays_date = Replace(todays_date, "/", "-")
If m_date_01 < todays_date Or m_date_02 < todays_date Then
m_valid = False
m_message = m_message & "<li>dates cannot be in the past</li>"
End If
response.write(todays_date)
response.write(m_date_01)
response.write(m_date_02)
Run Code Online (Sandbox Code Playgroud) 我在连接到MS SQL 2012的ASP经典页面中有以下脚本:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.RecordSet")
Conn.Open SQLCFG
RS.CacheSize = 40
RS.Open "SELECT * FROM orders WHERE (final_trackingnumber = '' OR final_trackingnumber = NULL OR final_trackingnumber LIKE '%BACK%') AND status <> 'pp' ORDER BY dt DESC", Conn, adOpenKeyset,adLockReadOnly
%>
<table width="100%" cellpadding=7>
<tr>
<td class='theading'></td>
<td class='theading'>Invoice Number</td>
<td class='theading'>Billed to</td>
<td class='theading'>Date Ordered</td>
<td class='theading'>Shipping Type</td>
<td class='theading'>Tracking ID</td>
<td class='theading'>Status</td>
</tr>
<tr>
<%
Do While Not RS.EOF
%>
<tr>
<td align=center bgcolor="<%=bcolor%>" …Run Code Online (Sandbox Code Playgroud) asp-classic ×10
database ×2
sql-server ×2
vbscript ×2
asp.net ×1
constants ×1
email ×1
frame ×1
html ×1
iis ×1
javascript ×1
mismatch ×1
query-string ×1
sql ×1