Posts Tagged ‘line numbers’

Wrong datatype for second argument

Sunday, August 22nd, 2010
This is my script for counting file size in folders, but when I put this script on normal text page it shows error:
Warning: in_array() [function.in-array]: Wrong datatype for second argument in statistics.php on line 20

Expand|Select|Wrap|Line Numbers
  1. <?php
  2. if (session_id() == ""){
  3. session_start();
  4. }
  5. $maxupload=1024000000; // in byte
  6. $dir=’jdownloads’;
  7. $notcount=array(‘index.html’,'listing.php’,'descriptionfile.txt’);
  8. dirs($dir);
  9. $sizeinbyte=($_SESSION[tots]==0)?’0′:$_SESSION[tots];
  10. $_SESSION[tots]=array();
  11. unset($_SESSION[tots]);
  12. function dirs($dir){
  13. global $notcount;
  14. if ($handle = opendir($dir)) {
  15. while (false !== ($file = readdir($handle))) {
  16.  if ($file != "." && $file != "..") {
  17. if(is_dir($dir.’/’.$file)){
  18. dirs($dir.’/’.$file);
  19. }else{
  20. if (!in_array($file, $notcount)) {
  21. $fl=filesize($dir.’/’.$file);
  22. $_SESSION[tots]=$_SESSION[tots]+$fl;
  23. }
  24. }
  25. }
  26. }
  27. closedir($handle);
  28. }
  29. }
  30. ?>

Tags: , , , ,
Posted in dotnet, vb, vb.net | No Comments »

Access (2007) – Creating a query which changes wages depending upon age

Sunday, August 22nd, 2010
Hello Everyone,

I’m having abit of difficulty with an aspect of Access. I wish to create a query which changes a persons wage depending upon their age. This is what I have done so far:

Expand|Select|Wrap|Line Numbers
  1. SELECT Tble_Staff.[Unique Staff Number], Tble_Staff.[Age], Tble_Staff.[Age] AS Normal_Wage
  2. FROM Tble_Staff
  3. WHERE IIF([Normal_Wage]=12,13,IIF([Normal_Wage]=13,13.34,IIF([Normal_Wage]=14,13.78,IIF([Normal_Wage]=15,14,IIF([Normal_Wage]=16,14.50,IIF([Normal_Wage]=17,14.70,IIF([Normal_Wage]>=18,15.60,"Invalid Number"))))))); 
  4.  

Now, I have the feeling that this doesn’t work due to the fact that I utilise the [Normal_Wage] variable twice. However, I am unsure as to how to avoild this.
Any help or suggestions would be greatly appreciated. I need to get this done ASAP.

Thanks,

Edward Gorman

Tags: , ,
Posted in dotnet, vb, vb.net | No Comments »

How To Redirect If Already Submitted?

Sunday, August 22nd, 2010
Hello, I am trying to figure out how to redirect users from accessing a form if they have already submitted it within the past hour. I am trying to figure this out because the TOS with my hosting company state that I cannot send over x amount of emails per hour. This form is made to send out to a distribution list and if it gets submitted twice within the same hour, I will be breaking the TOS. What should I do to prevent the form from getting submitted twice within the same hour? I have had to resort to something because even though I tell the other admins, they still break it every now and then.

Here is a modified version of the form(test_mail.php). It is made to send out text messages. The only difference between the two forms is that one actually sends to the distribution list and this one doesn’t.

