Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x

ASP

80K

Solutions

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

Both websites are on the same network, one is an intranet, one is an internet. We want to display some content (XML) from the Intranet site on the Internet site. Can the internet site serve content from the Intranet site if it's given permissions. Any suggestions?
0
Hire Technology Freelancers with Gigs
LVL 10
Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

Hi, is it possible to sort xml data in a classic asp page using AJAX and querystrings??

xml code

<?xml version="1.0" standalone="yes"?>
<DocumentElement>
<Data>
<EnsembleID>23331</EnsembleID>
<BookCode>NWP-MV</BookCode>
<Issue>Aeon Financial 2019</Issue>
<LongBLPTicker>QZ3838484 Corp</LongBLPTicker>
<ShortBLPTicker>8570 JT Equity</ShortBLPTicker>
<LongPos></LongPos>
<StubPos>600000000</StubPos>
<SIV>0.927</SIV>
<Parity>91.95</Parity>
<Premium>0.173</Premium>
<IV>99.23</IV>
<LongPx>107.81</LongPx>
<PxChg>0.05</PxChg>
<TheoChg>0.03753</TheoChg>
<StubPrice>8.59</StubPrice>
<ShPxChgPer>0.001277</ShPxChgPer>
<SLH>0.009</SLH>
<CurDelta>0.32</CurDelta>
<ImpDelta>0.444</ImpDelta>
<TheoDelta>0.417</TheoDelta>
<FutHdg1>-14.13</FutHdg1>
<ImpVolCB>0.242</ImpVolCB>
<ImpVolStub>0.242</ImpVolStub>
<V90D>0.198</V90D>
<DPnL>0.4</DPnL>
<WPnL>3</WPnL>
<MPnL>1.2</MPnL>
<YPnL>-4.9</YPnL>
<NetPnL>16.8</NetPnL>
<DayTE>-0.1647</DayTE>
</Data>

Open in new window




Page code...


<!doctype html>
<html>
<head>
<meta charset="utf-8">
<title>Summary</title>
<style>
table {
    border-collapse: collapse;
    width: 100%;
}

th, td {
	font-family:Gotham, "Helvetica Neue", Helvetica, Arial, sans-serif;
    text-align: left;
    padding: 8px;
}
tr:nth-child(odd){
	font-family:Gotham, "Helvetica Neue", Helvetica, Arial, sans-serif;
	font-size:10px;
	background-color: #eef6ff
	}
tr:nth-child(even){
	font-family:Gotham, "Helvetica Neue", Helvetica, Arial, sans-serif;
	font-size:10px;
	

Open in new window

0
I have an ASP website on Windows IIS at www.mysite.com and I want to create a Wordpress blog at www.mysite.com/resources/

This means all pages of the blog start at www.mysite.com/resources/

Eg.
www.mysite.com/resources/page1
www.mysite.com/resourcescategory/categoryname/

I have 2 options:
1) Host the blog on Windows IIS
2) The other option is to have the Wordpress blog hosted on Linux server at another IP address and have all pages at www.mysite.com/resources/ point to the Linux server.

How would I do this?  Which option is better and why?
0
We have a script that opens a pop up window, the pop up shows the URL which includes certain parameters.
Is there a way to hide the URL bar in a pop up window?   I am using ASP Classic
0
in asp web applicaiton i am storing in a session variable on a button lick as below :
session("TEST") = "ABC"

in there anyway in javascript to read this session variable?
Thank you
0
I have a Stored Procedure (MS SQL 2012) that returns many recordsets.

It has 4 parameters but many select statements. When I execute it, the results look like the attached screenshot.

I am trying to make one call to the stored procedure, instead of having to create one SP for each select statement and call them separately.

Is this possible?  I am using classic ASP.

The problem I have right now is that if I only call the SP once with the parameters I don't know how to create a recordset of each one of those select statements, is this possible? If so how?

This is my ASP code at this time, what I usually use for one recordset only with one select statement in my SP:

<%

Dim sp_countries__userid
sp_countries__userid = ""
if(request.querystring("userid")  <> "") then sp_countries__userid = request.querystring("userid") 

Dim sp_countries__caseid
sp_countries__caseid = ""
if(request.querystring("caseid")  <> "") then sp_countries__caseid = request.querystring("caseid") 

Dim sp_countries__firmid
sp_countries__firmid = ""
if(session("firmid")  <> "") then sp_countries__firmid = session("firmid") 

