江湖救急C语言下SQL改变成VB.NET,该如何解决
江湖救急!!!C语言下SQL改变成VB.NET
http://wenku.baidu.com/view/c4ce55d076eeaeaad1f33033.html
帮朋友问的,分数全用上了,求帮忙~~参考文章如上地址所示(百度文库0分下载的文献),程序段如下:
// FILE: myexample.sqc
#include <stddef.h>
#include <stdio.h>
#include <conio.h>
#define SQLID_MAX 30
void ErrorHandler (void);
int main (int argc,char**argv,char**envp)
{EXEC SQL BEGIN DECLARE SECTION;
char szServerDatabase [(SQLID_MAX *2)+2] = ″ .bookjy″ ;
char szLoginPassword[(SQLID_MAX *2)+2] = ″lulu.lulu″;
char dzbh[17],xm[11];char yb[7];
short int ybid;
EXEC SQL END DECLARE SECTION;
printf(″Sample Embedded SQL for C application\n″);
EXEC SQL CONNECT TO :szServerDatabase USER :szLoginPassword;
if (SQLCODE == 0)
printf(″Connection to SQL Server established\n″);
else{
printf(″ERROR: Connection to SQL Server failed\n″);
return (1); }
EXEC SQL DECLARE C1 CURSOR FOR
SELECT dzbh,xm,yb from dzhmc where szdw is not null;
EXEC SQL OPEN C1;
while (SQLCODE == 0) {
ybid=-1;
EXEC SQL FETCH C1 INTO :dzbh,:xm,:yb:ybid;
if (SQLCODE == 0)
printf(″NO.:%s\tname:%s\tzipcode:%s\n″, dzbh,xm, ybid<0?″null″:
yb);
else
break;
}printf(″\nreaderNo:″); gets(dzbh);
printf(″\nname:″); gets(xm);
printf(″\npostcode:″); gets(yb);
EXEC SQL INSERT INTO DZHMC (dzbh,xm,yb) values(:dzbh,:
xm,:yb);
EXEC SQL CLOSE C1;
EXEC SQL DISCONNECT ALL;
_getch();
return (0); }
要求是这样的:
1.参考陈龙猛在《电脑学习》 -2009年4期发表的 题为“一个嵌入式SQL编程实现的教学示例 ”的论文,实现一个完整的、上机调试通过的 c语言程序,通过嵌入式 SQL,实现对 学生课程数据库中student表中记录的显示输出,写出步骤和调试通过的源程序。
2.写一个VB.NET程序,通过ado.net实现访问上述 课程数据库,显示输出其中student表中的记录,即完成上题同样的功能。
我自己看了一下,要求1基本按照文章的指导就可以完成了,但是没学过VB,要求2表示搞不定啊,求VB大牛帮忙~~
------解决方案--------------------
dim CnStr as string ="Data Source= 数据库地址 ;Initial Catalog=数据库名称;Integrated Security=true;User ID =用户名 "
dim strSQL as string ="select * from student"
Using cn As New SqlConnection(CnStr)
Try
cn.Open()
dim da as new sqldataadapter(strSQL,cn)
dim ds as new dataset
da.fill(ds)
Catch ex As Exception
msgbox ex.message.tostring
end try
end using
你的数据就在 ds.table(0)中
------解决方案--------------------
可怜的孩子,一个语言都看不懂?
需要的话,可以去看看我的博客,里面有
http://wenku.baidu.com/view/c4ce55d076eeaeaad1f33033.html
帮朋友问的,分数全用上了,求帮忙~~参考文章如上地址所示(百度文库0分下载的文献),程序段如下:
// FILE: myexample.sqc
#include <stddef.h>
#include <stdio.h>
#include <conio.h>
#define SQLID_MAX 30
void ErrorHandler (void);
int main (int argc,char**argv,char**envp)
{EXEC SQL BEGIN DECLARE SECTION;
char szServerDatabase [(SQLID_MAX *2)+2] = ″ .bookjy″ ;
char szLoginPassword[(SQLID_MAX *2)+2] = ″lulu.lulu″;
char dzbh[17],xm[11];char yb[7];
short int ybid;
EXEC SQL END DECLARE SECTION;
printf(″Sample Embedded SQL for C application\n″);
EXEC SQL CONNECT TO :szServerDatabase USER :szLoginPassword;
if (SQLCODE == 0)
printf(″Connection to SQL Server established\n″);
else{
printf(″ERROR: Connection to SQL Server failed\n″);
return (1); }
EXEC SQL DECLARE C1 CURSOR FOR
SELECT dzbh,xm,yb from dzhmc where szdw is not null;
EXEC SQL OPEN C1;
while (SQLCODE == 0) {
ybid=-1;
EXEC SQL FETCH C1 INTO :dzbh,:xm,:yb:ybid;
if (SQLCODE == 0)
printf(″NO.:%s\tname:%s\tzipcode:%s\n″, dzbh,xm, ybid<0?″null″:
yb);
else
break;
}printf(″\nreaderNo:″); gets(dzbh);
printf(″\nname:″); gets(xm);
printf(″\npostcode:″); gets(yb);
EXEC SQL INSERT INTO DZHMC (dzbh,xm,yb) values(:dzbh,:
xm,:yb);
EXEC SQL CLOSE C1;
EXEC SQL DISCONNECT ALL;
_getch();
return (0); }
要求是这样的:
1.参考陈龙猛在《电脑学习》 -2009年4期发表的 题为“一个嵌入式SQL编程实现的教学示例 ”的论文,实现一个完整的、上机调试通过的 c语言程序,通过嵌入式 SQL,实现对 学生课程数据库中student表中记录的显示输出,写出步骤和调试通过的源程序。
2.写一个VB.NET程序,通过ado.net实现访问上述 课程数据库,显示输出其中student表中的记录,即完成上题同样的功能。
我自己看了一下,要求1基本按照文章的指导就可以完成了,但是没学过VB,要求2表示搞不定啊,求VB大牛帮忙~~
------解决方案--------------------
dim CnStr as string ="Data Source= 数据库地址 ;Initial Catalog=数据库名称;Integrated Security=true;User ID =用户名 "
dim strSQL as string ="select * from student"
Using cn As New SqlConnection(CnStr)
Try
cn.Open()
dim da as new sqldataadapter(strSQL,cn)
dim ds as new dataset
da.fill(ds)
Catch ex As Exception
msgbox ex.message.tostring
end try
end using
你的数据就在 ds.table(0)中
------解决方案--------------------
可怜的孩子,一个语言都看不懂?
需要的话,可以去看看我的博客,里面有