① php写入数据库
PHP向Mysql数据库中写入数据有三个步骤：
1，PHP和MySQL建立连接关系
2，打开MySQL数据库
3，接受页面数据，PHP录入到指定的表中
1、2两步可直接使用一个数据库链接文件即可：conn.php
代码如下
<?php
mysql_connect("localhost","root","");//连接MySQL
mysql_select_db("hello");//选择数据库
?>
当然，前提是已经安装WEB服务器、PHP和MySQL，并且建立MySQL表“cnbruce”
mysql_connect()中三个参数分别为MySQL地址、MySQL用户名和MySQL密码
然后就是通过WEB页面传递数据，让PHP通过SQL语句将数据写入MySQL数据库指定的表中，比如新建文件 post.php
代码如下
<?php
require_once("conn.php");//引用数据库链接文件
$uname = $_GET['n'];//GET方法为URL参数传递
$psw = $_GET['p'];
$psw=md5($psw);//直接使用MD5加密
$sql = "insert into members(username,password) values ('$uname','$psw')";
mysql_query($sql);//借SQL语句插入数据
mysql_close();//关闭MySQL连接
echo "成功录入数据";
?>
测试页面： http://localhost/post.php?n=cnbruce&p=i0514
即可向MySQL数据库hello的members表中插入新的数据“cnbruce”到username字段、“i0514”到password字段
补充：读取表
读取表中的内容,这里我们用while,可以根据具体情况,用for 或其他的.
代码如下
while($row = mysql_fetch_array($result))
{
echo "<div style="height:24px; line-height:24px; font-weight:bold;">"; //排版代码
echo $row['Topic'] . "<br/>";
echo "</div>"; //排版代码
② vb如何将SQL数据库查询的结果导出到带字段名的Excel表
你在用CopyFromRecordset前先把字段名写上，然后换一行再把数据集拷贝就可以了。
===========================================================
先把这句mExcelFile.Application.Range("A1").CopyFromRecordset
mRs
改为：
mExcelFile.Application.Range("A2").CopyFromRecordset
mRs
然后在这句前面加上下面的代码试试看，应该可以的：
For
i
=
0
To
mRst.Fields.Count
-
1
mExcelFile.ActiveSheet.Cells(1,
i
+
1).Value
=
mRst.Fields(i).Name
Next
'设置字段名加粗（如果不需要可忽略此句）
mExcelFile.ActiveSheet.Range(.ActiveSheet.Cells(1,
1),
mExcelFile.ActiveSheet.Cells(1,
mRst.Fields.Count)).Font.Bold
=
True
③ VB如何实现查询数据库并显示出来
可以快速导出使用excel 就有该功能
PublicFunctionExportToExcel(ByValstrOpenAsString,TitleAsString,diAsString,conAsADODB.Connection)
'*********************************************************
'*名称：ExporToExcel
'*功能：导出数据到EXCEL'*用法：ExporToExcel(strOpen查询字符串，titile
'*excel标题,di保存路径，con数据库连接地址)
'*********************************************************
lok:OnErrorGoToer
Screen.MousePointer=11
DimRs_DataAsNewADODB.Recordset
DimIrowcountAsLong
DimIcolcountAsLong
DimXlAppAsNewExcel.Application
DimxlbookAsExcel.Workbook
DimxlSheetAsExcel.Worksheet
DimxlQueryAsExcel.QueryTable
WithRs_Data
If.State=adStateOpenThen
.Close
EndIf
.ActiveConnection=con
.CursorLocation=adUseClient
.CursorType=adOpenStatic
.LockType=adLockReadOnly
.Source=strOpen
DoEvents
'Debug.PrintstrOpen
.Open
EndWith
Debug.PrintstrOpen
'SetRs_Data=Open_rst_from_str(strOpen)
WithRs_Data
If.RecordCount<1Then
MsgBox("没有记录!")
Screen.MousePointer=0
ExitFunction
EndIf
'记录总数
Irowcount=.RecordCount
'字段总数
Icolcount=.Fields.Count
EndWith
SetXlApp=CreateObject("Excel.Application")
Setxlbook=Nothing
SetxlSheet=Nothing
Setxlbook=XlApp.Workbooks().Add
SetxlSheet=xlbook.Worksheets("sheet1")
'添加查询语句，导入EXCEL数据
SetxlQuery=xlSheet.QueryTables.Add(Rs_Data,xlSheet.Range("a1"))
WithxlQuery
.FieldNames=True
.RowNumbers=False
.FillAdjacentFormulas=False
.PreserveFormatting=True
.RefreshOnFileOpen=False
.BackgroundQuery=True
.RefreshStyle=xlInsertDeleteCells
.SavePassword=True
.SaveData=True
.AdjustColumnWidth=True
.RefreshPeriod=0
.PreserveColumnInfo=True
EndWith
xlQuery.FieldNames=True'显示字段名
xlQuery.Refresh
DimiAsInteger,ZdAsString
WithxlSheet
Fori=1To6
Zd=.Range(.Cells(1,1),.Cells(1,Icolcount)).item(1,i)
'.Range(.Cells(1,1),.Cells(1,Icolcount)).Item(1,i)=Lm_YwToZw(Zd)
Next
.Range(.Cells(1,1),.Cells(1,Icolcount)).Font.name="黑体"
'设标题为黑体字
'.Range(.Cells(1,1),.Cells(1,Icolcount)).Font.Bold=True
'标题字体加粗
.Range(.Cells(1,1),.Cells(Irowcount+1,Icolcount)).Borders.LineStyle=xlContinuous
'.Range(.Cells(Irowcount+2,Icolcount)).Text=Zje
'设表格边框样式
EndWith
XlApp.Visible=True
XlApp.Application.Visible=True
'xlBook.SaveAsdi
SetXlApp=Nothing'"交还控制给Excel
Setxlbook=Nothing
SetxlSheet=Nothing
Screen.MousePointer=0
ExitFunction
er:
'Dispose_Err
MsgBoxerr.Description&"从新导报表，请等待！"
GoTolok:
EndFunction
使用这个模块就可以，你可以看看引用的函数即可
④ 怎样把SQL中的数据输出到HTML页面[2]
我们先看sp_makewebtask这个SQL Server自带的系统存储过程 它用来创建一项生成 HTML文档的任务 该文档包含执行过的查询返回的数据 在本例中 上述的参数分别代表的意思为
@outputfile
生成HTML 文件的位置 如果文档将在远程计算机上生成 则该参数可以是 UNC 名称
@query
要运行的查询 当在运行任务时 查询结果将以表格形式显示在 HTML 文档中 可以指定多个 SELECT 查询 这样可以在 outputfile 中显示多个表
@templatefile
用于生成 HTML 文档的模板文件的路径 模板文件包含 HTML 文档的格式特征信息和标记 该标记指示将查询结果添加到 HTML 表中的位置
@dbname
在其上运行查询的数据库名
指定查询结果是以粗体 ( ) 还是非粗体 ( ) 显示 bold 的数据类型为 tinyint 默认值为
@rowcnt
指定生成的 HTML 文档中所显示行的最大值 默认值为 用来指定显示在 HTML 文档中满足给定查询的所有行
@whentype
指定何时运行创建 HTML 文档的任务 代表立即和应请求创建页 将立即创建和重新创建 HTML 文档
@lastupdated
指定所生成的 HTML 文档是否显示 上次更新时间 时间戳指示上次更新的日期和时间 ( ) 或者没有时间戳 ( ) 在 HTML 文档中 时间戳出现在查询结果的前一行
上面的存储过程如果在SQL Server 下执行 还须得开通执行它的权限 可以执行下面的代码
sp_configure show advanced options ; GO RECONFIGURE; GO sp_configure Web Assistant Proceres ; GO RECONFIGURE GO执行过后 我们看在D盘SQL Server文件下面生成一个OutPutHtml 文件 查看原代码 可以看到模板标记替换成对应的数据库的内容 代码如下
lishixin/Article/program/SQL/201311/16297