الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عرض رسالة فيجيول بيسكMSGBOX واستقبال قيمه

مغلق
بدأه basharss في 3 أكتوبر 2004 · 5 رد · 433 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

الاخوة الكرام ، يظهر لي الخطء التالي :

Microsoft VBScript runtime (0x800A0046)
Permission denied: 'InputBox'
/Juvenile/end_mentee.asp, line 10

عندما احاول تنفيذ الصفحة ادناه:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1256"%>
<%Response.Expires=-1000%>
<head> 
</head>
<body>
<!--#include file="connection.txt"-->

<%
  dim sss,CM
sss =InputBox ("قم بإدخال تاريخ الخروج")
CM =InputBox ("قم بإدخال رقم الطفل")

  set AMRS = server.CreateObject("ADOdb.recordset")
  AMRS.CursorType = 2
  AMRS.LockType = 3
   AMRS.open "select * from JIApplications where ChildNumber ="&CM&"", conn
  if (sss <> "") then
  AMRS.Fields ("EndDate") = sss
  end if
    AMRS.Update 
Response.Redirect("View_Info.asp?ChildNum="&CM&"")
set AMRS = nothing
'------------------------------------
%>
</body>
</HTML>

مع العلم بأن هذه هي اول مرة استخدم رسائل الفيجيول بيسك

logosite.gif
#2

Up please

logosite.gif
#3

it is better to use vb script don't include input messages and message box inside ASP brackets <%%> like this

<script Languge=vbscript>
dim sss
dim cm
sss =InputBox ("قم بإدخال تاريخ الخروج")
CM =InputBox ("قم بإدخال رقم الطفل")
</script>

and the see what will happend

most people don't use input message box, they use forms all the time that why no one use your techniques in inserting or geting values.....

تم تعديل هذه المشاركة بواسطة Ahmed2004 في 4 أكتوبر 2004 في 09:15

#4

أن دالة ال inputbox أو msgbox لا تعمل في ال ASP أي جهة السيرفير server side

لذلك عليك استخدام ال java script or vbscript

ويصبح المثال كذلك

سوف يقسم مشروعك الى ملفين

الأول :

<html>
<head>
</head>
<script language ="vbscript">
 a = inputbox("Please enter First value")
 b= inputbox("Please enter Second value")
 window.navigate "test.asp?a=" & a & "b=" & b
</script>
<body>
</body>
</html>

هذا الملف يقوم بالسؤال عن القيم التي تريد أدخالها من ال input Box

ثانياً

<html>
<head>
</head>
<body>
<% 
sss= request.querystring("a")
CM= request.querystring("b")
set AMRS = server.CreateObject("ADOdb.recordset")
AMRS.CursorType = 2
AMRS.LockType = 3
AMRS.open "select * from JIApplications where ChildNumber ="&CM&"", conn
if (sss <> "") then
	AMRS.Fields ("EndDate") = sss
end if
AMRS.Update 
Response.Redirect("View_Info.asp?ChildNum="&CM&"")
set AMRS = nothing

%>
</body>
</html>

قم بتسمية هذا الملف test.asp

يقتلقى الملف الأول القيم من خلال الInput box ثم يرسلها الى الملف الثاني test.asp

#5

اعجز عن شكرك لبناني ،لقد افدتني كثيراً ، ويعطيك العافيه

logosite.gif
#6

على الرحب والسعة

هذا الموضوع مغلق.

مواضيع مشابهة