o0_Amin_0o
پنج شنبه 17 خرداد 1386, 18:57 عصر
سلام
من یه سیستمی دارم مینویسم که توی یه قسمتیش لازمه یه سری اطلاعات بفرسته به وب سایت.
کد PHP که پارامتر رو میگررو از بچه های PHP همین انجمن کمک گرفتم.
برنامه خودم رو با C# نوشتم.
و مشکلی نیست.
یه سیتسم مشابه ولی وب بیس هم با ASP نوشتم.
توی این سیستم ASP میخوام وقتی اطلاعات دریافت شد و ذخیره شد توی دیتابیس همون اطلاعات با پارامتر به سیتسم PHP ارسال بشه و اونجا هم ذخیره بشه.
واسه ارسال پارامتر توی ASP تا جایی که یادمه responce.redirect کاربرد داشت.
درسته؟
من اینو توی کد گذوشتم منتها جواب نداد.
ممنون میشم دوستان کمکم کنن.
کد اینه:
<%
set conn = server.createobject("adodb.connection")
database = "pdbsd/Engine.mdb"
conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath(database)
Set rs = server.CreateObject("ADODB.Recordset")
rs.open "select * from users", Conn,1,3
Set rs2 = server.CreateObject("ADODB.Recordset")
rs2.open "select * from inbox", Conn,1,3
Set rs3 = server.CreateObject("ADODB.Recordset")
rs3.open "select * from Pn_u Where number='"&request("to")&"' ", Conn,1,3
%>
<%While Not rs3.eof%>
<%
IF Request("to")<>"9830006485" Then
rs2.addnew
rs2("sender")=request("from")
rs2("reciver")=rs3("username")
rs2("message")=request("text")
rs2("date")=now()
rs2.update
end if
%>
<%rs3.movenext
Wend%>
<%While Not rs.eof%>
<%
mystring = request("text")
myarray = Split(mystring, " ", 2)
IF rs("username")=myarray(0) Then
rs2.addnew
rs2("sender")=request("from")
rs2("reciver")=myarray(0)
rs2("message")=myarray(1)
rs2("date")=now()
rs2.update
end if
%>
<%rs.movenext
Wend%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Utf-8">
<title>Engine</title>
</head>
<body>
</body>
</html>
می خوام اون رشته هایی که میره داخل دتابس همون رشته ها بیاد جلوی علامت = این لینک و به صورت پارامتر ارسال بشه به برنامه php
www.mysite.com/rec.php?value=X
ممنون میشم دوستان کمکم کنن:قلب:
ممنون
من یه سیستمی دارم مینویسم که توی یه قسمتیش لازمه یه سری اطلاعات بفرسته به وب سایت.
کد PHP که پارامتر رو میگررو از بچه های PHP همین انجمن کمک گرفتم.
برنامه خودم رو با C# نوشتم.
و مشکلی نیست.
یه سیتسم مشابه ولی وب بیس هم با ASP نوشتم.
توی این سیستم ASP میخوام وقتی اطلاعات دریافت شد و ذخیره شد توی دیتابیس همون اطلاعات با پارامتر به سیتسم PHP ارسال بشه و اونجا هم ذخیره بشه.
واسه ارسال پارامتر توی ASP تا جایی که یادمه responce.redirect کاربرد داشت.
درسته؟
من اینو توی کد گذوشتم منتها جواب نداد.
ممنون میشم دوستان کمکم کنن.
کد اینه:
<%
set conn = server.createobject("adodb.connection")
database = "pdbsd/Engine.mdb"
conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath(database)
Set rs = server.CreateObject("ADODB.Recordset")
rs.open "select * from users", Conn,1,3
Set rs2 = server.CreateObject("ADODB.Recordset")
rs2.open "select * from inbox", Conn,1,3
Set rs3 = server.CreateObject("ADODB.Recordset")
rs3.open "select * from Pn_u Where number='"&request("to")&"' ", Conn,1,3
%>
<%While Not rs3.eof%>
<%
IF Request("to")<>"9830006485" Then
rs2.addnew
rs2("sender")=request("from")
rs2("reciver")=rs3("username")
rs2("message")=request("text")
rs2("date")=now()
rs2.update
end if
%>
<%rs3.movenext
Wend%>
<%While Not rs.eof%>
<%
mystring = request("text")
myarray = Split(mystring, " ", 2)
IF rs("username")=myarray(0) Then
rs2.addnew
rs2("sender")=request("from")
rs2("reciver")=myarray(0)
rs2("message")=myarray(1)
rs2("date")=now()
rs2.update
end if
%>
<%rs.movenext
Wend%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Utf-8">
<title>Engine</title>
</head>
<body>
</body>
</html>
می خوام اون رشته هایی که میره داخل دتابس همون رشته ها بیاد جلوی علامت = این لینک و به صورت پارامتر ارسال بشه به برنامه php
www.mysite.com/rec.php?value=X
ممنون میشم دوستان کمکم کنن:قلب:
ممنون