Guest_imported
New member
- Jan 1, 1970
- 0
I have a connection to the database but I cannot access data in a form. It is something to do with recordsets. Any help please?
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
How do I connect to MSSQL7 data?
- Thread starter Guest_imported
- Start date
- Status
- Thread starter
- #3
Guest_imported
New member
- Jan 1, 1970
- 0
I can browse the data in Data View on right hand side. Just cannot get data into a form.
- Thread starter
- #5
Guest_imported
New member
- Jan 1, 1970
- 0
A very basic html form using the "new file option". I'm trying to connect to the northwind database on SQL7.
Thanks for your help.
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
</HEAD>
<BODY>
<P><INPUT id=text1 name=text1 dataFld=CustomerID dataSrc=Customers>
</P>
<P>
<!--METADATA TYPE="DesignerControl" startspan
<OBJECT id=Textbox1 classid=clsid:B5F0E469-DC5F-11D0-9846-0000F8027CA0><PARAM NAME="_ExtentX" VALUE="3175"><PARAM NAME="_ExtentY" VALUE="503"><PARAM NAME="id" VALUE="Textbox1"><PARAM NAME="ControlType" VALUE="0"><PARAM NAME="Lines" VALUE="3"><PARAM NAME="DataSource" VALUE="Cutomers"><PARAM NAME="DataField" VALUE=""><PARAM NAME="Enabled" VALUE="-1"><PARAM NAME="Visible" VALUE="-1"><PARAM NAME="MaxChars" VALUE="20"><PARAM NAME="DisplayWidth" VALUE="20"><PARAM NAME="Platform" VALUE="257"><PARAM NAME="LocalPath" VALUE="">
</OBJECT>
-->
<script language="JavaScript" src="_ScriptLibrary/EventMgr.HTM"></script>
<script language="JavaScript" src="_ScriptLibrary/TextBox.HTM"></script>
<SCRIPT LANGUAGE=JavaScript>
function _initTextbox1()
{
Textbox1.setStyle(TXT_TEXTBOX);
Textbox1.setDataSource(Cutomers);
Textbox1.setMaxLength(20);
Textbox1.setColumnCount(20);
}
CreateTextbox('Textbox1', _initTextbox1, null);
</script>
<!--METADATA TYPE="DesignerControl" endspan-->
</P>
<P> </P>
<P>
</P>
<P>
</P>
</BODY>
</HTML>
Thanks for your help.
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
</HEAD>
<BODY>
<P><INPUT id=text1 name=text1 dataFld=CustomerID dataSrc=Customers>
</P>
<P>
<!--METADATA TYPE="DesignerControl" startspan
<OBJECT id=Textbox1 classid=clsid:B5F0E469-DC5F-11D0-9846-0000F8027CA0><PARAM NAME="_ExtentX" VALUE="3175"><PARAM NAME="_ExtentY" VALUE="503"><PARAM NAME="id" VALUE="Textbox1"><PARAM NAME="ControlType" VALUE="0"><PARAM NAME="Lines" VALUE="3"><PARAM NAME="DataSource" VALUE="Cutomers"><PARAM NAME="DataField" VALUE=""><PARAM NAME="Enabled" VALUE="-1"><PARAM NAME="Visible" VALUE="-1"><PARAM NAME="MaxChars" VALUE="20"><PARAM NAME="DisplayWidth" VALUE="20"><PARAM NAME="Platform" VALUE="257"><PARAM NAME="LocalPath" VALUE="">
</OBJECT>
-->
<script language="JavaScript" src="_ScriptLibrary/EventMgr.HTM"></script>
<script language="JavaScript" src="_ScriptLibrary/TextBox.HTM"></script>
<SCRIPT LANGUAGE=JavaScript>
function _initTextbox1()
{
Textbox1.setStyle(TXT_TEXTBOX);
Textbox1.setDataSource(Cutomers);
Textbox1.setMaxLength(20);
Textbox1.setColumnCount(20);
}
CreateTextbox('Textbox1', _initTextbox1, null);
</script>
<!--METADATA TYPE="DesignerControl" endspan-->
</P>
<P> </P>
<P>
</P>
<P>
</P>
</BODY>
</HTML>
I'm going to apologize right off, I don't use visual interdev or visual .net as a tool to write asp code. Looking at this though, there might be code in a folder/file called _ScriptLibrary/EventMgr.HTM that holds the connection strings and recordset strings. I'm not sure about that.
Here's what I would use as a conneciton string though:
'This assumes you're connected with a DSN
Set objConn = Server.CreateObject("ADODB.Connection"
objConn.Open "DSN=DSNName;uid=SQLUserName;pwd=SQLUserNaemPWRD;"
Set objRst = Server.CreateObject("ADODB.Recordset"
strSQL = "Select * from Customers;"
'Open your recordset
objRst.Open strSQL, objConn
'Next list out all the field names and values
objRst.Movefirst
While not objRst.eof
for each item in objRst.Fields
Response.Write item.Name & "<br>" & item.value
next
objRst.Movenext
Wend
To put them in form fields put in "<input type=Text value='" & objRst("FieldName".value & "'>" right before the reponse.write item.name like this:
Response.Write "<input type=Text value='" & objRst("FieldName".value & "'>"
Here's what I would use as a conneciton string though:
'This assumes you're connected with a DSN
Set objConn = Server.CreateObject("ADODB.Connection"
objConn.Open "DSN=DSNName;uid=SQLUserName;pwd=SQLUserNaemPWRD;"
Set objRst = Server.CreateObject("ADODB.Recordset"
strSQL = "Select * from Customers;"
'Open your recordset
objRst.Open strSQL, objConn
'Next list out all the field names and values
objRst.Movefirst
While not objRst.eof
for each item in objRst.Fields
Response.Write item.Name & "<br>" & item.value
next
objRst.Movenext
Wend
To put them in form fields put in "<input type=Text value='" & objRst("FieldName"
.value & "'>" right before the reponse.write item.name like this:Response.Write "<input type=Text value='" & objRst("FieldName"
.value & "'>"- Status
Similar threads
- Locked
- Question
- Locked
- Question
- Locked
- Question