Dim sp_countries__petitionerid
sp_countries__petitionerid = ""
if(request.querystring("petitionerid")  <> "") then sp_countries__petitionerid = request.querystring("petitionerid") 

Dim sp_countries__attyid
sp_countries__attyid = ""
if(session("userid")  <> "") then sp_countries__attyid = session("userid") 


%>
<%

set sp_countries = 

Open in new window

0
HI,

I am using ASP table which is dynamically created in vb.net, I would like to hide and display few columns
in that table,I can use checkboxes for those columns and can hide and display those columns But i would
like to know what are other approaches used in industry to hide and display columns, Please help me for
same asap.
0
Hi, experts, I found a code in the google that seems able to upload the file to the server. However, when I run it, I've got an error saying that; "Operation not Allowed /clsUpload.asp, line 208" Is the code below really can upload files to the server? if yes, which part of the code should I change? Thank you!

<HTML>
<HEAD>
<!--#include file="clsUpload.asp"-->
</HEAD>
<BODY>
<FORM ACTION = "clsUploadTEST.asp" ENCTYPE="multipart/form-data" METHOD="POST">
Demo Input: <INPUT NAME = "Demo"></INPUT><P>
File Name: <INPUT TYPE=FILE NAME="txtFile"><P>
<INPUT TYPE = "SUBMIT" NAME="cmdSubmit" VALUE="SUBMIT">
</FORM><P>
<%

set o = new clsUpload
if o.Exists("cmdSubmit") then

'get client file name without path
sFileSplit = split(o.FileNameOf("txtFile"), "\")
sFile = sFileSplit(Ubound(sFileSplit))

o.FileInputName = "txtFile"
o.FileFullPath = Server.MapPath("/MyWebDocument") & "\" & sFile
o.save

 if o.Error = "" then
	response.write "Success. File saved to  " & o.FileFullPath & ". Demo Input = " & o.ValueOf("Demo")
 else
	response.write "Failed due to the following error: " & o.Error
 end if

end if
set o = nothing
%>
</BODY>
</HTML>

Open in new window

0
I'm having difficulties with setting up a new site to site vpn to two other sites. I currently have a site to site working with from the 128.0 to the 2.0 networks.  I have a new site which I'm trying to configure a site to site vpn to the other two sites through the vpn wizard and they aren't connecting.  I went through the ASDM site to site vpn wizard and it worked for the first one but it doesn't for the new site to the others.  I have included the configs below.

192.168.1.0 NETWORK
:
ASA Version 9.1(6)
!
hostname ciscoasa
enable password OlOxQ1nyrZ49h6MK encrypted
names
!
interface Ethernet0/0
 switchport access vlan 2
!
interface Ethernet0/1
!
interface Ethernet0/2
!
interface Ethernet0/3
!
interface Ethernet0/4
!
interface Ethernet0/5
!
interface Ethernet0/6
!
interface Ethernet0/7
!
interface Vlan1
 nameif inside
 security-level 100
 ip address 192.168.1.1 255.255.255.0
!
interface Vlan2
 nameif outside
 security-level 0
 ip address 104.201.x.x 255.255.255.252
!
ftp mode passive
object network obj_any
 subnet 0.0.0.0 0.0.0.0
object network EMAIL
 host 192.168.1.253
 description Woodchuck
object network Webserver
 host 192.168.1.254
 description ETIMAIN
object network cl
 subnet 192.168.2.0 255.255.255.0
object network NETWORK_OBJ_192.168.1.0_24
 subnet 192.168.1.0 255.255.255.0
object network SC
 subnet 172.172.128.0 255.255.255.0
object-group protocol TCPUDP
 protocol-object udp
 protocol-object tcp
access-list…
0
I'm a Node newbie. Though was very good at VBScript Classic ASP back in the day!

I have a Nope app running in Express. I got this off an open source project. It works fine. (see below)

I want to make this small adjustment. When the app is accessed, I want to send some text in a URL parameter, such as "Barbara Ann". When the page is called I want to retrieve it into a variable varSongName.
URL parameter will be like "https://quiet-peak-32801.herokuapp.com/?songname=Barbara%20Ann"

I need to know:
Is that how the URL parameter should be for Node/Express/Heroku? Do I need to point to a specific page? or server.js file?
How do I store "Barbara%20Ann" into a session variable when the page is accessed? (in ASP this was Request.QueryString("songname")

Thanks


FYI: the open sourece project is here https://github.com/squallooo/MT5
0
Free Tool: SSL Checker
LVL 10
Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Hi, experts, I tried to execute codes below to run certain ".exe" on my server computer. First, I've experienced an error like "Permission denied" responded from the server. So, I set up the permission within the folder where the SkyWin9.exe resides, and I was able to run it and the error is no longer appear. However, the ".exe" still no longer run and found no error appear from the console. It seems everything is running fine but my problem is that the ".exe" is still not running. I have no idea which part of the code should I change or do I need to add something on my pc server. Is there anyone who can give me an idea why this happening? Thank you!

<%
Set WshShell = Server.CreateObject("WScript.Shell")
WshShell.run ("C:\win\SkyWin9.exe")
%>

Open in new window

0
Hi experts, I wish to stop or kill the running exe on  my computer using vbscript. I have a program running on my pc named, SkyWin.exe. This exe is found in c:\xFolder\SkyWin.exe and  I'm using Windows 10. Any help please!
0
Hi all, I have set out some data, however I am not sure if it is possible to list it in a specific way

For each product (prod_ID) there is events that happen, no matter what date the event is (like lines 20-24 & 32 & 33)
product is the Formula 1 event

For each departure (dep_ID) there would be different things happening (like lines 25 & 31)
departure is the specific package (where as there could be different-longer packages with different itinerary)

Data:
TABLE: prod_itin
itin_ID	brand_ID	cons_ID	date_added		itin_live	prod_ID	dep_ID	itin_day	itin_IATA_start	itin_start	itin_finish	itin_IATA_finish	itin_item
20		GPT		1	9/08/2017 1:00:00 PM	Yes		3		1		AEGPA		1:00:00 PM	2:30:00 PM				Free Practice 1
21		GPT		1	9/08/2017 1:00:00 PM	Yes		3		1		AEGPA		5:00:00 PM	6:30:00 PM				Free Practice 2
22		GPT		1	9/08/2017 1:00:00 PM	Yes		3		2		AEGPA		2:00:00 PM	3:00:00 PM				Free Practice 3
23		GPT		1	9/08/2017 1:00:00 PM	Yes		3		2		AEGPA		5:00:00 PM	6:00:00 PM				Qualifying
24		GPT		1	9/08/2017 1:00:00 PM	Yes		3		3		AEGPA		5:00:00 PM						Race
25		GPT		1	9/08/2017 1:00:00 PM	Yes			6	1		AUH		2:00:00 PM						Check-in
31		GPT		1	9/08/2017 1:00:00 PM	Yes			6	5						10:00:00 AM	AUH			Check-out
32		GPT		1	9/08/2017 1:00:00 PM	Yes			6	1		AEGPA		8:00:00 PM						Concert: Calvin Harris
33		GPT		1	9/08/2017 1:00:00 PM	Yes		3		4		AEGPA		8:00:00 PM						Concert: P!NK

TABLE: prod_deps
dep_ID	brand_ID	cons_ID	date_added		dep_live	prod_ID	dep_date	dep_type	dep_conf	dep_sold	dep_prod	

Open in new window

0
Hi experts, please help me  understand what's the reason why some computers cannot  get the message from the server while trying to  accessed it? The codes below is trying to test the server response how the server deal with the response. My laptop is able to get message while some of my destops, pc cannot. I'm using chrome to all computers but some of my computers cannot get the message from the server. The alert box message will appear blank but some computers able to obtain the message.

Js

 function iSaveToServer(x)
{
	if (window.XMLHttpRequest)
	  {// code for IE7+, Firefox, Chrome, Opera, Safari
	  xmlhttp = new XMLHttpRequest();
	  }
	else
	  {// code for IE6, IE5
	  xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
	  }
	xmlhttp.onreadystatechange=function()
	  {
	  if (this.readyState==4 && this.status==200)
	    {
	        	var str = this.responseText; 
	        	alert (str);
	    }
	  }                                             
		xmlhttp.open("GET","SendMsg.asp?a="+ x, true);
		xmlhttp.send();
}

Open in new window


Asp


<%
dim msg
msg = request.querystring("a")

response.write("test-1")
response.end()

%> 

Open in new window

0
I am having issue trying to get my Web Application published and running correctly on our IIS server.

When I test from within Visual Studio 2015 with the same ODBC driver setups, everything works fine.  It is only once I try to publish the Web Application and access it off the IIS webserver in a browser that I am getting an issues.

I am using Visual Studio 2015 v14.0.25431.01 Update 3

The IIS server is a 64-bit Windows 2016 server

The ODBC driver is a Progress OpenEdge 11.6 driver - 32 Bit

The ODBC connection is setup using the 32-b it ODBC Manager found in c:\windows\sysWOW64\odbcad32

I came across many forums that say to make sure that the ODBC driver is setup correctly, and using the correct ODBC manager, which it is.

I also came across some posts that reference compiling the Web Application and specifying in the Configuration manager to use x86 instead of Any CPU.  x86 is not an option when I go into the configuration manager.

I am at a loss as to how to resolve this error so that I can access the new Web Applications from the IIS server.


The error I get is...

Server Error in '/' Application.

ERROR [IM014] [Microsoft][ODBC Driver Manager] The specified DSN contains an architecture mismatch between the Driver and Application

Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception …
0
I had this question after viewing Export data to Excel from Classic ASP page.

My question is similar, and I had trouble with the line
Set rstSearch = cnnSearch.Execute(strSQL)

Open in new window

...which returned the error message "Object required: ''

I understand roughly how the code works, but I simply cannot get it to work for me, after modifying it to suit my example.

So, to show what I'm trying to achieve (a simple export to Excel), I've made the simplest possible example to return the 3 rows in a small table, and I'd like to be able to click a button to export this to Excel (I know the "form" section does this).

Here is my code in its simplest form :  
<!--#include file="inc_dbconn.asp"-->
<!--#include file="adovbs_inc.asp"-->

<html>
<body>
<%

      set rs = Server.CreateObject("ADODB.recordset")
       sql = "SELECT ID, Firstname, Surname FROM JIM_Test1"
	    rs.Open sql, conn
	     if not rs.EOF then
%>
<table border="1px">
<tr>
<td>ID</td><br>
<td>Firstname</td><br>
<td>Surname</td><br>
</tr>
<%
    	  do until rs.EOF
%>
<tr> 
<td><%Response.Write(rs.Fields("ID").value)%></td>
<td><%Response.Write(rs.Fields("Firstname").value)%></td>
<td><%Response.Write(rs.Fields("Surname").value)%></td>
</tr>
<%
  rs.movenext
   loop
    end if
     rs.close
      conn.close
       set conn=nothing
        set rs=nothing
%>
</table>

</body>
</html>

Open in new window

, and this is the SQL to create the data (if you need to) :
IF OBJECT_ID('JIM_Test1') IS NOT NULL DROP TABLE JIM_Test1

CREATE TABLE JIM_Test1
 (  
  ID INT,
  Firstname nvarchar(20), 
  Surname nvarchar(10) 
 )

 INSERT INTO JIM_Test1 VALUES (1, 'Fred', 'Jones');
 INSERT INTO JIM_Test1 VALUES (2, 'Joe', 'Wilson');
 INSERT INTO JIM_Test1 VALUES (3, 'Andy', 'Smith');

Open in new window

This should be something that is easy to do, but for some reason I'm doing something wrong.
Any help much appreciated!

Thanks

Jim
0
Hi experts, I wish to put some colspan in a table created from server side as a response of a certain request. My code below is trying to implement such thing but it does not work. Any help please!

         response.write("<tr>")
            response.write("<th style="" width: 170px; color: black; padding: 1px; text-align: center; colspan: 2; "">" & "Date executed" & "</th>")
            
            
            response.write("<th style=""width: 130px; padding: 3px; color: black; "">" & "Notes" & "</th>")

         response.write("</tr>")

Open in new window

0
Hello All,

I am trying to re-direct from Classic asp application to a .aspx page for a File upload. I am receiving following error. Any input of what this error is can be really helpful.


Server Error in '/' Application.

Configuration Error

Description: An error occurred during the processing of a configuration file required to service this request. Please review the specific error details below and modify your configuration file appropriately.

Parser Error Message: The CodeDom provider type "Microsoft.CodeDom.Providers.DotNetCompilerPlatform.CSharpCodeProvider, Microsoft.CodeDom.Providers.DotNetCompilerPlatform, Version=1.0.6.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35" could not be located.

Source Error:


An application error occurred on the server. The current custom error settings for this application prevent the details of the application error from being viewed remotely (for security reasons). It could, however, be viewed by browsers running on the local server machine.
0
Hello,

I want to add a csv file to database. There is a column in csv file called as merchant_id same as column in SQL database. I want to update the row in database if the "merchantid" exists in database or if it doesn't exist , we need to add that row from csv file .


Here  

"rs" contains all the columns of the CSV file and its values.

"rsAdd" contains all the columns of Database table(Merchants) and its values.

Set rs = GetRecordSet("C:\upload\new\" & TheNewFileName2)
    'Response.Write "No Errors"
    Set cn = Server.CreateObject("ADODB.Connection")
    cn.ConnectionString="DSN=REWC"
    cn.Open
    i = 0
		TheSql = "SELECT * FROM Merchants"
        Set rsAdd = Server.CreateObject("ADODB.RecordSet")
        rsAdd.CursorType=1
        rsAdd.LockType=3
        rsAdd.Open TheSql, cn
        
    While not rs.EOF
				
			rsAdd.AddNew            
            For Each col in rs.Fields				
                rsAdd(Replace(col.Name,"_","")) = col.Value
            Next		
			
        rsAdd.Update
        rsAdd.Move 0        
        rs.MoveNext
        i = i + 1
        If (i mod 100)=0 Or i=1 Then
            Response.Write i & ","
            If (i mod 2500) = 0 Then
                Response.Write "<br />"
            End If
        End If
    WEND
	
    rsAdd.Close
    Set rsAdd = Nothing	
	End If

Open in new window

0
Concerto Cloud for Software Providers & ISVs
LVL 4
Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

I know it's kind oldy to use ASP (active server pages) in 2017 but my customer site is built in asp and he does not want to change it.

He asked me to do a form that you can see here http://www.preventys.net/shopquizz.asp

The form is working great.

My problem is with the postback function.

When postbacked, i need the window to go to the field checked and not return to the top of the page. You can for example go to the last record in the form and check yes or no, it will reload as postback, but you will be sent to the top of the page.

here after the complete code


<form id="Form_ID" name="Form_ID" method="Post" action="<%=getsess("currenturl")%>">
            <table border="1" cellpadding="5" cellspacing="2" class="TableContact">     
                <%
                dim qConn, qDBC, qSql, qRs
                dim counter : counter = 1
                shopopendatabase qdbc
                qSQl="Select * from questionnaire order by qid ASC" 
                Set qrs = qdbc.execute(qsql)
                if not qrs.eof then
                    do while not qrs.eof
                        StrQuestionLabel(counter) = qrs("question_label")
                        StrQuestionHelp(counter) = qrs("question_help")

                        ' questions principales
                    %>
                    <tr>
                        <td align="cennter" valign="middle"><h3><%=qrs("qid")%></h3></td>
                        <td width="15" align="cennter" 

Open in new window

0
I had this question after viewing C++ COM Method with Optional Arguments.

I am trying to produce a COM object in Visual C++, where one of the methods accepts optional arguments. Below are the interface declaration, the class implementing the interface, and the implementation of the method taking an optional argument. As it stands, it compiles. But when I try to call the function from an ASP page using VBS with the supposedly optional parameter missing, I get the following error


Microsoft VBScript runtime error '800a01c2'
Wrong number of arguments or invalid property assignment: comObject.ShowFinalSql

Following code in IDL
interface IWPharma : IDispatch{
   [id(2), helpstring("method ShowFinalSql")] HRESULT ShowFinalSql([in] BSTR query, [in] BSTR cleanup);

in C++:
    STDMETHOD(ShowFinalSql)(BSTR query, BSTR cleanup) override

in VB with error:
SET comObject = CreateObject("WPharma.Main")

REM Тест #1
comObject.ShowFinalSql "CHECK_SIGNATURES 01/01/2017", ""
0
Hello All;

I have a linked Query, that when run, allows me to connect and use the connection to copy data from the LIVE DB to the LOCAL DB.

Create linked DB
sp_addlinkedserver 'NAME-THE-CONNECTION', '', 'SQLNCLI', NULL, NULL, 'Server=IP-ADDRESS-OF-SERVER', NULL
exec sp_addlinkedsrvlogin 'NAME-THE-CONNECTION', 'false', NULL, 'USERNAME', 'PASSWORD'

Open in new window


This is the script to copy data from the LIVE to the LOCAL.
insert into LocalTable (uid) select uid from [NAME-THE-CONNECTION].[LIVE-DB-NAME].[dbo].[LiveTable]

Open in new window


I can run the linked table script first in SQL Server, and then run the insert statement, and it works great.
So, my issue is this.

How would I write this to run from within an ASP page, all in one clean process?

Thanks all;
Carrzkiss
0
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
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

ASP

80K

Solutions

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.