www.webdeveloper.com
Results 1 to 2 of 2

Thread: conversion from vbscript to jscript

  1. #1
    Join Date
    Mar 2005
    Posts
    44

    conversion from vbscript to jscript

    hi guys, I tried to convert the following code from vbscript to jscript but there are still a few mistakes, i highlighted the areas in bold. I hope you can help.

    Code:
    <%
    Dim conn, rs, strSQL
    set conn = Server.CreateObject("ADODB.Connection")
    conn.Open("Provider=Microsoft.Jet.OLEDB.4.0; DATA SOURCE =  " & Server.MapPath("db1.mdb"))
    If Request.Form("update") = "update" Then
     For each fld in Request.Form
      If Left(fld,7) = "status_" Then
       student_id = CLng(Mid(fld,8))
       attendance = Request.Form(fld)
       strSQL = "Update tblattend SET att_status = '" & attendance & "' WHERE studentID = " & student_id & " AND att_date = Date()"
       conn.Execute strSQL, recsupdated 
       If recsupdated = 0 Then
        conn.Execute "Insert INTO tblattend(studentID,att_status,att_date) VALUES(" & student_id & ",'" & attendance & "', #" _
        & Month(Date()) & "/" & Day(Date()) & "/" & Year(Date()) & "#)"
       End If
      End If
     Next
    End If
     
    set rs = conn.Execute("Select tblstudent.*, tblattend.att_status From tblstudent LEFT JOIN tblattend ON (tblstudent.studentID = tblattend.studentID AND tblattend.att_date = Date()) ORDER by tblstudent.Name")
    
    Function currentstatus(statval)
     If rs("att_status") = statval Then
      currentstatus = "checked"
     Else
      currentstatus = ""
     End If
     End Function
    %>
    <div align="center"><strong><font size="3">Attendance records for today</font></strong></div>
    <form name="form1" method="post" action="">
      <table width="50%"  border="0" align="center" cellpadding="4" cellspacing="0">
        <tr bgcolor="#CCCCCC">
          <td width="58%"><strong>Student</strong></td>
          <td width="14%"><strong>Present</strong></td>
          <td width="14%"><strong>Absent</strong></td>
          <td width="14%"><strong>Late</strong></td>
        </tr>
    	<%
    	While Not rs.EOF
        	Response.Write("<tr>")
          	Response.Write("<td>" & rs("Name") & "</td>")
          	Response.Write("<td><input type=radio name=""status_" & rs("studentID") & """ value=""P""" & currentstatus("P") & "></td>")
          	Response.Write("<td><input type=radio name=""status_" & rs("studentID") & """ value=""A""" & currentstatus("A") & "></td>")
          	Response.Write("<td><input type=radio name=""status_" & rs("studentID") & """ value=""L""" & currentstatus("L") & "></td>")
        	Response.Write("</tr>")
    		rs.MoveNext
    	Wend
    	rs.Close
    	set conn = Nothing
    	%>

    My attempt at converting to Jscript
    -------------------------------------------------------

    Code:
    <%
    var conn, rs, strSQL
    conn = new ActiveXObject("ADODB.Connection");
    conn.Open("Provider=Microsoft.Jet.OLEDB.4.0; DATA SOURCE =  " + Server.MapPath("db1.mdb"));
    if(Request.Form("update") == "update"){
     for each fld in Request.Form;
      if(Left(fld,7) == "status_"){
       student_id = CLng(Mid(fld,8));
       attendance = Request.Form(fld);
       strSQL = "Update tblattendatt_status = '" + attendance + "' WHERE studentID = " + student_id + " && att_date = Date()";
       conn.Execute strSQL, recsupdated ;
       if(recsupdated == 0){
        conn.Execute "Insert INTO tblattend(studentID,att_status,att_date) VALUES(" + student_id + ",'" + attendance + "', #"  + Month(Date()) + "/" + Day(Date()) + "/" + Year(Date()) + "#)";
       }
      }
     Next;
    }
     
    rs = conn.Execute("Select tblstudent.*, tblattend.att_status From tblstudent LEFT JOIN tblattend ON (tblstudent.studentID = tblattend.studentID && tblattend.att_date = Date()) ORDER by tblstudent.Name")
    
    function currentstatus(statval){
     if(rs("att_status") == statval){
      currentstatus = "checked";
     }else{
      currentstatus = "";
     }
     }
    %>
    <div align="center"><strong><font size="3">Attendance records for today</font></strong></div>;
    <form name="form1" method="post" action="">;
      <table width="50%"  border="0" align="center" cellpadding="4" cellspacing="0">;
        <tr bgcolor="#CCCCCC">;
          <td width="58%"><strong>Student</strong></td>;
          <td width="14%"><strong>Present</strong></td>;
          <td width="14%"><strong>Absent</strong></td>;
          <td width="14%"><strong>Late</strong></td>;
        </tr>;
     <%;
     While ! rs.EOF;
         Response.Write("<tr>");
           Response.Write("<td>" + rs("Name") + "</td>");
           Response.Write("<td><input type=radio name=""status_" + rs("studentID") + """ value=""P""" + currentstatus("P") + "></td>");
           Response.Write("<td><input type=radio name=""status_" + rs("studentID") + """ value=""A""" + currentstatus("A") + "></td>");
           Response.Write("<td><input type=radio name=""status_" + rs("studentID") + """ value=""L""" + currentstatus("L") + "></td>");
         Response.Write("</tr>");
      rs.MoveNext;
     Wend;
     rs.Close;
    conn = null;
     %>

  2. #2
    Join Date
    Jan 2004
    Location
    Melbourne, Australia
    Posts
    5,298
    You have a misplaced semi-colon in there. Also, the For Each loop is syntatically different in JScript.

    It should be:
    Code:
    for (var fld in Request.Form)
    {
       ...
    }
    It may print unexpected data, however. See this article: http://blogs.msdn.com/ericlippert/ar.../22/53063.aspx

    Regards.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
HTML5 Development Center

"

"

X vBulletin 4.2.2 Debug Information

  • Page Generation 0.11424 seconds
  • Memory Usage 2,850KB
  • Queries Executed 13 (?)
More Information
Template Usage (33):
  • (1)SHOWTHREAD
  • (1)ad_footer_end
  • (1)ad_footer_start
  • (1)ad_global_above_footer
  • (1)ad_global_below_navbar
  • (1)ad_global_header1
  • (1)ad_global_header2
  • (1)ad_navbar_below
  • (1)ad_showthread_firstpost_sig
  • (1)ad_showthread_firstpost_start
  • (1)ad_thread_first_post_content
  • (1)ad_thread_last_post_content
  • (3)bbcode_code
  • (1)footer
  • (1)forumjump
  • (1)forumrules
  • (1)gobutton
  • (1)header
  • (1)headinclude
  • (1)headinclude_bottom
  • (2)memberaction_dropdown
  • (1)navbar
  • (4)navbar_link
  • (1)navbar_moderation
  • (1)navbar_noticebit
  • (1)navbar_tabs
  • (2)option
  • (2)postbit
  • (2)postbit_onlinestatus
  • (2)postbit_wrapper
  • (1)spacer_close
  • (1)spacer_open
  • (1)tagbit_wrapper 

Phrase Groups Available (6):
  • global
  • inlinemod
  • postbit
  • posting
  • reputationlevel
  • showthread
Included Files (26):
  • ./showthread.php
  • ./global.php
  • ./includes/class_bootstrap.php
  • ./includes/init.php
  • ./includes/class_core.php
  • ./includes/config.php
  • ./includes/functions.php
  • ./includes/functions_navigation.php
  • ./includes/class_friendly_url.php
  • ./includes/class_hook.php
  • ./includes/class_bootstrap_framework.php
  • ./vb/vb.php
  • ./vb/phrase.php
  • ./includes/functions_facebook.php
  • ./includes/functions_calendar.php
  • ./includes/functions_bigthree.php
  • ./includes/class_postbit.php
  • ./includes/class_bbcode.php
  • ./includes/functions_reputation.php
  • ./includes/functions_notice.php
  • ./packages/vbattach/attach.php
  • ./vb/types.php
  • ./vb/cache.php
  • ./vb/cache/db.php
  • ./vb/cache/observer/db.php
  • ./vb/cache/observer.php 

Hooks Called (70):
  • init_startup
  • friendlyurl_resolve_class
  • init_startup_session_setup_start
  • database_pre_fetch_array
  • database_post_fetch_array
  • init_startup_session_setup_complete
  • global_bootstrap_init_start
  • global_bootstrap_init_complete
  • cache_permissions
  • fetch_threadinfo_query
  • fetch_threadinfo
  • fetch_foruminfo
  • load_show_variables
  • load_forum_show_variables
  • global_state_check
  • global_bootstrap_complete
  • global_start
  • style_fetch
  • global_setup_complete
  • showthread_start
  • showthread_getinfo
  • strip_bbcode
  • friendlyurl_clean_fragment
  • friendlyurl_geturl
  • forumjump
  • cache_templates
  • cache_templates_process
  • template_register_var
  • template_render_output
  • fetch_template_start
  • fetch_template_complete
  • parse_templates
  • fetch_musername
  • notices_check_start
  • notices_noticebit
  • process_templates_complete
  • friendlyurl_redirect_canonical
  • showthread_post_start
  • showthread_query_postids
  • showthread_query
  • bbcode_fetch_tags
  • bbcode_create
  • showthread_postbit_create
  • postbit_factory
  • postbit_display_start
  • postbit_imicons
  • bbcode_parse_start
  • bbcode_parse_complete_precache
  • bbcode_parse_complete
  • postbit_display_complete
  • memberaction_dropdown
  • tag_fetchbit_complete
  • forumrules
  • navbits
  • navbits_complete
  • build_navigation_data
  • build_navigation_array
  • check_navigation_permission
  • process_navigation_links_start
  • process_navigation_links_complete
  • set_navigation_menu_element
  • build_navigation_menudata
  • build_navigation_listdata
  • build_navigation_list
  • set_navigation_tab_main
  • set_navigation_tab_fallback
  • navigation_tab_complete
  • fb_like_button
  • showthread_complete
  • page_templates