Tycoon Talk
Become a Big fish!
The number 1 forum for online business!
Post topics, ask questions, share your knowledge.
Tycoon Talk is part of Freelancer.com - find skilled workers online at a fraction of the cost.

ASP.NET Forum


You are currently viewing our ASP.NET Forum as a guest. Please register to participate.
Login


Tycoon Talk > Web Development and Programming Support > ASP.NET Forum > I keep getting an error after i try to edit my data

Closed Thread
I keep getting an error after i try to edit my data
Old 12-23-2010, 11:03 AM I keep getting an error after i try to edit my data
Average Talker

Posts: 23
Name: Robert Morgan
Trades: 0
Talkupation: robertpurpose is on a distinguished road
I am not sure where i am going wrong here could i get some help on where you guys think i am getting errors when i try to edit and save data:

HTML Code:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/dsuFacStaff.asp" -->
<%
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_dsuFacStaff_STRING
    MM_editCmd.CommandText = "UPDATE Directory SET displaytelephone = ?, displayhomeadd = ?, perferredaddress = ?, otheraddress = ?, FirstName = ?, LastName = ?, Title = ?, SpouseName = ?, Address = ?, City = ?, St = ?, Zip = ?, EmailAddress = ?, WorkPhone = ?, HomePhone = ?, [Position] = ?, Location = ?, Department = ?, Organization = ?, DateEdited = ?, Updated = ? WHERE ID = ?" 
    MM_editCmd.Prepared = true
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 255, MM_IIF(Request.Form("displaytelephone"), "Y", "N")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 255, MM_IIF(Request.Form("displayhomeadd"), "Y", "N")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202, 1, 255, Request.Form("PreferredAddress")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 203, 1, 1073741823, Request.Form("otherAddress")) ' adLongVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 202, 1, 255, Request.Form("FirstName")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 202, 1, 255, Request.Form("LastName")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 202, 1, 255, Request.Form("Title")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 202, 1, 255, Request.Form("Spouse")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 202, 1, 255, Request.Form("Address")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 202, 1, 255, Request.Form("City")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param11", 202, 1, 255, Request.Form("St")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param12", 202, 1, 255, Request.Form("Zip")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param13", 202, 1, 255, Request.Form("EmailAddress")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param14", 202, 1, 255, Request.Form("WorkPhone")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param15", 202, 1, 255, Request.Form("HomePhone")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param16", 202, 1, 255, Request.Form("Position")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param17", 202, 1, 255, Request.Form("Location")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param18", 202, 1, 255, Request.Form("Department")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param19", 202, 1, 255, Request.Form("Organization")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param20", 135, 1, -1, MM_IIF(Request.Form("DateEdited"), Request.Form("DateEdited"), null)) ' adDBTimeStamp
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param21", 202, 1, 255, MM_IIF(Request.Form("updated"), "Y", "N")) ' adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param22", 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 = "Thanks.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
%>
<%
Dim Directory__MMColParam
Directory__MMColParam = "1"
If (Request.QueryString("ID") <> "") Then 
  Directory__MMColParam = Request.QueryString("ID")
End If
%>
<%
Dim Directory
Dim Directory_cmd
Dim Directory_numRows

Set Directory_cmd = Server.CreateObject ("ADODB.Command")
Directory_cmd.ActiveConnection = MM_dsuFacStaff_STRING
Directory_cmd.CommandText = "SELECT * FROM Directory WHERE ID = ?" 
Directory_cmd.Prepared = true
Directory_cmd.Parameters.Append Directory_cmd.CreateParameter("param1", 5, 1, -1, Directory__MMColParam) ' adDouble

Set Directory = Directory_cmd.Execute
Directory_numRows = 0
%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
<script language="JavaScript">
  function showhidefield()
  {
    if (document.form1.displayhomeadd.checked)
    {
      document.getElementById("hideablearea").style.visibility = "visible";
	  var selObj = document.getElementById("PreferredAddress");
	  selObj.selectedIndex = 0;
    }
    else
    {  
	  var selObj = document.getElementById("PreferredAddress");
	  selObj.selectedIndex = 1;
	  document.getElementById("hideablearea").style.visibility = "hidden";
    }
  }
  function checkCheck()
  {
    if (document.form1.displayhomeadd.checked)
    {
		document.getElementById("hideablearea").style.visibility = "visible";
		var selObj = document.getElementById("PreferredAddress");
	  selObj.selectedIndex = 0;
		
    }
    else
    {  
	  document.getElementById("hideablearea").style.visibility = "hidden";
	  var selObj = document.getElementById("PreferredAddress");
	  selObj.selectedIndex = 1;
    }
  }
