All pastes #591491 Raw Edit

Miscellany

public text v1 · immutable
#591491 ·published 2007-06-27 07:36 UTC
rendered paste body

Set RsMenu = Server.CreateObject("ADODB.RecordSet")
	RsMenu.Open "products", database, 2, 2
	RsMenu.AddNew
	RsMenu("title") = Request.Form("title")
	RsMenu("link") = Request.Form("link")
	RsMenu.Update
	RsMenu.Close
	Set RsMenu= Nothing