ASP

80K

Solutions

7

Articles & Videos

31K

Contributors

Active Server Pages (ASP) is Microsoft’s first server-side engine for dynamic web pages. ASP’s support of the Component Object Model (COM) enables it to access and use compiled libraries such as DLLs. It has been superseded by ASP.NET, but will be supported by Internet Information Services (IIS) through at least 2022.

Share tech news, updates, or what's on your mind.

Sign up to Post

This question is a follow-up to this (solved) one :

https://www.experts-exchange.com/questions/29017643/classic-asp-edit-a-data-field-returned-by-a-sql-server-query.html

My goal was to be able to update records in a Classic ASP application, and that part is fine. The last step in my code is a Response.Redirect statement, which reloads the page after the update. This is fine, but as the form spans more than one page, after the update the user is not returned to the exact point in the page (has to scroll to get to the exact record again).

I looked at the code provided by Wayne Barron (http://www.cffcs.com/Tutorials/carrzkiss/39/Q_24801116.asp) [*excellent tutorial, btw - thanks!*], and I tried adding an anchor, but this only takes the user back to the top of the form, not to exact point where he left off, after clicking the "Save" button.

As each row of the form has a unique ID (getConID above), I tried using this also, in the redirect statement, but it did not work.

This is the code I use to update a record in the form :

<%
'updateform.asp v03 22-06-2017
getConID = request.form("ID")   'this is the unique row identifier
getCom = request.form("Comment")
getSchoolID = request.form("SchoolID")
 
' Now update the live TblReportsStoreComments table

Set sqlProp=Server.CreateObject("ADODB.Command")
sqlProp.ActiveConnection=Conn

sqlProp.commandtext="UPDATE TblReportsStoreComments SET txtComment=? where TblReportsStoreCommentsID=? "
sqlProp.Parameters.Append

Open in new window

0
Creating Instructional Tutorials  
Creating Instructional Tutorials  

For Any Use & On Any Platform

Contextual Guidance at the moment of need helps your employees/users adopt software o& achieve even the most complex tasks instantly. Boost knowledge retention, software adoption & employee engagement with easy solution.

I have  sun server that runs a local application that uses the following ports: JMS 5630, XML 9672,
ASP Http 80 and ASP https 443, i can only telnet to port 80, telneting to the other ports I get
unable to connect to remote host: connection refused. I checked the /etc/services and I do not see the ports listed.
BTW: This application used to work without problems...

Thanks
0
Hi experts, I need to upgrade high version of excel to export html table to excel. The codes below are able to export from table to excel, How can i upgrade it to high version of excel with an extension .xlsx  ? any help please!

<!DOCTYPE html>
<html>
	<head>
		<title>jQuery Boilerplate</title>
		<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.2.4/jquery.min.js"></script>
		<script src="dist/jquery.table2excel.min.js"></script>
	</head>
	<body>
    <button class="WinExcel">Export</button>
        <table class="Stocks32">
          <tr>
            <td>Erwin M. Malalis 500</td>
          </tr>
        </table>
<script>
	$(function() {
		$("button.WinExcel").click(function(){
			$(".Stocks32").Stocks32({
				exclude: ".noExl",
				name: "Excel Document Name",
				filename: "Prolist",
				//fileext: ".xls",
				exclude_img: true,
				exclude_links: true,
				exclude_inputs: true
			});
		 });
	});
</script>  
	</body>
</html>

Open in new window


!function(a,b,c,d){function e(b,c){this.element=b,this.settings=a.extend({},k,c),this._defaults=k,this._name=j,this.init()}function f(a){return a.filename?a.filename:"Stocks32"}function g(a){var b=/(\s+alt\s*=\s*"([^"]*)"|\s+alt\s*=\s*'([^']*)')/i;return a.replace(/<img[^>]*>/gi,function(a){var c=b.exec(a);return null!==c&&c.length>=2?c[2]:""})}function h(a){return a.replace(/<a[^>]*>|<\/a>/gi,"")}function i(a){var b=/(\s+value\s*=\s*"([^"]*)"|\s+value\s*=\s*'([^']*)')/i;return 

Open in new window

0
I want to create a new asp website with the following tasks: login, signup, and view products after login, the site connect to MSSQL database
and I have to build a mobile application using wml and wmlscript.

I've done this task but I've made my pages mixed (all pages with asp extension have the wml and vb code)
now I should separate the code and publish my asp website and design an android application that connect to this site.

P.S it is a homework, and I should design two mobile applications(one using wml and the other using andriod eclips)

can someone advise me how to separate asp files, I suppose these asp pages should return JSON object  but how I will handle it in wml code,
in the another application I will handle it using java

any hint will help me

Thanks
0
Hi,

I have been getting the following error when using trying to upload an image:

Server side error
@Big Monty suggested the following:

1:objUpload = Server.CreateObject("Persits.Upload.1")
2:someFormValue = objUpload.Form("someValue")


Which I have done - now I do not get the error but my values come through as blank..

see my code:



<%
'start the file upload 

strDISKLOCATION  = "\\FFtilsmb4012\Apps$\FORSALE\Uploaded_Images"
%>	
	
	<!-- #include file="../../upload/upload.asp" -->
	<%'Create the FileUploader
	Dim Uploader, File, ErrMsg
	Set Uploader = New FileUploader
	' This starts the upload process
	Uploader.Upload()
	
	
	



varQuery=Uploader.Form("query")

	if varQuery="ForSale" then
		varAddType="F"
	elseif varQuery="Wanted" then
		varAddType="W"
	end if

varUserID = Request.ServerVariables("auth_user")


'Retreive the form variables
	
varContact_Name=Uploader.Form("Contact_Name")
varLocation=Uploader.Form("Location")
varTel=Uploader.Form("Tel")
varEmail=Uploader.Form("Email")
varPrice=Uploader.Form("Price")
varBreif_Description=Uploader.Form("Brief_Description")
varFull_Description=Uploader.Form("Full_Description")
varOffers=Uploader.Form("Offers")
varPrice=Uploader.Form("Price")


varTimeStamp = now()
varDate_Expire = DateAdd("d",31,varTimeStamp)

	 dim oRS2339
     Set oRS2339=server.createobject("ADODB.recordset")
     oRS2339.open "FS_HDR", "dsn=FORSALE;uid=web_Admin;pwd=F1nnforest",1,3
     oRS2339.Addnew
     

Open in new window

0
I am getting the following error after completing the form on a contact us web page. This is the error:

ADODB.Fields error '800a0ea5'
Fields update failed. For further information, examine the Status property of individual field objects.
/contactus2.asp, line 33

The email account is on the same server as the webpage and requires authentication. The website was built in asp.



This is the script giving the error:


<%
      'Get Form Variables
customername = Trim(Request.Form("customername"))
email = Trim(Request.Form("email"))
messagetext = Trim(Request.Form("messagetext"))

      'Create and Send E-Mail
Dim objCDOSYSCon
      'Create the e-mail server object
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
      'Out going SMTP server

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "ws.i2hosting.com"
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpaccountname") = "alan@djlhosting.co.uk"
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = “**********”
0
Hello All;

OK, this is code that I found a while back, and posted here.
ASP Classic - Insert text, Line breaks and Code

The issue that I had, or am still having now, is that I am giving the user the option to choose the tags they want to use.
They can have as many tags as they need in their post.

The issue with the code in the link above is that it will only do one tag hard coded.
So, that I have done is added an REGGEX into it, and it works GREAT! for the highlighting,
However, adding this in, has messed up the main function of this code FUNCTION, and that is.
It adds the line breaks to everything OUTSIDE of the Code tags.

The REGGEX that I used and works is this.

Function Reggex(strString, strPattern, strReplace)

	Dim RE: Set RE = New RegExp

	With RE
		.Pattern = strPattern
		.Global = True
		.IgnoreCase = True
		Reggex = .Replace(strString, strReplace)
	End With
	
End Function

fString =   Reggex(fString, "\[code=(.*?)\](.*?)\[\/code=(.*?)\]", "<pre class=""line-numbers"" id=""code""><code class=""language-$1 demo"">$2</code></pre id=""code"">")

Open in new window


The original code is this. (Modified to work in my project)

 	CodeTags(1,1,1) = "[ code=sql]" ' Remove the space between the bracket, 
 	CodeTags(1,2,1) = "[/ code=sql]" ' Remove the space between the bracket, 
 	CodeTags(1,1,2) = "<pre class=""line-numbers"" id=""code""><code class=""language-sql demo"">"
 	CodeTags(1,2,2) = "</code></pre id=""code"">"

Open in new window


This is the entire script.


Open in new window

0
I'm trying to figure out how to merge for example 4 x 2 .JPGs into one .JPG for use on a website automatically.
I use ASP and VB on my server. Any input would be very nice. I know how to do this in a table, but it will not work in my solution as it is a Flash based slider. Thanks in advance.
0
How do I reference an xml object inside a function so that after the function runs the xml object is transformed
per the function code as follows


<%

      set xmldoca = Server.CreateObject(objxml)  

      set sbixmla = xmldoca.createElement("sbixml")
      xmldoca.appendchild sbixmla

      xmlarrA = Array("NodeName1~NodeName2~Attribute1:Value1","NodeName2~NodeName3")
      call objectify(xmlarrA)


Function objectifygen(xarray, targnode)
      set objectifygen = targnode

      for each node in xarray
            set n = objectifygen.createElement(split(node,"~")(1))
            objectifygen.selectsinglenode("//" & split(node, "~")(0)).appendChild n
            if ubound(split(node, "~")) > 1 then
                  for a = 2 to ubound(split(node, "~"))  
                        if split(split(node, "~")(a), ":")(0) = "Text" then
                              n.Text = split(split(node, "~")(a), ":")(1)
                        else
                              call n.setAttribute(split(split(node, "~")(a), ":")(0),split(split(node, "~")(a), ":")(1))
                        end if
                  next
            end if      
      next

End Function

Function objectify(xarray)  
      for each node in xarray  
            set n = xmldoca.createElement(split(node,"~")(1))  
            xmldoca.selectsinglenode("//" & split(node, "~")(0)).appendChild n
            if ubound(split(node, "~")) > 1 then
                  for a = 2 to ubound(split(node, "~"))  
                        if split(split(node, "~")(a), ":")(0) = "Text" then  
                              n.Text = split(split(node, "~")(a), ":")(1)
                        else
                              call n.setAttribute(split(split(node, "~")(a), ":")(0),split(split(node, "~")(a), ":")(1))
                        end if
                  next
      …
0
Greeting,
I have classic ASP connects to an Access database and both resides on a web server W2008 R2 64-bit (IIS 7). In IIS Application Pools->Advanced Settings, the 32-bit applications is set to True and Managed Pipeline mode is Classic.

Below is the connection string in ASP.
Dim objConn
  Set objConn = Server.CreateObject("ADODB.Connection")
  objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
               "Data Source= C:\DB\MyDB.mdb"

This setup was working for years till early this week. The ASP can't connect to database anymore. I have to reboot the server then it worked again for a day then stop. Any suggestions?

Thanks in advance!
0
Independent Software Vendors: We Want Your Opinion
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

ASP Script using request from data sent via get can reat using request("data") but if data is sen via post no data is received.

Originated with the get method

http://www.atletasmexico.com/demo/checkout.asp?reference_sale=FE68A77B-AEEA-4976-893C-3706ACCBE7BF&reference_pol=840833038&value=10.

Variables are retrieved and the job get done.

Originated with the post method

http://www.atletasmexico.com/demo/checkout.asp?reference_sale=FE68A77B-AEEA-4976-893C-3706ACCBE7BF&reference_pol=840833038&value=10.

Variables are not retrieved and the script does not work


Any ideas
0
Trying to access an Excel spreadsheet through classic ASP that resides on another server.

If I move the spreadsheet to the local server, everything works as it should.  Once the file is put back in the other server's file share, I get an error.

I have changed the Identity in the application pool to a domain account that has access to the file, folder and share and still get an error that is basically access denied.

I used Process Monitor (systernals) to monitor the file.  I indeed get an access denied error. What confuses me is on the Event tab, it shows that it is impersonating my account (which also has access to the file, folder and share). On the Process tab, it shows the same user as the one I used for the application pool.

My question is this.... If the application pool is using a domain user account that has access to a file, and it is impersonating another user that also has access to a file, why am I getting am Access denied error?

Thank you for your time.
1
Hi experts, I wish to align two div in one line. I have here 3 div one is the mother and the other two are  the children. My codes below didn't work. I need to align the two child-div in one line. Any help please!

<!DOCTYPE html>
<html>
<head>
<title>Text2Go</title>
<link rel="stylesheet" href="iStyle.css"/>
</head>
<meta charset="utf-8" />

<body>
<div class="stay">
            <div id="my7" class="stay-son1">  
               <p>Part1</p>
            </div>
            <!--2nd-->
            <div id="my8" class="stay-son2">  
               <p>Part2</p>
            </div>
</div>
</body>
<script>
$('#body').css('min-height', screen.height);
</script>
</html>

Open in new window



#body {
height: 100%;
width: 100%;
}
div.stay
   {
    line-height:35px;
    height:100%;
    width:100%;
    float:center;
    font-size: 100%;
    background-color:#33FF66;
    margin: 0px 0px 0px 0px;
    border: 1px solid #73AD21;
   }

div.stay-son1
   {
    line-height:35px;
    height:100%;
    width:50%;
    float:center;
    font-size: 100%;
    background-color:greenyellow;
    margin: 0% 0% 0% 0%;
    border: 1px solid #73AD21;
   }
div.stay-son2
   {
    line-height:35px;
    height:100%;
    width:50%;
    float:center;
    font-size: 100%;
    background-color:grey;
    margin: 0% 0% 0% 0%;
    border: 1px solid #73AD21;
   }

Open in new window

0
As the title says...  WS is running ASP and MS SQL.

It would be nice if I could just construct a QueryString something like..

www.mysite/postpage.aspx?table=customer&id=1234&name=fred

Open in new window


Is there some existing class to help with this serverside ?
Also can I encrypt the QueryString somehow ?

Thanks
0
Hi experts, I wish to put on an alert the particular field is having an error. Thank you!
	if ((pcode=="") || (pname =="") || (dptid =="") || (um =="")) 
	  {
	  alert(); //The alert should know which one of the four is getting error.  
	  return false;
	  }

Open in new window

0
HI experts, I wish the code below would run to Internet explorer browser. The code will only run in Firefox. Thank you!

<!DOCTYPE html>
<html>
<body>
<h1>My First Heading</h1>

<input type="text" id="number">

<script>
var elementInput=document.getElementById('number');
elementInput.addEventListener('keypress', function(e)
{
    if( !e )
    {
       e=window.event;
    }
    var key = e.keyCode ? e.keyCode : e.which ;
    alert(key + " " + String.fromCharCode(key) );
});
</script>


</body>
</html>

Open in new window

0
Hi experts, I want to save dat file locally. Is this possible that the client side could save dat file? If not please give me  idea why? Thank you!

<!doctype html>
<html>
<body>
<form action="save.asp" method="post">
    <label for="textboxdata">Enter a message</label>
    <textarea id="textboxdata" name="textboxdata"></textarea>
    <input type="submit" value="Save locally"/>
    <p>
        <label>Name of the Dat</label>
          	    <input ype = "text"
                 	        id = "mydatName"
                 	    value = "fortune"
                            name="filename"
			            size="10"
                </
    </p>
</form>
</body>
</html>

Open in new window

0
I have a SharePoint Custom List Application that in some cases could go

Examples:
Dashboard.aspx has a link that calls Editform_Gates.aspx with the following passing parameter values for record ID and SOURCE
EditForm_Gates.aspx?ID=14169&RAPT=NG2710&SOURCE=Dashboard.aspx

The EditForm_Gates.aspx then has a couple links that call other pages to add/update children associated records
NewGate_5000.aspx?mID=14169&SOURCE=EditForm_Gates.aspx?ID=14169 or
EditGate.aspx?ID=73671&SOURCE=EditForm_Gates.aspx?ID=14169

The problem I have is once you get to that third deep code if you hit cancel or save it does go back to the second page the EditForm_Gates.aspx but from there if you hit cancel or back it loses the SOURCE= from the first call and does not know where to go..

What is the proper way to do this and if any samples or examples are out there I would greatly appreciate it.

Thanks in Advance
0
I need to get my IPN of mercadopago (Mexico) working.. The IPN url keeps saying response is not 200 or 201 as required I ahve tried with http and https wih an empry url and nothing seems to work.  It is in asp
0
Online Training Solution
Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

Hi experts, I've got problem with my li, when I click it the highlight will remain forever even I click the other. I attached here the code to make you (experts) understand. I think the problem is to return to make the button back to original. Thank you!

<div id="headerX">
   <div id="navHead2">
         <div id="navHead2a">
            <ul>
              <li><a onclick="javascript:OpenFile(event, 'items', 1)"><img src="icons\cart.jpg" style="width:20px; height:20px;">&nbsp; Home</a></li>
               
              <li class="dropdown" style="float:left">
              <a href="javascript:void(0)" class="dropbtn">My Account</a>
                  <div class="dropdown-content">
                     <a href="#" onclick="javascript:OpenFile(event, 'profiles', 2)" >My Profile_</a>
                     <a href="#" onclick="" >P1</a>
                     <a href="#" onclick="" >P2</a>
                  </div>
              </li>
              
              <li><a onclick="javascript:OpenFile(event, 'shop', 1)">Add Item</a></li>
              <li><a onclick="javascript:OpenFile(event, 'cart', 2)"></a></li>

              
              <li class="dropdown" style="float:right">
                <a href="javascript:void(0)" class="dropbtn">In/Out</a>
                <div class="dropdown-content">
                  <a href="#" onclick="document.getElementById('id01').style.display='block'">Log-In</a>
                  <a href="#" onclick="LogIn(2)" >Log-out</a>
             

Open in new window

0
Hi there, I have a couple querys that currently work on my landing page that pull up a random event and display it - worsk perfect

What I now want to do I modify these Querys and have them to not select 1 event as random, just display all events

Qurey 1:
SELECT * FROM (SELECT RND(e.event_ID) AS RandomID, * FROM (events AS e INNER JOIN (SELECT * FROM codes WHERE code_live=TRUE) As c ON e.event_code=c.code_short) LEFT JOIN tickets AS t ON t.event_ID=e.event_ID WHERE e.brand_ID='"&Subdomain("brand_options.brand_ID")&"' AND e.event_live=TRUE AND e.event_start>Now() AND t.event_ID IS NULL) AS PR ORDER BY PR.RandomID

Open in new window


Query 2:
SELECT * FROM events,ticket_discount,codes WHERE events.brand_ID='"&SubDomain("brand_options.brand_ID")&"' AND events.event_ID=ticket_discount.event_ID AND event_code=code_short AND code_live=TRUE AND event_live=TRUE AND event_start>Now() AND NOT ticket_soldout=TRUE ORDER BY RND(-10000000*TimeValue(Now())*events.event_ID)

Open in new window


Thanks in advance, feel free to ask any questions and I will do my best to answer
0
Hi all, I have an interesting question to ask all of you...

What I would like:
I want to select a country 'AU', get all the 'locations' within 'AU' and then display all the 'events' in all 'locations' within 'AU' in date order
I understand that if the data was in the same database, this would be very easy, however this data can only be accessed from across 2 separate Access DBs

What I have:
I have 2 Access DBs (accounting & infodata)

From 'accounting DB', I would like to select the table 'IATA' and match the country code 'IATA_2letter' to 'AU' and display the 'locations'
SELECT * FROM IATA WHERE IATA_2letter='AU'

AUGPA
AUGPB
AUGPC
etc

Open in new window

From 'infodata DB', I would like to select all the 'events' and match up with all the 'locations' from 'accounting DB' and order them by date - however combined results (by date order):
SELECT * FROM events WHERE event_IATA='accounting(country)' ORDER BY event_date

Country='AU'
Location='AUGPA'
Event=1 - 15/4/17
Country='CN'
Location='CNGPA'
Event=3 - 22/4/17
Country='AU'
Location='AUGPA'
Event=2 - 29/4/17
etc

Open in new window

Below is a previously built query which is just show the events from 1 specific location which may be some help? I am not to sure:
SELECT * FROM (SELECT 'brand_events' AS ID,event_ID,event_start FROM events,codes WHERE event_code=code_short AND event_live=TRUE AND code_live=TRUE AND event_IATA='accounting(LOCATION)' AND event_start>Now() UNION SELECT 'brand_products' AS ID,itins.itin_ID,itin_depdate FROM itins,itin_deps WHERE itins.itin_ID=itin_deps.itin_ID AND itin_live=TRUE AND itin_depcity='accounting(LOCATION)' AND itin_depdate>Now()) AS a ORDER BY event_start

Open in new window

I have tried this on a simple scale (1st query and a simple 2nd - as mentioned in the above code sections) however, it only show each location in date order followed by the next location, not date order of all locations combined within the same country.

Any help would be great
0
I have a Classic ASP e-commerce site that has been stable for quite sometime. Now, for some reason, I am getting an msxml.dll 800c0005 error when I try to access the PayPal credit card test site. The problem seemed to first occur after I installed the March 15 'Security Monthly Quality Rollup for Windows 7 SP1 and Windows Server 2008 R2 SP1', which contained a security update for the Microsoft XML Core Services (MS17-022), although that may be coincidental.

As I indicated, the code is stable and has not been modified in quite some time. Further, it runs just fine on any of several other machines. My current environment is 64-bit Windows 7 SP1 running as both a web server (IIS 7.5) and a database server (SQL 2008 R2).

I have attached the segment of the web page where the error occurs (I have taken the liberty of extracting the code from the larger credit card data entry page); the error occurs at the 'objXMLHTTP.send xmlList' statement near the bottom. (Please note it was necessary to convert the file to a '.txt' file instead of an '.asp' file to get it to upload.)

I have a simple test program that I have stolen from a 4guysfromrolla.com article that downloads data from a remote site using XML and it works just fine. I also attempted to uninstall the MS update, but unfortunately it's one of those that can't be uninstalled. The version of msxml3.dll that I have installed is 'msxml3.dll SP11 Ver 8.110.7601.223648'.

Any ideas of where to go from here would be greatly …
0
Hi experts, the code below by the help of Chong is running and able to send email using Gmail. Is there anyone one who can help me and know how to use my own pc server the same scenario of the code below? I wish to send out emails via default SMTP setting in my IIS. My iis version is V5.1 I have my own domain. I wish to mailroot in inetpub.

    Set myMail = CreateObject("CDO.Message")
    myMail.Subject = "Sending email with CDO"
    myMail.From = request("Sender")
    myMail.To = request("mail")
    myMail.TextBody = request("comment")

    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465

    myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "yourGmail@gmail.com"
    myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "yourPassword"

    myMail.Configuration.Fields.Update
    myMail.Send
    set myMail = nothing

    response.write "Email was sent out"
0
I have a linkto a website that redirects to another website. How can I  get the final linkm progarmmmig in asp?

Say original link is;

http.//original.com/index.html

redirected site is; http://redirected.com/new.html

I need a function that will cacth the redirection link

Any ideas?
0

ASP

80K

Solutions

7

Articles & Videos

31K

Contributors

Active Server Pages (ASP) is Microsoft’s first server-side engine for dynamic web pages. ASP’s support of the Component Object Model (COM) enables it to access and use compiled libraries such as DLLs. It has been superseded by ASP.NET, but will be supported by Internet Information Services (IIS) through at least 2022.