Expand|Select|Wrap|Line Numbers
  1. <?php 
  2. if ($_POST["emailaddress"]<>”) { 
  3.     $ToEmail = ’testmail@higherpowermedia.com ’; 
  4.     $mailheader = "From: ".$_POST["fullname"]."rn"; 
  5.     $mailheader .= "Reply-To: ".$_POST["emailaddress"]."rn"; 
  6.     $mailheader .= "Content-type: text/html; charset=iso-8859-1rn"; 
  7.     $MESSAGE_BODY .= "".nl2br($_POST["comment"]).""; 
  8.     mail($ToEmail, $EmailSubject, $MESSAGE_BODY, $mailheader) or die ("Failure"); 
  9. ?> 
  10. Your message has been successfully sent to all users.
  11. <?php 
  12. } else { 
  13. ?> 
  14. <html>
  15. <head>
  16. <script language="javascript"><!–
  17.  
  18.         maxKeys = 136;
  19.             var IE = (document.all) ? 1 : 0;
  20.             var DOM = 0; 
  21.             if (parseInt(navigator.appVersion) >=5) {DOM=1};
  22.  
  23.         function txtshow( txt2show ) {
  24.  
  25.             // Detect Browser
  26.  
  27.             if (DOM) {
  28.         var viewer = document.getElementById("txtmsg");
  29.                 viewer.innerHTML=txt2show;
  30.             }
  31.             else if(IE) {
  32.                 document.all["txtmsg"].innerHTML=txt2show;
  33.             }
  34.         }
  35.  
  36. function keyup(what) 
  37. {
  38.   var str = new String(what.value);
  39.   var len = str.length;
  40.   var showstr = len + " characters of " + maxKeys + " have been entered";
  41.   if (len > maxKeys) showstr += ’<br>Your text message is over 136 characters long, please revise your entry.’;
  42.   txtshow( showstr );
  43. }
  44. //–></script> 
  45.  
  46.  
  47.  
  48. </head>
  49. <body>
  50. <form action="test_mail.php" method="post">
  51.  
  52.                         <input id="name" class="text-input" type="hidden" name="fullname" value="TestMail">
  53.  
  54.  
  55.                         <input id="email" class="text-input" name="emailaddress" type="hidden" value="testmail@higherpowermedia.com">
  56.                         You are limited to 136 characters.
  57.  
  58.                         <br>
  59.                         <input id="message" class="text-input" name="comment" type="text" maxlength="136" onkeyup="keyup(this)" style="width: 200px">
  60.                        <br><div id="txtmsg"> 
  61.                                     &nbsp;</div>
  62.  
  63.                         <input type="submit" class="submit" name="Submit" value=" Broadcast Message">
  64.                     </form><?php 
  65. }; 
  66. ?>
  67. </body>
  68. </html>
  69.  

Tags: , , , , , , , ,
Posted in dotnet, vb, vb.net | No Comments »

SVG Text Manipulation with JavaScript

Saturday, August 21st, 2010
Hi All,

I am creating a custom chart using SVG and I am having problems while dealing with text on IE. I have the SVG file being loaded through an EMBED tag and I can access it through JavaScript. This is a line chart and the lines are being positioned correctly. The problem is that I want to change the text of the scale to the values on the JavaScript, but I can’t make it work on IE.

Below is the code snippet that handles this:

Expand|Select|Wrap|Line Numbers
  1. var newText = svg_doc.createElementNS(svgNS,"text");
  2.     newText.setAttributeNS(null,"x",100);        
  3.     newText.setAttributeNS(null,"y",100);    
  4.     newText.setAttributeNS(null,"font-size","13px");
  5.     newText.setAttributeNS(null,"text-anchor","middle");
  6.     newText.setAttributeNS(null,"fill-opacity",Math.random());        
  7.     var red = Math.round(Math.random() * 255);
  8.     var green = Math.round(Math.random() * 255);
  9.     var blue = Math.round(Math.random() * 255);
  10.     newText.setAttributeNS(null,"fill","rgb("+ red +","+ green+","+blue+")");
  11.     var textNode = document.createTextNode("a new text");
  12.     newText.appendChild(textNode);
  13.  

My code stops working when I call appendChild(). I have seen this working when the code is inside the SVG file. But due to restrictions on the system I am working in I have to put my code on a HTML that has the SVG on an EMBED tag.

On Firefox this would be quite simple using something like this:

Expand|Select|Wrap|Line Numbers
  1.     var text_el = svg_doc.getElementById(‘value’);
  2.     text_el.textContent = ’something’;
  3.  

But this construction does not work in IE. Nor it throws an error. Does anybody know of any similar way of dealing with SVG text IE?

Any help would be really appreciated,

Thanks a lot in advance,

Regards,

Igor

Tags: , , ,
Posted in dotnet, vb, vb.net | 1 Comment »

Loading images in the background

Friday, August 20th, 2010
Hello everyone ;)

I would like to load some images using JS.

My code:

Expand|Select|Wrap|Line Numbers
  1. var img=new Image();
  2. img.onload = function() {f1()};
  3. img.onerror = function() {f2()};
  4. img.src=’http://example.com/image.gif’;
  5. sett = setTimeout(function() {f3()}, 100000);
  6.  
  7. //f3 contains not interesting code and:
  8. img = null;
  9. clearTimeout(sett);
  10.  

Simply task, but I have two problems.

1) Some images don’t listen to orders from setTimeout and load for 200 and more second. What is wrong with my code? Notice, that it happens only with some images, not all.

2) Images are loading according to status of currently user. In some cases there can appear images which require to login by htpassword to see them. Then user would see a window with fields to login. What can I do to in that case skip this image and avoid showing that window?

Thank you so much for any help.

Tags: , ,
Posted in dotnet, vb, vb.net | No Comments »

How do I find out if any array is empty?

Friday, August 20th, 2010
I’m trying the run a function that only executes if an array is empty.
If the array is empty is technically has one element with the value of ”.

