Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > ASP > ASP Forum > Error Type: Object required: 'uploaddata' รบกวนทุกท่านด้วยครับ

Error Type: Object required: 'uploaddata' รบกวนทุกท่านด้วยครับ

เริ่มหัวข้อใหม่

Guest

<%@ language = vbscript%>


<%
sql = "Select * from EMPMONTH ; "
set rs = Conn_helpdesk.execute(sql)
sql1 = "Select * from Helpdesk_Job_type"
set rsjobtype = Conn_helpdesk.execute(sql1)
sql2 = "select * from Helpdesk_Service_order"
set rs_serviceorder = Conn_helpdesk.execute(sql2)
set rs_serviceorder = Server.CreateObject("adodb.recordset")
rs_serviceorder.Open sql2,Conn_helpdesk,1,3
'-----------****************************************************************-------------------
if rs_serviceorder.RecordCount =0 then
' *********************************************************************************

selectJob_Id = Request("selectJob_Id")
' ** selectdateIn = Request("selectdateIn")
textfieldJob_header = Request("textfieldJob_header")
textfieldJob_detail = Request("textfieldJob_detail")
textfieldCreate_by = Request("textfieldCreate_by")
textfieldCreate_where = Request("textfieldCreate_where")
textfield_IP = Request("textfield_IP")
SelectNAME_IT_Acknowladge = Request("SelectNAME_IT_Acknowladge")
SelectNAMEEMP_IT_Responsible = Request("SelectNAMEEMP_IT_Responsible")
' ** selectdate = Request("selectdate")

' *********************************************************************************

rs_serviceorder.AddNew
rs_serviceorder("Service_Id")=uploaddata.Item("textfieldService_id").Item("value")
rs_serviceorder("Job_Id") = selectJob_Id
rs_serviceorder("Job_header") = textfieldJob_header
rs_serviceorder("Job_detail") = textfieldJob_detail
rs_serviceorder("Create_by") = textfieldCreate_by
rs_serviceorder("Create_where") = textfieldCreate_where
rs_serviceorder("COM_IP") = textfield_IP
rs_serviceorder("Acknowladge") = SelectNAME_IT_Acknowladge
rs_serviceorder("Responsible") = SelectNAMEEMP_IT_Responsible
'rs_serviceorder.Save
' rs_serviceorder.movenext
'rs_serviceorder.close

'*******************************************************************************
else

textfieldService_id = Request("textfieldService_id")
selectJob_Id = Request("selectJob_Id")
' ** selectdateIn = Request("selectdateIn")
textfieldJob_header = Request("textfieldJob_header")
textfieldJob_detail = Request("textfieldJob_detail")
textfieldCreate_by = Request("textfieldCreate_by")
textfieldCreate_where = Request("textfieldCreate_where")
textfield_IP = Request("textfield_IP")
SelectNAME_IT_Acknowladge = Request("SelectNAME_IT_Acknowladge")
SelectNAMEEMP_IT_Responsible = Request("SelectNAMEEMP_IT_Responsible")
' ** selectdate = Request("selectdate")

' *********************************************************************************
rs_serviceorder.MoveLast
'rs_serviceorder.AddNew
'************************ rs_serviceorder("Service_Id")=uploaddata.Item("textfieldService_id").Item("value")
rs_serviceorder("Service_Id")=uploaddata.Item("textfieldService_id").Item("value")
' rs_serviceorder("Service_Id") = textfieldService_id
rs_serviceorder("Job_Id") = selectJob_Id
rs_serviceorder("Job_header") = textfieldJob_header
rs_serviceorder("Job_detail") = textfieldJob_detail
rs_serviceorder("Create_by") = textfieldCreate_by
rs_serviceorder("Create_where") = textfieldCreate_where
rs_serviceorder("Acknowladge") = SelectNAME_IT_Acknowladge
rs_serviceorder("Responsible") = SelectNAMEEMP_IT_Responsible
'rs_serviceorder.Save
'rs_serviceorder.close

'******************************************************************************
end if
rs_serviceorder.Save
rs_serviceorder.close

