در زیر من یک مثال از ارتباط با دیتابیس و اینسرت می گذارم. در ضمن بایستی پرمیشن فولدری که فایل اکسس در ا« است نیز خواندنی و نوشتنی باشد.
HTML:
<%
Dim oconn
Dim ors
Dim filepath
'در خط زیر به طور نسبی از محلی که این اسکریپت در آن است آدرس فایل اکسس را بدهید مانند مثال.
filepath=Server.MapPath("file_access/database_name.mdb")
Set oconn=Server.CreateObject("ADODB.Connection")
'در انتهای خط زیر مانند مثال اگر فایل اکسس پسورد دارد وارد کنید وگرنه بعد از کلمه فایلپت همه را تا ته خط پاک کنید.
oconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filepath & ";Jet OLEDB:Database Password=password_access"
'در خط زیر به جای تیبل_نیم نام جدولی که می خواهید رکورد در آن اضافه شود را وارد کنید.
'در خط زیر در رکورد جدید شما سه فیلد را پر می کند که به طور مثال سه تا آمده و هر چنذ تا را می توانید.
'مانند مثال توجه کنید اگر فیلد شما عددی یا بولین بود مقدارش را بدون سنگل کوتیشن و اگر متنی بود دورش حتماً سینگل کوتیشن باشد.
oconn.Execute "INSERT INTO table_name (numeric_field_name,text_or_memo_field_name,boolean_field_name) VALUES (1,'salam',True)"
ors.close
oconn.close
Set ors=Nothing
Set oconn=Nothing
%>
<%@LANGUAGE="VBSCRIPT" CodePage=65001%>
<%Option Explicit%>
<%Session.CodePage="65001"%>
<html>
<head>
<title>Contact Successfully</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body dir="rtl">
<%
Dim oconn,filepath
filepath=Server.MapPath("computer.mdb")
Set oconn=Server.CreateObject("ADODB.Connection")
oconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filepath
Dim fname,femail,ftel,fpayam
fname=Request.Form("name")
femail=Request.Form("email")
ftel=Request.Form("tel")
fpayam=Request.Form("payam")
oconn.Execute "INSERT INTO contact (name,email,tel,payam) VALUES ('" & fname & "','" & femail & "','" & ftel & "','" & fpayam & "')"
%>
<center><b><font size="2" color="#003C77">
اطلاعات شما با موفقيت ارسال شد در اسرع وقت شرکت هوشمندسازان بنا به نيازهاي شما پاسخ خواهد داد
</font></b></center>
</body>
</html>
<%
oconn.close
Set oconn=Nothing
%>
فولدری که حاوی دیتابیس است را از کنترل پتل سایتتان پرمیشن اش را خواندنی و نوشتنی کنید. درضمن در دیتا بیس همه فیلد ها از نوع text است که 256 حرف بیشتر در آن جای نمیگیرد؛ برای ظرفیت بالاتر نوع آن ها را memo کنید.
برای مثال وارد کنترل پنل شوید و به قسمت file manager بروید و فولدری که حاوی فایل اکسس است را پیدا کنید. البته خود فولدر را و وارد فولدر نشوید. معمولاً هر فایل و فولدر گزینه هایی برای انتخاب و تنظیم دارند که یکی از آن ها پرمیشن است که معمولاً با آیکن قفل زرد رنگی نشان داده می شود. روی آن کلیک کنید و سپس جلوی read و write و ... را یا جلوی full control را چک بزنید و ok کنید. (ممکن است group یا username های مختلفی را بتوان انتخاب کرد و برای هرکدام پرمیشنی تنظیم کرد، برای همه همین کار را بکنید). البته این توضیحات برای کنترل پنل پلسک بود.
عکس زیر را هم ببینید:
salam aziz man ke manzoretono nemifahmam aslan to contorol panel kefile manager nadaram man nemifahmam albatebaraye check zadan full cotrol qablan in karo kardam dar vaqe click rast roye file access va dar qesmate security full contorol ra zadam vali baz nashod chikar konam
روی کامپیوتر خودم قبلا اصلا به این مشکلات بر نخورده بودم دارم دیوونه میشم full contorol هم کردم حتی اکسس دوباره نصب کردم ولی باز نشد از کی کمک بگیرم چون کد برنامه هام درسته حتی واستون هم فرستاده بودم دیدید که نمی دونم چیکار باید بکنم واقعا از اینکه با حوصله بهم جواب می دهید ممنون