Expand|Select|Wrap|Line Numbers
  1. if(array_filter($array))

The above code should tell me if the array has one or more non-empty elements and it works. However although it works, I get this message.

Warning: array_filter() [function.array-filter]: The first argument should be an array in /my server/my site /public_html/my file.php on line 40

If there a solution to this please?

Tags: , , , , ,
Posted in dotnet, vb, vb.net | No Comments »

Closing A Recordset that was Never Set

Friday, August 20th, 2010
I have a couple of private subs where I open multiple recordsets and then close them and set them to nothing in my Exit_Procedure. Example:

Expand|Select|Wrap|Line Numbers
  1. On Error GoTo Error_Handler:
  2.  
  3. Dim rs1 As ADODB.Recordset
  4. Dim rs2 As ADODB.Recordset
  5. ‘etc.
  6.  
  7. ‘…code…
  8.  
  9. Exit_Procedure:
  10.    On Error Resume Next
  11.    rs1.Close
  12.    Set rs1 = Nothing
  13.    rs2.Close
  14.    Set rs2 = Nothing
  15.    ’etc.
  16.    Exit Sub
  17. Error_Handler:
  18.     MsgBox "Error " & Err.Number & ": " & Err.Description, vbCritical
  19.     Resume Exit_Procedure
  20.  

Usually, if a certain criterion is met I have the code jump to my Exit_Procedure. Using the example code above, if my rs1 recordset is empty (BOF And EOF = True) then I have it jump to the Exit_Procedure. The problem is that when it gets to rs2.Close in my Exit_Procedure I get a runtime error 91: Object variable or With block variable not set. I understand the error. However, I thought the On Error Resume Next line would cause the code to overlook this? I don’t want to remove this line of code because rs2 would need to be closed and set to Nothing if it’s opened during another execution of the code.

Tags: , ,
Posted in dotnet, vb, vb.net | No Comments »

importing excel document with dates into mysql using python

Friday, August 20th, 2010
Hello,
I am attempting to import an excel document into a mysql database using python. The excel document has three columns of data: MATCH_ID, DATETIME, and POS_TYPE. Using the code I’ll show at the end, I have successfully imported the excel document except for one problem. The column DATETIME has values in the format of ‘yyyy-mm-dd’. Yet when I try the importing, all the values just come out as ’0000-00-00′. When I tried importing this as a varchar file, all of the numbers that came out were just a large five-digit number. I;m thinking this may have something to do with the formating of the cells in excel. The other two values which are just a number string and a short word import perfectly. I have tried changing the variable type, but that was not helpful. Clearly form my code you can see I quite new at this. Your help will be very much appreciated.

Expand|Select|Wrap|Line Numbers
  1. from xlrd import open_workbook, cellname
  2. import MySQLdb as mysql
  3. db=mysql.connect(db_info)
  4. c=db.cursor()
  5. c.execute(‘CREATE DATABASE actual_data’)
  6.  
  7. db=mysql.connect(db_info)
  8. c=db.cursor()
  9. c.execute(‘CREATE TABLE actual_data_table (MATCH_ID VARCHAR(35) NOT NULL,DATETIME DATE NOT NULL,POS_TYPE VARCHAR(35) NOT NULL, TICKER VARCHAR(35) NOT NULL, EXIT_TYPE TEXT NOT NULL)’)
  10.  
  11. file_to_import=’actualdata.xls’
  12. column_count=5
  13. book=open_workbook(file_to_import)
  14. sheet=book.sheet_by_index(0)
  15. db=mysql.connect(db_info)
  16. c=db.cursor()
  17.  
  18. for row_index in range(sheet.nrows):
  19.  
  20.     row_num=row_index
  21.     MATCH_ID=sheet.cell(row_index,0).value
  22.     DATETIME=sheet.cell(row_index,1).value
  23.     POS_TYPE=sheet.cell(row_index,2).value
  24.     c.execute(‘insert into actual_data_table values ("%s","%s","%s")’ % (MATCH_ID, DATETIME, POS_TYPE))
  25.     (MATCH_ID,DATETIME,POS_TYPE)
  26.  
  27. cursor.close()
  28. conn.commit()
  29. conn.close()  
  30.  

Tags: , , , , , , , , ,
Posted in dotnet, vb, vb.net | No Comments »

Line Numbers

Thursday, August 19th, 2010
As I am learning PHP, I am running into errors in my code. I notice that the error message contains the line number. I have been using NotePad (OS=windows-7 Ultimate) to print the code but I notice line numbers do not print. Is there any way to print line numbers when you want to view the code?

Thanks,
Sam

Tags: , , ,
Posted in dotnet, vb, vb.net | No Comments »

Why can’t I get this mail() script to work

Thursday, August 19th, 2010
I have a flash template with a contact page when you put all the information in the fields and click send it says sent like everything works. After that I check my mail and there is nothing there. I have tested the webserver it is php compatible. I also created a mini test string and was able to send and recieve a test email using that small string. I’ll post the action script in flash first then the php code. Id appreciate someone telling me what I’m doing wrong.

Thanks

Heres the action script in flash

Expand|Select|Wrap|Line Numbers
  1.  
  2. function clearField()
  3. {
  4.     txtField1.text = label1;
  5.     txtField2.text = label2;
  6.     txtField3.text = label3;
  7.     txtField4.text = label4;
  8.     txtField5.text = label5;
  9.     Selection.setFocus("_focus");
  10. } // End of the function
  11. label1 = "";
  12. label2 = "";
  13. label3 = "";
  14. label4 = "";
  15. label5 = "Message:";
  16. countField = 5;
  17. clearField();
  18. var arrayLabel = new Array();
  19. for (i = 1; i < countField + 1; i++)
  20. {
  21.     txtField = this["txtField" + i];
  22.     txtField.index = i;
  23.     arrayLabel[i] = this["label" + i];
  24.     txtField.tabIndex = i;
  25.     txtField.onSetFocus = function ()
  26.     {
  27.         if (this.text == arrayLabel[this.index])
  28.         {
  29.             this.text = "";
  30.         } // end if
  31.     };
  32.     txtField.onKillFocus = function ()
  33.     {
  34.         if (this.text == "")
  35.         {
  36.             this.text = arrayLabel[this.index];
  37.         } // end if
  38.     };
  39. } // end of for
  40. btnClear.onRollOver = function ()
  41. {
  42.     this.gotoAndPlay("over");
  43. };
  44. btnClear.onRollOut = btnClear.onReleaseOutside = function ()
  45. {
  46.     this.gotoAndPlay("out");
  47. };
  48. btnClear.onRelease = function ()
  49. {
  50.     clearField();
  51. };
  52. btnSubmit.onRollOver = function ()
  53. {
  54.     this.gotoAndPlay("over");
  55. };
  56. btnSubmit.onRollOut = btnSubmit.onReleaseOutside = function ()
  57. {
  58.     this.gotoAndPlay("out");
  59. };
  60. btnSubmit.onRelease = function ()
  61. {
  62.     if (_parent.contactform.txtField1.text == label1 || _parent.contactform.txtField2.text == label2 || _parent.contactform.txtField3.text == label3 || _parent.contactform.txtField4.text == label4 || _parent.contactform.txtField5.text == label5)
  63.     {
  64.         gotoAndStop(3);
  65.     }
  66.     else
  67.     {
  68.         _parent.contactform.loadVariables("email.php", "POST");
  69.         gotoAndStop(2);
  70.     } // end else if
  71. };
  72. stop ();
  73.  

Heres the php script

Expand|Select|Wrap|Line Numbers
  1. <?php
  2. //Type the receiever’s e-mail address
  3. $emailAddress = "brian@sbsitedesigns.com";
  4. //Type your Site Name
  5. $siteName = "SBSiteDesigns.com";
  6.  
  7. $contact_name = $_POST['name'];
  8. $contact_email = $_POST['email'];
  9. $contact_subject = $_POST['subject'];
  10. $contact_message = $_POST['message'];
  11.  
  12. if( $contact_name == true ) {
  13.     $sender = $contact_email;
  14.     $receiver = $emailAddress;
  15.     $client_ip = $_SERVER['REMOTE_ADDR'];
  16.  
  17.     $email_body = "The Name Of The Sender: $contact_name nEmail: $sender nnSubject: $contact_subject
  18. nnMessage: nn$contact_message nnIP ADDRESS: $client_ip nn$siteName";
  19.  
  20.     $emailAutoReply = "Hi $contact_name, nnWe have just received your E-Mail. We will get
  21. in touch in a few days. Thank you!  nn$siteName ";
  22.  
  23.     $extra = "From: $senderrn" . "Reply-To: $sender rn" . "X-Mailer: PHP/" . phpversion();
  24.     $autoReply = "From: $receiverrn" . "Reply-To: $receiver rn" . "X-Mailer: PHP/" . phpversion();
  25.  
  26.     mail( $sender, "Auto Reply: $contact_subject", $emailAutoReply, $autoReply );
  27.  
  28.     if( mail( $receiver, "New E-Mail - $contact_subject", $email_body, $extra ) ) {
  29.         echo "success=yes";
  30.     } else {
  31.         echo "success=no";
  32.     }
  33. }
  34. ?>
  35.  

Thanks in advance

Tags: , , , , , , , ,
Posted in dotnet, vb, vb.net | No Comments »