［询问］一个难解的SQL问题～～～

max5007

SELECT ssmnu.code, ssec.sec_lvl FROM ssmnu LEFT OUTER JOIN ssec ON ssec.code=ssmnu.code

如果以上的CODE的RESULT是
ssmnu 和 ssec 是TABLE


ssmnu.code        ssec.sec_lvl
１０００１             H
１０００２             A
１０００３             H
１０００４             H

现在我要的是在display result时，把 H变成 X， A变成NULL,而且不会改变DATABASE里的资料，请问我要如何做呢？

我想要的RESULT如下
ssmnu.code        ssec.sec_lvl
１０００１             X
１０００２            
１０００３             X
１０００４             X

这是在listbox上的资料，而且我是用ACCESS来写，ACCESS里的listbox 不能像VB的listbox 可以 listbox1.additem "XXXX"
所以，只能用SQLstatement来做了。。

goatstudio

要达到这样的效果可以用 queries 来达到...
只是为什么你要那样做呢? 不太明白呢....

无论如何, 首先你先到 Queries 那里, 制作一个 queries,
在 SQL MODE 里, 写下:

SELECT ssmnu.code, ssec.sec_lvl FROM ssmnu LEFT OUTER JOIN ssec ON ssec.code=ssmnu.code

然后回到 Design mode 里, 增加一格,
Field: right click -> build,
然后写下:


Switch([ssec]![sec_lvl]="H","X",[ssec]![sec_lvl]="A","")


这样就可以了.

海星1988

以下有个问题L：
请问有没有人知道如何用 VB 6.0 的coding 来 import text file 去 MS SQL 2000，我的 text file 类似如下 ：
Text file name = text1.txt
Name              Age              Position
AAAAAAA     55                 Sales Manager
bbb                 22                  Sales man
....　　　　　....　　　　  ..........
...　　　　　..........
.....
.....

这个 text file的fields 不被＂；＂， ＂tab＂， ＂，＂或......来分别，所以当我要import时，我必需算这个field里maximum可以到多少character，以下是我从网上找到的coding，可是不能用(可能是我自己也不很明白吧 !) ,有bug（根本link不到MS SQL 2000 server），再说我也是初学MS SQL 2000，so我觉得我link MS SQL 2000 Server 的那排coding 有很大问题！ 有谁有这方面的经验吗？？ 请帮帮忙！！

Coding :
Function ImportTextFile2()

Dim LineData As String
Dim NameAs String
Dim Age As String
Dim Pos As String

Open "D:\Systems\Packing\txt file\text1.txt" For Input As #1

DoCmd.OpenTable "EmpProfile", acNormal, acEdit

Do While Not EOF(1)
Line Input #1, LineData

Name= Trim(Mid(LineData, 2, 30))
Age= Trim(Mid(LineData, 33, 3))
Pos = Trim(Mid(LineData, 37, 20))

Loop
' Close the data file.
Close #1

End Function

我的疑问：
“DoCmd.OpenTable "EmpProfile", acNormal, acEdit” , 这行code拿来call MS Access 就行啦， call MS SQL 2000 Server 的code又该怎么写，在 VB 6.0 里又该select 哪些reference 和 component 呢？