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

كود يتصل بالسيرفر بال Asp

مغلق
بدأه kesseba_comp في 1 ديسمبر 2007 · 0 رد · 431 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1

السلام عليكم على كل الموجودين و اللى بيقروا رسالتى و لهم جزيل الشكر على دخولهم فى مساعدتى

الموضوع كله عبارة عن انى عايز اعمل صفحة للadmin يقوم فيها بعمل رفع للملفات الخاصة به على السيرفر

فهذه الصفحة لكى تقوم بعمل نسخ للملف لابد انا يكون كود يتصل بالسيرفر ثم يقوم بعد ذلك بعمل نسخ للملف ثم اغلاق الملف

انا لحد دلوقتى توصلت إلى انى اقوم بسحب الملف من الصفحة التالية

<html>

<head>

<title>Untitled Document</title>

</head>

<body>

<TABLE cellSpacing=1 cellPadding=3 bordercolor=silver bgcolor=GAINSBORO width="" border=1>

<form method="post" action="add.asp">

<TR>

<TD> </TD>

<TD Align=Right><input type="submit" Name="enter" value="Upload the file >>"></TD>

</TR>

<TR>

<TD>File to upload</TD>

<TD><input type="file" name="SourceFile"></TD>

</TR>

</form></Table>

</body>

</html>

من هنا سميت الصفحة اللى فاتت default.asp

بعد كده لما تدوس على الزرار ينقللك الى صفحة اسمها Add.asp

والأكواد الخاصة بها كالتالى :

<%

files = request.Form("SourceFile")

dim fsname,p

set fsname=Server.CreateObject("Scripting.FileSystemObject")

p=fsname.getfilename(""&files&"")

set fsname=nothing

DestinationPath = Server.mapPath("UploadFolder")

DestinationFileName = DestinationPath & "\" & p

response.Write(DestinationFileName)

%>

وقمت بعمل مجلد بجانب هذه الملفات و قمت بتسميته بإسم

UploadFolder

على اساس ان ده المجلد اللى على السيرفر و حاعمل كوبى للملفات بداخله

:: ياريت تجربه هذا الكود ::

وبعد كده حد يقولى الكود اللى احطه مكان النقط اللى فى الكود التانى بتاع صفحة ال

add

اللى حايتصل بالسيرفر ويعمل كوبى

مشكور كل من ساهم بتفكيره فى هذا الكود

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

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