</script>
</head>
<body onload="checkCheck()" >
<table width="100%" border="1" cellspacing="0" cellpadding="2" bordercolor="#829BB0">
  <tr> 
    <td colspan="2"><img src="images/DSU_LLL.jpg" alt="DSU" width="300" height="110"><strong><font face="Arial, Helvetica, sans-serif"> Employee Directory Administration</font></strong></td>
  </tr>
 <% IF Request.QueryString("ID") = "" then %>
 <tr> 
    <td colspan="2" bgcolor="#FFFF99"><center>
      <strong><a href="index.asp"><font color="#CC0000" face="Arial, Helvetica, sans-serif">You are not logged in. Please click here to log in.</font></a></strong>  
    </center></td>
  </tr>
  <% ELSE %>
  <tr valign="top"> 
    <td width="15%" bgcolor="#000066"> 
      <div align="center">
<div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>
<font color="#FFFFFF"><b><font face="Verdana, Arial, Helvetica, sans-serif"><i><font size="3">Welcome<br />
<font size="2"><%=(Directory.Fields.Item("FirstName").Value)%>&nbsp; <%=(Directory.Fields.Item("LastName").Value)%></font></font></i></font></b></font></div>    </td>
    <td width="85%"><p><font size="-1" face="Arial, Helvetica, sans-serif">Personal information about DSU employees is used in a number  of ways and in various means of communication, (e.g. mail, e-mail, Web site and  telephone directory).&nbsp; As an employee of  DSU and the state of North Dakota,  you are required to provide certain personal information (e.g., name, title,  office location and office phone number) while other information is optional,  (e.g., home address, home phone number, etc.) or confidential (e.g.,  Social Security Number, date of birth).&nbsp; </font></p>
      <p><font size="-1" face="Arial, Helvetica, sans-serif">Per the North Dakota Century Code 44-04-18.1, personal  information regarding a public employee contained in an employee&rsquo;s personnel record shall remain confidential.&nbsp; Release of a person&rsquo;s  home address and home telephone number are optional.</font></p>      
      <form id="form1" name="form1" method="POST" action="<%=MM_editAction%>">
        <table border="1" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC">
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><p><font size="-1" face="Arial, Helvetica, sans-serif">DSU is being proactive in protecting its employees&rsquo; personal  information. We need you to indicate how much personal information can be  released to DSU constituencies and to  external sources (e.g., Balfour and NDPEA)  affiliated with DSU. </font><br />
            <font size="-1" face="Arial, Helvetica, sans-serif"><font color="#000099">&nbsp;<br />
            By checking the boxes below, you       authorize DSU to use the following information in the DSU phone directory       and departmental mailings, on the DSU Web site and with external sources.</font>       (Please check one or more)</font><br />
              <font size="-1" face="Arial, Helvetica, sans-serif">
              <input <%If (CStr((Directory.Fields.Item("displaytelephone").Value & "")) = CStr("Y")) Then Response.Write("checked=""checked""") : Response.Write("")%> name="displaytelephone" type="checkbox" id="displaytelephone" value="Yes" />
                <strong>Home Phone  </strong>
                <input <%If (CStr((Directory.Fields.Item("displayhomeadd").Value & "")) = CStr("Y")) Then Response.Write("checked=""checked""") : Response.Write("")%> name="displayhomeadd" type="checkbox" id="displayhomeadd" value="Yes" onclick="showhidefield()" />
                <strong>Home Address</strong></font><font color="#000099"><br />
                <font size="-1" face="Arial, Helvetica, sans-serif">If you do not check the above box(es),  the Office of  University Relations will only share your campus address and campus telephone  number with DSU constituencies  and external sources. All marketing mail will be sent to your campus address.</font></font></p>
            <p><font size="-1" face="Arial, Helvetica, sans-serif">The Office of Human Resources  maintains the confidential information each employee is required to  provide.&nbsp; The home address and home telephone number will be used for  important mailings such as W-2 forms, benefits information from NDPERS and  health insurance information from Blue Cross Blue Shield of North Dakota.&nbsp;  Inform this office promptly when your home address changes so you can continue  to receive relevant mailings.</font><br />
            <div id="hideablearea" style="visibility:hidden"><font size="-1" face="Arial, Helvetica, sans-serif"><strong>I would prefer my mail to be sent to the following address:
                  <select name="PreferredAddress" id="PreferredAddress">
                    <option value="notSelected">Select one...</option>
                    <option value="DSU" <%If (Not isNull((Directory.Fields.Item("perferredaddress").Value))) Then If ("DSU" = CStr((Directory.Fields.Item("perferredaddress").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>DSU</option>
                    <option value="Home" <%If (Not isNull((Directory.Fields.Item("perferredaddress").Value))) Then If ("Home" = CStr((Directory.Fields.Item("perferredaddress").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Home</option>
                    <option value="Other" <%If (Not isNull((Directory.Fields.Item("perferredaddress").Value))) Then If ("Other" = CStr((Directory.Fields.Item("perferredaddress").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Other</option>
                  </select>
            </strong></font><font size="-1" face="Arial, Helvetica, sans-serif">
            <br />
            If other address, please specify:
            <input name="otherAddress" type="text" id="otherAddress" value="<%=(Directory.Fields.Item("otherAddress").Value)%>" size="40" />
            </font></div></p></td>
          </tr>
        
        <tr>
          <td colspan="4" nowrap="nowrap" bordercolor="#FFFFCC" bgcolor="#FFFF99"><strong><font color="#990000" face="Arial, Helvetica, sans-serif">Please review the following information, and make  changes as needed:</font></strong> </td>
          </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">First Name</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Last Name</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Title</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Spouse <font color="#CC0000">*</font> </font></strong></td>
        </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="FirstName" type="text" id="FirstName" value="<%=(Directory.Fields.Item("FirstName").Value)%>" size="20" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="LastName" type="text" id="LastName" value="<%=(Directory.Fields.Item("LastName").Value)%>" size="20" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <select name="Title" id="Title">
              <option value="Mr." <%If (Not isNull((Directory.Fields.Item("Title").Value))) Then If ("Mr." = CStr((Directory.Fields.Item("Title").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Mr.</option>
              <option value="Ms." <%If (Not isNull((Directory.Fields.Item("Title").Value))) Then If ("Ms." = CStr((Directory.Fields.Item("Title").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Ms.</option>
              <option value="Dr." <%If (Not isNull((Directory.Fields.Item("Title").Value))) Then If ("Dr." = CStr((Directory.Fields.Item("Title").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Dr.</option>
              <option value="Sr." <%If (Not isNull((Directory.Fields.Item("Title").Value))) Then If ("Sr." = CStr((Directory.Fields.Item("Title").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Sr.</option>
              <option value="" <%If (Not isNull((Directory.Fields.Item("Title").Value))) Then If ("" = CStr((Directory.Fields.Item("Title").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>N/A</option>
              </select>
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="Spouse" type="text" id="Spouse" value="<%=(Directory.Fields.Item("SpouseName").Value)%>" size="20" />
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#FFFFFF"><p align="right"><em><font color="#CC0000" size="-1">*Spouse information will only be  used for special mailings<br />
            (e.g. Holiday card) 
            in which you and your spouse will be addressed.</font></em></p></td>
          </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Address</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">City</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">State</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Zip</font></strong></td>
        </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <textarea name="Address" cols="30" rows="2" id="Address"><%=(Directory.Fields.Item("Address").Value)%></textarea>
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="City" type="text" id="City" value="<%=(Directory.Fields.Item("City").Value)%>" size="20" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="St" type="text" id="St" value="<%=(Directory.Fields.Item("St").Value)%>" size="2" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="Zip" type="text" id="Zip" value="<%=(Directory.Fields.Item("Zip").Value)%>" size="10" />
          </font></td>
        </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Email</font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Work Phone </font></strong></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif"><strong>Home Phone</strong></font></td>
        </tr>
        <tr>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="EmailAddress" type="text" id="EmailAddress" value="<%=(Directory.Fields.Item("EmailAddress").Value)%>" size="35" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="WorkPhone" type="text" id="WorkPhone" value="<%=(Directory.Fields.Item("WorkPhone").Value)%>" size="20" />
          </font></td>
          <td nowrap="nowrap" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="HomePhone" type="text" id="HomePhone" value="<%=(Directory.Fields.Item("HomePhone").Value)%>" size="20" />
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Position</font></strong></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="Position" type="text" id="Position" value="<%=(Directory.Fields.Item("Position").Value)%>" size="100" />
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Location</font></strong></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="Location" type="text" id="Location" value="<%=(Directory.Fields.Item("Location").Value)%>" size="100" />
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#FFFFFF"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Department</font></strong></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <input name="Department" type="text" id="Department" value="<%=(Directory.Fields.Item("Department").Value)%>" size="100" />
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><strong><font size="-1" face="Arial, Helvetica, sans-serif">Organization</font></strong></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD"><font size="-1" face="Arial, Helvetica, sans-serif">
            <select name="Organization" id="Organization">
              <option value="Adj" <%If (Not isNull((Directory.Fields.Item("Organization").Value))) Then If ("Adj" = CStr((Directory.Fields.Item("Organization").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Adj</option>
              <option value="Fac" <%If (Not isNull((Directory.Fields.Item("Organization").Value))) Then If ("Fac" = CStr((Directory.Fields.Item("Organization").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Fac</option>
              <option value="Staff" <%If (Not isNull((Directory.Fields.Item("Organization").Value))) Then If ("Staff" = CStr((Directory.Fields.Item("Organization").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Staff</option>
              <option value="Staff/Adj" <%If (Not isNull((Directory.Fields.Item("Organization").Value))) Then If ("Staff/Adj" = CStr((Directory.Fields.Item("Organization").Value))) Then Response.Write("selected=""selected""") : Response.Write("")%>>Staff/Adj</option>
              </select>
          </font></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD">              <p align="center"><font size="-1" face="Arial, Helvetica, sans-serif">This form remains in effect for one year or until we receive  written notice from you rescinding this form.</font><font size="-1" face="Arial, Helvetica, sans-serif">For more information, contact the Office of Human Resources  at 483-2476 or the Office of University Relations at 483-2787.</font>
            <input type="hidden" name="DateEdited" value="<%=Date()%>"/>
          </p></td>
        </tr>
        <tr>
          <td colspan="4" bordercolor="#E8EEFD" bgcolor="#E8EEFD"><center>
            <font size="-1" face="Arial, Helvetica, sans-serif">
              <input type="submit" name="Submit" value="Submit" />
              </font>
          </center>          </td>
        </tr>
      </table>
      <input type="hidden" name="MM_update" value="form1" />
      <input type="hidden" name="MM_recordId" value="<%= Directory.Fields.Item("ID").Value %>" />
    </form></td>
  </tr>
  <% END IF %>
</table>

</body>
</html>
<%
Directory.Close()
Set Directory = Nothing
%>
robertpurpose is offline
View Public Profile Visit robertpurpose's homepage!
 
 
Register now for full access!
Old 12-23-2010, 11:05 AM Re: I keep getting an error after i try to edit my data
chrishirst's Avatar
Missing! presumed drunk.

Latest Blog Post:
A Simple DHTML Tabbed Interface
Posts: 42,336
Name: Chris Hirst
Location: Blackpool. UK
Trades: 0
Talkupation: chrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond reputechrishirst has a reputation beyond repute
And the error is?
__________________
Chris. ->>
Please login or register to view this content. Registration is FREE
 <<-
A foolish consistency is the hobgoblin of little minds
Thought for today:- Is SEO the only industry where all the cowboys are Indians?
chrishirst is online now
View Public Profile Visit chrishirst's homepage!
 
Closed Thread     « Reply to I keep getting an error after i try to edit my data
 
Previous Thread | Next Thread Tycoon Talk > Web Development and Programming Support > ASP.NET Forum > I keep getting an error after i try to edit my data

Thread Tools Search this Thread
Search this Thread:

Advanced Search

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are Off
Refbacks are Off




   
RSS Feed  Feeds: RSS   JS   XML
RSS Feed  Feeds for this forum: RSS   JS   XML



Page generated in 0.15101 seconds with 12 queries