' **** rs_serviceorder("") =
' **** rs_serviceorder("") =
' *********************************************************************************
%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">
<title>Helpdesk</title>
<link href="style/style.css" rel="stylesheet" type="text/css">

</head>
<body>

<FORM name = "userinfo" action="Index.asp" method="post" onsubmit="">

<p>
<label>àÅ¢·Õè</label>     
                  
<input name="textfieldService_id" type="text" size="10" maxlength="10" > 
</p>

<p>
<label>ÅÑ¡É³Ð§Ò¹·Õè«èÍÁ</label>
      



<select name="selectJob_Id" >

<option value="" selected >--â»Ã´àÅ×Í¡ ÅÑ¡É³Ð§Ò¹--</option>
<%
strsql1 = "Select * from Helpdesk_Job_type "
Set rsjobtype = Conn_helpdesk.execute(strsql1)
do until rsjobtype.eof
response.write"<option value ="""&rsjobtype("Job_Id")&""">"&rsjobtype("Type_Detail")&"</option>"
rsjobtype.movenext
loop

%>
</select>
</p>

<p>
<label>ÇÑ¹·ÕèÃÑºá¨é§</label> 
                
<label>ÇÑ¹·Õè</label>
<select name="selectdateIn"> 
<option value="01">1</option>
<option value="02">2</option>
<option value="03">3</option>
<option value="04">4</option>
<option value="05">5</option>
<option value="06">6</option>
<option value="07">7</option>
<option value="08">8</option>
<option value="09">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select> 
 
<label>à´×Í¹</label>
<select name="selectmonthIn">
<option value="01">Á¡ÃÒ¤Á Jan</option>
<option value="02">¡ØÁÀÒ¾Ñ¹¸ì Feb</option>
<option value="03">ÁÕ¹Ò¤Á Mar</option>
<option value="04">àÁÉÒÂ¹ Apr</option>
<option value="05">¾ÄÉÀÒ¤Á May</option>
<option value="06">ÁÔ¶Ø¹ÒÂ¹ Jun</option>
<option value="07">¡Ã¡®Ò¤Á Jul</option>
<option value="08">ÊÔ§ËÒ¤Á Aug</option>
<option value="09">¡Ñ¹ÂÒÂ¹ Sep</option>
<option value="10">µØÅÒ¤Á Oct</option>
<option value="11">¾ÄÈ¨Ô¡ÒÂ¹ Nov</option>
<option value="12">¸Ñ¹ÇÒ¤Á Dec</option>
</select> 
 
<label>»Õ ¾.È.</label>
<select name="selectyearIn">
<option value="2005">2548</option>
<option value="2006">2549</option>
<option value="2007">2550</option>
<option value="2008">2551</option>
<option value="2009">2552</option>
<option value="2010">2553</option>
<option value="2011">2554</option>
<option value="2012">2552</option>
<option value="2013">2553</option>
<option value="2014">2554</option>
</select> 
</p>

<%
Sub ValidateTimeIn
if (request.Form.Item("text_HH_in")>= 0 and request.Form.Item("text_HH_in")<= 23 ) and _
(request.Form.Item("text_MM_in")>= 0 and request.Form.Item("text_MM_in")<= 59)and _
(request.Form.Item("text_SS_in")>= 0 and request.Form.Item("text_SS_in")<= 59) Then
else
Response.Write ("¤Ø³¡ÃÍ¡¢éÍÁÙÅàÇÅÒ¼Ô´")
End if
End Sub

Sub ValidateTimeOut
if (request.Form.Item("text_HH_out")>= 0 and _
request.Form.Item("text_HH_out")<= 23 )and _
(request.Form.Item("text_MM_out")>= 0 and _
request.Form.Item("text_MM_out")<= 59)and _
(request.Form.Item("text_SS_out")>= 0 and _
request.Form.Item("text_SS_out")<= 59) Then
else
Response.Write ("¤Ø³¡ÃÍ¡¢éÍÁÙÅàÇÅÒ¼Ô´")
End if
End Sub

Dim TimeStringIn
if (Request.Form.Item("text_HH_in") = ""OR _
Request.Form.Item("text_MM_in") = ""OR _
Request.Form.Item("text_SS_in") = "" OR _
Request.Form.Item("text_HH_out") = ""OR _
Request.Form.Item("text_MM_out") = ""OR _
Request.Form.Item("text_SS_out") = "" )Then
%>


<p>
<label> àÇÅÒ HH : MM : SS</label>   
<input name = "text_HH_in" type = "text" size = "1" maxlength = "2" >
<label> : </label>
<input name = "text_MM_in" type = "text" size = "1" maxlength = "2" >
<label> : </label>
<input name = "text_SS_in" type = "text" size = "1" maxlength = "2" >
</p>

<%ELSE%>
<%
text_HH_in = Request.Form.Item("text_HH_in")
text_MM_in = Request.Form.Item("text_MM_in")
text_SS_in = Request.Form.Item("text_SS_in")
text_HH_out = Request.Form.Item("text_HH_out")
text_MM_out = Request.Form.Item("text_MM_out")
text_SS_out = Request.Form.Item("text_SS_out")
TimeStringIn = text_HH_in & ":" &text_MM_in & ":" &text_SS_in
TimeStringOut = text_HH_out & ":" &text_MM_out & ":" &text_SS_out

IF (not IsNumeric (text_HH_in)) OR _
(not IsNumeric (text_MM_in)) OR _
(not IsNumeric (text_SS_in)) OR _
(not IsNumeric (text_HH_out)) OR _
(not IsNumeric (text_MM_out)) OR _
(not IsNumeric (text_SS_out))Then
Response.Write("<p>¡ÃØ³Ò¡ÃÍ¡¢éÍÁÙÅà»ç¹µÑÇàÅ¢à·èÒ¹Ñé¹</p>")
Else
Call ValidateTimeIn
call ValidateTimeOut
End if
Response.Write(TimeStringIn)
Response.Write("<p>-----------------------------------------------------</p>"&TimeStringout)
End if
%>


<p>
<label>ËÑÇ¢éÍ¢Í§»ÑËÒ</label>
         
<input name="textfieldJob_header" type="text" size="50" maxlength="100">
</p>

<p>
<label>ÃÒÂÅÐàÍÕÂ´¢Í§»ÑËÒ</label>
 
<textarea name="textfieldJob_detail" cols="50" rows="3"></textarea>
</p>

<label>¼Ùéá¨é§</label>      
                 
<input name="textfieldCreate_by" type="text" size="50" maxlength="60">
</p>

<p>
<label>Ê¶Ò¹·Õèá¨é§</label>
               
<input name="textfieldCreate_where" type="text" size="50" maxlength="75">
</p>

<p>
<label>ËÁÒÂàÅ¢ IP </label>
             
<input name="textfield_IP" type="text" size="13" maxlength="15">
<label>¡Ã³Õà»ç¹à¤Ã×èÍ§¤ÍÁ¾ÔÇàµÍÃì </label>
</p>

<p>
<label>¼ÙéÃÑºá¨é§</label> 
                  
<select name="SelectNAME_IT_Acknowladge" >

<option value="" selected >--â»Ã´àÅ×Í¡ ª×èÍ¾¹Ñ¡§Ò¹--</option>
<%
strsql = "Select CODE , NAME , DEPT , STATWORK from EMPMONTH where DEPT = 'IT001' and STATWORK = 'A' "
Set rs1 = Conn_helpdesk.execute(strsql)
do until rs1.eof
response.write"<option value ="""&rs1("CODE")&""">"&rs1("NAME")&"</option>"
rs1.movenext
loop

%>
</select>
</p>

<p>
<label>¼ÙéÃÑº¼Ô´ªÍº</label> 
             
<select name="SelectNAMEEMP_IT_Responsible" >

<option value="" selected >--â»Ã´àÅ×Í¡ ª×èÍ¾¹Ñ¡§Ò¹--</option>
<%
strsql = "Select CODE , NAME , DEPT , STATWORK from EMPMONTH where DEPT = 'IT001' and STATWORK = 'A' "
Set rs1 = Conn_helpdesk.execute(strsql)
do until rs1.eof
response.write"<option value ="""&rs1("CODE")&""">"&rs1("NAME")&"</option>"
rs1.movenext
loop

%>
</select>

</p>

<p>
<label>à»éÒËÁÒÂ·Õè§Ò¹¨ÐàÊÃç¨</label>
<label>ÇÑ¹·Õè</label>
<select name="selectdate"> 
<option value="01">1</option>
<option value="02">2</option>
<option value="03">3</option>
<option value="04">4</option>
<option value="05">5</option>
<option value="06">6</option>
<option value="07">7</option>
<option value="08">8</option>
<option value="09">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select> 
 
<label>à´×Í¹</label>
<select name="selectmonth">
<option value="01">Á¡ÃÒ¤Á Jan</option>
<option value="02">¡ØÁÀÒ¾Ñ¹¸ì Feb</option>
<option value="03">ÁÕ¹Ò¤Á Mar</option>
<option value="04">àÁÉÒÂ¹ Apr</option>
<option value="05">¾ÄÉÀÒ¤Á May</option>
<option value="06">ÁÔ¶Ø¹ÒÂ¹ Jun</option>
<option value="07">¡Ã¡®Ò¤Á Jul</option>
<option value="08">ÊÔ§ËÒ¤Á Aug</option>
<option value="09">¡Ñ¹ÂÒÂ¹ Sep</option>
<option value="10">µØÅÒ¤Á Oct</option>
<option value="11">¾ÄÈ¨Ô¡ÒÂ¹ Nov</option>
<option value="12">¸Ñ¹ÇÒ¤Á Dec</option>
</select> 
 
<label>»Õ ¾.È.</label>
<select name="selectyear">
<option value="2005">2548</option>
<option value="2006">2549</option>
<option value="2007">2550</option>
<option value="2008">2551</option>
<option value="2009">2552</option>
<option value="2010">2553</option>
<option value="2011">2554</option>
<option value="2012">2552</option>
<option value="2013">2553</option>
<option value="2014">2554</option>
</select> 
</p>

<p>
<label> àÇÅÒ HH : MM : SS</label>   
<input name = "text_HH_out" type = "text" size = "1" maxlength = "2" >
<label> : </label>
<input name = "text_MM_out" type = "text" size = "1" maxlength = "2" >
<label> : </label>
<input name = "text_SS_out" type = "text" size = "1" maxlength = "2" >
</p>

<p>

<input type=reset name=reset value="Reset" >

<input type="submit" name= Submit value="Save" >


</p>
</Form>
</body>
</html>

Tag : - - - -

Date : 16 ม.ค. 2549 13:49:49

By : notmis_p

View : 2174

Reply : 3

No. 1

นายกระจอก007

โพสกระทู้ ( 422 )
บทความ ( 0 )

โอยท่านครับกรุณาบอกบรรทัดหรือว่ารายละเอียดมากกว่านี้หน่อย..แล้วก็ช่วยกรุณาทำให้มันเป็นภาษาไทยหน่อยเถอะ คนที่เค้าจะมาตอบให้ท่านเค้าไม่ได้มีเวลาให้คุณได้มากขนาดที่จะมานั่งแกะโค๊ดให้ท่านหรอกนะ..อีกอย่างตาลายไปหมดแร้ว

Date : 16 ม.ค. 2549 16:29:40

By : นายกระจอก

No. 2

Guest

นั่นสิ
ไม่ต้องกลัวรู้ source code หรอกครับ
คนอื่นจะได้ดูเป็นตัวอย่างด้วย
อย่างเช่นผม

Date : 16 ม.ค. 2549 18:08:19

By : bupawan

No. 3

Guest

ไม่ไหวเล่นส่งCodeมาอย่างนี้เทวดาก็ช่วยไม่ได้ครับ...เข้าไปที่บทเรียนแล้วดัดแปลงเอาก็แล้วกัน.

Date : 16 ม.ค. 2549 18:50:40

By : เป็นงง.

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : Error Type: Object required: 'uploaddata' รบกวนทุกท่านด้วยครับ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก