I need to be able to view a list of files (could be large number!) on a web page and hv been considering using the filesystemobject just to create an array. However their maybe a large number of files and they may need to be sorted.
View RepliesI am trying to setup an ASP code to write a text file to the client side, not the server side, for the purpose where it will be email attachment.
The following code seems to only work on the server side and was wondering if there as an equivalent out there for the client side since I am trying to avoid potential interruptions on the server side:
Const TemporaryFolder = 2
Dim myFSO, WriteStuff, myAttachment, tfolder
Set myFSO = CreateObject("Scripting.FileSystemObject")
Set tfolder = myFSO.GetSpecialFolder(TemporaryFolder)
if (right(tfolder,1) <> "") then
tfolder = tfolder & ""
end if
myAttachment = tfolder & "test.txt"
Set WriteStuff = myFSO.CreateTextFile(myAttachment, True)
Anyone has done declaring temp table in ASP code, and then populate the temp table, and then inner join with other table and so on? I encounter some sql error it seems indicate asp can't do such operations..
View Replies View RelatedI have data that needs to write to a temp table (there is a lot of data sometimes). Once they are finished, the user approves their input and it goes to a permanent table.
I give them the option of deleting that data by cancelling their request.
The problem I have, just to be on the safe side, what can I do to protect myself if the user closes or perhaps browses away from the page? Is there any sort of an window command whereby I could enable a sort of a kill-like function?
I am trying to write a sub that will delete a spreadsheet file created by the web user. THis is the code I have inserted into the global.asa file, but it is not working.
sub Session_OnEnd
'delete the temporary excel spreadsheet
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile(Server.mappath("temp/<%=session.sessionid%>.xls"))
Set objFSO = Nothing
end sub
I have made sure that the temp folder has permissions set for the IUSR_machinename account to be able to delete files. I am running IIS 5 on a windows 2000 server.
I have a dropdown that calls a javascript function onChange. One of the lines in the script is:
tmp = document.form1.familyID.options[document.form1.familyID.selectedIndex].value;
How do I change it to allow familyID to be a variable passed to the function?
I want to do the following but am not able to do it.I have one query which is:
SQL2 = "SELECT * From totalcloser INNER JOIN zipcode ON totalcloser.zip = zipcode.zip order by totalcloser.zip"
I want to store result of this query in a temp table so that now i can go ahead and compare the results in the temp table with some other table.I know i can do this in Access..but i want to do this by coding (in my program itself) where the query runs and dumps the query results in temp table and then the second query runs and does comparisons and displays the result on screen.Towards the end ,we can flush the contents of the temp table.
I want to retrieve row from a stored procedure that uses temp table.
Stored procedure works well in SQL Query Analyzer, but if run it from ASP thru Command object, i am getting an error stating that,
Error Type:
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.
code used: .....
I recently installed IIS lockdown, and ever since my ASP pages have been hell. One problem is that now after a user views my ASP page which reads my local Access DB, the temporary file, .ldb, stays in the folder forever!
This temp file is created when a user opens the file, so I checked out the .ldb file and it says the ADMINISTRATOR is opening the file! How can the internet user be using the ADMIN account?! This is not good news! I will share my code for my page; however I have a feeling the code isn't the problem, but a setting is. Code:
I dump the entire recordset into an array:
If not rs.EOF Then
aEmp = rs.GetRows()
Contents of the array are in this order:
EmpID,EmpName,Indent,Sub_ID,Lft,Rgt,MgrID, LastName
This query sort on the basis of Lft and Rgt columns.
The name of the array is: aEmp.
My question here is how can I get only the LastName from the aEmp array into another array so that I can sort the names alphabetically and then display the employees in the alphabetical order.
Or is there is another way I could this by using the same array while keeping the lft and rgt sort of the query? If I sort based at the SQL query level, I can see the names sorted by the lft, rgt and lastname, but since the lastname is at the end of the sort list - it does not appear alphabetically.
In working with arrays, I have found that I am unable to dimension and array
with a variable that has an integer value but I can redimension one this
way. I haven't see any information that tells me if this is a requirement,
although it appears to be because I get an error if I try it.
Ex.
Dim b
b = 10
Dim a(b) ' this errors out but
Dim a() ' this
Redim a(b) ' works
Code:
I want to create a new array called arrNames2 and copy contents of arrNames to arrNames2.
I then want to loop through my db and add more names (while going through the loop) to arrNames2. What is the best way to do this? Do I have to keep redim the array wehn I add more names?
i want to excute given logic
select * from Product_Table where Product_Code in
ARRAY
i.e i want to select Product_Code from VB array and not from a query
is it possible.
I know I can do this programatically using a loop but I thought there might be
some easier or more effective way.
I am trying to invert an array.
i.e.
array1 = 1,2,3,4,5
but I want to get
array2 = 5,4,3,2,1
Is there something like array2 = invert(array1)?
I have to following code:Code:
dim arrRes(9),getal,som
arrRes=Array(4,4,4,4,4,5,5,5,5,5)
for getal=0 to 9
som=som+arrRes(getal)
next
response.write("Het klasgemiddelde is " &som/10)
I get a type not match error on the second line
I have a page in my admin system where the user can edit products they
have added. The problem I am having is with Related Products. These are
all listed in a multiple list. What I need to do is have those selected
when the product was added, already be highlighted in the multiple list
on the product edit page. Here is my post from another forum.
Code:
For some reason, when I try to run the following array, I'm getting an
error:
dim cat(0)
cat(0)="0407"
cat(1)="0102"
'I will be adding more to this array, but just trying with two for
starts.
for counter = 0 to 1
itno=cat(counter)
'I get an error when it runs through this function
Function rightvar(theVar,lengthNeeded)
Dim sResult
sResult=theVar
if Len(theVar)< lengthNeeded then sResult= String(lengthNeeded -
Len(theVar)," ")& theVar
rightvar=sResult
End Function
Can someone help me understand why?
The problem is that in my 5 years of programming in various languages i have never really understood arrays (DUMB @$${lol})
What i want to do is offer an advanced search of a database table on my website. I currently offer the functionality so that the whole of the database can be viewed within the web page so that it doesn't need to be downloaded/need access to view it.
What i need to do is run a script that takes all of the column headings that i have and put them into an array. Then with the array i need to output each element into a drop down box.
Ok what I have is a little script which runs through my stock compares how many of one item we have compared to what we need and displays the out come.
What id like to do is make an array with the item name so lets say If how many is needed is greater then 0 then add the name of that consumable to an array and move on until the end.
Then I want to use the arry to display each consumable on an order form. Anyone have any idea how to do this in ASP or can give me any advice on a better way to do it?
I am doing the following:
Code:
dim n
n=4'ubound(arrsequences)
response.write "n:" & n
dim arrproductNames(n)
dim arrproductSeq(n)
and getting the following error:
Microsoft VBScript compilation error '800a0402'
Expected integer constant
process.asp, line 33
dim arrproductNames(n)
How can I add something to an array, e.g
[VBS]
Dim MyArray
MyArray = Array("Item 1", "Item 2", "Item 3")
'Do some code here
'I now want to add another item to my array, how?
[/VBS]
Is there a way of determining whether or not a value or values are present in an array.
Is there something nice and easy as with php's
if(in_array($SomeValue,$myArray)){
echo "The value is here";
}
else{
echo "The value is not here";
how to store request multiple value(Select box) in an array.
View Replies View Relatedim trying to write a script that will allow me to take names and addresses
from a coma delimetered text file and insert them into a db.
ive managed to come up with this script which deals with works well if i
only have names in the text file. ie:
bob smith, peter smith, brian smith
but now i want to do something simular with a text file formatted like so
bob smith, bob smiths address, peter smith, peter smiths address,
i think i have to use a 2 demensional array but really have no idea how to
go about it. any help appreciated. here is what i have so far. Code:
I have a form that has fields named Title1, Title2, and so on to title 12
I want to set up an array that goes through all the input feild values that I already put into variables such as Title1, Title2...so on. It then replaces ' with '' so the apostrophe can be entered into the database. So it:
Creates an array by looping through the variables that get the form feilds.
Then loops through the array and replaces the ' with '':
Title1=(Replace(Title2, "'", "''"))
I'm looking to make an admin page for a web photo gallery, and I need to make a drop down menu showing all files in a given directory that do not have comments in a database for the given filename.
I'm curious about the most efficient way to do this. I don't want to query the database separately for each file as this would be horribly inefficient. I'm thinking about two arrays, one containing all filenames in the photo directory, and one containing filenames from the database that have descriptions.
Is there a simple way in ADO to do a set operation on arrays, that is to produce array C that has all elements in array A that are not contained in array B?I can do this with while loops, but there must be a better way.
Can someone tell me how to do add a 2D array in a table
this is how my tables looks like
OrderID
Product_Code
Product_Item
Size
Color
Logo
Price
Unit
Total
How will I replace the array values from database to this javascript static array value?
Quote: var photos = new Array('Blue hills-01.jpg','Sunset-01.jpg','Water lilies-01.jpg','Winter-01.jpg');
I am editing an old mail script that uses a a sendTO array to designate who actually gets the email. I want to add a value (an email address) at the end of the array so it is sent the same mail as any mail that goes through the form(teh form has one huge dropdown list now).
I just don't know how to simply add the value to the bottom of the list
Any clues (i found some examples but there was way to much extra code that i was having trouble sifting out)?
I'm working on a project using arrays like this:
thisArray = array("value1", "value2", "value3")
It's seems to work great, but now I'm confronted with adding to that array at a later point. How can I add to an existing array?
how do you dim a 3d (?) array?
somearray(x,y) ?
I have two recordsets that I want to populate within an array.
The array will always have two columns, but the number of rows is unknown (sometimes 2 rows other times 200 rows). I'm not too familiar working with arrays.
I want populate the array using a loop. How would I define and populate the array within loop so that I don't lose values and each new set of values are populated into the array through each iteration of the loop? Code:
for i = 2 to NOD
newdate = DateAdd("d", 1, newdate)
strdate = strdate & newdate & ", "
next
MyArray = split(strdate, ", ")
I have the above code written in one of my asp pages, the date array is splitted, but how do I get the first and last date assign to a variable.....
int min = MyArray(MyArray.Length-1)
int max = MyArray(0)
I got this code from the web, however it gives me an error:
Code:
Microsoft VBScript runtime error '800a01a8'
Object required: 'MyArray'