Help! - What component is this?
I'm trying to help out a client who switched hosting providers for
their Classic ASP site. The new hosting provider doesn't provide the
components they need - so I'm trying to find one that does. The
PROBLEM is that there's one component in particular that I can't
figure out! Here it is:
Dim objUtil
Set objUtil = server.CreateObject("COMHelper.util")
and here's the only usage of it:
objUtil.Execute_ADO_Query(strSQL)
or
objUtil.Execute_ADO_Command(strSQL)
Anyone have any ideas?
Thanks in advance! Tag: where newsgroup for ASP.NET Tag: 334650
use text file as link source
can i get an example of how to read values from a text file that will be
used as links on my page.
i'll have a .cvs file ala:
LINK ASP_PAGE
"click me1", "clickme1.asp"
"click me2", "clickme2.asp"
"click me3", "clickme3.asp"
i think i can figure out how to do the read, but need to know how to get it
on the page where i need it.
tia,
mcnewsxp Tag: where newsgroup for ASP.NET Tag: 334642
uploading .docx files in ASP
I have a file upload script that has successfully uploaded files,
although the MS .docx format will not load for some reason. Has
anyone found a workaround/solution to this?
Thanks,
Louis Tag: where newsgroup for ASP.NET Tag: 334639
ASP Classic and SQL EXPRESS
Hi,
can any one help me , How I can coonect to SQL EXPRESS database using
Classic asp.
Regards,
Fayyaz Tag: where newsgroup for ASP.NET Tag: 334636
Jmail in spam
Hi Everyone,
I am using Jmail to send mail through my website. In my case it is a
reservation confirmation. The Problem is that email sent from Jmail is
going directly to spam folder in Gmail.
When I look at email headers, everything looks fine. Here is the code.
Can someone please tell me what I need to do so the email does not go to
spam?
on error resume next
Set jmail = Server.CreateObject("JMail.Message")
strReferer = request.servervariables("HTTP_REFERER")
strServer2 = Replace(request.servervariables("SERVER_NAME"),"www.","")
strClientIP = request.servervariables("REMOTE_ADDR")
strServerIP = request.servervariables("LOCAL_ADDR")
JMail.Charset = lang(cVAR,"","MetaLang")
JMail.MailServerUserName = mailserverusername
JMail.MailServerPassWord = mailserverpassword
jmail.AddRecipient request.form("FrmEMAIL"),
ChkString(request.form("FrmNAME"),"message") & " " &
ChkString(request.form("FrmLASTNAME"),"message")
JMail.AddRecipientBCC strsender, sitename
jmail.From = strsender
jmail.FromName = sendername
JMail.ReplyTo = request("from")
JMail.Priority = 3
JMail.AddHeader "Originating-IP", strClientIP
JMail.Silent = True
JMail.Logging = True
jmail.Subject = strSubject
jmail.Body = strBody
contentId = jmail.AddAttachment("d:\images\logo.png")
jmail.HTMLBody = someMoreBody
jmail.appendHTML SomeMoreHtml
jmail.Body = strbody
jmail.appendText strtext & vbCrLf & vbCrLf
jmail.Send(mailservername) Tag: where newsgroup for ASP.NET Tag: 334635
Set limit of charactures returned from a DB
I am trying to search this, but maybe I am not searching for the right
thing.
I have sql DB, and I have code to retrieve the information I want.
What I need is to be able to limit the number of charactures retrieved.
I am writing a pm system, and I want to display the first 50 charactures of
a post, then have the user click to read to get the rest of it.
example....
the post is abcdefghijklmnopqrstuvwxyz
but for the abbreviation of the post, i want it toshow abcdefghijklm......
which would be 13
the retrieve i have is pm_message =
trim(pm1.fields.item("fieldname").value)
how would I constrict the return on this??
i would appreciate a solution, or a better way to search for it.
thanks
Bam Tag: where newsgroup for ASP.NET Tag: 334627
ASP.NET_SessionId gets lost.
I have a site usings ASP.NET 2.0 and forms authentication. The site works
fine from my development pc but when I publish the website to our
development web server, the session id gets lost right after I've
authenticated and then redirect them to a protected content page.
In my Login page I verify the userid and password, then perform the
following if the credentials are valid:
FormsAuthentication.SetAuthCookie(Login1.UserName.ToString(), false);
Response.Redirect("~/MyDeals/Home.aspx");
Home.aspx is only acessible to authenticated users.
After the forms authentication cookie is created, an ASP.NET_SessionId
cookie is also created, then as soon as the response redirect happens, the
ASP.NET_SessionId goes away and I get sent back to the login page.
Here's a catch: I published the exact code to our production server and it
worked perfectly, so I'm guessing it must be some setting on the server or
in IIS that's causing the behavior.
Does anyone have an idea? I've tried everything I can think of.
url:http://www.ureader.com/gp/1522-1.aspx Tag: where newsgroup for ASP.NET Tag: 334626
Do you know any sites similar to b2bcompass.com
I submitted my site to http://www.b2bcompass.com then I got heavy
traffic within 3 days. I got this site through an email. Do you know
any other sites which similar to http://www.b2bcompass.com Tag: where newsgroup for ASP.NET Tag: 334622
Do you know any sites similar to b2bcompass.com
I submitted my site to http://www.b2bcompass.com then I got heavy
traffic within 3 days. I got this site through an email. Do you know
any other sites which similar to http://www.b2bcompass.com Tag: where newsgroup for ASP.NET Tag: 334621
running ASP on XP Home
fixing timestamp problem
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I don't
check it very often. If you must reply off-line, then remove the "NO SPAM" Tag: where newsgroup for ASP.NET Tag: 334610
Rename a file which held in server using asp
How can I rename a .jpg file in server using asp( not asp.net) code
I use the FileSystemObject to do that like
Fso = Server.CreateObject("Scripting.FileSystemObject");
Fso.MoveFile(Server.MapPath("1.jpg"),(Server.MapPath("2.jpg"));
but it does not work properly
when I use the the code in my local system it also not worked.
But when I put full filepathpath instead of mapPath in my local
system. Like
Fso.MoveFile("c:\\inetpub\\1.jpg", "c:\\inetpub\\2.jpg")
It worked properly.
May anyone help me to do this with Server.MapPath() method. Tag: where newsgroup for ASP.NET Tag: 334609
Dave Clarke Presents Red Three download free MP3
D A V E C L A R K E P R E S E N T S R E D T H R E E R I N G T
O N E
*Thunder 2004*
'Dave Clarke Presents Red Three - the storm'
(http://tinyurl.com/29ebfk) (6:52 9.42Mb 192kbps)
'Dave Clarke Presents Red Three - the storm (instrumental)'
(http://tinyurl.com/27lwnz) (4:32 6.22Mb 192kbps)
'Dave Clarke Presents Red Three - thunder' (http://tinyurl.com/yuys56)
(5:11 7.12Mb 192kbps)
'Dave Clarke Presents Red Three MP3 song'
(http://mp3tube.info/dave_clarke_presents_red_three/), 'Dave Clarke
Presents Red Three Thunder free MP3s'
(http://mp3tube.info/dave_clarke_presents_red_three/)
--
Sghsdgh
------------------------------------------------------------------------
Posted via http://www.codecomments.com
------------------------------------------------------------------------ Tag: where newsgroup for ASP.NET Tag: 334606
conditional connection string
Hi,
I'm having a little trouble with the following code. For some reason,
when x=true, both parts of the If Then...Else statement are followed,
and the data winds up being in the Data Source in the Else section,
even though x tests positive as true (the response.write statement).
Could this be a problem with the variable or perhaps grouping?
Thanks,
Louis
========================
'begin conditional connection section
x=true
If x=true Then
Function GetConnection()
dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.open "Provider=SQLOLEDB.1;" &_
"Persist Security Info=False;" &_
"User ID=CopRandW;Password=Pharm_1110;" &_
"Initial Catalog=cop_pcms;" &_
"Data Source=COP-CPB-DAT"
set GetConnection = Conn
end function
response.write("hi - x is true!")
Else
Function GetConnection()
dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.open "Provider=SQLOLEDB.1;" &_
"Persist Security Info=False;" &_
"User ID=CopRandW;Password=Pharm_1110;" &_
"Initial Catalog=cop;" &_
"Data Source=COP-CPB-DAT"
set GetConnection = Conn
end function
response.write("hi - x is false!")
End If
'end conditional connection section Tag: where newsgroup for ASP.NET Tag: 334603
Collect SQL String using script
A co-worker of mine used to have a script that he would run after the
script on the page was executed, it would spit out the SQL of the
query that was dynamically created through all of the gibberish code
in the ASP page.
Does anyone know what exactly he was running?
Any help is greatly appreciated.
Cheers,
Jason Tag: where newsgroup for ASP.NET Tag: 334598
How to set a panel's position
Hi all,
I have put serveral panel controls within a page, each of them matching to a
action defined by buttons, so I want to fix all panels in one place( they
already have same size, but different left, top values), how can I do it (in
code, if I do it in desgn, is there a way to put the panels in different
"layers" so the contained controls will not interupt with each other)?
Clara
--
thank you so much for your help Tag: where newsgroup for ASP.NET Tag: 334594
can aybody help?
Hi
Am using Access database for my web application developed in
asp(classic asp----not asp.net)
here is my code
set cnn=server.CreateObject("ADODB.Connection")
cnn.CursorLocation = 3
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
server.MapPath(".") & "\" & strbranch & "\" & strbranch &
".MDB;Persist Security Info=False"
am getting the error at the following line of code
cnn.Execute "Delete from table_one "
and the error is
Microsoft JET Database Engine error '80004005'
Could not delete from specified tables.
this code works fine im my local machine..but the problem arises when
i try 2 access the application by uploading files to the FTP provided
by my ISP
Earlier help is appreciated
Thanks & Regards
Kalyan Tag: where newsgroup for ASP.NET Tag: 334586
Forms Authenticaion Problem?
We are implementing forms authentication on our site. We noticed that when
we try to lock down a folder whose name as dashes in it (e.g. Secure-Folder)
it is ignored. Is this a known issue?
Thanks. Tag: where newsgroup for ASP.NET Tag: 334571
Access dbase no longer works on workstation?
running XPPro/SP2 and it's iis6 too....using EditPlus as my scripting code
app....
have a simple dbase site, using ASP classic and MSAccessXP
used to run fine. but all of a sudden, no calls to the dbase work. I get a
blank screen; a refresh calls up the dialog to refresh, which of course I do,
and that gets me a blank screen.
perms are right and I can see any html page or asp page fine in EditPlus -
just not a page that has a dbase call...have just uninstalled IIS - then
reinstalled same and I get the same thing.
oh, when I first start ANY asp page in the EditPlus app, I click to "preview
in browser" as per normal - but now it shows me the plain code page - I have
to reclick to get it to "work" as the localhost and serve that page.
this is wonky...what'm I mising here? or worse, what have I done?
in fact NO asp page can call a dbase in any way...it's like the dbases do
NOT exist or some such thing? what the heck???
Jim Tag: where newsgroup for ASP.NET Tag: 334564
dbase no longer "works"
running XPPro/SP2 and it's iis6 too....using EditPlus as my code app....
have a simple dbase site, using ASP classic and MSAccess03.
used to run fine. but all of a sudden, no calls to the dbase work. I get a
blank screen; a refresh calls up the dialog to refresh, which of course I do,
and that gets me a blank screen.
perms are right and I can see any html page or asp page fine in EditPlus -
just not a page that has a dbase call...
?
what'm I mising here? Tag: where newsgroup for ASP.NET Tag: 334563
href + outlook
Is it possible to create a link to open outlook (Client side) to open
a particular folder
here is the code i am trying to use unsuccessfully :
<a href="outlook://Public%20Folders/All%20Public%20Folders/P/W/C/Conf
%20Room/~S%20C%20R">Conference Room 1</a>
Basically what i want to happen is that when a user clicks on the web
link that it opens the meeting room which is in a public folder in
outlook application (not the web interface outlook )
can anyone please help ?
kind regards,
Garreth. Tag: where newsgroup for ASP.NET Tag: 334543
Are All "Either BOF or EOF is True" Errors coded number 800a0bcd
Hi All,
Just a brief question, I'm happy to say that Google is indexing my work,
unfortunatley, they are also showing records that point to pages where the
content has expired. I really dont want the user to see an "Either BOF or
EOF" error message, or infact to know that there has been an error, instead
i want to redirect them to the homepage,.. which brings about my question,...
Is the Error number for either BOF or EOF errors always 800a0bcd???
my plan is to do a responce.redirect if it exists...
Thanks Guys Tag: where newsgroup for ASP.NET Tag: 334538
Form-to-Email ASP scripts - what's the best one?
Hey...
thinking that I may need to upgrade my skillset when it comes to ASP based
form-to-email scripting.
is CDOSYS the best still on a w2k3/iis6 box?
if so, can someone point me at the shortest, easiest to configure example
that positively works for sure in this environment?
i sigh, as CDONTs used to work perfectly for me and I hated that it was
dep'd by MS....
oh, and if CDOSYS is only one way - and maybe not the best way - is there a
component that will work better/quicker with an easy to use install and
config learning curve?
oh, why do I ask...gosh...got LOTSA troubles trying to get CDOSYS to work
efficiently on a new server...and thinking that there may be another answer
out there...
pointers here lads?
Jim Tag: where newsgroup for ASP.NET Tag: 334531
ASP to SP
How to put these configuration ASP fields on the SP some lines below? I need
to send email via SP
------------------------------------------------------
Set iMsg = Server.CreateObject("CDO.Message")
Set iConf = Server.CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
' Set the CDOSYS configuration fields to use port 25 on the SMTP server.
With Flds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"smtp.uol.com.br"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")
= 10
.Update
End With
-----------------------SP MS SQL SERVER
2000---------------------------------------------------------
EXEC @RESULTADO = SP_OACREATE 'CDO.Message', @OMAIL OUT
EXEC @RESULTADO1 = SP_OACREATE 'CDO.Configuration', @OMAIL1 OUT
IF (@RESULTADO = 0) And (@RESULTADO1 = 0) -- no error
BEGIN
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'FROM' , @FROM_ADDRESS --
ENDEREÇO DE EMAIL FROM
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'TO' , @TO_ADDRESS -- ENDEREÇO
DE EMAIL TO
-- VERIFICANDO SE O ENDEREÇO CC NÃO ESTÁ VAZIO
IF @CC_ADDRESS <> ''
BEGIN
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'CC', @CC_ADDRESS -- ENDEREÇO
DE EMAIL CC
END
-- VERIFICANDO SE O ENDEREÇO BCC NÃO ESTÁ VAZIO
IF @BCC_ADDRESS <> ''
BEGIN
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'BCC', @BCC_ADDRESS --
ENDEREÇO DE EMAIL BCC
END
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'SUBJECT', @ASSUNTO_EMAIL --
ASSUNTO
EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'TextBody', @MENSAGEM_EMAIL --
CORPO DO EMAIL
-- TIPO DE EMAIL (TEXTO/HTML)
--EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'BODYFORMAT', @TIPO_EMAIL
--EXEC @RESULTADO = SP_OASETPROPERTY @OMAIL, 'MAILFORMAT', @TIPO_EMAIL
-- ENVIANDO O EMAIL
------
EXEC @RESULTADO = SP_OAMETHOD @OMAIL, 'SEND', NULL
EXEC SP_OADESTROY @OMAIL
EXEC SP_OADESTROY @OMAIL1 -- destroying CDO
END Tag: where newsgroup for ASP.NET Tag: 334522
Cheng Tai-Wei MP3
C H E N G T A I - W E I F R E E D O W N L O A D O F M P 3
*Praise Of Amitabha Buddha 1989*
'Cheng Tai-Wei - Namo Amitabha Buddha (Reciting)'
(http://tinyurl.com/2c9lde) (24:58 22.85Mb 128kbps)
'Cheng Tai-Wei - Namo Amitabha Buddha (Sanskrit Music)'
(http://tinyurl.com/2frbuz) (23:27 21.48Mb 128kbps)
'Cheng Tai-Wei music download' (http://mp3tube.info/cheng_tai_wei/),
'Cheng Tai-Wei Praise Of Amitabha Buddha MP3'
(http://mp3tube.info/cheng_tai_wei/)
--
Born
------------------------------------------------------------------------
Posted via http://www.codecomments.com
------------------------------------------------------------------------ Tag: where newsgroup for ASP.NET Tag: 334515
Adobe Contribute & ASP.NET 2.0 Master Pages
Hello!
I have a problem with getting Adobe Contribute to view the content of the
master.page file. I have done a fair amount of research into why and have
come up with the fact that Adobe Contribute CS3 was released before ASP.NET
2.0 and therefore wouldn't have known about master pages or even how to
handle them.
Therefore I believe it to be acceptable if the page content (contained in
the content place holder in each aspx page) was stylised with at least the
external CSS file. Many attempts to get this to work have failed and
anything that is a complete frig (such as putting <html><head><link ....CSS
call /></head><body></body></html> at the top of the content place holder)
to make it believe that the external style sheet is declared in the <head>
tags is just not acceptable as it will have an impact on Google and SEO in
general..
One solution I've thought of is to make an FTP login to a private directory
on my web server and have Adobe Contribute edit those pages and for the
online script to check (with some VB or C#) the last edited timestamp of its
counterpart page in the private FTP directory and then to pull the edited
content out and into the VB's ASPX file.
Has anyone any tips or advice? I'm looking for an easy way out if there is
one :oP
Thanks to anyone that helps out!
Cheers,
John Tag: where newsgroup for ASP.NET Tag: 334514
Client side file help needed
I have a need to transfer a graphic file to a user's system and then
access that file. I must have the drive letter:\path location of the
file. If at all possible I'd prefer that this not require user input.
(Note that since this is my app and in a corporate network, I have the
server in the Trusted Sites zone and every single action is marked
"Enabled" in the IE security settings and users will be using IE
exclusively.) It doesn't matter to me how the file gets to the
client, save that it get there from IE, and the file is initially
retrieved via a url I give the client. I have even looked into
reading the file out of the IE temporary files but have had no luck.
Does anyone have any idea of how to do this? Tag: where newsgroup for ASP.NET Tag: 334505
Objects stored in session using Sql Server
We have a website that works fine when hosted on a single server, however it
experiences some strange problems when run on a web farm using SQL Server to
handle session state. When running on the farm, in the same method call an
object that just had a value set will no longer have the value set a couple
of lines later. In this example the object is pulled out of session, altered
and placed back in session before a following line of code tries to use the
altered value, only to find out that it appears to have never been changed.
The application essentially stores 1 object that contains several other
objects in session. The group that manages teh web farm is telling me that
this is the problem. They are saying that because of the
serialization/deserialization in sql server, the reference to the inner
objects isn't flowing through to the object being stored in SQL Server. Does
this sound correct? Should there be any differance between how a website code
funcitons on a single server versus a web farm? They provided me with the
below documentation, but have not yet been able to tell me where it came
from. This has been an ongoing battle over who's problem it really is, any
information on this subject will be appreciated.
Thanks,
Bill
This is the reponse I got from our techincal support group
There is no problem with the SQL Server settings for storing the session as
session objects get created, retrieved and updated in the SQL Server. The
issue is with the way the session object is updated in the C# code.
Session in asp.net behaves as follows.
InProc: In this mode session data is stored in the AppDomain of the
application. All the objects stored in the session are actually stored in
AppDomain and a reference is created for the session.
SQL Server/State Server: In this mode session data is serialized and stored
in SQL server database. When sessions is loaded system will fetch the data
from database and deserialize it and creates the objects with deserialize
data and bind them to state bag. In this mode the actual object references
and session object references are different.
Because of this, the S&S application is able to retrieve data when session
is in InProc but not in SQL Server. What's happening in S&S application is as
below.
In case of InProc session Inquiry object and Search object have
same reference, so updating one object is will show effect all its references.
In case of SQL Server session each object will have its own
reference (each time new object is created from deserialize data), so
updating one object will not update the other object in the session.
To solve this, C# code needs to be modified where the session related
objects are updated such that it gets updated in the session correctly. Tag: where newsgroup for ASP.NET Tag: 334502
ASP to PDF,...
Hi All,
I found a nice little peice of code that displays the data on the page as an
excel spreadsheet --
<%
Response.ContentType = "application/vnd.ms-excel"
%>
I was just wondering whether there is something similar for PDF???
Thanks again.... Tag: where newsgroup for ASP.NET Tag: 334496
UTF-8, UTF-16 - ASP VB MSSQL Server - It just doesn't work.
When I POST using UTF-16 on the web using ASP and VBScriipt
(not .Net), to a MSSQL Server 2000, my data gets stored in weird
characters. My application is used worldwide (Chinese, Japanese,
German, Spanish...) all sharing the same database, but each location
stores their information using their own language. When I retrieve
the data on the Web, the characters look fine - but using SQL Query
Analyzer the characters are all mangled.
I also have an offline application (written in HTA, VBScript, and
Javascript) that allows my users to upload their data at a later
point
via a CSV file created using UNICODE, which appears to store the data
properly under the MSSQL Server (I confirm this by using Query
Analyzer)
To make things worse, the Web application will display properly the
data that it stored with the POST, but the data that was uploaded
though the CSV file displays incorrectly ( '???' characters). The
effect appears to be reversed when I use MSSQL Query Analyzer to
inspect the data - all the data that was uploaded using the CSV file
appears correct, but all the POST data is mangled.
I've placed under all the Web Pages forms and POST action pages:
<meta http-equiv="Content-Type" content="text/html; charset=utf-16">
I've also made all my forms to have:
<form accept-charset='utf-16'... >
I'm using Chinese in conjunction with English to troubleshoot my
problem. Tag: where newsgroup for ASP.NET Tag: 334492
MS SQL ASP Update timestamp
HELP!!!!
I'm really pulling my hair out with this one, I have a form, which currently
does an update, built with dreamwaevers update behaviour (I Know i Know) What
I am trying to do is capture the date and time of the update, so my table
contains a column JBCLNewAccountDate, which i hasve set as a timestamp??
my form contains a number of form fields including a hidden field called
NewAccountdate with a value of =NOW(). I'm trying to pass this field to the
JBCLNewAccountDate during the update...
but when i do this, i get the following error -
Microsoft OLE DB Provider for SQL Server error '80040e07'
Operand type clash: text is incompatible with timestamp
/admin/ppupgradeaccountsettings.asp, line 44
where line 44 is -
MM_editCmd.Execute
The update statement reads --
<%
Dim MM_editAction
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
End If
' boolean to abort record edit
Dim MM_abortEdit
MM_abortEdit = false
%>
<%
' IIf implementation
Function MM_IIf(condition, ifTrue, ifFalse)
If condition = "" Then
MM_IIf = ifFalse
Else
MM_IIf = ifTrue
End If
End Function
%>
<%
If (CStr(Request("MM_update")) = "form1") Then
If (Not MM_abortEdit) Then
' execute the update
Dim MM_editCmd
Set MM_editCmd = Server.CreateObject ("ADODB.Command")
MM_editCmd.ActiveConnection = MM_recruta2_STRING
MM_editCmd.CommandText = "UPDATE dbo.JBClient SET JBCLAddress = ?,
JBCLPhone = ?, JBCLFax = ?, JBCLEmail = ?, JBCLURL = ?, JBCLBillingContact =
?, JBCLAccountType = ?, JBCLPreviousAccount = ?, JBCLNewAccountDate = ? WHERE
JBCLID = ?"
MM_editCmd.Prepared = true
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202,
1, 500, Request.Form("address")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202,
1, 50, Request.Form("phone")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202,
1, 50, Request.Form("fax")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 202,
1, 225, Request.Form("email")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 202,
1, 225, Request.Form("website")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 202,
1, 50, Request.Form("billingcontact")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 202,
1, 10, Request.Form("upgradeaccount")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 202,
1, 10, Request.Form("PreviousAccountType")) ' adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 201,
1, -1, Request.Form("NewAccountdate")) ' adLongVarChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 5, 1,
-1, MM_IIF(Request.Form("MM_recordId"), Request.Form("MM_recordId"), null)) '
adDouble
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
' append the query string to the redirect URL
Dim MM_editRedirectUrl
MM_editRedirectUrl = "AFTERUPGRADEACCOUNT.asp"
If (Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If
Response.Redirect(MM_editRedirectUrl)
End If
End If
%>
The form looks like ,...
<form ACTION="<%=MM_editAction%>" METHOD="POST" id="form1" name="form1">
<table border="0" cellpadding="0" cellspacing="0"
class="tablewidth576">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0"
class="tablewidth576">
<tr>
<td class="postvacancyleft">Company Name:</td>
<td class="postvacancyright2"><label>
<input name="companyname" type="text"
id="companyname" value="<%=(newaccount.Fields.Item("JBCLName").Value)%>"
maxlength="50" readonly="readonly"/>
</label></td>
</tr>
<tr>
<td class="postvacancyleft">Company Type:</td>
<td class="postvacancyright2"><input
name="companytype" type="text" id="companytype"
value="<%=(newaccount.Fields.Item("JBCompanyTypeLabel").Value)%>"
maxlength="50" readonly="readonly"/></td>
</tr>
<tr>
<td class="postvacancyleft">Address:</td>
<td class="postvacancyright2"><label>
<textarea onkeypress="return taLimit()"
onkeyup="return taCount(myCounter1)" name="address" id="address" cols="45"
rows="7"
maxlength="500"><%=(newaccount.Fields.Item("JBCLAddress").Value)%></textarea>
</label></td>
</tr>
<tr>
<td class="postvacancyleft">Phone:</td>
<td class="postvacancyright2"><input name="phone"
type="text" id="phone"
value="<%=(newaccount.Fields.Item("JBCLPhone").Value)%>" maxlength="50"
/></td>
</tr>
<tr>
<td class="postvacancyleft">Fax:</td>
<td class="postvacancyright2"><input name="fax"
type="text" id="fax" value="<%=(newaccount.Fields.Item("JBCLFax").Value)%>"
maxlength="50" /></td>
</tr>
<tr>
<td class="postvacancyleft">Email:</td>
<td class="postvacancyright2"><input name="email"
type="text" id="email"
value="<%=(newaccount.Fields.Item("JBCLEmail").Value)%>" maxlength="225"
/></td>
</tr>
<tr>
<td class="postvacancyleft">Website:</td>
<td class="postvacancyright2"><input name="website"
type="text" id="website"
value="<%=(newaccount.Fields.Item("JBCLURL").Value)%>" maxlength="225" /></td>
</tr>
<tr>
<td class="postvacancyleft">Billing Contact:</td>
<td class="postvacancyright2"><input
name="billingcontact" type="text" id="billingcontact"
value="<%=(newaccount.Fields.Item("JBCLBillingContact").Value)%>"
maxlength="50" /></td>
</tr>
<tr>
<td class="postvacancyleft"> </td>
<td class="postvacancyright2"><label></label></td>
</tr>
<tr>
<td class="postvacancyleft">Upgrade Account</td>
<td class="postvacancyright2"><label>
<select name="upgradeaccount" id="upgradeaccount">
<option value="PP Client" <%If (Not
isNull((newaccount.Fields.Item("JBCLAccountType").Value))) Then If ("PP
Client" = CStr((newaccount.Fields.Item("JBCLAccountType").Value))) Then
Response.Write("selected=""selected""") : Response.Write("")%>>PayPal
Client</option>
<option value="Occ User" <%If (Not
isNull((newaccount.Fields.Item("JBCLAccountType").Value))) Then If ("Occ
User" = CStr((newaccount.Fields.Item("JBCLAccountType").Value))) Then
Response.Write("selected=""selected""") : Response.Write("")%>>Occasional
User</option>
<%
While (NOT accounttypes.EOF)
%>
<option
value="<%=(accounttypes.Fields.Item("JBATValue").Value)%>" <%If (Not
isNull((newaccount.Fields.Item("JBCLAccountType").Value))) Then If
(CStr(accounttypes.Fields.Item("JBATValue").Value) =
CStr((newaccount.Fields.Item("JBCLAccountType").Value))) Then
Response.Write("selected=""selected""") : Response.Write("")%>
><%=(accounttypes.Fields.Item("JBATDisplay").Value)%></option>
<%
accounttypes.MoveNext()
Wend
If (accounttypes.CursorType > 0) Then
accounttypes.MoveFirst
Else
accounttypes.Requery
End If
%>
</select>
</label></td>
</tr>
<tr>
<td class="postvacancyleft"><h1><span
class="postvacancyright2">
<input name="PreviousAccountType" type="hidden"
id="PreviousAccountType"
value="<%=(newaccount.Fields.Item("JBCLAccountType").Value)%>" />
</span><span class="postvacancyright2">
<input name="NewAccountdate" type="hidden"
id="NewAccountdate" value="=NOW()" />
</span></h1></td>
<td class="postvacancyright2"> </td>
</tr>
<tr>
<td class="postvacancyleft"></td>
<td class="sendbar"><img src="../images/UPGRADE.jpg"
alt="Submit" width="73" height="20"
onclick="formButtonFever('form1','submit')" /></td>
</tr>
</table></td>
</tr>
</table>
<input type="hidden" name="MM_update" value="form1" />
<input type="hidden" name="MM_recordId" value="<%=
newaccount.Fields.Item("JBCLID").Value %>" />
</form>
any idea what I am doing wrong??
Thanks Tag: where newsgroup for ASP.NET Tag: 334491
Request.ClientCerficate
Hi
I have a problem with Request.ClientCerficate
IIS 6. ASP solution,Win2003R2
Whe i call Request.ClientCerficate it does to nothing.
All settings , certifcates aso. are OK. because on another server same
solution works perfectly!
No errors, nothing., it just does not work.
Any ideas?
Best regards;
Meelis Tag: where newsgroup for ASP.NET Tag: 334488
Using bbc code with results
Hey all. Hope everyone is doing fine.
Question...
I know how to display results that contain html code on a page. (ie. <br>
<b>...)
what i would like to know, is if a result contains bbc code (ie.. [code]
[url]..)
how would i display that to be readable?
This is not for a forum, but would be the same as if i was writting a forum.
I think there is a script that the page has to contain to be able to read it
correctly, but I can't find it.
or can i be directed to the correct NG to post this. Not sure where i would
need to post.
--
Thanks,
Bam Tag: where newsgroup for ASP.NET Tag: 334479
Server.MapPath() localhost
If I run Server.MapPath("/") on my operational Internet server I get,
correctly, the physical path to the directory my page is in (d:\....
\...\htdocs).
If I run Server.MapPath("/") on my intranet server, my localhost, I
get c:\inetpub\wwwroot, but my webpages are NOT in this folder, they
are in c:\webtest.
How to I establish the correct physical root on my intranet server?
Thanking you in anticipation. Tag: where newsgroup for ASP.NET Tag: 334476
Update to redirect search engine highly ranked page
Hi all,
I posted the thread in Jan. and got many responses and I am very appreciated
to those contributors.
Here is my update. After read all suggestions, comments and instructions.
I think use 404 page redirect the users to the new page is doable. But I
believe that I need to brand that redirect with 301 response:
so I replaced the original
Response.Redirect x 'x is new web page addrress
with the following code
Response.Status="301 Moved Permanently"
Response.AddHeader "Location", x
After that I used http://www.seoconsultants.com/tools/headers.asp
to check header information by entering an old page and it did redirect me
to a new page, but I expected that the header informaiton should look like
this: HTTP Status Code - 301 Moved Permanently
But acutally I got the result like this:
HTTP Status Code: HTTP/1.0 200 OK
Did I do anything wrong? What's the best place to put custom 404 page?
My testing server is on the intranet, does that matter?
Thank you.
--
Betty Tag: where newsgroup for ASP.NET Tag: 334472
moving webpartzones
After the user has moved a webpart from within the display mode can you then
programmatically put the mode back to browse without the user having to do
this but at the same time allowing the move to finish.
thanks Tag: where newsgroup for ASP.NET Tag: 334467
Implicit Data Type Converson
Consider the following code snippet:
<%
Dim intA, strA, strB
intA=5
strA="Hello World"
strB=strA+intA
Response.Write(strB)
%>
The above code generates the "Type mismatch" error pointing to the
line strB=strA+intA but why doesn't VBScript implicitly cast the value
of intA into String when intA is concatenated with strA?
I am aware that VBScript supports only one data type which is Variant. Tag: where newsgroup for ASP.NET Tag: 334459
aspsmartupload with Invalid Calss String
Hi,
I'm using IIS and windows XP.
I already install the aspsmartupload by
REGSVR32.EXE C:\Windows\System32\aspsmartupload.dll
and it is successful,
and I already copy the aspsmartuploadutil.dll to the C:\Window\System32
folder
but I still got "Invalid Class String" error when loading on ASP page
it points to CreateObject that failed
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
How should I fix it or what other area I should check (in details)
Regards,
Magix Tag: where newsgroup for ASP.NET Tag: 334448
restrict access to page based on querystring value
Hi there, I've got the standard Dreamweaver restrict access to page behaviour
below â??
<%
' *** Restrict Access To Page: Grant or deny access to this page
MM_authorizedUsers="1,2,3"
MM_authFailedURL="index.asp"
MM_grantAccess=false
If Session("MM_Username") <> "" Then
If (false Or CStr(Session("MM_UserAuthorization"))="") Or _
(InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then
MM_grantAccess = true
End If
End If
If Not MM_grantAccess Then
MM_qsChar = "?"
If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
MM_referrer = Request.ServerVariables("URL")
if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" &
Request.QueryString()
MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" &
Server.URLEncode(MM_referrer)
Response.Redirect(MM_authFailedURL)
End If
%>
It restricts access to the page based upon the following values â??
MM_Username
MM_UserAuthorization
I believe that is checking to see whether MM_Username exists and if so
checking to see if the MM_UserAuthorization value is either 1, 2 or 3
I the event that both exist access is granted, in the event that one or
neither exist it redirects the user to MM_authFailedURL (index.asp)
What I would like to do is build a similar behaviour, but that only checks
one value, so instead of checking MM_Username & MM_UserAuthorization it
checks to see whether the variable ACC (which is sent through
Request.QueryString) equals either â??
Occ User
Reg User
Reg User5
Reg User10
Multi User
And in the event that ACC as one of the values above Access is granted, in
the event that this is not the case the user is redirected to info.asp.
Any ideas on how to do this would be great -
Thanks Tag: where newsgroup for ASP.NET Tag: 334446
Brakes mp3 music
B R A K E S M P 3
*Beatific Visions 2007*
'Brakes - Beatific Vision' (http://tinyurl.com/245mhl) (2:54 4.72Mb
227kbps)
'Brakes - Cease And Desist' (http://tinyurl.com/yrta9r) (2:27 4.08Mb
231kbps)
'Brakes - Hold Me In The River' (http://tinyurl.com/29y5ca) (1:59
3.22Mb 225kbps)
'Brakes - If I Should Die Tonight' (http://tinyurl.com/2yvob2) (2:01
2.88Mb 198kbps)
'Brakes - Isabel'
(http://mp3tube.info/brakes/Brakes-Isabel.html?218571) (2:26 2.76Mb
157kbps)
'Brakes - Margarita'
(http://mp3tube.info/brakes/Brakes-Margarita.html?218571) (2:06 3.42Mb
225kbps)
'Brakes - Mobile Communication' (http://tinyurl.com/2g3jdz) (3:48
5.78Mb 212kbps)
'Brakes - No Return'
(http://mp3tube.info/brakes/Brakes-No_Return.html?218571) (4:56 6.41Mb
181kbps)
'Brakes - On Your Side'
(http://mp3tube.info/brakes/Brakes-On_Your_Side.html?218571) (2:21
3.85Mb 228kbps)
'Brakes - Porcupine Or Pineapple' (http://tinyurl.com/yq3vhp) (1:05
1.77Mb 225kbps)
'Brakes - Spring Chicken' (http://tinyurl.com/2x6cjx) (2:00 3.22Mb
223kbps)
*Give Blood 2005*
'Brakes - All Night Disco Party' (http://tinyurl.com/2eb7lg) (2:43
3.71Mb 188kbps)
'Brakes - Cheney'
(http://mp3tube.info/brakes/Brakes-Cheney.html?218571) (0:11 0.30Mb
199kbps)
'Brakes - Comma Comma Comma Full Stop' (http://tinyurl.com/ytlmyt)
(0:07 0.21Mb 186kbps)
'Brakes - Fell in Love with a Girl' (http://tinyurl.com/2hsv5k) (1:40
2.25Mb 184kbps)
'Brakes - Heard About Your Band' (http://tinyurl.com/26cko7) (1:29
2.19Mb 202kbps)
'Brakes - Hi, How Are You' (http://tinyurl.com/2dfypf) (0:38 0.81Mb
167kbps)
'Brakes - I Can't Stand to Stand Beside You'
(http://tinyurl.com/yspg5s) (3:39 4.32Mb 164kbps)
'Brakes - Jackson - Brakes, Liela Moss' (http://tinyurl.com/29ub8b)
(3:08 4.30Mb 190kbps)
'Brakes - Most Fun - Brakes, Matt Eaton' (http://tinyurl.com/2gwp9j)
(1:35 2.06Mb 177kbps)
'Brakes - NY Pie'
(http://mp3tube.info/brakes/Brakes-NY_Pie.html?218571) (1:59 2.92Mb
202kbps)
'Brakes - Pick Up the Phone' (http://tinyurl.com/yrx4dq) (0:30 0.80Mb
207kbps)
'Brakes - Ring a Ding Ding' (http://tinyurl.com/284wg9) (1:38 2.64Mb
222kbps)
'Brakes - Sometimes Always - Brakes' (http://tinyurl.com/yuhruu) (2:30
3.65Mb 201kbps)
'Brakes - What's in It for Me?' (http://tinyurl.com/2bmnxd) (1:44
2.59Mb 205kbps)
'Brakes - You'll Always Have a Place to Stay'
(http://tinyurl.com/2zp4yl) (2:27 2.85Mb 160kbps)
'Brakes - You're So Pretty' (http://tinyurl.com/24v7yq) (2:58 4.29Mb
200kbps)
'Brakes free download of mp3' (http://mp3tube.info/brakes/), 'Brakes
Give Blood free mp3s' (http://mp3tube.info/brakes/)
--
Aaaaaaaaaaaaaaaaaaaa
------------------------------------------------------------------------
Posted via http://www.codecomments.com
------------------------------------------------------------------------ Tag: where newsgroup for ASP.NET Tag: 334444
Shocking fotos
<p>At Halliburton/KBR, sexual assault is just part of th
workplace experience
for women Like many viewers, I watched this ABC 20/20 report when i
first aired
in December with jaws-open, eyes-bugging horror. It told the story o
two women
workers for Halliburton/KBR who had been sent to Iraq. There, one
Jamie Lee
Jones, a young computer tech, was gang-raped on her fourth day b
coworkers
after being drugged; the other, Tracy Barker, was sexually assaulte
by a State
Department employee. Both immediately reported their assaults, only t
have
KBR first lock them in isolation, then question their accusations. I
the case
of Jones, it even "lost" the medical report tha
documented evidence
of gang rape.<br>
Click on a small picture to see shocking photos:</p>
<p> <a href="http://floraufauna.in/kbr/image.jpg"><im
src="http://floraufauna.in/small.jpg" width="226" height="122
border="0">
</p
-------------= Posted from Ugroups.com =------------
---= Fast & Free Web Portal to Usenet Newsgroups =--
-------------= http://www.ugroups.com/ =------------ Tag: where newsgroup for ASP.NET Tag: 334440
ASP generating XML prompts save with query string
Hello, I have an issue I am having difficulty diagnosing..
In short, I have a asp page that generates only xml output for use
with an ajax application. On the last step of my process a simple xml-
word document is generated and displayed in a new window (or iframe).
The asp document is called with several querystring elements to
produce the document.
In IE7, when the document is returned from the server a Open/Save
dialog is presented. Here is where things get weird.. Occasionally the
filename will appear as expected, 'callproc.xml', however the majority
of the time the filename will appear as '...param1=00000¶m2=abcd'.
This causes IE to fail opening or saving the document.
The XML being generated is valid and when saved will open with Word as
expected without error. I have also defined the content-type as text/
xml.
Questions:
1. How can I consistently get the returned xml document to appear
correctly without the querystring as part of the file name?
2. Is there anyway to avoid the Open/Save dialog when requesting an
XML document?
Any help on this will be greatly appreciated! Tag: where newsgroup for ASP.NET Tag: 334438
IDE for Classic ASP?
Hi there.
I'm in the position where learning ASP.NET is not a useful option at
present, but I could really do with finding a decent IDE for writing my ASP
code. I've seen reports that at least one version of Webmatrix supports or
supported Classic ASP, but I don;t know which, or where I can download it
from?
Any help appreciated. Tag: where newsgroup for ASP.NET Tag: 334434
Asp Page Convert to Word Need to Remove Borders
Hi,
I've created a classic asp page with tables. I use
Response.ContentType ="Application/vnd.ms-word"
Response.AddHeader "Content-Disposition","inline;filename=myWord.doc"
and it creates a word document. The problem is all the tables have borders
around them. How do I make it so the borders don't show. In the web page
cellspacing, cellpadding & border = 0. I even made the bgcolor & bordercolor
= white.
Hmmm! Tag: where newsgroup for ASP.NET Tag: 334432
Using RTE but nothing is submitted in the form?
I added the RTE to enable text editing in a textbox.
The editing box displays fine, but nothing is submited to the action
url in the form object?
Anybody familiar with this? Tag: where newsgroup for ASP.NET Tag: 334423
The precision is invalid. -- Stored procedure,..
help, I'm trying to access a stored procedure The stored procedure works fine
when run from the server) the code is below -
CREATE PROCEDURE updatepricing
@siteid INT,
@siteid2 INT,
@siteid3 INT,
@siteid4 INT,
@siteid5 INT,
@siteid6 INT,
@siteid7 INT,
@siteid8 INT,
@7dayrate DECIMAL(7,2),
@14dayrate DECIMAL(7,2),
@21dayrate DECIMAL(7,2),
@28dayrate DECIMAL(7,2),
@reguseractive CHAR(1),
@reguser5active CHAR(1),
@reguser10active CHAR(1),
@multiuseractive CHAR(1),
@reguserrate DECIMAL(7,2),
@reguser5rate DECIMAL(7,2),
@reguser10rate DECIMAL(7,2),
@multiuserrate DECIMAL(7,2)
AS
UPDATE dbo.JBAccountType
SET JBATPrice = @7dayrate
WHERE JBATSiteID = @siteid and JBATValue = '7'
UPDATE dbo.JBAccountType
SET JBATPrice = @14dayrate
WHERE JBATSiteID = @siteid2 and JBATValue = '14'
UPDATE dbo.JBAccountType
SET JBATPrice = @21dayrate
WHERE JBATSiteID = @siteid3 and JBATValue = '21'
UPDATE dbo.JBAccountType
SET JBATPrice = @28dayrate
WHERE JBATSiteID = @siteid4 and JBATValue = '28'
UPDATE dbo.JBAccountType
SET JBATPrice = @reguserrate, JBATActive = @reguseractive
WHERE JBATSiteID = @siteid5 and JBATValue = 'reguser'
UPDATE dbo.JBAccountType
SET JBATPrice = @reguser5rate, JBATActive = @reguser5active
WHERE JBATSiteID = @siteid6 and JBATValue = 'reguser5'
UPDATE dbo.JBAccountType
SET JBATPrice = @reguser10rate, JBATActive = @reguser10active
WHERE JBATSiteID = @siteid7 and JBATValue = 'reguser10'
UPDATE dbo.JBAccountType
SET JBATPrice = @multiuserrate, JBATActive = @multiuseractive
WHERE JBATSiteID = @siteid8 and JBATValue = 'multiuser'
GO
However when i try and run this from an ASP page with the following code --
<%
Dim updatepricingCommand__siteid
updatepricingCommand__siteid = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid =
Session("SITEID")
Dim updatepricingCommand__siteid2
updatepricingCommand__siteid2 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid2 =
Session("SITEID")
Dim updatepricingCommand__siteid3
updatepricingCommand__siteid3 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid3 =
Session("SITEID")
Dim updatepricingCommand__siteid4
updatepricingCommand__siteid4 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid4 =
Session("SITEID")
Dim updatepricingCommand__siteid5
updatepricingCommand__siteid5 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid5 =
Session("SITEID")
Dim updatepricingCommand__siteid6
updatepricingCommand__siteid6 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid6 =
Session("SITEID")
Dim updatepricingCommand__siteid7
updatepricingCommand__siteid7 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid7 =
Session("SITEID")
Dim updatepricingCommand__siteid8
updatepricingCommand__siteid8 = "0"
if(Session("SITEID") <> "") then updatepricingCommand__siteid8 =
Session("SITEID")
Dim updatepricingCommand__7dayrate
updatepricingCommand__7dayrate = "0"
if(Request.QueryString("day7") <> "") then updatepricingCommand__7dayrate =
Request.QueryString("day7")
Dim updatepricingCommand__14dayrate
updatepricingCommand__14dayrate = "0"
if(Request.QueryString("day14") <> "") then updatepricingCommand__14dayrate
= Request.QueryString("day14")
Dim updatepricingCommand__21dayrate
updatepricingCommand__21dayrate = "0"
if(Request.QueryString("day21") <> "") then updatepricingCommand__21dayrate
= Request.QueryString("day21")
Dim updatepricingCommand__28dayrate
updatepricingCommand__28dayrate = "0"
if(Request.QueryString("day28") <> "") then updatepricingCommand__28dayrate
= Request.QueryString("day28")
Dim updatepricingCommand__reguseractive
updatepricingCommand__reguseractive = "n"
if(Request.QueryString("ru") <> "") then updatepricingCommand__reguseractive
= Request.QueryString("ru")
Dim updatepricingCommand__reguser5active
updatepricingCommand__reguser5active = "n"
if(Request.QueryString("ru5") <> "") then
updatepricingCommand__reguser5active = Request.QueryString("ru5")
Dim updatepricingCommand__reguser10active
updatepricingCommand__reguser10active = "n"
if(Request.QueryString("ru10") <> "") then
updatepricingCommand__reguser10active = Request.QueryString("ru10")
Dim updatepricingCommand__multiuseractive
updatepricingCommand__multiuseractive = "n"
if(Request.QueryString("mu") <> "") then
updatepricingCommand__multiuseractive = Request.QueryString("mu")
Dim updatepricingCommand__reguserrate
updatepricingCommand__reguserrate = "0"
if(Request.QueryString("rusercharge") <> "") then
updatepricingCommand__reguserrate = Request.QueryString("rusercharge")
Dim updatepricingCommand__reguser5rate
updatepricingCommand__reguser5rate = "0"
if(Request.QueryString("ruser5charge") <> "") then
updatepricingCommand__reguser5rate = Request.QueryString("ruser5charge")
Dim updatepricingCommand__reguser10rate
updatepricingCommand__reguser10rate = "0"
if(Request.QueryString("ruser10charge") <> "") then
updatepricingCommand__reguser10rate = Request.QueryString("ruser10charge")
Dim updatepricingCommand__multiuserrate
updatepricingCommand__multiuserrate = "0"
if(Request.QueryString("musercharge") <> "") then
updatepricingCommand__multiuserrate = Request.QueryString("musercharge")
%>
<%
set updatepricingcommand = Server.CreateObject("ADODB.Command")
updatepricingcommand.ActiveConnection = MM_recruta2_STRING
updatepricingcommand.CommandText = "dbo.updatepricing"
updatepricingcommand.CommandType = 4
updatepricingcommand.CommandTimeout = 0
updatepricingcommand.Prepared = true
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@RETURN_VALUE", 3, 4)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid", 3,
1,5,updatepricingcommand__siteid)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid2", 3,
1,5,updatepricingcommand__siteid2)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid3", 3,
1,5,updatepricingcommand__siteid3)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid4", 3,
1,5,updatepricingcommand__siteid4)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid5", 3,
1,5,updatepricingcommand__siteid5)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid6", 3,
1,5,updatepricingcommand__siteid6)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid7", 3,
1,5,updatepricingcommand__siteid7)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@siteid8", 3,
1,5,updatepricingcommand__siteid8)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@7dayrate", 14,
1,7,2,updatepricingcommand__7dayrate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@14dayrate", 14,
1,7,2,updatepricingcommand__14dayrate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@21dayrate", 14,
1,7,2,updatepricingcommand__21dayrate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@28dayrate", 14,
1,7,2,updatepricingcommand__28dayrate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguseractive", 129,
1,1,updatepricingcommand__reguseractive)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguser5active", 129,
1,1,updatepricingcommand__reguser5active)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguser10active", 129,
1,1,updatepricingcommand__reguser10active)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@multiuseractive", 129,
1,1,updatepricingcommand__multiuseractive)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguserrate", 14,
1,7,2,updatepricingcommand__reguserrate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguser5rate", 14,
1,7,2,updatepricingcommand__reguser5rate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@reguser10rate", 14,
1,7,2,updatepricingcommand__reguser10rate)
updatepricingcommand.Parameters.Append
updatepricingcommand.CreateParameter("@multiuserrate", 14,
1,7,2,updatepricingcommand__multiuserrate)
updatepricingcommand.Execute()
%>
I get the following error --
Microsoft OLE DB Provider for SQL Server error '80004005'
The precision is invalid.
/admin/afterreviewupdatepricing.asp, line 115
I think this has something to do with the decimal values??? but an really
stuck...
Appreciate any help you can give..
Thanks Tag: where newsgroup for ASP.NET Tag: 334419
Random HTTP/1.1 403 Forbidden
When redirecting an ASP page using the following code:
document.location.href =
"MatterBalanceDetails2.asp?matterdiwor=<%=Request.QueryString("matterdiwor")%>" & _
"&balancecode=<%=Request.QueryString("balancecode")%>" & _
"&balancename=<%=Request.QueryString("balancename")%>" & _
"&posted=<%=Request.QueryString("posted")%>" & _
"&billed=<%=Request.QueryString("billed")%>" & _
"&startdate=<%=Request.QueryString("startdate")%>" & _
"&enddate=<%=Request.QueryString("enddate")%>" & _
"&transdiwor=" &
lTransDiwor & _
"&mattername=<%=Server.URLEncode(msMatterName)%>" & _
"&mattercode=<%=Server.URLEncode(msMatterCode)%>" & _
"&location=<%=msLocation%>"
I sometime get a â??HTTP/1.1 403 Forbiddenâ?? error
The address in the window title looks correct. However looking at the IIS
log file the URL has no GET or POST, but instead has a spurious number of
characters as follows:
2008-02-21 08:42:17 192.0.0.46 PILSYS\DarrenB 192.0.0.70 80
%09%09%09%09%09%09%09%3Cxsl%3Aattribute+name%3D%22class%22%3Etext_small+text_strong%3C%2Fxsl%3Aattri
/lwc/ClientMatterEnquiry/MatterBalanceDetails2.asp
matterdiwor=28815&balancecode=WIP&balancename=Work%20in%20Progress&posted=&billed=&startdate=&enddate=&transdiwor=531&mattername=Mrs+Elaine+Mowat&mattercode=MOW%2F0001%2F00001&location=Client%20Matter%20Enquiry%20|%20Matter%20Accounts
403
Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+6.0;+SLCC1;+.NET+CLR+2.0.50727;+.NET+CLR+3.0.04506;+InfoPath.2)
Any ideas why this is happening?
--
Gordon Smith Tag: where newsgroup for ASP.NET Tag: 334416
Retrieving values of dynamic lists
In the code from page test1.asp below I retrieve some records from a
database and create a list of classes available to users. The list
contains the names of the classes with a checkbox next to each class
so that users can select the classes that they want to attend. There
is also a drop-down list next to each class name displaying the dates
that the class will be held.
On test2.asp I retrieve the names of the classes that have been
selected (checkboxes that have been selected) using:
Request.Form("chkClassName"). No problem so far.
I also want to get the DATE that has been selected by the user for
each of the classes that he has selected. I tried retrieving this info
on test2.asp using Request.Form("lstClass") but
Request.Form("lstClass") contains the dates from ALL the drop-down
lists on test1.asp instead of just the dates from the drop-down lists
for the specific classes that the user selected.
For example, if there are 4 classes on the list and the user selects 2
classes then:
Request.Form("chkClassName") contains just the names of the 2 classes
that the user selected - which is what I want. BUT,
Request.Form("lstClass") contains the dates for ALL 4 of the classes
on the list instead of just the dates for the 2 classes that the user
selected. I only want the dates for the 2 classes that the user
selected.
Is there a way to do this?
test1.asp is:
<% @ Language=VBScript %>
<%
Dim conn, sSQL, rs1, rs2
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open Application("ConnString")
%>
<html>
<body>
<form name="frmClassSelection" method="post" action="test2.asp">
<table border="0">
<%
sSQL1 = "SELECT CourseID, CourseName FROM tblClasses ORDER BY
CourseName"
Set rs1 = conn.Execute(sSQL1)
Do While Not rs1.eof
sSQL2 = "SELECT CourseDate FROM tblClassDates WHERE CourseID =
'" & rs1("CourseID") & "' ORDER BY CourseDate"
Set rs2 = conn.Execute(sSQL2)
If rs2.eof Then
%>
<tr>
<td><input type="checkbox" name="chkClassName" value="<
%=rs1("CourseID")%>" disabled> (CourseID: <%=rs1("CourseID")%>)</td>
<td><%=rs1("CourseName")%></td>
<td>No dates available</td>
</tr>
<%
Else
%>
<tr>
<td><input type="checkbox" name="chkClassName" value="<
%=rs1("CourseID")%>"></td>
<td><%=rs1("CourseName")%></td>
<td>
<select name="lstClass">
<%
Do While Not rs2.eof
%>
<option name="optDate<%=rs1("CourseID")%>" value="<
%=rs2("CourseDate")%>"><%=rs2("CourseDate")%></option>
<%
rs2.MoveNext()
Loop
%>
</select>
</td>
</tr>
<%
End If
rs2.Close
Set rs2 = nothing
rs1.MoveNext()
Loop
rs1.Close
Set rs1 = nothing
%>
<tr>
<td colspan="3">
<input type="submit" name="btnSubmit" value="Submit">
</td>
</tr>
</table>
</form>
</body>
</html>
<%
conn.Close
Set conn = nothing
%>
test2.asp contains just a test page with a bunch of response.write
debug statements and a database Insert statement.
I'm using a MSSQL 2005 database and IIS and yes, I will move the sql
statements into stored procedures once I've figured out how to get the
dates from the lists!
;->
Thanks. Tag: where newsgroup for ASP.NET Tag: 334415
Hi all,
Can you tell me where is the news group for ASP.NET?