Unicode Character Problem

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
 - HELP.. ERROR: Unable to relay for user@mail.com Can someone please help!! This is driving me nuts... I keep getting the following error when I run the send mail script below. I think it might be because I don't have the smtp server configurered properly or because I have to make a change on our exchange server??? We are running IIS 5 on Win2K server and using Microsoft Exchange Server 5.5 can someone please tell me how I solve this! Thanks Error: Email send failed: The server rejected one or more recipient addresses. The server response was: 550 5.7.1 Unable to relay for user@mail.com <% mailComp = "CDOSYS" smtpServer = "SMTP01" fromAddr = "user@mail.com" if mailComp = "CDOSYS" then set cdoMessage = Server.CreateObject("CDO.Message") set cdoConfig = Server.CreateObject("CDO.Configuration") cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer cdoConfig.Fields.Update set cdoMessage.Configuration = cdoConfig cdoMessage.From = fromAddr cdoMessage.ReplyTo = replyTo cdoMessage.To = recipients cdoMessage.Subject = subject cdoMessage.HtmlBody = body on error resume next cdoMessage.Send if Err.Number <> 0 then SendMail = "Email send failed: " & Err.Description & "." end if set cdoMessage = Nothing set cdoConfig = Nothing exit function end if %> Tag: Unicode Character Problem Tag: 295506
 - 2
 - how to check user account and password in another domain controller? By using <authentication mode="Forms" > in web.config, we can create self-designed login page, but how to check user's account and password is vaild in another domain controller? Does <authentication mode="Windows"> can have self-designed login page? Tag: Unicode Character Problem Tag: 295505
 - 3
 - cannot find .net framework directory: system error &H80131700& Hi Guys, I have installed Visual Studio.Net on my windows XP machine. First after installing all the required WCU, then installed the Visual Studio.Net. All set up was completed successfully. then when i try to create a Web Application i get the error "project 'ABC' could not be opened because the microsoft visual basic .net compiler could not be created. please re-install visual studio" So i uninstall the entire setup and reinstall it again. Now i get the error: "project 'webapplication4' could not be opened because the microsoft visual basic .net compiler could not be created. cannot find .net framework directory: system error &H80131700&" Can you please assist with this and let me know how i need to proceed further for a successful installation of Visual Studio.Net 2003. Appreciate your help on this! Thanks, Vamsi. Tag: Unicode Character Problem Tag: 295504
 - 4
 - Simple Insert into Table? Can anyone give me some simple sample code to insert a value from a session variable into a table in a SQL DB. I am using Dreamweaver MX04 and this works fine with their built in procedures, but I need to modify one to do dual inserts and I am not knowledgeable enough to modify the code. Tag: Unicode Character Problem Tag: 295503
 - 5
 - Pages are not refreshed on client machines Hi all I have a web site where I use cookies to navigate between the pages. The cookie is his id no which is nothing but his staff id no. All most all pages are dynamic and connected to sql server 2000 through ADOs. My problem is : if any one logs in and enter bowse the pages and goes back uses other log in his old page is displaced rather than new one, untill he explicity uses the refresh button. Once he does that , it is working. Iam using javascript menus to navigate between pages.Previously when menus are not there pages were working fine. Now I would like to to see that the cached pages expire after he comes out of page . how to do that. Thank u so much in advance R.D.CHETTY Tag: Unicode Character Problem Tag: 295499
 - 6
 - Is it possible to change the request order of fields on a form? For an auto-generated form I have the following order of fields: savevalues userid productcode PrintColour1_1 Colour1_1 Quantity_1 " " " " " " " " PrintColour1_5 Colour1_5 Quantity_5 I was hoping to get them from the request object by rows, but they come out as the following (example values included): savevalues = yes userid = 4029 productcode = 46BN PrintColour1_1 = Black PrintColour1_2 = PrintColour1_3 = PrintColour1_4 = PrintColour1_5 = Colour1_1 = Red Colour1_2 = Colour1_3 = Colour1_4 = Colour1_5 = Quantity_1 = 5 Quantity_2 = Quantity_3 = Quantity_4 = Quantity_5 = Is there any way of changing this order as I think it may make it easier to process the fields (which can change according to what the original form fields are.) Thanks. -- GIT Groupie : http://gitgroupie.timchuma.com The Twits Give Me the Shits : http://twitsgivemetheshits.timchuma.com My Photos : http://photos.timchuma.com Hong Kong Movie Reviews: http://hkmovies.timchuma.com Tag: Unicode Character Problem Tag: 295488
 - 7
 - ASP and session object (get type) I would like to be able to get the type of object that a session variable contains (for example, determine whether it is a string, integer, single precision floating point, ADODB.Recordset, etc...) I need to know this for a ASP <----> ASP.NET session management script I am writing. I would like to be able just to copy strings and numbers. I already have code that does this, but I don't want my script to blow up when it finds a recordset in the session object! Is there any easy way to detect the object type in ASP? Tag: Unicode Character Problem Tag: 295477
 - 8
 - session variable inconsistency Hi, I am experiencing a problem with recalling a session variable which stores whether a person is logged in to a "members only" section of a website. This area of the site has been working flawlessly for a couple of years under Windows 2000 server but now is very inconsistent following a recent upgrade to Windows server 2003. Following a login, the login info is passed to this asp page that checks an Access database for the user name and password: SET DbObject = Server.CreateObject ("ADODB.Connection") DbObject.Open "DSN=pseudoCAP1;UID=;PWD=" set rs = server.createobject("adodb.recordset") SET Rs = DbObject.Execute (SQL) If Rs.EOF Then Session("Authenticated") = 0 Response.Redirect ("unsuccessfulLogin.htm") Else Session("Authenticated") = 1 Session("user") = Request.Form("username") End If rs.close set rs = nothing DbObject.Close set DbObject = nothing response.redirect "main.asp" If a correct password and username is provided, the user is always forwarded to the main.asp member start page. I included a snippet of code while troubleshooting to print the value of the authentication session variable in the browser window to see if it was set (1=logged in, 0= not logged in). However about 50% of the time, the following error occurs with our access database and Authentication session variable is output as = 0: ADODB.Field error '800a0bcd' Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record. C:\INETPUB\WWWROOT\SUBMISSIONS\../include/functions.inc, line 4 The way that this page is written though, even if the record was not present (although it is when I open the database), the authentication should still be set to 1. Refreshing the main.asp page will often eliminate the ADODB error above and the session variable value of 1 will be returned. The rest of the time, authentication is OK and a value of 1 is output. However when the user goes to another page requiring authentication, they are redirected back to the login.html page because the authentication variable is once again set as zero! Could this be an IIS 6.0 specific problem (I do have session state enabled at default value of 20 min) ?? Or could there be some permissions problem related to a specific file (I have checked the database as well as the related files and they all seem OK)? Thanks, Geoff Tag: Unicode Character Problem Tag: 295476
 - 9
 - Corrupt files when using SSL download and ASP 3 My company has a web application for downloading and uploading of reports in MS Office formats. The application has been working fine until we added certificate for secure transfer. Now, when the files have been uploaded and then downloaded, I get an alert saying "select the encoding that makes your document readable". In the preview box, a line of ASP code (a line with a file include) is displayed and there after alot of squares and other unreadable characters. I am using the SA File-up components for upload and download of files. Any ideas? This was working file until SSL was added. Cheers, Jens. Tag: Unicode Character Problem Tag: 295474
 - 10
 - website is down because of ASP code Our web site sometime down with unknown reasons, someone can help me? I checked application log in event viewer: 1.Error: File confirmation.asp CreateObject Exception. The CreateObject of '(null)' caused exception C0000094. (But I didn't use ADO recordset session variable) 2.Error: File confirmation.asp Unexpected error. A trappable error (C000001E) occurred in an external object. The script cannot continue running.. (But I checked VBScript.dll version it is above 5.1, it is 5.6, it should not have formatnumber race condition problem) any clue? Thanks Betty Tag: Unicode Character Problem Tag: 295472
 - 11
 - SQL Query Causing Inifinate Output When I change the "aplink.withdrawn" to include a new field with a similar name "aplinks.pwithdrawn,aplinks.awithdrawn", the output in the web page is blank and un-ending. When I test this query against the Foxpro database, it works correctly. 'Good Query sql2="SELECT DISTINCT aplinks.partyno,attorney.*,aplinks.party_type,aplinks.partyname,aplinks. withdrawn FROM attorney,aplinks WHERE attorney.dktno LIKE '%" & case_no & "%' AND aplinks.dktno LIKE '%" & case_no & "%' AND attorney.attyno=aplinks.attyno ORDER BY aplinks.partyname ASC, aplinks.party_type ASC, attorney.principal DESC" ' NEW Query sql2="SELECT DISTINCT aplinks.partyno,attorney.*,aplinks.party_type,aplinks.partyname,aplinks. pwithdrawn,aplinks.awithdrawn FROM attorney,aplinks WHERE attorney.dktno LIKE '%" & case_no & "%' AND aplinks.dktno LIKE '%" & case_no & "%' AND attorney.attyno=aplinks.attyno ORDER BY aplinks.partyname ASC, aplinks.party_type ASC, attorney.principal DESC" *** Sent via Devdex http://www.devdex.com *** Don't just participate in USENET...get rewarded for it! Tag: Unicode Character Problem Tag: 295471
 - 12
 - ASP's not opening Our ASP's stopped opening, and we gewt the error, page not found. Any ideas? Tag: Unicode Character Problem Tag: 295469
 - 13
 - Can I share Session variables across Applications? In one Application (2) the client is redirected to a Logon ASP in a = different Application (1). A Session Variable is made in Application 2 = which needs to be recognized in Application 1. Can I do that in Windows = 2000 SP3 IIS5 no .NET Framework? Thanks. --=20 George Hester __________________________________ Tag: Unicode Character Problem Tag: 295467
 - 14
 - ASP Security I am trying to prevent users from submitting HTML pages from their local machine to our website and I was wondering what the best way of doing this was. I was thinking about using the HTTP_REFERER server variable (to check where the user has submitted a page from) as a blanket fix however when you use the javascript document.location on a page the HTTP_REFERER is always blank, which makes that a flawed fix. I have seen other sites protect against this, so I know it can be done. Whats the best way. Thanks for listening. Tag: Unicode Character Problem Tag: 295465
 - 15
 - OpenTextFile never return Hi, I cannot use the OpenTextFile method, it's never return and I get no error message! Setting Response.Buffer=False, has no effect. No matter if I use it ForReading or ForWriting, it never return. In the following code, the problem occurs at line 3. aFileName = Server.MapPath("WEB_PROD.htm") set fs = server.CreateObject("Scripting.FileSystemObject") set fso = fs.OpenTextFile(aFileName, ForReading, False) s = ts.ReadAll ts.Close set ts = nothing Response.Write s any help will be appreciate. thank you in advance serge Tag: Unicode Character Problem Tag: 295463
 - 16
 - CreateObject in ASP page limit? I've made an ASP page that use a VB6 ActiveX EXE with a CreateObject. Initially, this page work fine. The objectâ??s reference created with the CreateObject are saved on a session variable for reuse it on many page. When many users call this page and many instance of the ActiveX EXE Object are created, the CreateObject command fails with a 429 error (ActiveX component can't create object). The class (in ActiveX EXE) are MultiUse, then only a single EXE are running. Terminating the EXE with Task Manager then the CreateObject will get to work again. There is a limit of use with Objects created? Any idea? Tag: Unicode Character Problem Tag: 295458
 - 17
 - Delete images from listview Hi, I have a program that capture images and put this into a listview (using imagelist), the problem is when I delete de image the listview, when do that and capture another image, the image painting in the listview is the image delete, I supose that the problem is that the image exist in the imagelist, in order to solve this problem I clear the imagelist and add all the images captured, but i have another problem now, some time when I delete a image, when do IO.File.Delete(gstrPathImage & "\" & lstrFile) say that the file is be using with another process. The code is: Private Sub cmdDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdDelete.Click Dim lIndexes As ListView.SelectedIndexCollection = ListViewImages.SelectedIndices Dim liIndex As Integer Dim lstrFile As String Dim liNumSelect As Integer = lIndexes.Count Dim i, j As Integer Dim lstrFiles(liNumSelect - 1) As String Dim lstrFilesRemove() As String Dim lstrFileRemove As String Dim liIndexRemove As Integer i = 0 For Each liIndex In lIndexes lstrFiles(i) = ListViewImages.Items(liIndex).Text i = i + 1 Next For i = 0 To lstrFiles.Length - 1 For j = 0 To ListViewImages.Items.Count If lstrFiles(i) = ListViewImages.Items(j).Text Then lstrFile = ListViewImages.Items(j).Text ListViewImages.Items(j).Remove() IO.File.Delete(gstrPathImages & "\" & lstrFile) IO.File.Delete(gstrPathImages & "\" & Microsoft.VisualBasic.Left(lstrFile, Len(lstrFile) - 4) & ".raw") ImageList.Images.Clear() liIndexRemove = 0 lstrFilesRemove = IO.Directory.GetFiles(gstrPathImages, "*.BMP") Dim lImage As System.Drawing.Image For Each lstrFileRemove In lstrFilesRemove lImage = lImage.FromFile(lstrFileRemove) ImageList.Images.Add(lImage) liIndexRemove = liIndexRemove + 1 Next lImage.Dispose() lImage = Nothing Exit For End If Next Next end sub Anybody know that is the problem?? Thanks Silvia Tag: Unicode Character Problem Tag: 295456
 - 18
 - Russian in ASP pages? Hi all, I would like to create a site which shows text in English or in Russian (depending on the user's choice). Problem is that I can't save the pages in Unicode (Unicode can contain Russian characters), because IIS can't handle Unicode ASP pages (correct, right?!). So how can I have normal (ASCII) ASP pages, which can show either text in English or Russian (charset Windows-1251)??? Thanks! Greetings, Steven Tag: Unicode Character Problem Tag: 295453
 - 19
 - adding values from a submitted form HI There, I am trying to total the value of some form fields I am referecing the form field with an inner loop, I am having a little trouble because the amount of fields returned is always different, how can I roll-up the total of the form fields (request.form("subtotal_"& i)) to get one final figure? Sean - Thanks in advance for your answer for i = 1 to Request.Form.Count if request.form("quantity_"& i) <> "" AND request.form("quantity_"& i) <> "0" then !-- inner loop dim j dim thetotalof for j = 1 to request.form("subtotal_"& i).count thetotalof = request.form("subtotal_"& i) response.Write thetotalof next !-- finish inner loop thecounter = thecounter + 1 response.Write "<tr><td>" & trim(stripQuotes(request.form("productid_"& i))) & "<input type=hidden name=productid_" & thecounter & " value='" & trim(stripQuotes(request.form("productid_"& i))) & "'></td><td>" & trim(stripQuotes(request.form("quantity_"& i))) & "<input type='hidden' name=quantity_" & thecounter & " value='" & trim(stripQuotes(request.form("quantity_"& i))) & "'></td><td>" & Application ("defaultcurrency") & " " & FormatNumberVal(trim(stripQuotes(request.form("subtotal_"& i)))) & "<input type='hidden' name=subtotal_" & thecounter & " value='" & trim(stripQuotes(request.form("subtotal_"& i))) & "'></td></tr>" end if next Tag: Unicode Character Problem Tag: 295450
 - 20
 - ASP problem with includes When I use an include file like this   my server gives an error of : Active Server Pages error 'ASP 0131' Disallowed Parent Path /test/module/VieBoard/main.asp, line 1 The Include file '..\..\cfig.asp' cannot contain '..' to indicate the parent directory. Tag: Unicode Character Problem Tag: 295444
 - 21
 - Reading Form values into a Scripting.Dictionary I have been trying to read values from a form into an array on a page without much success and was told to use a Scripting.Dictionary instead. There are a variable number of fields on the form as it is different according to which product is ordered (as are the fields that are used to create the record.) This is my first attempt: set OrderInfo = Server.CreateObject("scripting.dictionary") set OrderInfo("prodid") = Server.CreateObject("scripting.dictionary") set OrderInfo("userid") = Server.CreateObject("scripting.dictionary") OrderInfo("prodid") = lngProductID OrderInfo("userid") = lngUID For each x in Request.Form set OrderInfo("prodid")("userid")(x) = Server.CreateObject ("scripting.dictionary") OrderInfo("prodid")("userid")(x) = Request.Form(x) Next For each x in OrderInfo("prodid")("userid") Response.Write x & " = " & OrderInfo("prodid")("userid")(x) & " " & vbcrlf Next Thanks. -- GIT Groupie : http://gitgroupie.timchuma.com The Twits Give Me the Shits : http://twitsgivemetheshits.timchuma.com My Photos : http://photos.timchuma.com Hong Kong Movie Reviews: http://hkmovies.timchuma.com Tag: Unicode Character Problem Tag: 295443
 - 22
 - HTTP 500.100 I don't know anymore Hi I really don't know anymore how to solve this problem. I bought .NET thinking i can debug my way out of it but still no cigar. This very simple piece of code does not work: Now here some things before looking at the code: 1. In .NET and IE and IIS I've set all possible debugging options 2. I've set a watch at the beginning of this page, so that when .NET enters this page I can step the program 3. If I have the line: set test = cnn.Execute("INSERT INTO comments ('ghj', 'comment', 67)) in this code then .NET does not even let me step throught the program. It just immediatly give the error below. 4. If I have the line: cnn.Execute("INSERT INTO comments ('ghj', 'comment', 67)) in this code then .NET does not even let me step throught the program. It just immediatly give the error below. 5. I know I should not use c:\events.mdb but this was only a test. 6. with the cnn.Execute line ommited, the thing steps through the code but ofcourse does not work. 7. I know I can use the long way getting the data in the database, but damit I want to do it this way! <code> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <title>myweb</title> </head> <body> <% Dim cnn Dim strDBPath dim test Set cnn = Server.CreateObject("ADODB.Connection") strDBPath = "c:\events.mdb" cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";" cnn.Open set test = cnn.Execute("INSERT INTO comments ('ghj', 'comment', 67)) %> </body> </html> I get the error: The page cannot be displayed There is a problem with the page you are trying to reach and it cannot be displayed. -------------------------------------------------------------------------- Please try the following: a.. Click the Refresh button, or try again later. b.. Open the localhost home page, and then look for links to the information you want. HTTP 500.100 - Internal Server Error - ASP error Internet Information Services If anyone can help me here I'd really be a happier guy. Tag: Unicode Character Problem Tag: 295442
 - 23
 - ASP Login Script not working This is a multi-part message in MIME format. ------=_NextPart_000_000C_01C45720.984E6120 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Applies to: Microsoft FrontPage 2000, Microsoft Access 2000, IIS 5.0 Operating System: Microsoft Windows 2000 Professional I am trying to protect a portion of a web site by allowing users to = register a username and password & then login with those details, but so = far I am having only marginal success. I am far from an expert on ASP = programming, indeed the code I am using comes from "Sams Teach Yourself = E-Commerce Programming with ASP" but it is ideally suited for my = purpose. In short, there are 3 .asp pages (register.asp, login.asp & = checkpassword.asp - the code for each is below), a global.asa file was = automatically created and by following the instructions in the book, I = also created a small Access database called UserDB.mdb, which stores the = username & password of each user when they register & also verify's = those details when the user attempts to login again. The DNS connection has been setup within FrontPage and I have verified = that this connection works by clicking "Tools", "Web Settings" & the = "Database" tab, highlighting the DNS connection & clicking Verify.=20 The problems seem to occur when I try to register a new username & = password, for some strange reason the details I enter are not being = saved in the database table, and to compound the problem further, if I = register just a username, or a password but not both, the page simply = refreshes itself with empty boxes instead of giving an error message to = indicate that a "username" or "password" must be entered, which if I = have read the code correctly on the "checkpassword.asp" page, should = happen. To further confuse the situation, if I manually enter a username & = password into the database table and then attempt to click a hyperlink = taking me to a "test.asp" page, with the INCLUDE FILE: , I am automatically taken to the = login.asp, where if I enter the username & password that I manually put = into the database table, it takes me to the selected "Protected" web = page. In my mind that clearly shows the DNS connection is working but = yet it won't store new registered details into the database table, which = is extremely confusing. If anyone can see what I may be doing wrong, or point me in the right = direction, your help & advice will be greatly appreciated. As I pointed = out earlier I am far from an expert, so any help you can give would be = ideally suited towards a newbie mentality. Below is the code for the three .asp pages: Many thanks in advance Wayne Smith register.asp <% nextPage =3D Request( "nextPage" ) newUsername =3D Request( "newUsername" ) newPassword =3D Request( "newPassword" ) %> <HTML> <HEAD><TITLE>Register"</TITLE></HEAD> <BODY> Register at this Web site by selecting a username and password: <FORM METHOD=3D"post" ACTION=3D"<%=3DnextPage%>"> <INPUT NAME=3D"newUser" TYPE=3D"hidden" VALUE=3D"1"> USERNAME: <INPUT NAME=3D"newUsername" SIZE=3D20 MAXLENGTH=3D"20"=20 VALUE=3D"<%=3DServer.HTMLEncode( newUsername )%>"> PASSWORD: <INPUT NAME=3D"newPassword" SIZE=3D20 MAXLENGTH=3D"20"=20 VALUE=3D"<%=3DServer.HTMLEncode( newPassword )%>"> <INPUT TYPE=3D"submit" VALUE=3D"Register!"> </FORM> </BODY> </HTML> -------------------------------------------------------------------------= --------- login.asp <HTML> <HEAD><TITLE>Login</TITLE></HEAD> <BODY> <%=3DloginMessage%> <FORM METHOD=3D"post" ACTION=3D"<%=3DnextPage%>"> USERNAME: <INPUT NAME=3D"username" SIZE=3D20 MAXLENGTH=3D"20"=20 VALUE=3D"<%=3DServer.HTMLEncode( username )%>"> PASSWORD: <INPUT NAME=3D"password" SIZE=3D20 MAXLENGTH=3D"20"=20 VALUE=3D"<%=3DServer.HTMLEncode( password )%>"> <INPUT NAME=3D"addCookie" TYPE=3D"Checkbox" VALUE=3D"1"> Remember me = with a cookie <INPUT TYPE=3D"submit" VALUE=3D"Login"> </FORM> <a href=3D"register.asp?nextpage=3D<%Server.URLEncode( nextpage )%>"> Click here to register</a> </BODY> </HTML> ------------------------------------------------------------- checkpassword.asp <% CONST useSession =3D TRUE ' Retrieve Form Variables username =3D TRIM( Request( "username" ) ) password =3D TRIM( Request( "password" ) ) newUser =3D TRIM( Request( "newUser" ) ) newUsername =3D TRIM( Request( "newUsername" ) ) newPassword =3D TRIM( Request( "newPassword" ) ) addCookie =3D TRIM( Request( "addCookie" ) ) ' Retrieve Current Page nextPage =3D Request.ServerVariables( "SCRIPT_NAME" ) ' Ready Database Connection Set Con =3D Server.CreateObject( "ADODB.Connection" ) Con.Open "userDNS" ' Add New User IF newUser <> "" THEN IF newUsername =3D "" THEN showError "You must enter a username" END IF IF newPassword =3D "" THEN showError "You must enter a password" END IF IF usernameTaken( newUsername ) THEN showError "The username you entered has already " &_ "been chosen by a previous user. Please select " &_ "a new username" END IF sqlString =3D "INSERT INTO userlist ( user_username, user_password ) " = &_ "VALUES ('" & newUsername & "','" & newPassword & "')" Con.Execute sqlString username =3D newUsername password =3D newPassword IF useSession THEN Session( "loggedIn" ) =3D "Yes" END IF ' Authenticate User IF Session( "loggedIn" ) =3D "" THEN=20 IF username =3D "" OR password =3D "" THEN loginMessage =3D "You must login before you can view this page." showLogin END IF result =3D validateLogin( username, password ) IF result =3D 1 THEN loginMessage =3D "You entered an unregistered username." showLogin END IF IF result =3D 2 THEN loginMessage =3D "You did not enter a valid password." showLogin END IF IF useSession THEN Session( "loggedIn" ) =3D "Yes" END IF ' Add a Cookie IF addCookie <> "" THEN Response.Cookies( "username" ) =3D username Response.Cookies( "username" ).Expires =3D "12/25/2037" Response.Cookies( "password" ) =3D password Response.Cookies( "password" ).Expires =3D "12/25/2037" END IF ' Create Security Query String Variable sq =3D "username=3D" & Server.HTMLEncode( username ) & "&" sq =3D sq & "password=3D" & Server.HTMLEncode( password )=20 ' Create Security Form Variable sf =3D "<input name=3D""username"" type=3D""hidden"" " sf =3D sf & "value=3D""" & Server.HTMLEncode( username ) & """>" sf =3D sf & "<input name=3D""password"" type=3D""hidden"" " sf =3D sf & "value=3D""" & Server.HTMLEncode( password ) & """>" ' Check Username and Password FUNCTION validateLogin( theUsername, thePassword ) sqlString =3D "SELECT user_password FROM userlist " &_ "WHERE user_username=3D'" & fixQuotes( username ) & "'"=20 Set RS =3D Con.Execute( sqlString ) IF RS.EOF THEN validateLogin =3D 1 ELSE IF RS( "user_password" ) <> thePassword THEN validateLogin =3D 2 ELSE validateLogin =3D 0 END IF END IF END FUNCTION ' Check Whether Username Already Taken FUNCTION usernameTaken( theUsername ) sqlString =3D "SELECT user_id FROM userlist " &_ "WHERE user_username=3D'" & fixQuotes( theUsername ) & "'" Set RS =3D Con.Execute( sqlString ) IF RS.EOF THEN usernameTaken =3D FALSE ELSE usernameTaken =3D TRUE END IF RS.Close Set RS =3D Nothing END FUNCTION ' Show Error Page SUB showError( theError ) %> <HTML> <HEAD><TITLE>Problem</TITLE></HEAD> <BODY> There was a problem with your registration information <%=3DtheError %> <FORM METHOD=3D"POST" ACTION=3D"register.asp"> <INPUT NAME=3D"nextpage" TYPE=3D"hidden" VALUE=3D"<%=3Dnextpage%>"> <INPUT NAME=3D"newUsername" TYPE=3D"hidden" VALUE=3D"<%=3DServer.HTMLEncode( newUsername )%>"> <INPUT NAME=3D"newPassword" TYPE=3D"hidden" VALUE=3D"<%=3DServer.HTMLEncode( newPassword )%>"> <INPUT TYPE=3D"SUBMIT" VALUE=3D"Continue"> </FORM> </BODY> </HTML> <% Response.End END SUB ' Show the Login Page SUB showLogin %>  <% Response.End END SUB FUNCTION fixQuotes( theString ) fixQuotes =3D REPLACE( theString, "'", "''" ) END FUNCTION %> ------=_NextPart_000_000C_01C45720.984E6120 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> <DIV> <DIV>Applies to: Microsoft FrontPage 2000, Microsoft = Access 2000,=20 IIS 5.0</DIV> <DIV>Operating System: Microsoft Windows 2000=20 Professional</DIV> <DIV> </DIV> <DIV>I am trying to protect a portion of a web site by = allowing=20 users to register a username and password & then login with those = details,=20 but so far I am having only marginal success. I am far from an expert on = ASP=20 programming, indeed the code I am using comes from "Sams Teach Yourself=20 E-Commerce Programming with ASP" but it is ideally suited for my=20 purpose.</DIV> <DIV> </DIV> <DIV>In short, there are 3 .asp pages (register.asp, = login.asp=20 & checkpassword.asp - the code for each is below), a global.asa file = was=20 automatically created and by following the instructions in the book, I = also=20 created a small Access database called UserDB.mdb, which stores the = username=20 & password of each user when they register & also verify's those = details=20 when the user attempts to login again.</DIV> <DIV> </DIV> <DIV>The DNS connection has been setup within FrontPage = and I have=20 verified that this connection works by clicking "Tools", "Web Settings" = &=20 the "Database" tab, highlighting the DNS connection & clicking = Verify.=20 </DIV> <DIV> </DIV> <DIV>The problems seem to occur when I try to register a = new=20 username & password, for some strange reason the details I enter are = not=20 being saved in the database table, and to compound the problem further, = if I=20 register just a username, or a password but not both, the page simply = refreshes=20 itself with empty boxes instead of giving an error message to indicate = that a=20 "username" or "password" must be entered, which if I have read the code=20 correctly on the "checkpassword.asp" page, should happen.</DIV> <DIV> </DIV> <DIV>To further confuse the situation, if I manually = enter a=20 username & password into the database table and then attempt to = click a=20 hyperlink taking me to a "test.asp" page, with the INCLUDE FILE: , I am automatically taken to = the=20 login.asp, where if I enter the username & password that I manually = put into=20 the database table, it takes me to the selected "Protected" web page. In = my mind=20 that clearly shows the DNS connection is working but yet it won't store = new=20 registered details into the database table, which is extremely=20 confusing.</DIV> <DIV> </DIV> <DIV>If anyone can see what I may be doing wrong, or = point me in=20 the right direction, your help & advice will be greatly appreciated. = As I=20 pointed out earlier I am far from an expert, so any help you can give = would be=20 ideally suited towards a newbie mentality.</DIV> <DIV> </DIV> <DIV>Below is the code for the three .asp = pages:</DIV> <DIV> </DIV> <DIV>Many thanks in advance</DIV> <DIV>Wayne Smith</DIV> <DIV> </DIV> <DIV> </DIV> <DIV> </DIV> <DIV>register.asp</DIV> <DIV> </DIV> <DIV><%</DIV> <DIV> nextPage =3D Request( "nextPage" ) newUsername =3D Request( "newUsername" ) newPassword =3D Request( "newPassword" ) %> <HTML> <HEAD><TITLE><FONT=20 size=3D2>Register"<FONT=20 size=3D2></TITLE></HEAD> <BODY> Register at this Web site by selecting a username and=20 password: <FORM METHOD=3D"post"<FONT=20 color=3D#0000c0> ACTION=3D"<FONT=20 color=3D#800000><%=3DnextPage%>"<FONT=20 size=3D2>> <INPUT NAME=3D"newUser"<FONT=20 color=3D#0000c0> TYPE=3D"hidden"=20 VALUE=3D"1"> <FONT=20 size=3D2>USERNAME: <INPUT NAME=3D"newUsername"<FONT=20 color=3D#0000c0> SIZE=3D20=20 MAXLENGTH=3D"20" = VALUE=3D"<FONT=20 color=3D#800000><%=3DServer.HTMLEncode( newUsername = )%>"<FONT=20 color=3D#0000c0>> <FONT=20 size=3D2>PASSWORD: <INPUT NAME=3D"newPassword"<FONT=20 color=3D#0000c0> SIZE=3D20=20 MAXLENGTH=3D"20" = VALUE=3D"<FONT=20 color=3D#800000><%=3DServer.HTMLEncode( newPassword = )%>"<FONT=20 color=3D#0000c0>> <INPUT TYPE=3D"submit"<FONT=20 color=3D#0000c0> VALUE=3D"Register!"<FONT=20 size=3D2>> </FORM> </BODY> </HTML> <FONT=20 size=3D2>----------------------------------------------------------------= ------------------ login.asp <HTML></DIV> <DIV> <HEAD><TITLE><FONT=20 size=3D2>Login<FONT=20 size=3D2></TITLE></HEAD> <BODY> <%=3DloginMessage%> <FORM METHOD=3D"post"<FONT=20 color=3D#0000c0> ACTION=3D"<FONT=20 color=3D#800000><%=3DnextPage%>"<FONT=20 size=3D2>> <FONT=20 size=3D2>USERNAME: <INPUT NAME=3D"username"<FONT=20 color=3D#0000c0> SIZE=3D20=20 MAXLENGTH=3D"20" = VALUE=3D"<FONT=20 color=3D#800000><%=3DServer.HTMLEncode( username = )%>"<FONT=20 color=3D#0000c0>> <FONT=20 size=3D2>PASSWORD: <INPUT NAME=3D"password"<FONT=20 color=3D#0000c0> SIZE=3D20=20 MAXLENGTH=3D"20" = VALUE=3D"<FONT=20 color=3D#800000><%=3DServer.HTMLEncode( password = )%>"<FONT=20 color=3D#0000c0>> <INPUT NAME=3D<FONT=20 size=3D2>"addCookie" TYPE=3D"Checkbox" VALUE=3D"1"> = Remember me with=20 a cookie <INPUT TYPE=3D"submit"<FONT=20 color=3D#0000c0> VALUE=3D"Login"<FONT=20 size=3D2>> </FORM> <a href=3D<FONT=20 size=3D2>"register.asp?nextpage=3D<%Server.URLEncode(=20 nextpage )%>"> Click here to register<FONT=20 color=3D#0000c0></a> </BODY> </HTML> <FONT=20 size=3D2>-------------------------------------------------------------</F= ONT> checkpassword.asp <% CONST useSession =3D TRUE ' Retrieve Form Variables username =3D TRIM( Request( "username" ) ) password =3D TRIM( Request( "password" ) ) newUser =3D TRIM( Request( "newUser" ) ) newUsername =3D TRIM( Request( "newUsername" ) = ) newPassword =3D TRIM( Request( "newPassword" ) = ) addCookie =3D TRIM( Request( "addCookie" ) = ) ' Retrieve Current Page nextPage =3D Request.ServerVariables( "SCRIPT_NAME" = ) ' Ready Database Connection Set Con =3D Server.CreateObject( "ADODB.Connection" = ) Con.Open "userDNS" ' Add New User IF newUser <> "" THEN IF newUsername =3D "" THEN showError "You must enter a username" END IF IF newPassword =3D "" THEN showError "You must enter a password" END IF IF usernameTaken( newUsername ) THEN showError "The username you entered has already "=20 &_ "been chosen by a previous user. Please select "=20 &_ "a new username" END IF sqlString =3D "INSERT INTO userlist ( user_username, = user_password=20 ) " &_ "VALUES ('" & newUsername & "','" & = newPassword=20 & "')" Con.Execute sqlString username =3D newUsername password =3D newPassword IF useSession THEN Session( "loggedIn" ) =3D = "Yes" END IF ' Authenticate User IF Session( "loggedIn" ) =3D "" THEN IF username =3D "" OR password =3D "" THEN loginMessage =3D "You must login before you can view = this=20 page." showLogin END IF result =3D validateLogin( username, password = ) IF result =3D 1 THEN loginMessage =3D "You entered an unregistered=20 username." showLogin END IF IF result =3D 2 THEN loginMessage =3D "You did not enter a valid = password." showLogin END IF IF useSession THEN Session( "loggedIn" ) =3D = "Yes" END IF ' Add a Cookie IF addCookie <> "" THEN Response.Cookies( "username" ) =3D username Response.Cookies( "username" ).Expires =3D = "12/25/2037" Response.Cookies( "password" ) =3D password Response.Cookies( "password" ).Expires =3D = "12/25/2037" END IF ' Create Security Query String Variable sq =3D "username=3D" & Server.HTMLEncode( username = ) &=20 "&" sq =3D sq & "password=3D" & Server.HTMLEncode( = password )=20 ' Create Security Form Variable sf =3D "<input name=3D""username"" = type=3D""hidden"" " sf =3D sf & "value=3D""" & Server.HTMLEncode( = username )=20 & """>" sf =3D sf & "<input name=3D""password"" = type=3D""hidden""=20 " sf =3D sf & "value=3D""" & Server.HTMLEncode( = password )=20 & """>" ' Check Username and Password FUNCTION validateLogin( theUsername, thePassword = ) sqlString =3D "SELECT user_password FROM userlist "=20 &_ "WHERE user_username=3D'" & fixQuotes( username ) = & "'"=20 Set RS =3D Con.Execute( sqlString ) IF RS.EOF THEN validateLogin =3D 1 ELSE IF RS( "user_password" ) <> thePassword = THEN validateLogin =3D 2 ELSE validateLogin =3D 0 END IF END IF END FUNCTION   ' Check Whether Username Already Taken FUNCTION usernameTaken( theUsername ) sqlString =3D "SELECT user_id FROM userlist " = &_ "WHERE user_username=3D'" & fixQuotes( theUsername = ) &=20 "'" Set RS =3D Con.Execute( sqlString ) IF RS.EOF THEN usernameTaken =3D FALSE ELSE usernameTaken =3D TRUE END IF RS.Close Set RS =3D Nothing END FUNCTION ' Show Error Page SUB showError( theError ) %> <HTML> <HEAD><TITLE>Problem<FONT=20 color=3D#0000c0></TITLE></HEAD> <BODY> There was a = problem with=20 your registration information <FONT=20 color=3D#800000><%=3DtheError %> <FORM = METHOD=3D"POST"<FONT=20 color=3D#0000c0> ACTION=3D"register.asp"<FONT=20 color=3D#0000c0>> <INPUT = NAME=3D"nextpage"<FONT=20 color=3D#0000c0> TYPE=3D"hidden" VALUE=3D<FONT=20 color=3D#000000>"<%=3Dnextpage%><FONT=20 color=3D#000000>"> <INPUT = NAME=3D"newUsername"<FONT=20 color=3D#0000c0> TYPE=3D"hidden" VALUE=3D<FONT=20 color=3D#000000>"<%=3DServer.HTMLEncode( = newUsername=20 )%>"<FONT=20 color=3D#0000c0>> <INPUT = NAME=3D"newPassword"<FONT=20 color=3D#0000c0> TYPE=3D"hidden" VALUE=3D<FONT=20 color=3D#000000>"<%=3DServer.HTMLEncode( = newPassword=20 )%>"<FONT=20 color=3D#0000c0>> <INPUT = TYPE=3D"SUBMIT"<FONT=20 color=3D#0000c0> VALUE=3D"Continue"> </FORM> </BODY> </HTML> <% Response.End END SUB ' Show the Login Page SUB showLogin %>  <% Response.End END SUB FUNCTION fixQuotes( theString ) fixQuotes =3D REPLACE( theString, "'", "''" = ) END FUNCTION %></DIV></DIV></BODY></HTML> ------=_NextPart_000_000C_01C45720.984E6120-- Tag: Unicode Character Problem Tag: 295440
 - 24
 - Tricky question !!! logging file access A tricky question: I have a file i my local web sever IIS which can be accessed through the internet, how do i develope a log file to know who accessed the file and when?? is it also possible to write a script that detects when the file is accessed and send an e mail to a certain recepient (ex me) about the ip addresss and time when the file was accessed? Thanks Ammar Tag: Unicode Character Problem Tag: 295437
 - 25
 - aspSmartupload problem Hi All, > Hi experts, > > I am trying to build a page that allows file uploading from a browser > My ISP where the page will be located, only supports Smartupload > I am testing on a small hubbed local network, with PWS > Any help is appreciated. > --------------------- > 'rqstupl.asp contents > > > ><HTML> > ><BODY BGCOLOR="white"> > ><FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="txtupl.asp"> > ><INPUT TYPE="FILE" NAME="FILE1" SIZE="50"> > ><INPUT TYPE="SUBMIT" VALUE="Upload"> > ></FORM> > ></BODY> > ></HTML> > ------------- > input in form = usblog.txt > ------------- > 'txtupl.asp contents > <% > response.write "txtupl " > Dim myUpload 'declare the component > Dim intCount ' count the number of uploaded files > Dim File 'declare the file to upload > dim item, fic, i > intCount=0 'initialize the counter > > ' error management > 'On Error Resume Next > > 'component creation > Set myUpload = Server.CreateObject("aspSmartUpload.SmartUpload") > > 'limit the file size to 50 Kb > myUpload.MaxFileSize = 50000 > > ' limit the file extensions to pictures files > myUpload.allowedFilesList="txt" > > 'Select files on the user computer > myUpload.Upload > > Response.Write("Number of files =" & myUpload.Files.count&" ") > > ' checking all the files > For each file In myUpload.Files > Response.Write("Name =" & File.FileName&" ") > Response.Write("Size =" & File.Size&" ") > ' presence test > If not File.IsMissing then > ' ---------------here sits the trouble > ' > response.write (Server.MapPath("database/msgs/") & "\" & file.FileName) > file.SaveAs (Server.MapPath("database/msgs/") & "\" & file.FileName) > ' ----------------------------- > ' > If Err.Number=0 then > direction="saved" > Else > direction="error: " & Err.description > End if > > end if > Next > > Set myUpload=nothing > > ' error management > > ' redirect to the result display > Response.write direction > %> > ------------------ > 'response output screen > > txtupl > Number of files =1 > Name =usblog.txt > Size =89 > D:\Inetpub\wwwroot\database\msgs\usblog.txt > saved > > ----------- > I have been trying to modify the "save" line to any construction to no avail. > I can access all the properties of "file." > I have no error responses or script aborts. > Asp handling works, vbscript and jscript works > The destination folder is writable > I have another asp testing page that creates and modifies a file in that folder. > > --------- The one thing that doesn't work: there is no file created! -------------- > > I am using Win98SE, PWS installed, testing application input from a second PC, locally hubbed. > What am I missing? > > Thanks in advance I have uploaded these asp files to the ISP server and there it works perfect.. So it has to be some configuration quirk on local PWS The regsvr32 d:\inetpub\aspSmartUpload.dll has passed without errors The aspSmartUploadUtil.dll sits in c:\windows, %path% settings include c:\windows; I have searched aspSmartupload site for more info, I cant see anything relevant Why doesn't this upload thing work ??? Any help strongly appreciated -- Replies in the same thread please Windows 98 links to solutions http://jake98.no-ip.info Best Regards Jake Tag: Unicode Character Problem Tag: 295435
- Next
 - 1
 - Can if statements be used in global.asa? When using "if then" statements in global, I get the following error: a.. Error Type: (0x8002802B) Element not found. //global.asa, line 12 Can I use if then statements in global? Here is the statement: if request.ServerVariables("HTTP_HOST") = "localhost" then Application("question") = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID='********';'Password='***********';Initial Catalog='******';Data Source=localhost" else Application("question") = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID='**********';Password='**********';Initial Catalog='*****';Data Source=<remote-host>" end if -- Kind Regards Rudi Ahlers +27 (82) 926 1689 Greater love has no one than this, that he lay down his life for his friends (John 15:13). Tag: Unicode Character Problem Tag: 295430
 - 2
 - ASPX and form loading. Dear Anyone, If this is not the appropriate place to as an ASPX question, please point to the correct location. If it is the right place then, how can I open a second web form after the user clicks a button on the first form. The project is in C# and ASPX. James Lattanzio Tag: Unicode Character Problem Tag: 295427
 - 3
 - ASP to Access DB Hi I have a very simple script that seems to work OK inserting into an Access table from a CSV file. The problem I have is that the first column (stored as text) has student ID numbers - some start with 100... others start with a character like K or M. It inserts the 100... IDs but not the rest. Anyone any ideas? Here is the code: set objConn= Server.CreateObject("ADODB.Connection") strDBPath = Server.MapPath("../DB/Live.mdb") objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";" Dim csv_path csv_path = Server.MapPath("./Uploads") & "\" SQL = "SELECT * INTO Learner FROM [Learner2.csv] IN """ & csv_path & """ ""TEXT;""" SQL = "INSERT INTO Learner SELECT * FROM [Learner2.csv] IN """ & csv_path & """ ""TEXT;""" 'Executing the SQL Statement ObjConn.Execute SQL Hope someone has the answer. CJA Tag: Unicode Character Problem Tag: 295424
 - 4
 - newbie - Automaticaly Posting I want to take the post data from a form, validate it etc and then post it out to another page.(on a different site) Is there a way in vbscript to post a form automatically i.e the ASP-server posts the data to another server rather than browser e.g user completes form & submits via post Process data & validate Server Posts data to 3rd party page Thanks in advance J Tag: Unicode Character Problem Tag: 295420
 - 5
 - post form data to a modal dialog window with desired height and width I want to post the form data (http://server/page1.asp) to a modal dialog window (http://server/modaldialog.asp) with a desired height 200px by width 200px. Here's my attempts and problems: Attempt #1) In http://server/page1.asp, it has code <form action="http://server/modaldialog.asp" method="post" target="_blank"> In http://server/modaldialog.asp, it has code <body onBlur = "self.focus()"> It can produce modal dialog window modaldialog.asp, but I want to set the width and height of modaldialog.asp. Attempt #2) var sReturn = window.showModalDialog("modaldialog.asp", params, "dialogHeight:200px; dialogWidth:200px;"); This is the effect I want. But this is not posting the form data to modaldialog.asp. Any workarounds to my problems?? Thanks!! Tag: Unicode Character Problem Tag: 295416
 - 6
 - Algotithm for "FIND A DEALER NEW YOU" I am trying to write one. Are there any tools that I need to use to write it?(may be mapPoint?) I think that there are two ways to write the appication: 1. Having database of all my dealers, each with latitude and longtitude. When the customer eneters his zip code, then I need to calculate how many dealers are in that area. I am trying to find some hints or script. 2. Having database of all my dealers. One table will have the dealers, the other table will have zip codes that each dealer service (some zipcodes have more than one dealer that service them, some dealers have many zipcodes that they service). Then when the customer enters his zipcode, i will use a query to find all dealers that service this zipcode? Which approach is prefers? Joe Tag: Unicode Character Problem Tag: 295411
 - 7
 - Help with scripting dictionary ? Dim MyMsg Set MyMsg = server.createObject("Scripting.Dictionary") MyMsg.Add "KeyVal1", "My Message1" MyMsg.Add "KeyVal2", "My Message2" MyMsg.Add "KeyVal3", "My Message3" for i = 1 To MyMsg.Count Response.Write(MyMsg.Item(i)) next What am I doing wrong here? If I test with Response.Write(i) it will print : 1 2 3 Thanks in Advance -- / Sean the Mc / "I have not failed. I've just found 10,000 ways that won't work." - Thomas Alva Edison (1847-1931) Tag: Unicode Character Problem Tag: 295403
 - 8
 - ADSI Authentication Problem in ASP Hi, I've one system in which Active directory is installed. That system is the domain controller as well as web server - A test machine. Trying all following to Authenticate Users using VB as well as ASP. I need ASP solution (and no component required etcc..). Things seems to work fine but stuck badly from past two days. Trying to get it done with IADSUser.ChangePassword, thats throwing error on password policy. So....that way of authenticating is not being considered though I modified the security policies to satisify the program to function. Sub AuthenticateUser() ' VB . Project References : Active DS Type Librabry, ADO ' "Courtesy URL : http://builder.com.com/5100-6388-1045387- 2.html" Dim oRootDSE As IADs Dim oDSObj As IADsOpenDSObject Dim oAuth As IADsContainer Dim oUser As IADsUser Dim strUsername As String, strNamingContext As String, strPassword As String, strUserADSPath As String Dim blnUserExists As Boolean Dim adoConnection As New ADODB.Connection Dim adoRecordset As New ADODB.Recordset Dim strServerName As String 'test.com : Active directory domain on my system which is AD domain controller too! strServerName = "my-system-name.test.com:389/" strUsername = "test-user-name" '<somedomain>\test-user- name : domain name is not necessary strPassword = "test-password" Set oRootDSE = GetObject("LDAP://" & strServerName & "RootDSE") strNamingContext = strServerName & oRootDSE.Get ("defaultNamingContext") Set oRootDSE = Nothing strUserADSPath = "" blnUserExists = False adoConnection.Provider = "ADSDSOObject" Set adoRecordset = adoConnection.Execute("<LDAP://" & strNamingContext & ">;(sAMAccountName=" & strUsername & ");AdsPath, cn") If adoRecordset.RecordCount = 0 Then Debug.Print Now() & " - User Name " & strUsername & " not exists in the directory." Else Debug.Print Now() & " - User Name " & strUsername & " exists in the directory." strUserADSPath = adoRecordset.Fields ("ADSPATH").Value blnUserExists = True End If adoRecordset.Close Set adoRecordset = Nothing adoConnection.Close Set adoConnection = Nothing If Not blnUserExists Then Exit Sub Set oUser = GetObject(strUserADSPath) Debug.Print "Account Disabled = " & oUser.AccountDisabled ' FYI If disabled = true then exit sub Set oDSObj = GetObject("LDAP:") Set oAuth = oDSObj.OpenDSObject("LDAP://" & strNamingContext, strUsername, strPassword, ADS_SECURE_AUTHENTICATION) ' THIS LINE IS THE CULPRIT LINE THAT IS WORKING FINE IN VB BUT FAILING WHEN THE SAME CODE TAKEN TO ASP WITH APPRIOPRIATE CONSTANT VALUES SET e.g.,ADS_SECURE_AUTHENTICATION ' WHAT IS THAT REASON THAT IS MAKING IT FAIL????? PLEASE LET ME KNOW ASAP?? THE ERROR NUMBER : -2147016662 is being returned always for ASP If Not oAuth Is Nothing Then MsgBox "Authentication Success", vbInformation Set oAuth = Nothing End If Exit Sub Err_Hnd: MsgBox Err.Description, vbCritical, Err.Number End Sub ' Equivalent ASP Code Sub AuthenticateUser(strUsername, strPassword) on error resume next ADS_SECURE_AUTHENTICATION = 1 ADS_SERVER_BIND = 512 strServerName = "my-system- name.test.com:389/" strUsername = "test-user- name" '<somedomain>\test-user-name : domain name is not necessary strPassword = "test-password" Set oRootDSE = GetObject("LDAP://" & strServerName & "RootDSE") strNamingContext = strServerName & oRootDSE.Get("defaultNamingContext") Set oRootDSE = Nothing Response.Write " strNamingContext = " & strNamingContext strUserADSPath = "" blnUserExists = False set oADOConn = Server.CreateObject ("ADODB.CONNECTION") set oADORs = Server.CreateObject ("ADODB.Recordset") oADOConn.Provider = "ADSDSOObject" oADOConn.Open Set oADORs = oADOConn.Execute("<LDAP://" & strNamingContext & ">;(sAMAccountName=" & strUsername & ");AdsPath, cn") If oADORs.RecordCount = 0 Then Response.Write " " & Now() & " - User Name " & strUsername & " not exists in the active directory." Else Response.Write " " & Now() & " - User Name " & strUsername & " exists in the active directory." strUserADSPath = oADORs.Fields ("ADSPATH").Value blnUserExists = True End If oADORs.Close Set oADORs = Nothing oADOConn.Close Set oADOConn = Nothing If Not blnUserExists Then Exit Sub Set oUser = GetObject(strUserADSPath) Response.Write " Account Disabled = " & oUser.AccountDisabled Set oDSObj = GetObject("LDAP:") Set oAuth = oDSObj.OpenDSObject("LDAP://" & strNamingContext, strUsername, strPassword, ADS_SECURE_AUTHENTICATION + ADS_SERVER_BIND) ' THIS LINE IS THE CULPRIT LINE THAT IS WORKING FINE IN VB BUT FAILING WHEN THE SAME CODE TAKEN TO ASP WITH APPRIOPRIATE CONSTANT VALUES SET e.g.,ADS_SECURE_AUTHENTICATION ' WHAT IS THAT REASON THAT IS MAKING IT FAIL????? PLEASE LET ME KNOW ASAP?? THE ERROR NUMBER : -2147016662 is being returned always for ASP if err.number <> 0 then Response.Write " Authentication Failed with Error Number = " & err.number exit sub end if If Not oAuth Is Nothing Then Response.Write " Authentication Success" Set oAuth = Nothing End If End sub Suggestions please! Thanks in advance! Regards Srinivas Tag: Unicode Character Problem Tag: 295393
 - 9
 - how to change date format? Hi, Within ASP, the date is given in a format like: 6/23/2004 (independantely of the regional settings of windows). I would like to have e.g. 23/06/04. Is this possible ? Thanks Andre Tag: Unicode Character Problem Tag: 295390
 - 10
 - Whats the most secure way of password protecting pages? Ive seen a few examples of how to password protect my pages by either textfiles / access. But how can I make the pages so that no one can just enter the url and bypass the login page. Im trying to create a shop site and im trying to create a maintenance page that only I have access to so that I can look at my database status without having to open the database directly. I need these pages to be completley locked from anyone but me. Cheers. Tag: Unicode Character Problem Tag: 295385
 - 11
 - Filesize limitations using cdoSendUsingPickup, cdoSendUsingPort Just migrating some code from CDONTS to CDO and noticed some behaviour I want to verify. When using cdoSendUsingPickup the outgoing email spools to the local filesystem first before being routed out. When using cdoSendUsingPort it goes directly to the remote email server and seems to bypass the virtual SMTP server running on the local machine (which can be stopped). This is all fine. I noticed that sending emails that exceed the maximum filesize limitation set in the SMTP server properties pages only seems to trigger an error when using port, not pickup. Is this expected? Cheers, Alan Tag: Unicode Character Problem Tag: 295375
 - 12
 - list box should display underneath menu window Hi, I am trying to create a menu for asp.net page. The menu-detail list display, when mouse hovers over the main menu list, like you see in regular windows apps. When the detail-menu-list window displays, it goes 'behind' combo box (sent to back). For other controls, like textbox, it is fine. Can some explain, how can I send the list box (<asp:listbox>) to become the underneath and not display on top? Alwin S. Tag: Unicode Character Problem Tag: 295373
 - 13
 - SQL Query based on Session Variable I have a SQL DB with a number of tables and queries (views) in. In front of this is my ASP app I am designing. When my users log in, their User ID is stored in a session variable. One of the views determines which User ID can access which records, and obviously then I want to base all my app around this so that a user can only ever be working on data relevant to them. Is there any way of using a variable in my SQL View outside of DWMX so that once my users log in, the SQL View is automatically filtered based on their User ID in the session variable? Is there a way of inserting a variable/parameter into SQL so this happens? Tag: Unicode Character Problem Tag: 295367
 - 14
 - Regular Expression question I'm trying to work out a reg.exp. that will pick out a sql statement against a certain set of tables - in this case any table named "Survey~something~", but I only want to pull back those statements where the CompanyID column doesn't appear in the query. (The expression is being used in my editor so it might appear a little strange, but by and large it works the same as you'd expect.) [^']select(.){0,100}from(.){0,100}Survey(.){0,25}where(.){0,200} What do I need to add so that I get those without a companyid column? Something like... [^']select(.){0,100}from(.){0,100}Survey(.){0,25}where(.){0,200}(^companyid) (tried this one, but it doesn't work) Thanks! - Wm -- William Morris Product Development, Seritas LLC Kansas City, Missouri Tag: Unicode Character Problem Tag: 295366
 - 15
 - Custom 404 Page I notice that when you have the defualt setup of 404 error pages the IIS 5.0 log tracks the page the user was trying to get to and the page they where at when they tryed to get to the now missing page. I recently wrote my own 404 error page to make it match my site but when I set IIS to use my custom page it no longer traks the page that the user was trying to get. I was told I needed to add some code to my page to fix this, but I don't know what code to add. Can someone tell me? (I am useing ASP on the custom 404 error page) I am returning a 404 error response, everything works fine it is just that IIS does not log what page the user was trying to get to. Tag: Unicode Character Problem Tag: 295363
 - 16
 - ASP Calendars & IIS Greetings all, I wish to include an ASP calendar that connects to a back-end MS Access database on a web page, to be run from my computer (running WinXP Pro, with IIS5). I have downloaded a free calendar that fits the description from the internet, and followed the install proceedures included in the documentation, however when I enable the web site, and navigate to the folder where the calendar is, instead of loading "default.asp" (the default document for the folder) IIS returns an "HTTP 500, Internal Server" error. I have been unable to find a way around this - does anyone have any ideas on what Im doing wrong, or what I need to do to correct it? Regards Andi Tag: Unicode Character Problem Tag: 295355
 - 17
 - ASP Components Needed I'm currently developing a website for my company. I would like to provide list server functionality to the site, if possible. We have a third party mail service, so I can easily POP and SMTP. Does anyone know of any nice and reasonably priced list servers for ASP? I'd also like to know if anyone knows of any good event calendar components for display a small calendar on web page and listing events that are upcoming. Having an admin page would be great too. Yes, I could write both of these... but I need an Admin page and trying to minimize my development time. Thank you. Tag: Unicode Character Problem Tag: 295350
 - 18
 - Duplicate web site for testing I have a fairly complicated web site with multiple sub-folders running on W2k server (IIS5?). I would like to duplicate this to another web site on the same server for testing. For instance, the current root web of the server is located at F:\Web. The production site is F:\Web\MyApp. I want to create another site at F:\Web\MyAppTest. The only thing that prevents me from just copying everything from one to the other is the links and includes of the pages, such as:  <link REL="stylesheet" TYPE="text/css" HREF="/MyApp/Shared/Style/Style.css"> I then need to go thru every source file, and change /MyApp to /MyAppTest. Is there a way to accomplish this via IIS, or by changing the way I reference the includes and link? tia, Bob M.. Tag: Unicode Character Problem Tag: 295345
 - 19
 - ASP Question (Newbie) Many sites that I have been to (that are written in ASP) just show http://www.mysite.com/default.asp in the address bar. I will navigate around their site and go from page to page and the address does not change. I right click on the page and select properties and the URL is the same as above. My question is...How do they do that? I need to develop an ASP intranet, for my company , and I would like to program it so that the user cannot see what page they are on and any querystrings. Any help is appreciated. Thanks, Jerry Tag: Unicode Character Problem Tag: 295344
 - 20
 - Global.asa Hello there: My Golbal.asa file isn't firing or working, I put it in the root= directory whereall my asp files, my web diectory is set as= application, I looked throught the internet for similar problem= but I am still unable to get it to work. I tried to show= application variable in asp file by using response.Write= Application("start") and nothing is showing on the browser. I am running IIS on windows 2000 Any help is much appreciated. Here is my golbal.asa file: <SCRIPT LANGUAGE=3D"VBScript" RUNAT=3D"Server">' I do this because= you can't use Server.MapPath ' in Session_OnEnd... you'll have to modify this ' to reflect the appropriate path on your server. Const strLogFilePath =3D "C:\MyFolderName\session.log" Sub Application_OnStart Application("Start") =3D Now() End Sub Sub Session_OnStart Session.Timeout =3D 5 Session("Start") =3D Now() Dim objFSO, objFile Set objFSO =3D Server.CreateObject("Scripting.FileSystemObject") Set objFile =3D objFSO.OpenTextFile(strLogFilePath, 8, True) Set objFSO =3D Nothing objFile.WriteLine "Session: " & Session.SessionID & " started at= " & Now () objFile.Close Set objFile =3D Nothing End Sub Sub Session_OnEnd Dim objFSO, objFile Set objFSO =3D Server.CreateObject("Scripting.FileSystemObject") Set objFile =3D objFSO.OpenTextFile(strLogFilePath, 8, True) Set objFSO =3D Nothing objFile.WriteLine "Session: " & Session.SessionID & " ended at "= & Now () objFile.Close Set objFile =3D Nothing End Sub Sub Application_OnEnd End Sub </SCRIPT> Tag: Unicode Character Problem Tag: 295342
 - 21
 - Server.ScriptTimeout Does this need to be stated in each asp page or does it hold for the entire session? thanks. Tag: Unicode Character Problem Tag: 295336
 - 22
 - Recieving mail/ASP OK guys, Thanks to your help, I could finally send ASP mails with attachements... A very strange question: When I looked through all the sites you gave me and through Google, I got the impression that everyone was trying to send e-mail through ASP, but no one wrote something about building a page to RECIEVE an e-mail through a POP server or anything else.... can it be done? Ammar Tag: Unicode Character Problem Tag: 295334
 - 23
 - INSERT multiple records from checkbox form with unique ids I have an .asp page with a form to copy job responsibilites form one job to another. It is a hotmail type interface with checkboxes besides each responsibility. After submitting, it should copy the selected resp's to a different job. After that it should renumber that job's responsibilities. This is the code I am using now to copy: copySQL4 = "INSERT INTO jambue.RESP(POSCODE,IDCODE1,IDCODE2,RESP_NUM,RESP) SELECT '" & id & "' POSCODE,'" & dept & "' IDCODE1,'" & unit & "' IDCODE2, '999' RESP_NUM, RESP FROM jambue.RESP WHERE (POSCODE = '" & POSCODE & "' AND IDCODE1 = '" & sourceDept & "' AND IDCODE2 = '" & sourceUnit & "') AND RESP_NUM IN (" & Request.Form("chk") & ")" As you can see the value '999' is hardcoded in there as the new Responsibility Number to go with the copied responsibility. I use this because there are no jobs with that many responsibilities. This works fine if I only select one resp. to copy over. But if I select more than one that part still runs fine but I get an error with the below. It says too many rows would be affected. Of course, this must be because there are now at least 2 responsibilites with the same RESP_NUM. renumber using this: strSQL = "SELECT POSCODE, IDCODE1, IDCODE2, RESP_NUM, RESP FROM jambue.RESP WHERE POSCODE = '" & id & "' AND IDCODE1 ='" & dept & "' AND IDCODE2 ='" & unit & "' ORDER BY RESP_NUM" Set rstDBEdit = Server.CreateObject("ADODB.Recordset") rstDBEdit.cursorlocation = adUseClient Set cn= Server.CreateObject("ADODB.Connection") cn.Open CONN_STRING rstDBEdit.Open strsql, cn, , adLockBatchOptimistic,adCmdText Set rstDBEdit.ActiveConnection = Nothing cn.close do while not rstdbedit.eof response.write " before: " & rstDBEdit("RESP_NUM").Value rstDBEdit("RESP_NUM").Value = rstDBEdit.AbsolutePosition response.write " after: " & rstDBEdit("RESP_NUM").Value rstDBEdit.Update rstDBEdit.MoveNext loop cn.Open Set rstDBEdit.ActiveConnection = cn rstDBEdit.UpdateBatch rstDBEdit.Close: Set rstDBEdit=nothing cn.close: set cn=nothing If I could get it to insert a new unique resp_num for each copied responsibility the renumbering would work I think. Problem is I dont know how many resp.'s the user will try to copy over. I have tried doing the insert statement in a loop after splitting the chkbox field into an array but I still couldnt get it to work. Any ideas? Tag: Unicode Character Problem Tag: 295333
 - 24
 - ASP When I publish asp files from Front Page to my 2000 server, a message tells me my server doesn't support .asp files? I don't know what is missing from the web server. Tag: Unicode Character Problem Tag: 295325
 - 25
 - passing parameters is it possible to pass parameters in html like in asp.... products.asp?cat=3 ... what i want to do is when i click on a html link, it opens up news.html, and then opens up a particular news article in an iframe on that page. Thanks, Brian. Tag: Unicode Character Problem Tag: 295324

Hi Folks,

I am having a problem with a forms entry using Unicode characters,
specifically "smart-quotes". Under Microsoft PWS and MS-SQL 7.0 it
works fine and I get the Unicode characters, such as smart-quotes,
being written and read form the database. However, if I use the same
code using Apache, Linux and SunONE ASP the Unicode characters don't
work!

Here is an example of the pages:

http://www.oldham.gov.uk/mccall/smart.jpg
http://www.oldham.gov.uk/mccall/broke.jpg

Our developers have tried to change the character set to correct the
problem, but have been unable to get it working and its currently
using a work-around at the moment to specifically detect the
characters we want.

Can anyone suggest what the problem is, and how to correct it?

Thanks,

Andrew McCall

Top

Re: Unicode Character Problem by Egbert

Egbert
Mon Jul 05 06:55:08 CDT 2004

Hi,

I understand that a second class OS cannot display first class characters :)
(just kidding)

Did you make sure, that your encoding settings have been set correct?

Response.CharSet = "utf-8" (for instnace) or "windows-1252"
and the font, must be set correctly in the HTML, it must be a font, that has
that specific map correctly mapped. Unicode fonts will have that.
Try Arial,verdana...

Regards,

--
compatible web farm Session replacement for Asp and Asp.Net
http://www.nieropwebconsult.nl/asp_session_manager.htm

"Andrew McCall" <it.andrew.mccall@oldham.gov.uk> wrote in message
news:acc5b949.0406220548.9dae2f6@posting.google.com...
> Hi Folks,
>
> I am having a problem with a forms entry using Unicode characters,
> specifically "smart-quotes". Under Microsoft PWS and MS-SQL 7.0 it
> works fine and I get the Unicode characters, such as smart-quotes,
> being written and read form the database. However, if I use the same
> code using Apache, Linux and SunONE ASP the Unicode characters don't
> work!
>
> Here is an example of the pages:
>
> http://www.oldham.gov.uk/mccall/smart.jpg
> http://www.oldham.gov.uk/mccall/broke.jpg
>
> Our developers have tried to change the character set to correct the
> problem, but have been unable to get it working and its currently
> using a work-around at the moment to specifically detect the
> characters we want.
>
> Can anyone suggest what the problem is, and how to correct it?
>
> Thanks,
>
> Andrew McCall

Top