Tycoon Talk
Become a Big fish!
The number 1 forum for online business!
Post topics, ask questions, share your knowledge.
Tycoon Talk is part of Freelancer.com - find skilled workers online at a fraction of the cost.

ASP.NET Forum


You are currently viewing our ASP.NET Forum as a guest. Please register to participate.
Login



Reply
using asp to write to access database?
Old 03-18-2006, 05:45 PM using asp to write to access database?
redgeordieboy99's Avatar
Skilled Talker

Posts: 61
Trades: 0
ive written a site using dreamweaver asp and access. everything works ok i can insert new records and delete records but when i come to look in access itself, the records arnt there, do i have to put extra code in my pages or is it something to be done in access, its as if i havent pressed the save button in access, and that cant be done via a web page, or can it?
redgeordieboy99 is offline
Reply With Quote
View Public Profile
 
 
Register now for full access!
Old 03-18-2006, 08:18 PM Re: using asp to write to access database?
chrishirst's Avatar
Missing! presumed drunk.

Posts: 41,517
Name: Chris Hirst
Location: Blackpool. UK
Trades: 0
well if the records aren't there then everything doesn't work ok

Nothing needs "doing" in Access
Has error handling been disabled with On Error Resume Next?

and show the code you are using, we may spot the error.
__________________
Chris. ->> Links are advertising NOT optimising!! <<-
A foolish consistency is the hobgoblin of little minds
Thought for today:- I SEO the only industry where all the cowboys are Indians?
chrishirst is offline
Reply With Quote
View Public Profile Visit chrishirst's homepage!
 
Old 03-19-2006, 06:01 AM Re: using asp to write to access database?
redgeordieboy99's Avatar
Skilled Talker

Posts: 61
Trades: 0
below is the code for the new record form

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/YotShop.asp" -->
<%
' *** Restrict Access To Page: Grant or deny access to this page
MM_authorizedUsers="1"
MM_authFailedURL="admin_access_denied.asp"
MM_grantAccess=false
If Session("MM_Username") <> "" Then
If (false Or CStr(Session("MM_UserAuthorization"))="") Or _
(InStr(1,MM_authorizedUsers,Session("MM_UserAuthor ization"))>=1) Then
MM_grantAccess = true
End If
End If
If Not MM_grantAccess Then
MM_qsChar = "?"
If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
MM_referrer = Request.ServerVariables("URL")
if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString()
MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer)
Response.Redirect(MM_authFailedURL)
End If
%>
<%
' *** Edit Operations: declare variables

Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd

Dim MM_editConnection
Dim MM_editTable
Dim MM_editRedirectUrl
Dim MM_editColumn
Dim MM_recordId

Dim MM_fieldsStr
Dim MM_columnsStr
Dim MM_fields
Dim MM_columns
Dim MM_typeArray
Dim MM_formVal
Dim MM_delim
Dim MM_altVal
Dim MM_emptyVal
Dim MM_i

MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = ""
%>
<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "add_form") Then

MM_editConnection = MM_YotShop_STRING
MM_editTable = "YotStock"
MM_editRedirectUrl = "admin.view.asp"
MM_fieldsStr = "design|value|ysYear|value|construction|value|layi ng|value|price|value|pic_thumb|value|pic_ext|value |pic_int|value|brief_description|value|full_descri ption|value|int_description|value"
MM_columnsStr = "design|',none,''|ysYear|',none,''|construction|', none,''|laying|',none,''|price|none,none,NULL|pic_ thumb|',none,''|pic_ext|',none,''|pic_int|',none,' '|brief_description|',none,''|full_description|',n one,''|int_description|',none,''"

' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")

' set the form values
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)))
Next

' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If

End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If (CStr(Request("MM_insert")) <> "") Then

' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_formVal = MM_fields(MM_i+1)
MM_typeArray = Split(MM_columns(MM_i+1),",")
MM_delim = MM_typeArray(0)
If (MM_delim = "none") Then MM_delim = ""
MM_altVal = MM_typeArray(1)
If (MM_altVal = "none") Then MM_altVal = ""
MM_emptyVal = MM_typeArray(2)
If (MM_emptyVal = "none") Then MM_emptyVal = ""
If (MM_formVal = "") Then
MM_formVal = MM_emptyVal
Else
If (MM_altVal <> "") Then
MM_formVal = MM_altVal
ElseIf (MM_delim = "'") Then ' escape quotes
MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'"
Else
MM_formVal = MM_delim + MM_formVal + MM_delim
End If
End If
If (MM_i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End If
MM_tableValues = MM_tableValues & MM_columns(MM_i)
MM_dbValues = MM_dbValues & MM_formVal
Next
MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"

If (Not MM_abortEdit) Then
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close

If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If

End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
.style1 {
font-family: Arial, Helvetica, sans-serif;
color: #FF0000;
font-weight: bold;
}
.style3 {font-family: Arial, Helvetica, sans-serif}
.style5 {font-family: Arial, Helvetica, sans-serif; color: #0000FF; }
.style6 {color: #0000FF}
.style7 {color: #000066}
-->
</style>
</head>

<body>
<p class="style1">ADD NEW RECORD </p>
<p class="style1 style7"><a href="admin_control.asp">Admin Control </a></p>
<form action="<%=MM_editAction%>" method="POST" name="add_form" id="add_form">
<table width="500" border="1" cellspacing="2" cellpadding="2">
<tr>
<td width="142" valign="top"><span class="style5">Design</span></td>
<td width="338"><input name="design" type="text" id="design" size="50"></td>
</tr>
<tr>
<td valign="top"><p class="style3 style6">Year</p> </td>
<td><input name="ysYear" type="text" id="ysYear" size="50"></td>
</tr>
<tr>
<td valign="top"><span class="style5">Construction</span></td>
<td><select name="construction" size="1" id="construction">
<option value="GRP">GRP</option>
<option value="Wood">Wood</option>
<option value="Steel">Steel</option>
<option value="Aluminium">Aluminium</option>
<option value="Ferro Cement">Ferro Cement</option>
<option value="Composit">Composit</option>
</select></td>
</tr>
<tr>
<td valign="top"><span class="style5">Laying</span></td>
<td><input name="laying" type="text" id="laying" size="50"></td>
</tr>
<tr>
<td valign="top"><span class="style5">Price</span></td>
<td><input name="price" type="text" id="price" size="50"></td>
</tr>
<tr>
<td valign="top"><span class="style5">Pic Thumbnail </span></td>
<td><input name="pic_thumb" type="text" id="pic_thumb" size="50"></td>
</tr>
<tr>
<td valign="top"><span class="style5">Pic Exterior </span></td>
<td><input name="pic_ext" type="text" id="pic_ext" size="50"></td>
</tr>
<tr>
<td valign="top"><span class="style5">Pic Interior </span></td>
<td><input name="pic_int" type="text" id="pic_int" size="50"></td>
</tr>
<tr>
<td align="left" valign="top"><span class="style5">Brief Description </span></td>
<td><textarea name="brief_description" cols="43" rows="4" id="brief_description"></textarea></td>
</tr>
<tr>
<td valign="top"><span class="style5">Full Description </span></td>
<td><textarea name="full_description" cols="43" rows="4" id="full_description"></textarea></td>
</tr>
<tr>
<td valign="top"><span class="style5">Interior Description </span></td>
<td><textarea name="int_description" cols="43" rows="4" id="int_description"></textarea></td>
</tr>
<tr>
<td colspan="2" valign="top"><div align="center">
<input type="submit" name="Submit" value="Add Record">
</div></td>
</tr>
</table>

<input type="hidden" name="MM_insert" value="add_form">
</form>
<p>&nbsp; </p>
</body>
</html>
redgeordieboy99 is offline
Reply With Quote
View Public Profile
 
Old 03-19-2006, 10:26 AM Re: using asp to write to access database?
redgeordieboy99's Avatar
Skilled Talker

Posts: 61
Trades: 0
wey hey it works now
redgeordieboy99 is offline
Reply With Quote
View Public Profile
 
Old 03-19-2006, 02:19 PM Re: using asp to write to access database?
ADAM Web Design's Avatar
Canadastaninianite

Posts: 5,938
Name: Adam for web page design, not program
Location: Toronto, Ontario, Canada
Trades: 0
redgeordieboy99: the most common cause of the problem you're experiencing, assuming the code is valid (and with that Dr*amw*av*r slop, it's very hard to tell), it's because your host hasn't allowed anonymous write permissions on your database folder.

This is a pretty common thing, actually. I'd say every host in Canada that I've used (one of the reasons I no longer use Canadian hosting) does this. It's a royal piss off at that.
__________________

Please login or register to view this content. Registration is FREE
|
Please login or register to view this content. Registration is FREE
(my blog)


Please login or register to view this content. Registration is FREE
(with proof)
ADAM Web Design is offline
Reply With Quote
View Public Profile Visit ADAM Web Design's homepage!
 
Old 03-25-2006, 05:29 PM Re: using asp to write to access database?
redgeordieboy99's Avatar
Skilled Talker

Posts: 61
Trades: 0
thanks for that adam, it was a problem with permissions, but all fixed now
redgeordieboy99 is offline
Reply With Quote
View Public Profile
 
Reply     « Reply to using asp to write to access database?
 

Thread Tools Search this Thread
Search this Thread:

Advanced Search

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are Off
Refbacks are Off





   
RSS Feed  Feeds: RSS   JS   XML
RSS Feed  Feeds for this forum: RSS   JS   XML



Page generated in 0.43702 seconds with 12 queries