ويرايش فيلد در ديتابيس

[rahincom]

سلام

اگه يكي از دوستان لطف كنه براي من يه سيستمي با ASP پياده كنه كه يه فيلد رو بتونم در بانك اطلاعاتي access ويرايش كنم يعني محتويات اون فيلد يا يك بشه يا صفر خيلي ممنون ميشم

باي

 

[rahincom]

كسي نبود ؟

 

[omidak]

سلام:
يعني ميخوايي DB رو Reset کنی؟

 

[rahincom]

سلام

نه فقط مي خوام يه db رو Edit كنم ( فقط يه فيلدش )
چون db من فقط يه table داره و يه فيلد.

 

[saeedsmka]

خوب كاري نداره

set IForm=Server.CreateObject("ADODB.Recordset")
IForm.open "select * from guest where id="para,PFR
IForm("name")=f_name
IForm("email")=f_email
IForm("nazar")=f_Op
IForm("date")=f_Date
IForm.update
iform.close

 

[omidak]

سلام :
اما اين بهتره

set IForm=Server.CreateObject("ADODB.Recordset") 
IForm.open "Update Table1 Set user='omidak' yahooId='iranvbnet' pass='pass' Where ID=1"
IForm.Close

 

[purya]

<%
dim objconn,objrs,dbpath

dbpath = *آدرس فيزيكي ديتا بيس شما همراه با نام ديتابيس *
set objconn = server.createobject("ADODB.connection")
objconn.connectionstring = "driver={ microsoft access driver (*.mdb)};" & _
"dbq=" & dbpath
objconn.open
set objrs = server.createobject("ADODB.recordset")
objrs.open "اسم تيبل",objconn,adopenkeyset,3,adcmdtable
do while not objrs.eof
objrs("نام فيلد ") = "x"
objrs.movenext
loop
objrs.close
set objrs = nothing
objconn.close
set objconn = nothing

%>

 

[purya]

[align=left:9b08889a79]
<%
dim objconn,objrs,dbpath

"dbpath = "Phisical path and data base name
set objconn = server.createobject("ADODB.connection")
objconn.connectionstring = "driver={ microsoft access driver (*.mdb)};" & "dbq=" & dbpath
objconn.open
set objrs = server.createobject("ADODB.recordset")
objrs.open "TABLE NAME",objconn,adopenkeyset,3,adcmdtable
do while not objrs.eof
"objrs("FILD NAME ") = "NEW VALUE
objrs.movenext
loop
objrs.close
set objrs = nothing
objconn.close
set objconn = nothing

%>
[/align:9b08889a79]