gmmastros thanks for the speedy reply, tried your code but get this error
ADODB.Command error '800a0d5d'
Application uses a value of the wrong type for the current operation.
/ChartaPad/OTIF/OTIF_YearCharts.asp, line 20
Regards
Paul
Hi,
I have this query string at the moment
<a class="nav" href="OTIF_YearCharts.asp?aYear=2015" target="cpOTIF_Main" >Charta OTIF 2015</a>
I would like to change it so that it would use the current year so that I do not have to change it at the start of each year. I have tried
<a class="nav"...
Hi sugarflux,
I did not build this website initially, which is our company intranet but I have been looking after it as the person who designed it left the company. I am learning as I go and will try and rebuild it without using frames once I can get my head around exactly what it all does. In...
Hi sugarflux,
Sorry I have not replied sooner but I have been on holiday, I have tested your javascript and it does what I need it to do however I do have one issue and this is my fault for not mentioning it earlier.
The pages that these menus feed are in frames, this is a 2 column frame page...
Hi All,
I have a link to a page and the url contains a parameter variable to pass to a querystring on another page
<a class="nav" href="../OEE/OEE_ChartYear.asp?cYear=2014" target="cpOTIF_Main" >OEE 2014</a>
Obviously this will not work after the end of this year as it is passing 2014, I...
1DMF & Andrzejek,
Again thanks for both of your responses.
Since the first suggestion from 1DMF I have been working on my code and I now added the e-mail code into my loop and I also had to close my form and report after sending the mail to make it work.
This is the code I have at the moment...
Hi 1DMF,
Thanks for your response, I tried running the following code
Public Function SendData()
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("QryLoadNo", dbOpenSnapshot, dbSeeChanges)
Do While Not rs.EOF
' do something , perhaps call the mailer program
Call SendMail...
I have the following code which if a record exists creates a PDF and sends an e-mail
Public Function SendMail()
Dim strFilename As String
Dim strNewName As String
Dim strHead As String
Dim strSub As String
Dim ddate As String
Dim strfrp As String
Dim strPlant As String
Dim rsCount As...
[2thumbsup]Hi 1DMF and thanks for your speedy reply,
I have modified my code to the same as the code you sent me and it works brilliantly
thank you so much for your help [2thumbsup] [medal]
Regards
Paul
Hi,
I have a form which has three sets of radio button groups all containg either "pass" or "fail" for each group at form load all radios are unchecked so that the user has to select either "pass" or "fail" for each group.
the following code checks to make sure each radio group has a...
Hi 1DMF,
Ignore me I had the test page in a sub folder therefore it could not find
<script src="jquery-1.9.1.min.js" type="text/javascript"></script>
I changed it to this
<script src="../jquery-1.9.1.min.js" type="text/javascript"></script>
and now it works
Regards
Paul
Hi 1DMF,
I Tried your test page but is does not work for me, i must be doing something wrong
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html...
Hi,
I have tried to write some code which will check the value of multiple radio groups and if any of the vales equal "Fail" then it will put "Fail" into a textbox otherwise it will put "Pass", however it does not seem to work.
Could someone tell me where I am going wrong please
<script...
PHV,
I would like to thank you for all your help on this issue, I have tested the code after correcting the typo and it appears to work great.
It just shows that when you are a relative "noob" like me you try too hard to find a solution and end up creating complex code when a "guru" like your...
HI PHV,
I have changed the code and this is what I have now
Option Explicit
Dim StdIn: Set StdIn = WScript.StdIn
Dim StdOut: Set StdOut = WScript.StdOut
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
Main
Sub Main
Dim FolderPath
FolderPath =...
PHV,
I have tested the script using test folders on my PC however it comes saying the file already exists and I can't work out why. It works fine for just removing the space
Regards
Paul
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.