Urgente, No se insertan los datos en la BD ¿xq?

[RootK]

Set Conn = Server.Createobject("ADODB.Connection")
Set Ob_RS = Server.CreateObject ("ADODB.RecordSet")
Conn.Open "bd.eduardolaborde.com" Ob_RS.Open "pedidos",Conn,3,3

Ob_RS.AddNew

Creo que tu cadena de conexion no está correcta... sería mas bien:

si es acces:
strConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\xxxxx\db\myb.mdb")

si es sql server
strConn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1; UID=LoginID;PWD=Password;DATABASE=Database_Name"

Conn.Open strConn

set rs=createobject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic

rs.open "pedidos",Conn
rs.AddNew
...
...
etc


Espero que ese sea tu error..

Saludos