modifying code-need some help

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ ASP Server
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - ASP, SQL books Being a beginner at ASP and SQL Im constantly looking for new resources of information that I will be able to learn from, what are some of the good books/websites that you guys use? So far I have: 1)SAMS Teach Yourself SQL in 21 days 2)ASP Programmer for the absolute programmer 3)Dreamweaver MX 2004 with asp, coldfucion and php training from the source 4)Designing with Web Standards 5)Beginning Active Server Pages 3.0 (wrox) I think all of these are great books (except for 2, it's to basic); are there any books that you thought were great/useful? -=Ben -=To email me take out the joke. *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: modifying code-need some help Tag: 292423
  - 2
    - HELP! Trying to use ASP on my local machine. I'm not a networking/IT guy, but I was put in charge of figuring out how to use ASP to tap into an Oracle db for my office. I am using a windows 2000 laptop, and I want to be able to run ASP code on my local desktop (without being plugged into a network). I need a lot of help here. I know I have to turn my computer into a webserver, but I'm not certain what I need to do with the IIS. What do I need to do in general to make my computer a webserver? In addition, I will be using a local Oracle database. So I wasn't sure what I would need to do to make that db available for querying with ASP. What is the best way to make that connection? Anyone who can point me to useful documentation would be much appreciated. Thanks! Tag: modifying code-need some help Tag: 292419
  - 3
    - How to add click function to a dynamically created Button in WebForm I am trying to create a bookstore WebApplication using c#. I can display the books (obtained from sql server) on a table in a WebForm. At the end of each row, I would like to add "add to cart" button. Therefore, I use Button bt_add = new Button(); bt_add.Text = "Add to cart"; and put it in a cell which is later placed in each table row. The Buttons display fine on the WebForm. However, I don't know how to add the Button_Click function for each of the Button I created since I don't know the total number of books in advance. Can anyone help me get "add to cart" button to work? Note: I try clicking on each Button, the WebForm page loads back to its original stage (Page_Load function) and my search result is gone. Thanks, Tag: modifying code-need some help Tag: 292417
  - 4
    - Revisiting an old friend: Set oRS = Nothing Last September, some of us engaged in a discussion of freeing resources in ASP scripts written in JScript. It can be seen here: http://tinyurl.com/2flzt I recently read Eric Lippert's article on the use of *Nothing* assignments in VB (http://blogs.msdn.com/ericlippert/archive/2004/04/28/122259.aspx) right before going out of scope, and was shocked by what he had to say, and I must say it has me curious about the implications for ASP, whether written in JScript or VBScript. Like Lippert, I have seen a lot of documentation/advice that suggests a need for such assignments, but little empirical evidence that it matters. I do not mean to suggest that *Nothing* assignments are NEVER required, I simply wonder if anyone has bothered to check if it still matters with recent generations of IIS and such common tools as ADO or CDO. Comments? -- Dave Anderson Unsolicited commercial email will be read at a cost of $500 per message. Use of this email address implies consent to these terms. Please do not contact me directly or ask me to contact you directly for assistance. If your question is worth asking, it's worth posting. Tag: modifying code-need some help Tag: 292415
  - 5
    - Do While not Statement I have two 'Do While Not' statements, that are getting information from the same recordset. If I comment out the first one I can get the results for the second one, and vice-versa. Why is this happening? Is it because it's already at the EOF? If so how do I get it back to the BOF for the 2nd 'Do While Not' statement? '---------------------------------------- 'Create an ADO recordset object Set rs_Report = Server.CreateObject("ADODB.Recordset") 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT gender, referral, youthmember, age FROM tblUsers WHERE base = '" + Replace(chosenBase, "'", "''") + "'" 'Open the recordset with the SQL query rs_Report.Open strSQL, adoCon '-----Gets the total number of male and female users intMale = 0 intFemale = 0 Do While NOT rs_Report.EOF If rs_Report("gender") = "male" then intMale = intMale + 1 Else intFemale = intFemale + 1 End If rs_Report.MoveNext() Loop '-----Figures out how they heard about the program Do While NOT rs_Report.EOF If rs_Report("referral") = "Base Paper" then intBasePaper = intBasePaper + 1 End IF rs_Report.MoveNext() Loop ---------------------------------------------- --Sample Output-- Male = 11 Female = 4 Base Paper =__ "nothing is returned here" ---------------------------------------------- Like I said before If I comment out the first do while not statement I can get the answers for the second one. If I don't it doesn't even get inside of the second do while not statement. I know I can fix it by just having a seperate SQL statement to the database and get my information seperately, but it seems like a waste of time. Thanks for any help. -=Ben -=To email me take out the joke. *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: modifying code-need some help Tag: 292407
  - 6
    - Trouble with Request.Form Plus Upload I have a form that passes variables to an asp file and then uploads a file. For some reason the request.form is not getting the info from the form. It's returning blanks. Any insight would be appreciated.... Here is the asp file <HTML> <HEAD> <TITLE>File Upload Results</TITLE> <BODY> <font color=#000000><b>Files Uploaded Status:</b></font><br><br> <% Set Upload = server.createObject("Chili.Upload.1") Upload.AllowOverwrite = True ' Generate unique names 'Upload.SizeLimit = 150000 ' Truncate files above 50KB On Error Resume Next MyArray = Split(Upload.SourceFileName, "\") FName = MyArray(UBound(MyArray)) If Upload.SourceFileExtension = ".pdf" or Upload.SourceFileExtension = ".zip" Then If Upload.FileSize< 3000000 Then UpldAllowed=True Else UpldAllowed=False End If Else UpldAllowed=False End If If Upload.SourceFileExtension = ".gif" or Upload.SourceFileExtension or ".jpg" or Upload.SourceFileExtension or ".png" Then If Upload.FileSize< 150000 Then UpldAllowed=True Else UpldAllowed=False End If Else UpldAllowed=False End If If UpldAllowed=False Then Response.Write "<font color=red><b>Your file is either of an disallowed type or is too large. Please <a href=upload.asp>try again</a></b></font><br>" Else Upload.SaveToFile(Server.mapPath("/") & "/" & "/iparttest/upload/" & FName) Response.Write "<font color=#000000><b>File: </b></font>" & Upload.SourceFileName & " <font color=#009900><b>--Size:" & Upload.FileSize &" Bytes -- </b></font> <a target=_blank href=http://www.sdotson.com/iparttest/upload/" & FName & ">Click to Test</a><br>" Response.Write "<br>Copy and paste the following to use your image/file in the forum:<br><br>" If Upload.SourceFileExtension = ".pdf" or Upload.SourceFileExtension = ".zip" then Response.Write "<b><font color=red>http://www.sdotson.com/iparttest/upload/" & FName & "</b></font>" Else Response.Write "<b><font color=red>[img]http://www.sdotson.com/iparttest/upload/" & FName & "[/img]</b></font>" End If End If Upload.Close Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "driver={MySQL};server=localhost;database=username","username","password" response.write "stuff" response.write "Description=" response.write (request.form("description")) set the variables strImageURL = "" strFilename = FName strDescription = request.form("description") strAuthor = request.form("author") strCategory = request.form("category") strIsVerified = "False" strUpdateDate = Date sql = "INSERT INTO iparts (imageurl,filename,description,author,category,isverified,updatedate) VALUES ('" & strImageURL & "','" & strFilename & "','" & strDescription & "','" & strAuthor & "','" & strCategory & "','" & strIsVerified & "','" & strUpdateDate & "')" Conn.Execute(sql) Conn.Close %> </BODY> </HTML> _____________________________________________ and here is the form: <html> <FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="addnewipart.asp"> <table border="0"> <tr> <td>iPart to Upload:</td> <td><INPUT TYPE="FILE" NAME="FILE1"></td> </tr> <tr> <td>Your Name:</td> <td><input type="text" name="author" size="50"></td> </tr> <tr> <td>Description:</td> <td><input type="text" name="description" size="50"></td> </tr> <tr> <td>Select a Category - <a href="categoryhelp.html">Help</a></td> <td> <SELECT NAME="category"> <OPTION value="hydraulics">Hydraulics <OPTION value="pneumatics">Pneumatics <OPTION value="fasteners">Fasteners <OPTION value="hardware">Hardware <OPTION value="powertransmission">Power Transmission <OPTION value="fasteners">Fasteners <OPTION value="fasteners">Fasteners </SELECT> </td> </tr> <tr> <td></td> <td><input type="submit" name="submit" value="Upload iPart"></td> </tr> </table> </form> </html> -- Sean Dotson, PE Autodesk Inventor Certified Expert http://www.sdotson.com http://www.sdotson.com/forums/ Check the Inventor FAQ for most common questions www.sdotson.com/faq.html ----------------------------------------------------------------------- Tag: modifying code-need some help Tag: 292405
  - 7
    - Help - Authentication with ASP I had to transfer an ASP Web Application (developed by another person) to a different web server. It seems to work but not completely. I have some problems with authentication: it is based on a username and a password stored in a SQL Server's table. These data are requested via basic authentication (not a IIS level but I think it is used to create the authentication window in which put username and password). The problem is that it doesn't accept username and password and, after three times, it redirect me to a page telling "You don't have rights to see this page". What could I do? Thanks a lot Lorenzo Here's the code: <% Dim attivo attivo = 0 SET UUEncode = Server.CreateObject( "Scripting.Dictionary" ) FOR i=0 TO 63 SELECT CASE i CASE 0 offset = 65 CASE 26 offset = 71 CASE 52 offset = -4 END SELECT UUEncode( CHR( i + offset) ) = i NEXT Function Decode ( TheString ) For byteGroup = 1 To Len( theString ) Step 4 numBytes = 3 groupBytes = 0 For CharCounter = 0 to 3 thisChar = Mid( theString, byteGroup + CharCounter, 1) If thisChar = "=" Then numBytes = numBytes - 1 thisByte = 0 Else thisByte = UUEncode( thisChar ) End If groupBytes = 64 * groupBytes + thisByte Next For k = 1 To numBytes Select Case k CASE 1: thisChar = groupBytes \ 65536 CASE 2: thisChar = (groupBytes And 65535) \ 256 CASE 3: thisChar = (groupBytes And 255) End Select Decode = Decode & Chr( thisChar ) Next Next End Function auth = TRIM(Request.ServerVariables("HTTP_AUTHORIZATION")) IF auth = "" THEN Response.Status = "401 Not Authorized" Response.AddHeader "WWW-Authenticate", "Basic realm=""localhost""" Response.End END IF auth = TRIM( MID( auth, 6) ) auth = Decode( auth ) authSplit = SPLIT( auth, ":" ) username = authSplit( 0 ) password = authSplit( 1 ) Set objConn=Server.CreateObject("ADODB.Connection") objConn.ConnectionString=CONNECTION objConn.Open sqlString = "SELECT username, password, codice_utente FROM " & user &"a_dati_utente WHERE username ='" & username & "' AND password='" & password & "'" Set RS = Server.CreateObject("ADODB.Recordset") RS.Open sqlString, objConn IF RS.EOF THEN Response.Status = "401 Not Authorized" Response.AddHeader "WWW-Authenticate", "Basic realm=""localhost""" RS.Close Set RS = Nothing objConn.Close Set objConn = Nothing Response.End END IF dim id_utente, id_periodico, id_numero, scaricato, codice_utente, checkLogin, us, pwd checkLogin = False us = TRIM(RS("username")) psw = TRIM(RS("password")) if (username=us And password=psw) then checkLogin = True End If If (checkLogin = False) Then Response.Status = "401 Not Authorized" 'nessun record trovato Response.AddHeader "WWW-Authenticate", "Basic realm=""localhost""" RS.Close Set RS = Nothing objConn.Close Set objConn = Nothing Response.End End If codice_utente = rs("codice_utente") RS.Close Set RS = Nothing objConn.Close Set objConn = Nothing %> Tag: modifying code-need some help Tag: 292401
  - 8
    - CDONTS HTML mails with images Hi everyone, I got a little problem while sending HTML e-mails with CDONTS. I generate my e-mail body without problems into a string variable. When I display it to the browser via a "response.write", it's OK, including images. Then I set this string variable to the CDONTS.Newmail object (body property), and I send the mail. The format settings are the following : MyCDONTSMail.BodyFormat=0 MyCDONTSMail.MailFormat=0 when I revcieve the mail, I have comments () instead of image tags... does anybody know where it could come from ? A CDONTS parameter ? a server setting ? A firewall issue ? Thanks for your help, Yan. Tag: modifying code-need some help Tag: 292398
  - 9
    - do while loop during ADODB connection Hi, I am writing a script to send customers an email copy of their shopping cart recipt. While creating the variable "mailbody" which will be plugged into my CDO.htmlbody, I need to gather some information about their order. The script does a "Do while not rs.eof" and assigns each rs(field) to a variable, which is then added to the mailbody variable. Unfortunately, when i ask for the mailbody variable later, I lose all of the information added to the variable during my loop. I've tried everything I can think of to correct this so I was hoping somebody out there would have some ideas. Is there a better way of doing this? Script is included below. Thanks, Perry ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ mailbody = mailbody & "</tr>" '$$$$$ '<problem area> '$$$$$ If Not rs.EOF Then rs.MoveFirst rs.PageSize = NrPerPage TotalPages = rs.PageCount rs.AbsolutePage = CurrentPage trow="#FCFBFF" Do while not rs.eof and Count1 < rs.PageSize emorderno=rs("orderno") emcustomer=rs("customer") emadate=rs("adate") empartno=rs("code") emqty=rs("qty") emshipcode=rs("shipcode") emusername=rs("username") emdescr=rs("description") if len(emdescr)>30 Then emdescr=Left(emdescr,30) & "..." end if mailbody = mailbody & "<tr><td bgcolor='" & trow & "'><img border='0' alt='" & txt & "' src='http://www.rubber-seal.com/cart3/img/" & emstatus & ".gif'></td>" mailbody = mailbody & "<tr><td></td></tr><td bgcolor=" & trow& ">" & emcode mailbody = mailbody & "<font color='#6699FF' title='" &emcomment& "' size='1'>" mailbody = mailbody & " " & left(comment,50) & "</font></td>" mailbody = mailbody & "<td bgcolor=" &trow& " align='center'>" &emqty& "</td>" count1=count1+1 if trow="#FCFBFF" Then trow="#FFFFFF" Else trow="#FCFBFF" End if rs.movenext loop end if rs.close '$$$$$ '</problem area> '$$$$$ Tag: modifying code-need some help Tag: 292392
  - 10
    - ASP TimeOut Hi! I'm using the following server: IIS5 Windows 2000 SP4 2 Processor Hyper thread enabled. When creating HTML files with FileSystemObject the ASP page often times out (not every time though) and gives this error: "The maximum amount of time for a script to execute was exceeded. You can change this limit by specifying a new value for the property Server.ScriptTimeout or by changing the value in the IIS administration tools" There are no loops on the ASP page. When IIS is restarted the problem disappears for a few hours then starts again. Can anyone help please? Thank you. Jenny Tag: modifying code-need some help Tag: 292389
  - 11
    - nested ifs and end ifs and elses still working on this DB :o( I have.. a query that I run, if this query is unsuccessful then another query is run on another table, it goes something like this if rs1.EOF then '1st query returns nothing response.write "nothing in this table" 'so check the other table strSQL = "SELECT * blah blah rs.Open strSQL, Conn, 1 if rs.EOF then '2nd query also returns nothing response.write "nothing in this table either" else do while not rs.EOF reg = rs("reg_num") l_read = rs("last_read") response.write blah blah end if else do while not rs1.EOF strname = rs1("user_name") response.write blah blah rs1.movenext loop end if but I get an expected statement (end if) error I'm looking at my code it it seems to conform to the correct structure if condition1 then code block1 if condition2 then codeblock2 else codeblock3 end if else codeblock4 end if should I perhaps have used elseif?? Tag: modifying code-need some help Tag: 292383
  - 12
    - ASP file in InterDev can't "Start" as VBP file in VisualBasic? so how I can test asp code as I test VB project? the function such as "start","step into",etc. all can't use when I edit asp file, InterDev can't "Start" asp file? the IE give me such a simple error report: error type: Microsoft VBScript ÔËÐÐÊ±´íÎó (0x800A01C2) /FindMerchant/search.asp,Line19 the line 19 is: rsResult=search(strKeyword) <% Set conn = Server.CreateObject("ADODB.Connection") conn.open strPath dim rsResult set rsResult = Server.Createobject("ADODB.recordset") rsResult=search(strKeyword) %> <% Function Search(keyword) 'keywordÀïµÄ¹Ø¼ü×ÖÓÃ¿Õ¸ñ·Ö¿ª Dim sqlQuest Dim keywordGroup dim rs set rs= server.createobject("ADODB.Recordset") keywordGroup = Split(keyword) '°ÑkeywordÀïµÄ¹Ø¼ü×ÖÒÔ¿Õ¸ñ×ö·Ö¸î·û×°µ½Êý×éÀï, keyword = "" '×¼±¸ÓÃÀ´×°¾´¦ÀíºóµÄkeyword Dim i For i = 0 To UBound(keywordGroup) '¸øÃ¿¸ö¹Ø¼ü×Ö¼ÓÉÏÌØÊâ·ûºÅÐÎ³ÉSQLÓï·¨ keywordGroup(i) = "'%" & keywordGroup(i) & "%'" Next For i = 0 To UBound(keywordGroup) '×éºÏ¾´¦ÀíºóµÄ¹Ø¼ü×Ö If keyword = "" Then keyword = keywordGroup(i) Else keyword = keywordGroup(i) & "and" & keyword End If Next sqlQuest = "Select Tel,Address From tableMerchant Where Commodity LIKE " & keyword rs.Open sqlQuest, conn Dim a Do While Not rs.EOF a = a & rs.Fields.Item("Tel") & rs.Fields.Item("Address") & ";" rs.MoveNext Loop rs.Close Search =rs conn.Close End Function %> I'm sorry my english is so poor, so forgive me if my word had make you uncomfortable. I'll try my best to express my question correctly Tag: modifying code-need some help Tag: 292382
  - 13
    - ASP on Linux Hi Is it possible to host ASP (not .net) to host on Linux,( hopefully yes then whats required extra on Linux). If some one know any issues related to that or any reference site hosting ASP on linux please advise. Kind Regards Fayyaz Tag: modifying code-need some help Tag: 292381
  - 14
    - IIS5.1: 404 error when ASP page is called Having previously had this working on my XP machine, I've come back after a month to find this error occuring now. In the meantime, I had installed PHP (v4.2.3) which could easily be a factor. The symptoms are that when I call an ASP page, I get a standard 404 error. However, if I dont specify a page, and a default/index page is found, it renders the page OK. I've uninstalled PHP & rebooted, but this didnt work. Any ideas? Thanks Chris Tag: modifying code-need some help Tag: 292380
  - 15
    - Calculate the difference between entries in recordset.. Hi NG, How do i calculate the difference in a recordset ? Here's what i have now... A large SQL query with a lot of joins and this : (the tables i use have a lot of data) <% DO WHILE NOT rs.EOF OR rs.BOF Response.write "<tr>" Response.write "<td width=""167"">" & rs("WXS001") & " </span></td>" Response.write "<td width=""234"">" & rs("WXS004") & " </span></td>" Response.write "<td width=""100"">" & rs("XJS004") & " </span></td>" Response.write "<td width=""167"">" & rs("XJS005") & " </span></td>" Response.write "<td width=""167"">" & rs("XHS003") & " </span></td>" Response.write "</tr>" rs.MoveNext LOOP Else rs.Close Response.write "</table>" myConn.Close set myConn=nothing end if %> I want to find the difference between 0 and rs("XJS005") and then the first rs("XJS005") and the second, then between the second and the third.. To have the interval between them... I hope you understand my point, how do i accomplish this. Regards Kenneth Johansen Tag: modifying code-need some help Tag: 292379
  - 16
    - IIS 5.1 local host error 500.100 Installing IIS and getting a strange error. . Error Type: Active Server Pages, ASP 0134 (0x80004005) The object has an invalid ProgID of 'MSWC.MyInfo'. //global.asa, line 1 This error comes after on Page not Found error after entering http://localhost I have done all the localhost not found suggestions in the localhost not found thread. I also looked up the error in the knowledge base and the Anonymous login was not checked for the localstart.asp file. I also ping 127.0.0.1 just fine. Suggestions. Tag: modifying code-need some help Tag: 292378
  - 17
    - sending email using CDO Message Hi There I have got little bit asp code to send email It was working if its hosted on windows 2000.. But it doesnt work on winows server 2003..I guess it might be problem with specifying schema..I'm using CDO Message object. Below is the code tht i m using... sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = Server.CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(sch & "sendusing") = 2 ' cdoSendUsingPort .Item(sch & "smtpserver") = "mail.neospace.net.au" .update End With Set cdoMessage = Server.CreateObject("CDO.Message") With cdoMessage Set .Configuration = cdoConfig .From = "test@mydomain.com" .To = "abc@xyz.com.au" .Subject = "subject" .HtmLBody = "message body" .Send End With Set cdoMessage = Nothing Set cdoConfig = Nothing Do i need to authorised and log in SMTP server using From id or its has different configuration problem ? Any suggestion would be appreciated Thanx dave Tag: modifying code-need some help Tag: 292377
  - 18
    - Are arrCart here is a Table? this source code form a shopping-cart, I'm confuseing on the array of "arrCart", is it a table? a multidimensional array seems like a table from the view of data structure? add a new record to a array is so simple:? arrCart(cProductid,scartItem) = lngcatalogID in ASP, the declaration of declare a multidimensioanl array is same to a variety? don't need to care about the amount of element? Dim arrCart arrCart(cProductid,scartItem) = lngcatalogID could consider that "cProductid" and "scartItem" as a field? maybe my word have confused you, wish you could know my question :-) <% '******CartAddItem dim mycolor Sub CartAddItem(id, rc) ' Return 0 if added, 4 if product does not exist ' Get from datbase and add to instorage array dim scartitem Dim arrCart Dim TotalOptionPrice Dim Optionname CartGetProduct Id, rc if rc = 0 then arrCart = Session("MyCart") scartItem = Session("cartItem") scartitem=scartitem+1 Session("cartItem")=scartitem arrCart(cProductid,scartItem) = lngcatalogID arrCart(cProductCode,scartItem) = strccode arrCart(cProductname,scartItem) = strcname If isnumeric(quantity) then arrCart(cQuantity,scartItem) = CInt(quantity) else arrCart(cQuantity,scartItem) = 1 end if arrCart(cUnitPrice,scartItem) = curCprice + TotaloptionPrice Session("MyCart")=arrCart end if end sub %> I'm sorry my english is so poor, so forgive me if my word had make you uncomfortable. I'll try my best to express my question correctly Tag: modifying code-need some help Tag: 292375
  - 19
    - creating a spreadsheet I'm creating a spreadsheet online via ASP. I have the following at the page top... <% Response.contenttype = "application/vnd.ms-excel" %> <% Response.AddHeader "Content-Disposition", "filename=FullList.xls" %> It works fine for some 60+ manufacturer listings. However, it balks on one single manufacturer. By chance, this manuf has 18,000+ records. The others, less than 10,000. Is there a limit to the number of records I can convert to XLS...? thanks! Tag: modifying code-need some help Tag: 292364
  - 20
    - Disable auto-search in listbox control I've got an asp page that populates a listbox with info from a db. The list box ends up being pretty big, so I want to be able to search it effectively. I like the method wherein the user types the letters of the word they are looking for from within the listbox and the control automatically scrolls to the item matching the chars they have typed thus far. Example: If the listbox were to contain states Alabama, Alaska, and Louisiana, when the user clicked in the listbox and typed "Ala" the box would scroll to Alabama, and when they typed an additional 's', so the typed string was "Alas", the box would scroll to Alaska. Problem: I've got javascript that does this very well, but the listbox control default search behavior overrides my javascript. So, the javascript will correctly index to Alaska when "Alas" is typed, but when the javascript function is done running, the list moves down to Louisiana, because the asp control thinks that by typing 'l' the user wants to move to the first item in the box beginning with an 'l'. Question: Can I disable the default search behavior in the control? If so, how? If not, does anyone have any thoughts on how else I might get around this problem? Thanks and regards, Ben Tag: modifying code-need some help Tag: 292361
  - 21
    - Win 2K3 IIS issue This is a multi-part message in MIME format. ------=_NextPart_000_0015_01C431F4.2ECC51E0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable My win 2K3 std box has 4 static IPs. each of them have been assigned to both the IP card and to an IIS = website. The problem I'm having, is that only the last IP will show the website = to other computers. The first three websites are only visible to the internal browser. I need to know what I am missing to get the first three IPs to show = their websites. All IPs are pingable. None of this is clustered. I have verified that no = other computer has the IP address assigned to it. There is no double assignment of IPs to websites. This was working perfectly under Windows 2000. Thx, Brian This has been posted in three places: microsoft.public.inetserver.asp.general=20 microsoft.public.inetserver.iis=20 microsoft.public.inetserver.iis.security ------=_NextPart_000_0015_01C431F4.2ECC51E0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1400" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff background=3D""> <DIV><FONT face=3DArial size=3D2>My win 2K3 std box has 4 static = IPs.<BR>each of=20 them have been assigned to both the IP card and to an IIS = website.<BR>The=20 problem I'm having, is that only the last IP will show the website to = other=20 computers.<BR>The first three websites are only visible to the internal=20 browser.<BR><BR><STRONG>I need to know what I am missing to get the = first three=20 IPs to show their websites.<BR></STRONG><BR>All IPs are pingable. None = of this=20 is clustered. I have verified that no other computer has the IP address = assigned=20 to it.<BR>There is no double assignment of IPs to websites.<BR><BR>This = was=20 working perfectly under Windows 2000.<BR></FONT></DIV> <DIV><FONT face=3DArial size=3D2>Thx,</DIV></FONT> <DIV><FONT face=3DArial size=3D2>Brian</FONT></DIV> <DIV><BR><FONT face=3DArial size=3D2>This has been posted in three=20 places:<BR>microsoft.public.inetserver.asp.general </FONT></DIV> <DIV><FONT face=3DArial size=3D2>microsoft.public.inetserver.iis = </FONT></DIV> <DIV><FONT face=3DArial=20 size=3D2>microsoft.public.inetserver.iis.security</FONT></DIV></BODY></HT= ML> ------=_NextPart_000_0015_01C431F4.2ECC51E0-- Tag: modifying code-need some help Tag: 292359
  - 22
    - Need Help stopping pages/images from being cached Is there an effective way to stop pages from being cached? I've created several websites that have dynamic content and images that are managed by a client. The images are named according to the "id" generated via an Identity column of their corresponding database record (ex: 1058.jpg). The problem occurs when the client tries to change the image. The client gets understandly confused because the old image is still displayed, due to the browser caching the image. How can I force the browser to stop caching the page/image? All of the ASP pages already have the following: <%Response.Expires = -1%> <meta http-equiv="expires" content="0"> <meta http-equiv="pragma" content="no-cache"> Any ideas? Thanks, Dan --- Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.676 / Virus Database: 438 - Release Date: 5/3/2004 Tag: modifying code-need some help Tag: 292357
  - 23
    - Visual Source Safe and Dreamweaver I've finally got a helper, so I set up VSS. My Interdev works fine, but he can't seem to use dreamweaver. The files open ok, and they save to VSS, but don't show up on the site. Is there something I'm missing? Thanks TOm B Tag: modifying code-need some help Tag: 292356
  - 24
    - Ping Another Server's IP??? I need to determine from ASP if the database server is up and running, and if it isn't ping another database server. I posted this before about a different client, and I was told to request a file from the IIS server, and if I cannot retrieve it, the server is not there. I cannot use this method due to one database box being Solaris and the other UNIX, so I need to ping. Thanks! David Lozzi Tag: modifying code-need some help Tag: 292352
  - 25
    - Form Value How do you code an input box on a form so that when a user comes back to that form it does not remember it's value. I want the user to have to key in his username and password each time he comes to the page. Don't want autocomplete to be able to remember previous contents. thanks rh Tag: modifying code-need some help Tag: 292348
- Next
  - 1
    - SQLCategoria = "Select * from Biblioteca_Categoria where Len(Codigo) = 6 order by Codigo asc" ?? Hi, Why the instruction runs ok on sql server 2000 but in access 2000 brings me the maximum size of field in the table: SQLCategoria = "Select * from Biblioteca_Categoria where Len(Codigo) = 6 order by Codigo asc" -- Thanks, Vilmar Brazão de Oliveira Tag: modifying code-need some help Tag: 292345
  - 2
    - wait 5 seconds, then redirect how can i redirect to a page, wait on that page for 5 seconds, then redirect somewhere else?? tia jt Tag: modifying code-need some help Tag: 292338
  - 3
    - Session lost with IIS Content Rating Hello, this problem is driving me nuts! I am using the Content Ratings (RSACi) for my website. The settings strictly "G" rated - No violence, sex, nudity or offensive language. I have a user who also has his "Content Advisor" turned on. For some reason, the session is lost for the user ONLY after he runs a javascript function on the page, then clicks submit. Make sense? If he clicks submit without first running any javascript , then the page submits correctly. I have no idea how to work around this. Do yo have any ideas???? This problem can easily be reproduced: 1) Set "Content Rating" to be enabled in IIS 2) Copy the code below into your own .asp page in a virtual directory. 3) Enable the "Conent Advisor" in IE 4) Open this page 5) Click the button "Add to Session Variable" a few times. This will add the letter "A" to the session variable 6) Click the link "Run any javascript function" 7) Click the button "Add to Session Variable" and notice all the A's go away, meaning the session variables are gone. Why does this happen???? Is there a work around for this? Please let me know any ideas you may have. THANK YOU IN ADVANCE FOR YOUR HELP :-) SteveS <%@ Language=VBScript %> <% Option Explicit %> <html> <body> <form name="Form1" method=post action=TestContentRating.asp> <b>Test Content Rating</b><br><br> <% response.Write("This session variable was updated this many times: " & session("testme")) session("testme") = session("testme") & "A" %> <br><br> <input type=submit value="Add to Session Variable" ID="Submit1" NAME="Submit1"> <br><br><a href="JavaScript: RunAnyJavascriptFunction()">Run any javascript function</a> <script lang=javascript> function RunAnyJavascriptFunction() { //alert("hello me"); } </script> </form> </body> </html> Tag: modifying code-need some help Tag: 292335
  - 4
    - sending multiple emails I have about 5000 emails in my database. I wrote a basic script that sends an email to all of those email addresses. Usually I have to break it up and only send 300-400 at a time so my script does not timeout. I know I can up my timeout to 45 minutes if I needed to, so that they could all be sent at once, but I do not believe that is a wise decision. Does any know of any other ways to do this more efficiently? Thanks. Tag: modifying code-need some help Tag: 292332
  - 5
    - how do I reference to an acces dtabase out side my WWW folder? on my hosting acount I have 3 folders that were set up by default: DB LOGS WWW now I understand what each if for obviously, but can i reference back to the databases location outside the www folder from a file using .../DB/database_name.mdb ? {asssuming of course the file I am referenceing from is in the main WWW folder) I just want to make surfe I get this bit right and stop any weeping wailing and gnashing of teeth lol Wayne... Tag: modifying code-need some help Tag: 292309
  - 6
    - Using IISADMPWD Virtual Directory I have been trying to get my intranet web site to automatically display the change password page when the user's password is about to expire. I have configured the IISADMPWD virtual directory according to KB 184058. Reading through the KB articles I could find, I get the idea that there is supposed to be a way for IIS to automatically notify a user when they log in that their password will expire soon, but can't seem to get this to happen. Is there some sort of IIS setting that I need to do in IIS to make this happen or am I just dreaming here? TIA Ron L Tag: modifying code-need some help Tag: 292307
  - 7
    - add up for each date Hi, I´ve the folloing code:[CODE]<% pat = Request.Form("rapport") Set vbalans = Server.CreateObject("ADODB.Connection") vbalans.Provider = "Microsoft.Jet.OLEDB.4.0" MdbFilePath = Server.MapPath("\vatskebalans\db\vbalans.mdb") vbalans.ConnectionString = "Data Source='" & MdbFilePath & "'" vbalans.open strSQL = "SELECT f.FluidNamn, f.FluidID, v.Dag, v.PatID, v.Volym, v.Energi," &_ " p.ftEnamn, p.ftFnamn FROM (tblVetskebalans v INNER JOIN tblFluids f"&_ " ON v.FluidID = f.FluidID) INNER JOIN tblPersonuppgifter p ON v.PatID = p.PatID" &_ " WHERE p.PatID = "& pat &"" Set rs1 = vbalans.Execute (strSQL) 'formatera till svensk personnummer Function SvPnr(txt) personnummer =Left(txt,6) & " - " & Right(txt,4) SvPnr = personnummer End Function Function FirstVersal(txt) versal = UCase(Left(txt,1)) & LCase(Right(txt, Len(txt)-1)) FirstVersal = versal End Function Response.Write SvPnr(rs1("PatID")) & "<BR>" Response.Write "<B>" & FirstVersal(rs1("ftEnamn")) & ", " & FirstVersal(rs1("ftFnamn")) & "</B><P><P><P>" %> <TABLE border=1> <TR> <TD><B>Datum</B></TD> <TD><B>Vätska</B></TD> <TD><B>Volym</B></TD> <TD><B>Energi</B></TD> </TR> <% v = 0 e = 0 dat = "" Do While Not rs1.EOF v = v + cint(rs1("Volym")) e = e + cint(rs1("Energi")) If dat <> CDate(rs1("Dag")) then dat = CDate(rs1("Dag")) Response.Write "<TR><TD>" & CDate(rs1("Dag"))& "</TD>" Response.Write "<TD>" & rs1("FluidNamn") & "</TD>" Response.Write "<TD>" & rs1("Volym") & "</TD>" Response.Write "<TD>" & rs1("Energi") & "</TD></TR>" Else Response.Write "<TR><TD> </TD>" Response.Write "<TD>" & rs1("FluidNamn") & "</TD>" Response.Write "<TD>" & rs1("Volym") & "</TD>" Response.Write "<TD>" & rs1("Energi") & "</TD></TR>" End If rs1.MoveNext Loop vbalans.Close Set vbalans = Nothing %> </TABLE> <BR><BR><BR> <% Response.Write "<B><U>Totala volymen är</U></B>" & ": " & v & "<BR>" Response.Write "<B><U>Totala energi är</U></B>" & ": " & e & "<BR>" [/CODE] and this give the folling printout: 111111 - 1111 Elvansson, Elvan Datum Vätska Volym Energi 2004-03-21 Blod 1000 0 Sondmat 550 275 Sondmat 550 275 Sondmat 50 35 2004-04-29 Albumin 76 0 2004-05-02 Proviva 123 0 Totala volymen är: 2849 Totala energi är: 825 But I would like the add upp for each datum: i.e 2004-03-21 totVolym= 2150 and energi = 585 Can you please help me with this code? All help we´ll be appiciated /Peter L Tag: modifying code-need some help Tag: 292302
  - 8
    - "find duplicates" sql query Hi, I want to do a query that displays duplicate records in the database based on IP address. What syntax should I use in the WHERE********** bit please? Thanks, set rsData = con.execute("SELECT formtype, entrydate, ipaddress FROM formdata WHERE ************ ORDER BY ipaddress") arData = rsData.getrows Tag: modifying code-need some help Tag: 292300
  - 9
    - Running a JavaScript function server-side How would I run a JavaScript function in a *.asp page and then pass the value returned to VBScript for further processing? ***Converting the function to VBScript is *NOT* an option. Tag: modifying code-need some help Tag: 292289
  - 10
    - Getting a ASP file name via VBScript Is there a function in VBScript that will return the name of the file that is currently being executed? Basically, I'm looking for a function that I can use in code similar to this... <% response.write "The name of this file is - " thisFile.fileName %> which will result in The name of this file is - home.asp being displayed on the page with home.asp executes. Tag: modifying code-need some help Tag: 292284
  - 11
    - Newbie needs help getting ODBC on ISP setup My first ASP site and having a horrible time getting this figured out. ASP pages work great locally but when I upload to Earthlink hosting, I get the error "Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified". I've used DWMX to set up ODBC c1onnection and am using the following include file (ConnCal.asp): <% ' FileName="Connection_ado_conn_string.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="false" ' Catalog="" ' Schema="" Dim MM_connCal_STRING MM_connCal_STRING = "dsn=connCal" %> I get the "Data Source error" error on line 9 of my ASP pages which all start as follows: 1 <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> 2  3 <% 4 Dim rs_cal 5 Dim rs_cal_numRows 6 Dim xtime,striptm,finaltime 7 8 Set rs_cal = Server.CreateObject("ADODB.Recordset") 9 rs_cal.ActiveConnection = MM_connCal_STRING 'THIS THE LINE THAT ERRORS' 10 rs_cal.Source = "SELECT * FROM events WHERE start_date >= DATE() AND 11 evt_attend <> 'Private' ORDER BY start_date, start_time" 12 rs_cal.CursorType = 0 13 rs_cal.CursorLocation = 2 14 rs_cal.LockType = 1 15 rs_cal.Open() 16 17 rs_cal_numRows = 0 18 %> etc.... I've set up the ODBC on Earthlink's site as: DSN=connCal and DataSource = '\data\noefc.mdb' Earthlink's site says "When referring to your DSN in your applications, you will need use the format UserID.DSN Name where UserID is your Control Panel User ID." How does "UserID.DSN" fit in to what I've already set up as "DSN=ConnCal"? Is it "DSN=ConnCal.DSN"? That doesn't work. I don't get it and Earthlink keeps emailing me the *SAME!* prescripted response -- "What is a DSN connection?" ARRGH!! Can anyone explain this to me? Please speak VEEERY SLOWLY! I'm just learning this stuff. Thx! Lisa Tag: modifying code-need some help Tag: 292277
  - 12
    - Flash or Text? I don't think the text file is caching. The information in the text file is called upon manually by the user of the flash movie. Odd that the variable in which the text is stored doesn't clear once the page is revisited. Flash can't permanently store the information without having Shared Objects set up. (And they are not set up) I don't understand how the text file could be cached since the user manually requests the information after the page has loaded. The text information is being loaded into a Flash variable. All commands within the Flash movie are referring to an ASP file which draws from the text file. The project is complex; so right now I'm focusing on using txt files. I'm not a database guru yet. Tag: modifying code-need some help Tag: 292268
  - 13
    - what should I purchase Hi, hey I've been given a budget of about $4-5000 and want to get ASP.net etc. I am having a problem figuring out if it is just ASP.net that I need. The things I want are web design tools that will allow me to create ASP pages and components, WML or mobile web capabilities, and XML capabilities, I also want to move from Access database to something larger, maybe SQL database, should I be considering a MSDN universal subscription or maybe the whole VisualStudio.net stuff. right now I do just basic ASP 2.0 and ASP 3.0 web sites, I want to start using alot more ASP component stuff, really kinda lost, all input is appreciated, take care -- TIA and take care, Frank Bruhn, Director Salvage Yard Web Solutions PO Box 17246 Worcester, MA 01601 508 755-8987 BS Electrical Engineering, UMass Tag: modifying code-need some help Tag: 292266
  - 14
    - domain problem in asp Hello all I have a web page which has 3 frames. The top and the left navigation frames are on a separate domain. The right display frame initially starts on the same domain as the other two frames but after the user clicks on a URL, he is redirected to another domain. In this new domain I am setting session variables and cookies. TO give a brief over view of our test environment and production environment The test environment is https://www.domainA.com/test/somepage.asp The data is initially displayed here and after the user clicks on the right frame link, he is directed to https://www.domainA.com/backendtest/somepage.asp - As mentioned earlier, the cookies and session variables are set here. As long as we are in the above structure, we are fine, the session variables get set and cookies get set. When we go into production mode is when we get into trouble The production environment is https://www.LiveSite/live/somepage.asp - this is hosted at out ISP the redirection page gets published to another sub DOMAIN within our domainA structure https://www.domainA.com/backendlive/somepage.asp - let me point out that the backendtest domain and the backendlive domain are identical sub domains within DomainA So how the data flows is the user brings up the live domain and then clicks on the right frame page which redirects him to the backend live domain while the left frame and the top frame are still in the livesite domain. As I mentioned during this process, all the session variables in the backend live domain are not being set. It sets the session variable on the initial page that I go to after clicking but beyond that any page that I navigate to, I lose all session variables and cookies while coming in from the live site. This problem does not happen when I am in the test environment Please advise Thanks in advance Tag: modifying code-need some help Tag: 292263
  - 15
    - Can Request.ServerVariables("REMOTE_ADDR") fail and....? Hi, Can Request.ServerVariables("REMOTE_ADDR") fail and catch the address of my default gateway in my local network?? What should I do? Sometimes brings 192.168.0.1(the address of my default gateway) instead the remode IP address: 200.200.15.2, 64.100.2.1, etc.... Thanks, -- Vilmar Brazão de Oliveira Tag: modifying code-need some help Tag: 292252
  - 16
    - save an HTML report... I am generating a report in HTML, that my users can look over AND if they want to, store in their own Access dbase. Thing is, I do not know how to "read" that whole html page into a var and store same in a field in Access. Can anyone point me here? Jim *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! Tag: modifying code-need some help Tag: 292249
  - 17
    - prevent counter from incrementing when someone returns I have a counter (alright one I found on asp101.com) that checks for a session variable to prevent the counter from incrmenting if a user refreshes the page or returns to the page during the same session. The problem is, it also prevents other page counters from incrementing. Here's the code for this part: ' Increment the count if Session("iCount") <> iCount then iCount = iCount + 1 Session("iCount") = iCount end if I changed iCount to another variable used within the code, and it works for allowing other page counters to increment, but also increments a page you already visited if you re-visit it and hit refresh. ' Increment the count if Session("objCountFile") <> iCount then iCount = iCount + 1 Session("objCountFile") = iCount end if The main code for the counter in on www.faerybug.com/counter.asp. I use an include statement,  to put the counter on a page. Is there something better I should use or look at (want the option of using my own graphics for the numbers), or is there a way to get this counter to increment only once per page per visit? Thanks!! -- Posted 'as is'. If there are any spelling and/or grammar mistakes, they were a direct result of my fingers and brain not being synchronized or my lack of caffeine. Mike Brearley Tag: modifying code-need some help Tag: 292247
  - 18
    - Changing Session.LCID in a hyperlink Hi all, Is it possible to change the Session.LCID in a hyperlink? My problem is I'm calling a Date from a database to use as a querystring in the hyperlink but I also need to display the date as output from the hyperlink. I need to have to querystring in Session.LCID = 1033 and the display date in Session.LCID = 2057. Coding :- Session.LCID = 1033 <a href=""applybankholiday.asp?date=" & rshelpdesk("date") & """>" & rshelpdesk("date") & "</a></font></td>") Whereever I put Session.LCID = 2057 I either get errors saying its in the wrong place or It displays false. Tried the following that gives the false. Session.LCID = 1033 <a href=""applybankholiday.asp?date=" & rshelpdesk("date") & """>" & Session.LCID = 2057 & rshelpdesk("date") & "</a></font></td>") Any ideas? Many thanks in advance, Robert Tag: modifying code-need some help Tag: 292246
  - 19
    - No cache on embedded objects I have an ASP page with the "no cache" command. I know the ASP file is not being cached. But the flash file that is embedded in the ASP page is repeatedly cached by my browser. Anyone discover a sure-fire method to prevent caching of embedded files? Tag: modifying code-need some help Tag: 292242
  - 20
    - Download a file then the next error message appear The connection with the server was reset The application is coded using ASP.net and C#. A part of the application allows the user to download files. The size of these field can be up to 80 MB. It works when the connection bandwidth is high. But in other cases, after a few minutes, the next messages is displayed: "The connection with server was reset". Here the code that I use: private void SendPageToBrowser(string filename) { // All mime type supports StringDictionary MimeTypeList = new StringDictionary(); MimeTypeList[".doc"] = "application/ms-word"; MimeTypeList[".zip"] = "application/zip"; MimeTypeList["*"] = "application/octet-stream"; FileInfo fi = new FileInfo(Server.MapPath(filename)); // Checks also that the file exists before cleaning the response // in case, it doesn't exist, an exception is raised string FileLength = fi.Length.ToString(); Response.BufferOutput=true; Response.Clear(); Response.ClearHeaders(); Response.ClearContent(); Response.ContentType = MimeTypeList[fi.Extension]; if (Response.ContentType == null) { Response.ContentType = MimeTypeList["*"]; } Response.AppendHeader("Content-Disposition","attachment;filename=" + fi.Name); Response.AppendHeader("Content-Length", FileLength); if (fi.Length < LOWER_LIMIT) { Response.WriteFile(fi.FullName ); } else { Byte[] Buffer = new Byte[CHUNKSIZE]; FileStream DLFile = fi.OpenRead(); while ((Response.IsClientConnected) && (DLFile.Read(Buffer,0,CHUNKSIZE) != 0) ) { Response.BinaryWrite(Buffer); Response.Flush(); } DLFile.Close(); } Response.End(); } What's wrong in my code or which settings of IIS I have to change? Any helps will be greatly appreciated. Olivier. Tag: modifying code-need some help Tag: 292225
  - 21
    - ASP Dsn-less connection error Can anybody figure out what I have done wrong with this file that is used to connect the database - http://i.1asphost.com/gavk/shop_laptop.asp Kind Thanks Tag: modifying code-need some help Tag: 292224
  - 22
    - Problems with dropdown list I am having a problem with the code below. When the page loads the data is pulled from the db just fine But when I try to update the dropdown list that has the onchange added to it it is now working am I leaving something out. I am lost. Thanks Carmen <SCRIPT> function UpdateSample1() { var CallTypSelect = document.forms.FrontPage_Form1.CallTyp; var SeveritySelect = document.forms.FrontPage_Form1.Severity; SeveritySelect.options.length = 0; // Clear the popup if (CallTypSelect.options[CallTypSelect.selectedIndex].value == "Question") { SeveritySelect.options[0] = new Option(" "); } else if (CallTypSelect.options[CallTypSelect.selectedIndex].value == "Other") { SeveritySelect.options[0] = new Option(" "); } else if (CallTypSelect.options[CallTypSelect.selectedIndex].value == "Problem") { SeveritySelect.options[0] = new Option("S1"); SeveritySelect.options[1] = new Option("S2"); } } </SCRIPT> <form method="POST" action="submitupdate.asp" onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript" name="FrontPage_Form1"> <td width="34%" height="22"><b> <select size="1" name="CallTyp" onchange="UpdateSample1()"> <option selected><%=RSupdate("CallTyp")%></option> <% If RSupdate("CallTyp")= "Question" then %> <option>Other</option> <option>Problem</option> <% end if %> <% if RSupdate("CallTyp")= "Other" Then %> <option>Question</option> <option>Problem</option> <% end if %> <% if RSupdate("CallTyp")= "Problem" Then %> <option>Question</option> <option>Other</option> <% End if %> </select></b></td> <td width="34%" height="22"><b> <% if RSupdate("Severity1")="S1" then sever1 ="S1" End if if RSupdate("Severity2")="S2" then sever1 ="S2" End if %> <select size="1" name="Severity"> <option selected> <%=Sever1%></option> </select></b> </td> Tag: modifying code-need some help Tag: 292215
  - 23
    - anybody could recommend me a small but functional ASP editor? I'm using EDITPLUS now, but this editor really stupid for writing and testing ASP code, I emphasize "small" is because of I'm using 32K MODEM, I can't online too long time or I'll pay much money to my ISP, thank you :-) I'm sorry my english is so poor, so forgive me if my word had make you uncomfortable. I'll try my best to express my question correctly Tag: modifying code-need some help Tag: 292202
  - 24
    - Focus For A New Form Hi all, I have a page that lists codes and when a code is clicked on, I wanted to show the full text description for the code. Response.Write("<td nowrap>" & "<a href=""/scripts/codedescription.asp?lcode=" & oRS.fields("jspcde") & " "" target=""tu"" onclick=""var tu=window.open('','tu',config='height=360,width=350,location=0,menubar=0,too lbar=0,resizable=0,status=0,scrollbars=1');tu.moveTo(410,120)""><font color=""#0000cc"">" & oRS.fields("jspcde") & "</font></a>" & "</td>") I have a function in my UTILITY.ASP: function openWin(doc) var tu=window.open(doc,"tu",config="height=360,width=350,location=0,menubar=0,to olbar=0,resizable=0,status=0,scrollbars=1") end function It works fine the first time, but if I click on the main form again, the "pop-up" form foes behind the main form. Is there a way to keep bringing out the second form each time? Somehting like a FOCUS or ONTOP command? Thanks in advance, George Tag: modifying code-need some help Tag: 292199
  - 25
    - Datediff Problem I am having some difficulties with the function Datediff! I am trying to calculate the number of days between two given date E.G: Number days between 03-05-2004 and 05-05-2004 = I am using the following piece of asp to extract dates from an XML document and work with them to create the above mentioned result, however I can't get it to work Can someone please assist! Thank ...::XML Exampl <Project><ProjectID>1</ProjectID><Tasks><Task><TaskID>1</TaskID><Start></Start><Finish></Finish></Task><Task><TaskID>2</TaskID><Start></Start><Finish></Finish></Task></Tasks></Project ..:: AS < 'Load XM set xml = Server.CreateObject("Microsoft.XMLDOM" xml.async = fals xml.load(Server.MapPath("ProjectTEST.xml") 'Load XS set xsl = Server.CreateObject("Microsoft.XMLDOM" xsl.async = fals xsl.load(Server.MapPath("GantChartView.xsl") 'Finds Start date in all Tasks in xml documen Dim sNodes(200,100 Dim sDate(200,100 Dim sTime(200,100 Dim sMonth(200,100 Dim sDay(200,100 Dim fdw(200,100 node=- var=- set oNodes=xml.selectNodes("/Project/Tasks/Task/Start" for each oNode in oNode node=node+ for i=0 to 9 sNodes(node,i) = oNode.tex nex ' Write whole data and time for Start of task as seen in XML Documen 'Break up date into different variable var=var+ for i=0 to 9 sTemp = sNodes( node,0 sDate( var,i ) = Mid( sTemp, 1, 10 sTime( var,i ) = Mid( sTemp, 13, 4 sMonth( var,i ) = Mid( sTemp, 6, 2 sDay( var,i ) = Mid( sTemp, 9, 2 next response.write "sDay " & (sDay(var,0)) & "<br> 'End Break up dates into variable 'Converts dates to beginning of week (Sunday today = DateValue(sDate(var,0)) var=var+ for i=0 to 9 firstday = today + 1 - weekday(today, 1 fdw (var,i) = firstday nex FirstDayWeek = fdw (var,0 response.Write(fdw(var,0) response.write(DateDiff("D", sDate(var,0), fdw(var,0)) next Tag: modifying code-need some help Tag: 292186

I am modifying someone else's code and need help with an array:

Can someone explain to me what this is doing?

PedArray = Split(T_ped,CHR(13))
I know this is creating an array and splitting the t_ped text at the
CHR(13).

What is this next step?
Sire_1 = Trim(mid(PedArray(5),21,52-21))
Is that "Look at the 5th split", starting at character 21? What is the
52-21?

If t_ped =*Nasrullah 40 Bold Ruler 54 Boldnesian 63 Miss Disco 44 Polynesian
42 Alanesian 54 Bold Reasoning Alablue 45 (1968) *Turn-To 51 Hail To Reason
58

Sire 1 is being displayed as Alanesian5

IS that correct?

--
Joey Martin, President
Infosmiths
www.infosmiths.net
502-633-3428

Top

Re: modifying code-need some help by Joey

Joey
Wed May 05 14:54:17 CDT 2004

Nevermind....I figured it out once I read over what I wrote. It is the 5th
line.

Thanks
"Joey Martin" <mart3939@bellsouth.net> wrote in message
news:lBbmc.74308$7a5.72922@bignews6.bellsouth.net...
> I am modifying someone else's code and need help with an array:
>
> Can someone explain to me what this is doing?
>
> PedArray = Split(T_ped,CHR(13))
> I know this is creating an array and splitting the t_ped text at the
> CHR(13).
>
> What is this next step?
> Sire_1 = Trim(mid(PedArray(5),21,52-21))
> Is that "Look at the 5th split", starting at character 21? What is the
> 52-21?
>
> If t_ped =*Nasrullah 40 Bold Ruler 54 Boldnesian 63 Miss Disco 44
Polynesian
> 42 Alanesian 54 Bold Reasoning Alablue 45 (1968) *Turn-To 51 Hail To
Reason
> 58
>
> Sire 1 is being displayed as Alanesian5
>
> IS that correct?
>
>
>
> --
> Joey Martin, President
> Infosmiths
> www.infosmiths.net
> 502-633-3428
>
>
>

Top

Re: modifying code-need some help by Phill

Phill
Thu May 06 06:50:21 CDT 2004

"Joey Martin" <mart3939@bellsouth.net> wrote in message
news:lBbmc.74308$7a5.72922@bignews6.bellsouth.net...
> Can someone explain to me what this is doing?
. . .
> What is this next step?
> Sire_1 = Trim(mid(PedArray(5),21,52-21))
> Is that "Look at the 5th split", starting at character 21?

Split() /always/ returns a zero-based array, so you're actually
looking at the *sixth* line, here, not the fifth.

> What is the 52-21?

Believe it or not, it's simply the value 31.
Possibly left by the original Developer to show a relationship
between, say, the "record" size and the position of this particular
"field".

HTH,
Phill W.

Top